FreezingFire Admin Team

Joined: 23 Jun 2002 Posts: 3508
|
Posted: Thu Jan 08, 2004 10:07 pm Post subject: |
|
|
Here's an approach:
| Code: | Title Cancel-Loop
DIALOG CREATE,Cancel-Loop,-1,0,240,160
DIALOG ADD,BUTTON,Start,34,71,64,24,Start
DIALOG ADD,BUTTON,Cancel,72,71,64,24,Cancel
DIALOG SHOW
:Evloop
wait event
%e = @event()
goto %e
:StartBUTTON
%x = 0
repeat
%x = @succ(%x)
%e = @event()
until @equal(%x,10000000)@equal(%e,CancelBUTTON)
:CancelBUTTON
info Replace this line with code to process the CancelBUTTON event
goto evloop
:Close
exit |
_________________ FreezingFire
VDSWORLD.com
Site Admin Team |
|