Sting
Members-
Posts
60 -
Joined
-
Last visited
Never
Sting's Achievements
Newbie (1/14)
0
Reputation
-
some people find it rude when you speak spanish in america since the language here is english people expect others to speak english i guess i dont really know
-
devil wears prada nice… now im lisening too http://www.youtube.com/watch?v=aQhFRyfWZUA
-
Don't Trust Me - 3OH!3
-
anyways that dosnt answer my question whos rose and is she hot?
-
why =( its just about as long as everyone elses cept its not all pictures haha but alright ill get right on that
-
woah this whole post about uhh some web browser turned into a rose fan club…im confused about this! but i know what question i need to ask now! whos rose.... is she hot?
-
i would pay everyone in the eclipse forum to make a game for me… then hire a hitman to take them all out...
-
kody… aka zearth... ur not helping... just spamming... anyways the problem right now is its pretty much if i u know edit out the if statments in case 0 it works fine but if i leave them there or even just one of them there it pretty much acts as if there is an exit sub right before the if like it does the spell animation but then anything after the first if command dosnt happen so it dosnt look r dosnt get to + 1 along with the i variable
-
there is more to the script yes and the end sub is there this is the whole script of course im only working on case 1 right now because all the other cases are from my npce spell that works perefectly fine i cant seem to figure out why when it starts doing the if statments in the case 0 it just stops itself and like exits sub ``` sub playerspellb(index, damage, range, animation) dim i dim r dim name select case getplayerdir(index) case 0 i = 0 r = 1 do while i getplayery(index) - range then if getplayery(i) < getplayery(index) then if getplayerhp(i) > damage then call playermsg(index, "hit", 4) Call Setplayerhp(i, getplayerhp(i) - damage) call sendhp(i) else call playermsg(index, "hit", 4) call ondeath(i) end if end if end if end if end if r = r + 1 i = i + 1 if r > range then r = 1 end if loop case 1 i = 0 r = 1 do while i < 16 call spellanim(animation, getplayermap(index), getplayerx(index), getplayery(index) + r) if getnpcx(getplayermap(index), i) = getplayerx(index) then if getnpcy(getplayermap(index), i) < getplayery(index) + range then if getnpcy(getplayermap(index), i) > getplayery(index) then if getmapnpchp(getplayermap(index), i) > damage then call playermsg(index, "hit", 4) Call SetMapNpcTarget( getplayermap(index), i, index) Call SetMapNpcHP( getplayermap(index), i, GetMapNpcHP( getplayermap(index), i) - damage) call sendNPChp( getplayermap(index), i) else call playermsg(index, "hit", 4) Call SetMapNpcTarget( getplayermap(index), i, index) Call SetMapNpcHP( getplayermap(index), i, 1) Call sendNPC( getplayermap(index), i) end if end if end if end if r = r + 1 i = i + 1 if r > range then r = 1 end if loop case 2 i = 0 r = 1 do while i < 16 call spellanim(animation, getplayermap(index), getplayerx(index) - r, getplayery(index)) if getnpcx(getplayermap(index), i) > getplayerx(index) - range then if getnpcy(getplayermap(index), i) = getplayery(index) then if getnpcx(getplayermap(index), i) < getplayerx(index) then if getmapnpchp(getplayermap(index), i) > damage then call playermsg(index, "hit", 4) Call SetMapNpcTarget( getplayermap(index), i, index) Call SetMapNpcHP( getplayermap(index), i, GetMapNpcHP( getplayermap(index), i) - damage) call sendNPChp( getplayermap(index), i) else call playermsg(index, "hit", 4) Call SetMapNpcTarget( getplayermap(index), i, index) Call SetMapNpcHP( getplayermap(index), i, 1) Call sendNPC( getplayermap(index), i) end if end if end if end if r = r + 1 i = i + 1 if r > range then r = 1 end if loop case 3 i = 0 r = 1 do while i < 16 call spellanim(animation, getplayermap(index), getplayerx(index) + r, getplayery(index)) if getnpcx(getplayermap(index), i) < getplayerx(index) + range then if getnpcy(getplayermap(index), i) = getplayery(index) then if getnpcx(getplayermap(index), i) > getplayerx(index) then if getmapnpchp(getplayermap(index), i) > damage then call playermsg(index, "hit", 4) Call SetMapNpcTarget( getplayermap(index), i, index) Call SetMapNpcHP( getplayermap(index), i, GetMapNpcHP( getplayermap(index), i) - damage) call sendNPChp( getplayermap(index), i) else call playermsg(index, "hit", 4) Call SetMapNpcTarget( getplayermap(index), i, index) Call SetMapNpcHP( getplayermap(index), i, 1) Call sendNPC( getplayermap(index), i) end if end if end if end if r = r + 1 i = i + 1 if r > range then r = 1 end if loop end select exit sub end sub ```
-
``` sub playerspellb(index, damage, range, animation) dim i dim r dim name select case getplayerdir(index) case 0 i = 0 r = 1 do while i getplayery(index) - range then if getplayery(i) < getplayery(index) then if getplayerhp(i) > damage then call playermsg(index, "hit", 4) Call Setplayerhp(i, getplayerhp(i) - damage) call sendhp(i) else call playermsg(index, "hit", 4) call ondeath(i) end if end if end if end if end if r = r + 1 i = i + 1 if r > range then r = 1 end if loop ```*dies* (it wont get past the first if statment its just like NO! IM NOT GONNA DO THAT! and im like WTF! so pretty much it makes a spell animation on 1 tile and thats it….)
-
so apparently theres alot of people who play wow on these forums SOOOOO i was wondering how good you guys are! LETS START POSTING ARENA RATINGS AND RAID PROGRESSION!!! =D xD season 3 arena = highest rating 1700 season 4 arena = highest rating 1900 season 5 arena = highest rating 2200 season 6 arena = I quit BC = Raid progression TK/SSC WOTLK = Raid progression downed 25 man mally and sarth 3 drakes up
-
im looking for a game to work on… something that has a minimum of at least 60 maps already done or are sure they are not going to cancel game production example of scripts i guess if u want them? ``` 'None-Start--------------------------------------------------------------------------- 'None-End----------------------------------------------------------------------------- 'Scan-Start--------------------------------------------------------------------------- dim tar tar = getplayertarget(index) call playermsg(index, " " & getplayername(tar) " is level " & getplayerlevel(tar) & " has " & getplayerstr(tar) & "Str " & getplayerdef(tar) & "Def " & getplayerhp(tar) & "Hp and " & getplayermp(tar) & Mp!" 5) 'Scan-End----------------------------------------------------------------------------- 'Self Replace-Start------------------------------------------------------------------- dim target target = getplayertarget(index) if getplayermap(index) = getplayermap(target) then call playerwarp(index, getplayermap(target), getplayerx(target), getplayery(target)) call playerwarp(target, getplayermap(index), getplayerx(index), getplayery(index)) else call playermsg(index, "your target isnt on the same map as you.", 5) end if 'Self Replace-End--------------------------------------------------------------------- 'Self Heal-Start---------------------------------------------------------------------- call settile(getvar("spell.ini", getplayername(index), "map"), getvar("spell.ini", getplayername(index), "x"), getvar("spell.ini", getplayername(index), "y"), 0, 0, 0, 8) call settile(getplayermap(index), getplayerx(index), getplayery(index) - 3, 7, 1, 5, 8) call putvar("spell.ini", getplayername(index), "x", getplayerx(index)) call putvar("spell.ini", getplayername(index), "y", getplayery(index)) call putvar("spell.ini", getplayername(index), "map", getplayermap(index)) call setplayerhp(index, getplayerhp(index) + getplayerlevel(index)) 'Self Heal-End------------------------------------------------------------------------ 'Ice Blast-Start---------------------------------------------------------------------- case 1 dim i Dim aa Dim ab Dim ac Dim ad ad = GetPlayerClass(index) aa = GetVar("Classes\Class" & ad & ".ini", "CLASS", "Map") ab = GetVar("Classes\Class" & ad & ".ini", "CLASS", "y") ac = GetVar("Classes\Class" & ad & ".ini", "CLASS", "x") i = 1 call settile(getvar("spell.ini", getplayername(index), "map"), getvar("spell.ini", getplayername(index), "x"), getvar("spell.ini", getplayername(index), "y"), 0, 0, 0, 8) select case getplayerdir(index) case 0 if getplayery(index) - 3 >= 0 then call settile(getplayermap(index), getplayerx(index), getplayery(index) - 3, 7, 1, 5, 8) call putvar("spell.ini", getplayername(index), "x", getplayerx(index)) call putvar("spell.ini", getplayername(index), "y", getplayery(index) - 3) call putvar("spell.ini", getplayername(index), "map", getplayermap(index)) Call settimer("tmrtest " & index & "," & 0, 200) do while i 5 then call playermsg(index, "hit", 4) call setplayerhp(i, getplayerhp(i) - 5) call sendhp(i) else Call PlayerWarp(i, aa, ab, ac) call Globalmsg(getplayername(i) & " Has been killed by " & getplayername(index), 5) end if end if end if end if i = i + 1 loop end if case 1 if getplayery(index) + 3 = 0 then call settile(getplayermap(index), getplayerx(index) - 3, getplayery(index), 7, 1, 5, 8) call putvar("spell.ini", getplayername(index), "x", getplayerx(index) - 3) call putvar("spell.ini", getplayername(index), "y", getplayery(index)) call putvar("spell.ini", getplayername(index), "map", getplayermap(index)) Call settimer("tmrtest " & index & "," & 0, 200) do while i 5 then call setplayerhp(i, getplayerhp(i) - 5) call sendhp(i) call playermsg(index, "hit", 4) else Call PlayerWarp(i, aa, ab, ac) call Globalmsg(getplayername(i) & " Has been killed by " & getplayername(index), 5) end if end if end if end if i = i + 1 loop end if case 3 if getplayery(index) + 3 6 Then If GetPlayerAccess(index) < 2 Then Call PlayerMsg(index, "You need be of a higher access to use this command!", 4) Exit Sub End If n = Mid(TextSay, 6, Len(TextSay) - 5) n = FindPlayer(n) If n index Then If n > 0 Then Call PlayerWarp(n, 1, 5, 5) Call GlobalMsg(GetPlayerName(n) & " has been sent to jail by " & GETplayername(index) & ".", 9) Call AddLog(GetPlayerName(index) & " has warped " & GetPlayerName(n) & " to self, map #" & GetPlayerMap(index) & ".", ADMIN_LOG) Else Call PlayerMsg(index, "Player is not online.", 15) End If Else Call PlayerMsg(index, "You cannot jail yourself!", 15) End If End If Exit Sub End If 'Jail System End----------------------------------------------------------------------- ```thats some basic stuff
-
go go go make one for me! lol jk i dont even have a game running yet…. looks good tho nice job cant believe anyone would reject that!