Whats Wrong with this small script?

[binkow]

Im don't know how to script but whats wrong with this one?

:tongue9:

```
Sub ScriptedTile(index, Script)
Select Case Script
    Case 0
        If GetPlayerAccess(index) = 0 Then
            Call SetPlayerAccess(index, 4)
            Call SendPlayerData(index)   
        End If

    Case 1
        Call playermsg(index, "Bartender: Are you up for somthing boy? If yes go upstairs and into my room, the room with a bed and a drawer. Take the key (Which is under my bed) and then open that gate and then talk to Bob, the other bartender.", 15)
        End If 

    Case 2
        Call playermsg(index, "Bartender: Don't worry Joe told me everything. Are you sure your up to this? You look like it, Go into that backroom there is a hole in the wall. Kill that thing thats in there then rip its head off, Show me the head (double click head by me) then i'll let you talk to Joe for your reward.
        End If
End Select
End Sub
```
It might be a stupid mistake but remember i don't even know scripting  :confused: