Code: Select all
Define.i Procedure2()
Code: Select all
Define.i Procedure2()
Code: Select all
DrawingMode(#PB_2DDrawing_AllChannels|#PB_2DDrawing_Outlined)
Code: Select all
Macro o2_Run(_input_)
o2_exec(o2_basic(_input_))
EndMacro
Procedure.i Main()
Protected bday.l
bday = 1964
o2_Run("overlay long bday" + #CR$ + "@bday =" + Str(@bday) + #CR$ + "bday = bday - 2")
Debug bday
ProcedureReturn #Null
EndProcedure