Jump to content
Search In
  • More options...
Find results that contain...
Find results in...

Sting

Members
  • Posts

    60
  • Joined

  • Last visited

    Never

Sting's Achievements

Newbie

Newbie (1/14)

0

Reputation

  1. 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
  2. Sting

    Myspace

    anyone who has a myspace should post it here we can all add each other and be a cute little family =] *flowers bloom as i frolic through them* myspace.com/imakemilkjealous thats mine
  3. devil wears prada nice… now im lisening too http://www.youtube.com/watch?v=aQhFRyfWZUA
  4. anyways that dosnt answer my question whos rose and is she hot?
  5. why =( its just about as long as everyone elses cept its not all pictures haha but alright ill get right on that
  6. 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?
  7. i would pay everyone in the eclipse forum to make a game for me… then hire a hitman to take them all out...
  8. thanks for the help and no it dosnt matter cuz the sub is called playerspellb its fixed now =]
  9. 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
  10. 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 ```
  11. ``` 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….)
  12. 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
  13. 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
  14. Sting

    Rejected Logo…

    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!
×
×
  • Create New...