mirror of
https://github.com/irmen/prog8.git
synced 2024-11-26 11:49:22 +00:00
56 lines
1.3 KiB
Plaintext
56 lines
1.3 KiB
Plaintext
output raw
|
|
|
|
~ main {
|
|
var .text name = "?"*80
|
|
var bytevar = 22
|
|
var bytevar2 = 23
|
|
var .word wordvar = 22345
|
|
|
|
|
|
start
|
|
A = 44
|
|
X = ~22+44
|
|
A= ~-1
|
|
Y = ~-2
|
|
return
|
|
label1
|
|
if_true A==0 goto label1
|
|
if_true A!=0 goto label1
|
|
if_not X!=0 goto label1
|
|
|
|
if_true A<=1 goto label1
|
|
if_true A==1 goto label1
|
|
if_true A!=1 goto label1
|
|
if_not X<1 goto label1
|
|
if_not Y>1 goto label1
|
|
if_not X!=1 goto label1
|
|
|
|
if_true 22<=Y goto label1
|
|
if_true A<=22 goto label1
|
|
if_true A<X goto label1
|
|
if_true X>Y goto label1
|
|
if_true X>A goto label1
|
|
if A<=22 goto label1
|
|
if_cc A goto label1
|
|
if_vc X goto label1
|
|
if_pos Y goto label1
|
|
if_true XY goto label1
|
|
if_not XY goto label1
|
|
if A goto label1
|
|
if_not goto label1
|
|
|
|
if_true bytevar<=A goto label2
|
|
if_true bytevar<=22 goto label2
|
|
if bytevar<=22 goto label2
|
|
if bytevar<=22 goto label2
|
|
if bytevar goto label2
|
|
if bytevar>bytevar2 goto label2
|
|
if_pos bytevar goto label2
|
|
if_not wordvar goto label2
|
|
if_zero wordvar goto label2
|
|
if_true wordvar goto label2
|
|
|
|
|
|
label2
|
|
return
|
|
} |