What's new

Samonaprawadzaj?ca rakieta! HIT!

Status
Not open for further replies.

Gelio

Senior User
Joined
Apr 10, 2008
Messages
617
Reaction score
101
Age
28
Witam wszystkich. Mam wam do zaprezentowania skrypt na rakiet?. Skrypt polega na tym, ?e wpisujemy:
Code:
!shoot nick gracza
i je?eli nie mamy exhausted, gracz nie jest godem, gracz jest zalogowany, gracz jest na tym samym pi?trze, odleg?o?? pomi?dzy graczami jest mniejsza ni? 20 (mo?na zmieni?) zostaje wystrzelona rakieta, a przy okazji gracz traci 1 infernal bolt (jako ta rakieta). Obra?enia s? dosy? niskie, zale?? od magic levela. Obszar, na jakim wybucha rakieta to romb 3x3, w ?rodku jest nasz cel.

Skrypt
W folderze data/talkactions/scripts robimy plik rakieta.lua, a do niego dodajemy:
Code:
local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_EXPLOSIONHIT)
setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_BOLT)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -0.9, -20, -1.5, -30)

local arr = {
{0, 0, 1, 0, 0},
{0, 1, 1, 1, 0},
{1, 1, 3, 1, 1},
{0, 1, 1, 1, 0},
{0, 0, 1, 0, 0}
}
local area = createCombatArea(arr)
setCombatArea(combat, area)

function onSay(cid, words, param)
local allCanAccess = 3  -- Access, ktory nie ma exhausted i zasiegu rakiety
local noKillAccess = 3  -- Access, do ktorego nie mozna strzelac
local zasieg = 30   -- Ile kratek maksymalnie mozna strzelic
local exh = 2   -- Ile sekund exhausted
local storage = 12647

if(os.time() > getPlayerStorageValue(cid,storage) or getPlayerAccess(cid) >= allCanAccess) then
	if(param ~= "") then
		local gracz = getPlayerByName(param)
		if(isPlayer(gracz) == TRUE and getPlayerAccess(gracz) < noKillAccess) then
			local distance = getDistanceBetween(getPlayerPosition(cid), getPlayerPosition(gracz))
			if(getPlayerAccess(cid) < allCanAccess and distance > zasieg) then
				doPlayerSendCancel(cid,"Not in range. Go closer.")
				return TRUE
			end
			if(getPlayerPosition(cid).z ~= getPlayerPosition(gracz).z) then
				doPlayerSendCancel(cid,"Target is on another floor.")
				return TRUE
			end
			local var = numberToVariant(gracz)
			doCombat(cid, combat, var)
			setPlayerStorageValue(cid,storage,os.time()+exh)
		else
			doPlayerSendCancel(cid,"Player is not online.")
		end
	else
		doPlayerSendCancel(cid,"You must enter target name.")
	end
else
	doPlayerSendCancel(cid,"You are exhausted.")
end
return TRUE
end
Potem do talkactions.xml (znajduj?cego si? w folderze wy?ej) dodajemy:
Code:
<talkaction words="!shoot" script="rakieta.lua" />

I gotowe.

Je?eli masz wyznaczony access to nie masz exhausted, odleg?o?? mo?e by? oboj?tnie jaka, nie musisz mie? wyznaczonego itemu, nie mo?esz dosta? hita.


Pozdro i czekam na komentarze,
Gelio
 

Daniolki

Active User
Joined
Apr 18, 2008
Messages
129
Reaction score
11
Age
29
Odp: Samonaprawadzaj?ca rakieta! HIT!

Gelio, tylko pozazdro?ci? twoich umiej?tno?ci. Te? pisze skrypty, ale idzie mi to opornie.

Skrypt dzia?a. Testowany na TFS 0.2.20 (8.31).

Pozdrawiam,
Daniolki
 

wiewiorQ

Advanced User
Joined
Jun 6, 2008
Messages
347
Reaction score
11
Odp: Samonaprawadzaj?ca rakieta! HIT!

Bardzo ciekawy i pomys?owy scrypt.
Ale je?li kto? nie ma inf bolta to nie mo?e strzela?.
I jeszcze jedno pytanie potrzebna do tego jest mana?
 

Gelio

Senior User
Joined
Apr 10, 2008
Messages
617
Reaction score
101
Age
28
Odp: Samonaprawadzaj?ca rakieta! HIT!

Do tego potrzebny jest tylko infernal bolt.

Pozdro,
Gelio
 

PatulecxD

Advanced User
Joined
Nov 17, 2008
Messages
209
Reaction score
12
Age
29
Odp: Samonaprawadzaj?ca rakieta! HIT!

Gelio Mistrzu Jeste? Boski ;) ?eby nie by?o ze sie podlizuje ale wszystkie skrypty ktore zrobi?em to dzia?aj? i sa wykorzystane na moim ots ;) :p
 

komen94

Active User
Joined
Dec 12, 2008
Messages
139
Reaction score
3
Odp: Samonaprawadzaj?ca rakieta! HIT!

moglbys dac ss i czy dziala to na 8.1??
 

sprix

User
Joined
Feb 6, 2009
Messages
43
Reaction score
2
Odp: Samonaprawadzaj?ca rakieta! HIT!

