>>>A friend of mine who is a Clarion programmer send me some code the other day. He said it was just one small example of the monstosity of a language that is it:
>>>
>>>...
>>>GOSUB 9000
>>>GOSUB 5000
>>>IF DCHG < .01 GOTO 4560
>>>GOTO 4200
>>>4170 GOSUB 50000
>>>GOTO 4150
>>>4180 GOSUB 8550
>>>GOTO 4150
>>>..
>>>
>>>And another:
>>>
>>>INPUT @RV,@(19,15)DECDT$[1,2],_
>>>@(19,18)DECDT$[3,2],_
>>>@(19,21)DECDT$[5,2]|
>>>CTL=3400,3350,1000,99999,_
>>>3420,3430,4590,8650
>>>
>>>That's just one long command...
>>>
>>>Ok, altogether now: "Thank you foxpro, thank you foxpro, thank you foxpro"...
>>
>>That should be...
>>
>>10 MSG$ = "Thank you foxpro, "
>>20 PRINT MSG$
>>30 GOTO 20
>>
>>lol
>>
>>Matt
>
>Whoops, Infinite loop...
>
>George
I think we should run this as a seperate task so we could still enjoy using FP.
And I prefer :
Do while .t.
? "Thank you FoxPro"
for ix = 1 to 30000 && To give BASIC a chance to catch up
* Waiting for youuuu
endfor
enddo
Cetin