_runtimePath_ "../runtime"
_codeRomType_ ROMv3

'cls
'b = 1
'if &(b XOR 1) then a = 2
'end

'b = 2
'a = 3
'if &(a <> b AND b = 2) then c = 1
'end

init:   a = 1
        
     b = a
     
     d = 2

32453245324543543543453553   cat = -3
                                           
10 d = 10 + (b + 5) + (cat - a) + 10
 e = b - 3 + (25 - a) + d - b - (a - cat - d)
 f = 54 - 23 + (27*2) - 32 + (56/3) - 7 - e
 g = 154-1230 + (227*2) - 532 + (756/33) - 17
 a = a + 1
 b = b - 1
 z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
31 f = -g +1000 -(24-g) +f
32 f = -g +1000 -(24-g) +f
33 f = -g +1000 -(24-g) +f
34 f = -g +1000 -(24-g) +f
35 f = -g +1000 -(24-g) +f
36 f = -g +1000 -(24-g) +f
37 f = -g +1000 -(24-g) +f
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))
z = b - (1000 + 2000 - 53 + 2) - (e + 300 - (f - 900))

print a;" ";b;" ";d;" ";e;" ";f;" ";g;" ";z;" ";cat

40 goto 10
end