ciekawe przyda si? ale jeszcze nie pr?bowa?em. ?eby tylko u?ywa? to gm, bo bez sensu zwyk?y player. Wielkie Dzi?ki:cool:
;)
 

GarQet

Senior User
Joined
Jul 27, 2008
Messages
512
Reaction score
31
Odp: Samonaprawadzaj?ca rakieta! HIT!

Moim zdaniem, skrypt for Fun, lecz:
1. Zamiast infernal bolta powinna byc rakieta. (ja jak uzyje tego skryptu to napewno zmienie :)
2. Jest good, nie mam zastrze?e?, zaraz przetesuje.
 

GarQet

Senior User
Joined
Jul 27, 2008
Messages
512
Reaction score
31
Odp: Samonaprawadzaj?ca rakieta! HIT!

No dobra, powiem tak, pod TFS 0.3b2 nie dzia?a, wog?le si? zastanawiam gdzie jest id tego "inferna bolta", ale ok...
 

Roki Alth

Advanced User
Joined
Sep 29, 2008
Messages
257
Reaction score
10
Odp: Samonaprawadzaj?ca rakieta! HIT!

WOW! Gelio rz?dzisz! Naprawde super! Od razu dodaje do OTS! ?adnie wyt?umaczone gdzie co pozmienia?!Jeste? moim fanem...
 

wiewiorQ

Advanced User
Joined
Jun 6, 2008
Messages
347
Reaction score
11
Odp: Samonaprawadzaj?ca rakieta! HIT!

Gelio a gdyby? jeszcze zrobi? exhausted na 30 sek?
 

Gelio

Senior User
Joined
Apr 10, 2008
Messages
617
Reaction score
101
Age
28
Odp: Samonaprawadzaj?ca rakieta! HIT!

To ustaw w zmiennej exh warto?? 30 i b?dzie dzia?a?.

Pozdro,
Gelio
 

Sasuki

Banned
Joined
Mar 12, 2009
Messages
196
Reaction score
12
Odp: Samonaprawadzaj?ca rakieta! HIT!

Skrypt z nazwy troszke mnie roz?mieszy? :D ale wida? ?e mo?e by? dobry :D
 

krzysio

Advanced User
Joined
May 30, 2008
Messages
201
Reaction score
10
Odp: Samonaprawadzaj?ca rakieta! HIT!

Bardzo pomys?owe :D Jak kto? b?dzie nie pos?uszny to DED:p:D:D 8/10 Bo zawsze mo?e by? lepiej:)

_________________
Zapraszam na Forum: KLIK;)

Organizuje konkurs w kt?rym trzeba b?dzie rozkr?ci? FORUM

Czyli: zareklamowa?, poleci? itp...

Nagroda: Zg?asza? si? na PW:D
 

mateusz202

User
Joined
Mar 30, 2009
Messages
14
Reaction score
0
Odp: Samonaprawadzaj?ca rakieta! HIT!

ja bym znitni? to: local zasieg =
Code:
30   -- Ile kratek maksymalnie mozna strzelic
na to
Code:
100 -- Ile kratek maksymalnie mozna strzelic
przecierz gracz z lewelem 20 nie zwieje levelowi 60 :up:
 

mateusz202

User
Joined
Mar 30, 2009
Messages
14
Reaction score
0
Odp: Samonaprawadzaj?ca rakieta! HIT!

Przepraszam ?e pisze 2 post odrazu ale mnie o?wieci?o:D. Wi?c je?li jest 20 czy 30 kratek to mo?na u?y? :exiva "nick gracza albo mi odda? hehe(s?dze ?e na 100 kratkach by by?o fajne enfo i zwi?kszy? pole ra?enia (ale to mone wymys?y)<hahaha>.
 

warmix

User
Joined
Feb 7, 2009
Messages
44
Reaction score
1
Age
32
Odp: Samonaprawadzaj?ca rakieta! HIT!

Super skrypt.
Daj? 9/10
 

wiewiorQ

Advanced User
Joined
Jun 6, 2008
Messages
347
Reaction score
11
Odp: Samonaprawadzaj?ca rakieta! HIT!

Zaje*** scrypt 10/10.
 

Voilan

Advanced User
Joined
Feb 21, 2009
Messages
319
Reaction score
46
Odp: Samonaprawadzaj?ca rakieta! HIT!

Skrypt bardzo fajny 10/10. Nast?pnym razem podaj screna lub filmik!

@Up
Nie spamuj, i wida? ?e to nie tw?j skrypt!
 

Ksywek

New User
Joined
Apr 6, 2009
Messages
3
Reaction score
0
Odp: Samonaprawadzaj?ca rakieta! HIT!

bardzo fajn yskrypcik wedlug mnei ;] jeszcze nei testowlaem ale zaniedlugo... ;] skrypt 9/10 pomyslowosc takaz sama no i ten.. gz xd
@offtop
sry ale czy jest jakis poradnik ajk pisac skrypty bo ja sie wogole na tym nei znam :( szukalem po tym forum ale nei znalalzem a na innych m isie nei chce sukac czy moglby ktos mi podac jakis lin do takiego? od razu dziekuje :)
 
Status
Not open for further replies.
Top