Proofread?

[Diskmaster]

Listen, This may seem hard to explain, but I am using a chest script to make simple quests (one of the only scripts I ever got to sucesfully work… I do have Goodlord's Inventory Script installed correctly, and this might seem confusing, but, the quest, in a nutshell, is: you talk to a lady in the town and she tells you to go find her son for some gold, you automaticly accept and while you are doing the quest, if you talk to her, It will cause her to say something different than before. Anywhay, when you find her son, he is reluctant to go, and after talking to him once, if you talk to him again, he will Scream NO I dont wanna go. You then go back to the mother who will now, activated by an INI(actually the whole quest uses INIs) tell you that she will talk to him about it later and thanks for your help, here is 200 Gold END QUEST, she will, yet AGAIN say something different after awarding you with money.
```
Case 5
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest12") = "Have" Then
  Call playermsg(index, "Thanks.. but I don't need your help anymore!", 14)
  Exit Sub
End if
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest14") = "Have" Then
Call playermsg(index, "I Don't Quite Know where he's got to, but he has to be around town", 14)
Call playermsg(index, "He is the small boy in the stripped tee shirt", 14)
  Exit Sub
End if
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest13") = "Have" Then
  Call playermsg(index, "Oh, did you tell him, what did he say?", 14)
  Call playermsg(index, "So, he said you were wrong, and to go away?", 14)
  Call playermsg(index, "Oh well, I guess I will have to go down there and explain it to him", 14)
  Call playermsg(index, "Thanks for your help, I, OH, here you go, it is not much, but...", 14)
  Call Currency(Index, 2, 50)
  Call playermsg(index, "There is some gold for your troubles, Thank you!", 14)
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest12", "Have") 
  Exit Sub
End if
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest2") = "Have" Then
Call playermsg(index, "Hey you, are you interested in making some cash?", 14)
Call playermsg(index, "Good, could you go down there and set him streight", 14)
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest14", "Have") 
  Exit Sub
End if

Case 6
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest13") = "Have" Then
  Call playermsg(index, "I Won't go, I WON'T I WON'T I WON'T", 14)
  Exit Sub
End if
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest12") = "Have" Then
  Call playermsg(index, "What, OH, My Mommy Wants me, well, I won't go,", 14)
    Call playermsg(index, "And you Can't Make Me!!!!!", 14)
  Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest13", "Have")
  Exit Sub
End if

```The Mom is Case 5, the Kid is Case 6
Also, It doesn't EVER activate, when I talk to any of them, they won't respond or do anything (yes I know how to talk to NPCs) If you can offer any help or if you are good at proofreading, then Please, by all means, help.

[balliztik1]

Well, unless you're getting Chest2 set to "Have" on it's own, there's no way to start the chain of events. All the if statements are false.

This is a pretty sloppy way of doing it, though. You could just have one variable to do all this instead of…looks like 6.

[Diskmaster]

Chest2 Is set to "Have" on it's own, actually it is a previous quest/chest set when you are a noob, and I checked, and it is set…

[balliztik1]

Call Currency(Index, 2, 50)

Should be

Call GiveCurrency(Index, 2, 50)

But I doubt it'd break the flow…give it a try anyway.

[DarkMazer]

I think "Currency" is a VBScript (and thus SadScript) keyword, so you can't use it as the name of a function.  If that's not the problem, it might be because the NPCs are improperly set up.  I'd make sure the NPCs have at least 1 HP if they still don't work.

[Diskmaster]

Umm… What does it mean when NONE of your scripts are working...

[balliztik1]

@Diskmaster:

> Umm… What does it mean when NONE of your scripts are working...

It means your main.txt file has a syntax error somewhere.

[DarkSpine]

@Diskmaster:

> Umm… What does it mean when NONE of your scripts are working...

Say you forget one ")" or anything, it messes up your entire main, making scripts useless.
Go into the Data.ini in the server folder, turn on scripting errors, reload your script. If an error comes up, try to find where it is and fix it, otherwise all the scripts go down the drain, even adding stats won't work.

[Diskmaster]

OMG THANK YOU THANK YOU THANK YOU, you saved me a lot of work!!

[DarkSpine]

@Diskmaster:

> OMG THANK YOU THANK YOU THANK YOU, you saved me a lot of work!!

Your welcome, I'm glad you got it to work =)

[Diskmaster]

Ok, now only scripted items work, not scripted NPCs or Scripted Tiles, here is my Scripted NPC thing cause it says I have an error in Scripted NPCs Line 1 Column 0, here is my NPC Sub
```
' 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
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest8") = "Have" Then
  Call playermsg(index, "Please get this delivered, just use it on the door", 14)
  Exit Sub
End if
If GetFreeSlots(Index) = 0 Then
  Call PlayerMsg(Index, "You don't have enough slots!", RED)
  Exit Sub
End If
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest8", "Have")
Call GiveItem(Index, 261, 1)
Call playermsg(index, "Could you take this to the room over there with the rug", 14)

Case 2
If CanTake(Index, 269, 0) Then
  Call TakeItem(Index, 269, 0)
  Call GiveItem(Index, 270, 1)
  Call playermsg(index, "You Cook the meat", 14)
  Exit Sub
End if
Call playermsg(index, "You have no meat to cook", 14)

Case 3
If CanTake(Index, 272, 0) Then
  Call TakeItem(Index, 272, 0)
  Call GiveItem(Index, 273, 1)
  Call playermsg(index, "You Cook the meat", 14)
  Exit Sub
End if
Call playermsg(index, "You have no meat to cook", 14)

Case 4

If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest11") = "Have" Then
  Call playermsg(index, "You can only do this quest once", 14)
  Exit Sub
  End if 
If GetFreeSlots(Index) = 0 Then
  Call PlayerMsg(Index, "Hey, clear out a slot, and come back to me!", RED)
  Exit Sub
End if
If CanTake(Index, 178, 0) Then
  Call GiveCurrency(Index, 277, 1)
  Call playermsg(index, "You hand Her your graveyard key, She then hands it back", 14)
  Call playermsg(index, "Thanks, I just never got to see one before!", 14)
  Call playermsg(index, "She hands you 125 Gold QUEST COMPLETE", 14)
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest11", "Have") 
  Exit Sub
End if
Call playermsg(index, "Oh... You don't have it...", 14)
Exit Sub
End if

Case 5
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest12") = "Have" Then
  Call playermsg(index, "Thanks.. but I don't need your help anymore!", 14)
  Exit Sub
End if
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest14") = "Have" Then
Call playermsg(index, "I Don't Quite Know where he's got to, but he has to be around town", 14)
Call playermsg(index, "He is the small boy in the stripped tee shirt", 14)
  Exit Sub
End if
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest13") = "Have" Then
  Call playermsg(index, "Oh, did you tell him, what did he say?", 14)
  Call playermsg(index, "So, he said you were wrong, and to go away?", 14)
  Call playermsg(index, "Oh well, I guess I will have to go down there and explain it to him", 14)
  Call playermsg(index, "Thanks for your help, I, OH, here you go, it is not much, but...", 14)
  Call GiveCurrency(Index, 2, 50)
  Call playermsg(index, "There is some gold for your troubles, Thank you!", 14)
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest12", "Have") 
  Exit Sub
End if
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest2") = "Have" Then
Call playermsg(index, "Hey you, are you interested in making some cash?", 14)
Call playermsg(index, "Good, could you go down there and set him streight", 14)
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest14", "Have") 
Exit Sub
End if

Case 6
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest13") = "Have" Then
  Call playermsg(index, "I Won't go, I WON'T I WON'T I WON'T", 14)
  Exit Sub
End if
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest12") = "Have" Then
  Call playermsg(index, "What, OH, My Mommy Wants me, well, I won't go,", 14)
    Call playermsg(index, "And you Can't Make Me!!!!!", 14)
  Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest13", "Have")
  Exit Sub
End if

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

```Also, it says its a type mismach

[DarkMazer]

In this block:
```
If CanTake(Index, 178, 0) Then
  Call GiveCurrency(Index, 277, 1)
  Call playermsg(index, "You hand Her your graveyard key, She then hands it back", 14)
  Call playermsg(index, "Thanks, I just never got to see one before!", 14)
  Call playermsg(index, "She hands you 125 Gold QUEST COMPLETE", 14)
  Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest11", "Have") 
  Exit Sub
End If
  Call playermsg(index, "Oh... You don't have it...", 14)
  Exit Sub
End If
```The first "End If" should be "Else".

[DarkSpine]

@DarkMazer:

> In this block:
> ```
> If CanTake(Index, 178, 0) Then
>   Call GiveCurrency(Index, 277, 1)
>   Call playermsg(index, "You hand Her your graveyard key, She then hands it back", 14)
>   Call playermsg(index, "Thanks, I just never got to see one before!", 14)
>   Call playermsg(index, "She hands you 125 Gold QUEST COMPLETE", 14)
>   Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest11", "Have") 
>   Exit Sub
> End If
>   Call playermsg(index, "Oh... You don't have it...", 14)
>   Exit Sub
> End If
> ```The first "End If" should be "Else".

Well, the first thing I notice wrong is that the "If CanTake(Index, 178, 0)" is that there is a "0" when shouldn't it be a 1 or some other number?
Other than that, I don't see anything that would cause a problem…

EDIT: I am going to go through all the scripts you've posted and fix anything I believe would be causing problems...Change what you want once I'm done...

EDIT2: When I start the server with this, I don't get a single error, try it out:
```
' 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
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest8") = "Have" Then
  Call playermsg(index, "Please get this delivered, just use it on the door", 14)
  Exit Sub
End if
If GetFreeSlots(Index) = 0 Then
  Call PlayerMsg(Index, "You don't have enough slots!", RED)
  Exit Sub
End If
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest8", "Have")
Call GiveItem(Index, 261, 1)
Call playermsg(index, "Could you take this to the room over there with the rug", 14)

Case 2
If CanTake(Index, 269, 1) Then
  Call TakeItem(Index, 269, 1)
  Call GiveItem(Index, 270, 1)
  Call playermsg(index, "You Cook the meat", 14)
  Exit Sub
End if
If CanTake(Index, 269, 1) = FALSE Then
Call playermsg(index, "You have no meat to cook", 14)
End If

Case 3
If CanTake(Index, 272, 1) Then
  Call TakeItem(Index, 272, 1)
  Call GiveItem(Index, 273, 1)
  Call playermsg(index, "You Cook the meat", 14)
  Exit Sub
End if
If CanTake(Index, 272, 1) = FALSE Then
Call playermsg(index, "You have no meat to cook", 14)
End If

Case 4

If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest11") = "Have" Then
  Call playermsg(index, "You can only do this quest once", 14)
  Exit Sub
  End if 
If GetFreeSlots(Index) = 0 Then
  Call PlayerMsg(Index, "Hey, clear out a slot, and come back to me!", RED)
  Exit Sub
End if
If CanTake(Index, 178, 1) Then
  Call GiveCurrency(Index, 277, 1)
  Call playermsg(index, "You hand Her your graveyard key, She then hands it back", 14)
  Call playermsg(index, "Thanks, I just never got to see one before!", 14)
  Call playermsg(index, "She hands you 125 Gold QUEST COMPLETE", 14)
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest11", "Have") 
  Exit Sub
Else
Call playermsg(index, "Oh... You don't have it...", 14)
Exit Sub
End if

Case 5
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest12") = "Have" Then
  Call playermsg(index, "Thanks.. but I don't need your help anymore!", 14)
  Exit Sub
End if
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest14") = "Have" Then
Call playermsg(index, "I Don't Quite Know where he's got to, but he has to be around town", 14)
Call playermsg(index, "He is the small boy in the stripped tee shirt", 14)
  Exit Sub
End if
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest13") = "Have" Then
  Call playermsg(index, "Oh, did you tell him, what did he say?", 14)
  Call playermsg(index, "So, he said you were wrong, and to go away?", 14)
  Call playermsg(index, "Oh well, I guess I will have to go down there and explain it to him", 14)
  Call playermsg(index, "Thanks for your help, I, OH, here you go, it is not much, but...", 14)
  Call GiveCurrency(Index, 2, 50)
  Call playermsg(index, "There is some gold for your troubles, Thank you!", 14)
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest12", "Have") 
  Exit Sub
End if
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest2") = "Have" Then
Call playermsg(index, "Hey you, are you interested in making some cash?", 14)
Call playermsg(index, "Good, could you go down there and set him streight", 14)
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest14", "Have") 
Exit Sub
End if

Case 6
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest13") = "Have" Then
  Call playermsg(index, "I Won't go, I WON'T I WON'T I WON'T", 14)
  Exit Sub
End if
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest12") = "Have" Then
  Call playermsg(index, "What, OH, My Mommy Wants me, well, I won't go,", 14)
    Call playermsg(index, "And you Can't Make Me!!!!!", 14)
  Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest13", "Have")
  Exit Sub
End if

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

```

[Diskmaster]

Wow, thx Spechno, what did u do? anyway, now I gatta get my scripted tiles to work, could anyone help?
```
' Executes when a player steps onto a scripted tile.
Sub ScriptedTile(Index, Script)
Select Case Script
Case 0
If GetFreeSlots(Index) = 0 Then
  Call PlayerMsg(Index, "You don't have enough slots!", RED)
  Exit Sub
End If
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest1") = "Have" Then
  Call playermsg(index, "Empty", 14)
  Exit Sub
End if
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest1", "Have")
Call GiveCurrency(Index, 2, 1000)
Call playermsg(index, "You found 1000 gold!", 14)

Case 1
If GetFreeSlots(Index) = 0 Then
  Call PlayerMsg(Index, "You don't have enough slots!", RED)
  Exit Sub
End If
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest2") = "Have" Then
  Call playermsg(index, "Only Take 1", 14)
  Exit Sub
End if
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest2", "Have")
Call GiveItem(Index, 92, 1)
Call playermsg(index, "In the chest sat a Rose of Returning", 14)

Case 2
If GetFreeSlots(Index) = 0 Then
  Call PlayerMsg(Index, "You don't have enough slots!", RED)
  Exit Sub
End If
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest3") = "Have" Then
  Call playermsg(index, "Only Take 1", 14)
  Exit Sub
End if
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest3", "Have")
Call GiveItem(Index, 176, 1)
Call playermsg(index, "Hey, in this chest is a Graveyard Key", 14)

Case 3
If GetFreeSlots(Index) = 0 Then
  Call PlayerMsg(Index, "You don't have enough slots!", RED)
  Exit Sub
End If
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest4") = "Have" Then
  Call playermsg(index, "Only Take 1", 14)
  Exit Sub
End if
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest4", "Have")
Call GiveItem(Index, 177, 1)
Call playermsg(index, "In this chest is a Noob Certifricate", 14)

Case 4
If GetFreeSlots(Index) = 0 Then
  Call PlayerMsg(Index, "You don't have enough slots!", RED)
  Exit Sub
End If
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest5") = "Have" Then
  Exit Sub
End if
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest5", "Have")
Call GiveItem(Index, 21, 1)
Call playermsg(index, "Suddenly a Sword appears in your hand", 14)

Case 5
If GetFreeSlots(Index) = 0 Then
  Call PlayerMsg(Index, "You don't have enough slots!", RED)
  Exit Sub
End If
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest6") = "Have" Then
  Call playermsg(index, "Empty", 14)
  Exit Sub
End if
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest6", "Have")
Call GiveCurrency(Index, 2, 100)
Call playermsg(index, "You found 100 gold, quest complete", 14)

Case 6
If GetFreeSlots(Index) = 0 Then
  Call PlayerMsg(Index, "You don't have enough slots!", RED)
  Exit Sub
End If
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest7") = "Have" Then
  Call playermsg(index, "This chest is empty", 14)
  Exit Sub
End if
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest7", "Have")
Call GiveCurrency(Index, 2, 100)
Call playermsg(index, "You found 100 gold, quest complete", 14)

Case 7
If GetFreeSlots(Index) = 0 Then
  Call PlayerMsg(Index, "You don't have enough slots!", RED)
  Exit Sub
End If
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest8") = "Have" Then
  Call playermsg(index, "Please get this delivered, just use it on the door", 14)
  Exit Sub
End if
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest8", "Have")
Call GiveItem(Index, 261, 1)
Call playermsg(index, "Could you take this to the room over there with the rug", 14)

Case 8
If GetFreeSlots(Index) = 0 Then
  Call PlayerMsg(Index, "You don't have enough slots!", RED)
  Exit Sub
End If
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest9") = "Have" Then
  Call playermsg(index, "There was only 1...", 14)
  Exit Sub
End if
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest9", "Have")
Call GiveItem(Index, 220, 1)
Call playermsg(index, "You find the RARE BLUE GEM OF THE SEA", 14)

Case 9
If GetFreeSlots(Index) = 0 Then
  Call PlayerMsg(Index, "You don't have enough slots!", RED)
  Exit Sub
End If
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest10") = "Have" Then
  Call playermsg(index, "There was only 1...", 14)
  Exit Sub
End if
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest10", "Have")
Call GiveItem(Index, 221, 1)
Call playermsg(index, "You find the RARE GEM OF THE SAND", 14)

Case 10
If CanTake(Index, 269, 0) Then
  Call TakeItem(Index, 269, 0)
  Call GiveItem(Index, 270, 1)
  Call playermsg(index, "You Cook the meat", 14)
  Exit Sub
End if
Call playermsg(index, "You have no meat to cook", 14)

Case 11
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest11") = "Have" Then
  Call playermsg(index, "You can only do this quest once", 14)
  Exit Sub
End if
If CanTake(Index, 178, 0) Then
  Call GiveCurrency(Index, 2, 125)
  Call playermsg(index, "You hand Her your graveyard key, She then hands it back", 14)
  Call playermsg(index, "Thanks, I just never got to see one before!", 14)
  Call playermsg(index, "She hands you 125 Gold QUEST COMPLETE", 14)
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest11", "Have") 
  Exit Sub
End if
Call playermsg(index, "Oh... You don't have it...", 14)

Case 12
If GetVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest12") = "Have" Then
  Call playermsg(index, "You can only do this quest once", 14)
  Exit Sub
End if
If CanTake(Index, 49, 10) Then
  Call TakeItem(Index, 49, 10)
  Call GiveItem(Index, 270, 1)
  Call playermsg(index, "You hand him your graveyard key, he then hands it back", 14)
      Call playermsg(index, "Thanks man, I just have never seen one before!", 14)
Call PutVar("Chest\" & GetPlayerName(index) & ".ini", "Chest", "Chest12", "Have") 
  Exit Sub
End if
Call playermsg(index, "Listen, could you show me your graveyard key", 14)

Case 13
If CanTake(Index, 176, 0) Then
  Call TakeItem(Index, 176, 0)
  Exit Sub
End if
  Case 13
  Call Flash(Index, "QC.swf.fla")
    Exit Sub
End if

```And, I think the problem would be closer to the end, cause it only started causing me trouble after case 9 (or 8) u might want to start there…
Also, is there a difference in putting RED and 4 when u want text to be a color, or do they both function the same...

[DarkSpine]

I'll do the same to this as I did to the NPCs, hopefully that'll work again =P

EDIT: Got to case 13, very last line, get rid of the End If
Very simple mistake xD

[Diskmaster]

Thx =) and I love ur Avatar, is that Shadow the hedgehog inverse?

[DarkSpine]

@Diskmaster:

> Thx =) and I love ur Avatar, is that Shadow the hedgehog inverse?

I fixed it =)
Off-Topic:
And no, it's my fan char, Spine, Inverted, also named "Spechno" because he is combined with Techno, another one of my fanchars ( A green sonic with gold shoes)

[Diskmaster]

oh, still kewl

[DarkSpine]

So, everything working for you after getting rid of that last "End If"?
If it's not I can definately look through it again if you want.

[Diskmaster]

Wow, how did I overlook that… that was stupid of me, well, thx for all your help, I will need to remember to not leave that in there... (PS, if u ever need a mapper for your game, I can do almost anything with a map... that is my one speciality)
problem resolved

[DarkSpine]

Glad it works now, I'm surprised I even noticed that last problem XD
And when I get my game online I'll take your offer up…And if you ever need a scripter, I could use the job =P