Scripted npc problems.

[adamsharp]

hi my npc is scripted with Case 1
Please Tell Me If There Is Any Bugs And If There is please correct them thanks
```
' Executes whenever a scripted NPC does an action.
Sub ScriptedNPC(Index, Script)
Select Case Script
Case 0
Call PlayerMsg(Index, "This scripted NPC has no apparent use.", WHITE)
Exit Sub

        Case 1       
    Call GivePlayerItem(Index, 1, 25)
            Call PlayerWarp(Index, 2, 9, 7)
Call PlayerMsg(Index, "Welcome To The Mainland.", WHITE)
            Call PlayerMsg(Index, "The People Of Wesa Have Given You 25 Gold As A Gift.", WHITE)
Exit Sub

```
Adam Sharp

[JayT]

```
' Executes whenever a scripted NPC does an action.
Sub ScriptedNPC(Index, Script)
  Select Case Script
      Case 0
        Call PlayerMsg(Index, "This scripted NPC has no apparent use.", WHITE)
        Exit Sub

        Case 1             
          Call GiveItem(Index, 1, 25)
            Call PlayerWarp(Index, 2, 9, 7)
        Call PlayerMsg(Index, "Welcome To The Mainland.", WHITE)       
            Call PlayerMsg(Index, "The People Of Wesa Have Given You 25 Gold As A Gift.", WHITE)
        Exit Sub
End Sub

```
change it to that. make sure you have inve script installed into ur main

Edit: missed End Sub at the end  :P

[adamsharp]

what script…

[xelander]

Make sure you got Godlord inventory script.
http://www.touchofdeathforums.com/smf/index.php/topic,28174.0.html

```
' Executes whenever a scripted NPC does an action.
Sub ScriptedNPC(Index, Script)
  Select Case Script
      Case 0
        Call PlayerMsg(Index, "This scripted NPC has no apparent use.", WHITE)
        Exit Sub

        Case 1             
          Call GiveCurrency(Index, 1, 25)
            Call PlayerWarp(Index, 2, 9, 7)
        Call PlayerMsg(Index, "Welcome To The Mainland.", WHITE)       
            Call PlayerMsg(Index, "The People Of Wesa Have Given You 25 Gold As A Gift.", WHITE)
        Exit Sub

```

[JayT]

is it currency he's giving??? he didnt state that lol  ;)

[adamsharp]

urmm i got it and did the script thing and i got a pile of 0 gold in my inventory…

[JayT]

```
' Executes whenever a scripted NPC does an action.
Sub ScriptedNPC(Index, Script)
  Select Case Script
      Case 0
        Call PlayerMsg(Index, "This scripted NPC has no apparent use.", WHITE)
        Exit Sub

        Case 1           
          Call GiveCurrency(Index, 1, 25)
            Call PlayerWarp(Index, 2, 9, 7)
        Call PlayerMsg(Index, "Welcome To The Mainland.", WHITE)       
            Call PlayerMsg(Index, "The People Of Wesa Have Given You 25 Gold As A Gift.", WHITE)
        Exit Sub
[color]End Sub[/color]
```
make sure thers a 'End Sub' at the end

[adamsharp]

i have…
```
' Executes whenever a scripted NPC does an action.
Sub ScriptedNPC(Index, Script)
Select Case Script
Case 0
Call PlayerMsg(Index, "This scripted NPC has no apparent use.", WHITE)
Exit Sub

        Case 1             
          Call GiveItem(Index, 1, 25)
            Call PlayerWarp(Index, 2, 9, 7)
        Call PlayerMsg(Index, "Welcome To The Mainland.", WHITE)       
            Call PlayerMsg(Index, "The People Of Wesa Have Given You 25 Gold As A Gift.", WHITE)
        Exit Sub

Case Else
Call PlayerMsg(Index, "No NPC script found. Please contact an admin to solve this problem.", WHITE)
Exit Sub
End Select
End Sub

```

[Bobosk]

GiveItem isn't designed to give stackable items, you need to use GiveCurrency