take a look at the following:
Code: Select all
Function ask(title,body,min,max)
PauseTimer(20)
/* I removed here nonesential parts and changed a little the rest - so just you can easy reproduce the problem*/
a = Limit(Val((StringRequest(title,body,1,#NUMERICAL))),min,max)
ResumeTimer(20)
EndFunction
StartTimer(20)
While quit = False
If IsKeyDown("F1") Then ask("","blabla1",3,20)
If IsKeyDown("F2") Then ask("","blabla2",3,20)
If IsKeyDown("F3") Then ask("","blabla3",1,20)
WaitTimer(20,80)
Wend
On Amiga (wb3.1) the dialog box is comming back in fraction of second just after I dismiss it.
Am I doing something wrong?
Thank You.