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

Kainan54

Members
  • Posts

    61
  • Joined

  • Last visited

    Never

Everything posted by Kainan54

  1. Like if i want a npc to say things in multiple chat bubble how do I make him say them one at a time?
  2. What is happening? The ui is super messed up!
  3. well yea they were stackable(btw do i need to make give currency or somthing for stack?) but the problem still persisted when i un stacked them so im very confused…i noticed i deleted this case else thing when i put scripts in..do i need the case else?
  4. ok``` 'Executes whenever a scripted NPC does an action. Sub ScriptedNPC(Index, Script) Select Case Script Case 0 Call PlayerMsg(index, "you look weak…go get me 10 flowers and I might not hurt ya!?", 12) If CanTake(Index, 1, 10) = false Then Call PlayerMsg(index, "You runt go kill those fur things for the flowers! I bet even you can beat em!", 12) Else Call TakeItem(index, 1, 10) Call GiveItem(index, 2, 1) Call GiveItem(index, 3, 1) Call GiveItem(index, 4, 1) Call GiveItem(index, 5, 1) Call PlayerMsg(index, "ok here is some armor and a port potion to the outer world!", 12) End If Exit Sub Case 1 Call PlayerMsg(index, "I need 15 roots. Um erm can you help me??", 12) If CanTake(Index, 7, 15) = false Then Call PlayerMsg(index, "go kill some elites they took them so they should them.!", 12) Else Call TakeItem(index, 7, 15) Call GiveItem(index, 8, 1) Call GiveItem(index, 9, 1) Call GiveItem(index, 10, 1) Call PlayerMsg(index, "ha those roots were never mine!", 12) End If Exit Sub Case 2 Call PlayerMsg(index, "hey get me 30 dragon wings…I will pay you well with real fighting gear",12) If CanTake(Index, 15, 30) = false Then Call PlayerMsg(index, "the dragon’s are south of here now Get Me the wings", 12) Else Call TakeItem(index, 15, 30) Call GiveItem(index, 12, 1) Call GiveItem(index, 13, 1) Call GiveItem(index, 14, 1) Call GiveItem(index 16,1) Call PlayerMsg(index, "well done enjoy!", 12) End If Exit Sub Case 3 Call PlayerMsg(index, "give me 60 gems for a great reward.", 12) If CanTake(Index, 17, 60) = false Then Call PlayerMsg(index, " the cave dwellers have the jewls from there mines", 12) Else Call TakeItem(index, 17, 60) Call GiveItem(index, 18, 1) Call GiveItem(index, 19, 1) Call GiveItem(index, 20, 1) Call GiveItem(index, 21, 1) Call PlayerMsg(index, "hmm these are fine!", 12) End If Exit Sub Case 4 Call PlayerMsg(index, "kill the boss for a epic armor set and the freedom from the arena", 12) If CanTake(Index, 22, 1) = false Then Call PlayerMsg(index, " the kinar have the jewls.", 12) Else Call TakeItem(index, 22, 1) Call GiveItem(index, 23, 1) Call GiveItem(index, 24, 1) Call GiveItem(index, 25, 1) Call GiveItem(index, 26, 1) Call GiveItem(index, 27, 1) Call PlayerMsg(index, "use the port potion to leave", 12) End If Exit Sub End Select End Sub ```and scripts are on in sever
  5. Kainan54

    Pvp

    @Ghost: > ``` > Sub OnAttack(Index, Damage) > Dim Target > > If Int(Damage) > 0 Then > If Int(GetPlayerTarget(Index)) > 0 Then > Target = GetPlayerTarget(Index) > If(GetPlayerClass(Target)GetPLayerClass(Index) Then > Call DamagePlayer(Index, Target, Damage) > End If > Else > Target = GetPlayerTargetNPC(Index) > Call DamageNPC(Index, Target, Damage) > End If > End If > End Sub > ``` > I'm not sure if is the right way to do "not equal to" but I think it is. And that should be all you need… yes since i dont post often i was able to find it by looking through profile. this is not my script but the quotes should show that so yea…
  6. Kainan54

    Pvp

    i belive i saw a script that would do this im going to try and find it…
  7. shador does it work now cause i think i might be having same prob
  8. hmm still no luck is there any other info i may provide for a soultion(btw thx for all the help so far I needed it even if the npc was working :) )
  9. well still not working but i was using word so let me refix it with your noticing's and see if it works. i'm still new to this so this might be a lost cause.
  10. yea When atk the npc or click ctrl when next to it nothing happens. it worked with the default main.txt with godlords inventory stuff added. so yea here is the script thingy: ' Executes whenever a scripted NPC does an action. Sub ScriptedNPC(Index, Script) Select Case Script Case 0 Call PlayerMsg(index, "you look weak…go get me 10 flowers and I might not hurt ya!?", 12) If CanTake(Index, 1, 10) = false Then Call PlayerMsg(index, "You runt go kill those fur things for the flowers! I bet even you can beat em!", 12) Else Call TakeItem(index, 1, 10) Call GiveItem(index, 2, 1) Call GiveItem(index, 3, 1) Call GiveItem(index, 4, 1) Call GiveItem(index, 5, 1) Call PlayerMsg(index, "ok here is some armor and a port potion to the outer world!", 12) End If Exit Sub Case 1 Call PlayerMsg(index, "I need 15 roots. Um erm can you help me??", 12) If CanTake(Index, 7, 15) = false Then Call PlayerMsg(index, "go kill some elites they took them so they should them.!", 12) Else Call TakeItem(index, 7, 15) Call GiveItem(index, 8, 1) Call GiveItem(index, 9, 1) Call GiveItem(index, 10, 1) Call PlayerMsg(index, "ha those roots were never mine!", 12) End If Exit Sub Case 2 Call PlayerMsg(index, "hey get me 30 dragon wings…I will pay you well with real fighting gear”,12) If CanTake(Index, 15, 30) = false Then Call PlayerMsg(index, the dragon’s are south of here now get me the wings", 12) Else Call TakeItem(index, 15, 30) Call GiveItem(index, 12, 1) Call GiveItem(index, 13, 1) Call GiveItem(index, 14, 1) Call GiveItem(index 16,1 Call PlayerMsg(index, "well done enjoy!12) End If Exit Sub Case 3 Call PlayerMsg(index, "give me 60 gems for a great reward.", 12) If CanTake(Index, 17, 60) = false Then Call PlayerMsg(index, " the cave dwellers have the jewls from there mines", 12) Else Call TakeItem(index, 17, 60) Call GiveItem(index, 18, 1) Call GiveItem(index, 19, 1) Call GiveItem(index, 20, 1) Call GiveItem(index, 21, 1) Call PlayerMsg(index, "hmm these are fine!", 12) End If Exit Sub Case 4 Call PlayerMsg(index, "kill the boss for a epic armor set and the freedom from the arena", 12) If CanTake(Index, 22, 1) = false Then Call PlayerMsg(index, " the kinar have the jewls.", 12) Else Call TakeItem(index, 22, 1) Call GiveItem(index, 23, 1) Call GiveItem(index, 24, 1) Call GiveItem(index, 25, 1) Call GiveItem(index, 26, 1) Call GiveItem(index, 27, 1) Call PlayerMsg(index, "use the port potion to leave", 12) End If Exit Sub End Select End Sub i checked npc has stats and scripts are on so yea…
  11. how would u do a sprite sheet for this?? Looks great and i wanna use it and btw u can premade stuff by using a program that allows you to strech images but it will probaly look bad so yea..
  12. http://www.touchofdeathforums.com/smf/index.php/topic,28174.0.html how do i use include for post above?
  13. Kainan54

    Error 399

    Im using vista and despite the fact i intalled libary files i still get error 399…WHY?
  14. Ok i finaly get the basics of sad scripting…but just want to confirm somthing... 1\. do u always have to do A case# before a script and does # after case = script number? Also is there a way i can make quest guy 1 apear when selectiong scripts for scripted npc? thx very much!
  15. I was wondering if you could make it so items require lvl not stats.
  16. oh i need a blank one…all my items are pd on seperate pages
  17. Im using 32 by 32 graphics and i want 2 make my own item sheet…my stuff is pd so i was wondering how to do it....is like the same as a sprite template what rules i must follow...ect thx for any help
  18. Kainan54

    Guns

    I am making a more modern mmo type game and i was wondering if there is any guns (pd) that exist…if true giving me a link would be great(u and maker of guns would get credit)... although if there is none it would be great if somone could make me some customs....(i would give full credit.) Or if they could give like a basic gun template 2 help me do it myself(u would still get credit)
  19. could somone post a link…search bar no work but for now i will go thru tuts manualy
×
×
  • Create New...