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"...