GraphicsWindow.Show()
GraphicsWindow.LastKey = onClick
Sub onClick
T = GraphicsWindow.LastKey
If T = 1 Then
Goto Parte1
EndIf
If T = 2 Then
Goto Parte2
EndIf
EndSub
Parte1:
GraphicsWindow.ShowMessage("Premuto 1","Avviso")
Program.End()
Parte2:
GraphicsWindow.ShowMessage("Parte2","Avviso")
Program.End()