Do, Loop
Posted: Sat Mar 25, 2006 10:32 am
Code updated For 5.20+
A bit absurd tip, but it is a tip.
Do-Loop loops like in gfa style (but needed () like in PB style)
A bit absurd tip, but it is a tip.

Do-Loop loops like in gfa style (but needed () like in PB style)
Code: Select all
Macro Do
While #True
EndMacro
Macro DoWhile(p)
While p
EndMacro
Macro DoUntil(p)
While Not p
EndMacro
Macro Loop
Wend
EndMacro
Macro LoopWhile(p)
If Not p:Break:EndIf
Wend
EndMacro
Macro LoopUntil(p)
If p:Break:EndIf
Wend
EndMacro
;TEST:
con.l=0
DoUntil(con>20)
con+1
Debug con
LoopWhile(con<>12)