; コソーリと再開するです

sdim file 100000 : sdim sp 60,9
repeat 9: i=cnt: sp.i="\t": repeat i: sp.i+=" ": loop: loop
goto main

#deffunc iew
mref a0,0 : mref a1,1 : mref a2,2 : file+=sp.a1
if a0=0: file+="if (op & "+a2+") {\n": else: file+="} else {\n"
return

*main
i=255;
repeat 2 : iew cnt,0,0x80
repeat 2 : iew cnt,1,0x40
repeat 2 : iew cnt,2,0x20
repeat 2 : iew cnt,3,0x10
repeat 2 : iew cnt,4,0x08
repeat 2 : iew cnt,5,0x04
repeat 2 : iew cnt,6,0x02
repeat 2 : iew cnt,7,0x01
file+=sp.8+"; ここに機械語 "+i+" の処理を書くです\n" : i-
loop: file+=sp.7+"}\n": loop: file+=sp.6+"}\n"
loop: file+=sp.5+"}\n": loop: file+=sp.4+"}\n"
loop: file+=sp.3+"}\n": loop: file+=sp.2+"}\n"
loop: file+=sp.1+"}\n": loop: file+=sp.0+"}\n"
strlen len, file
bsave "inst.as", file, len