I didn't try to compile your code, but this doesn't work?
Simba Code:
Case State of
0: menu := isBuyOpen;
1: menu := isSellOpen;
2: menu := InGE;
end;
seems like it should but your menu is set as string not a boolean.
also
Simba Code:
MarkTime(c)
While not menu do
begin
Wait(500);
If TimeFromMark(c) > 30000 then
Writeln('Could not get to the screen');
TerminateScript;
end;
again, you set menu as string not as boolean.
My suggestion
Simba Code:
menu: string;
//change that to
menu: boolean;
should be oke:P