Squiddle has a question! *Gasp*

[Squiddle]

Hi everyone =). Well, I tried organizing my Main.txt for the Alpha release of Squiddle Online this summer, but I don't know why, it broke my sub menu scripts. When items pop up in menus, they don't work. I could set it back to what it was before and fix this, but that way was very un organized and I only want to do that as a last resort. Here's my sub menu scripts:

```
' Executes when something on a custom menu is clicked.
Sub MenuScripts(Index, Clicked_Index, Menu_Type)
Dim MenuTitle
Dim FieldMessage
Dim Flag

MenuTitle = getplayermenuclicktitle(Index)
FieldMessage = getplayermenuclickmsg(Index)

Select Case Menu_Type
Case 1
    Select Case Menu_Title                                   
        Case "Awards 1"
    Select Case Clicked_Index
Case 0
                Call PlayerMsg(Index, "Newbie: Worth 5 Squiddle Points", GREEN)
                Case 1
                Call PlayerMsg(Index, "Beginner: Worth 10 Squiddle Points", GREEN)
                Case 2
                Call PlayerMsg(Index, "Novice: Worth 15 Squiddle Points", GREEN)
                Case 3
                Call PlayerMsg(Index, "Intermediate: Worth 20 Squiddle Points", GREEN)
                Case 4
                Call PlayerMsg(Index, "Fighter: Worth 25 Squiddle Points", GREEN)
                Case 5
                Call PlayerMsg(Index, "Warrior: Worth 30 Squiddle Points", GREEN)
                Case 6
                Call PlayerMsg(Index, "Knight: Worth 35 Squiddle Points", GREEN)
            End Select
        Case "Quest Log"
    Select Case Clicked_Index
Case 0
    Flag = GetVar("Scripts\charextras\" & GetPlayerName(Index) & ".ini", "QUESTS", "Flag1")
            Select Case Flag
        Case "1"
            Call PlayerMsg(Index, "Sedsew needs an apple. I know some monsters drop them.", GREEN)
                Case "2"
            Call PlayerMsg(Index, "Sedsew was very gratefull for that apple.", GREEN)
                Case Else
    Call PlayerMsg(Index, "Talk to Sedsew in Tavelin to begin this quest.", GREEN)
    End Select
        Case 1
            Flag = GetVar("Scripts\charextras\" & GetPlayerName(Index) & ".ini", "QUESTS", "Flag2")
            Select Case Flag
        Case "1"
            Call PlayerMsg(Index, "Mary needs Slyme Vials for her sick kitten. Most slymes drop slyme vials.", GREEN)
        Case "2"
            Call PlayerMsg(Index, "I gave Mary the Slyme Vial, she told me to talk to her again.", GREEN)
                Case "3"
            Call PlayerMsg(Index, "Mary's kitten is all better now.", GREEN)
Case Else
    Call PlayerMsg(Index, "Talk to Mary in Seldien to begin this quest.", GREEN)
    End Select
    End Select         
                  End Select
Case 2
Call PlayerMsg(Index, "Clicked field number " & Clicked_Index & " on the menu named " & MenuTitle & ". The field text was " & FieldMessage, YELLOW)
Case 3
Select Case Menu_Title
    Case "Profile"
        If Clicked_Index = 0 Then
                    Call PlayerMsg(Index, "Your Name", GREEN)
            End If
            If Clicked_Index = 1 Then
                Call PlayerMsg(Index, "Your Squiddle Points", GREEN)
            End If
            If Clicked_Index = 2 Then
                Call PlayerMsg(Index, "Your amount of NPC Kills", GREEN)
            End If
            If Clicked_Index = 3 Then
                Call PlayerMsg(Index, "Your amount of Peace Offerings", GREEN)
                End If
            End Select
End Select
End Sub
```
So there you go. I don't know why this code doesn't work, I'm pretty sure I've organized it correctly. If you can help, please do so ASAP. Thanks in advance!

[DarkMazer]

I can't find anything wrong with it.  Perhaps it's not your MenuScripts sub, but your custom menus that are broken?  Maybe you changed the menu titles or indexes around. 

Perhaps you should try replacing it with your old MenuScripts and see if that actually works.  If it does, then the problem is with MenuScripts, after all.  Otherwise, it's elsewhere in your code.

[Owen F]

squiddle, your gonna wanna hope you have a backup file ^.^
I can't see anything wrong with it, but i only looked briefly.