表(カレンダー的)を描くときにloopを2回使って普通に描くと、こんな感じになりますが、
; 普通に表を描く - 横
; AXsize 218 byte
repeat 5
rcnt = cnt
repeat 10
pos cnt*20, rcnt*20
mes rcnt*10+cnt
loop
loop
AXサイズが218バイトになって結構重いです(loopの仕業かも)。
そこで、余算を利用して、1回のループで描くとこんな感じでスッキリします。
; 一回のloopで表を描く- 横
; AXsize 186 byte
repeat 50
pos (cnt\10)*20,(cnt/10)*20
mes cnt
loop
なんと、AXサイズが186バイトまで減れました。
縦バージョンも一応・・・
; 一回のloopで表を描く- 縦
; AXsize 186byte
repeat 50
pos (cnt/5)*20,(cnt\5)*20
mes cnt
loop
また、↓こんな感じにし易い利点があります。
0 0 1 2 3 4
5 6 7 8 9 10
12 13 14
; ↑のようにする
repeat 15, 1
pos (cnt\6)*20,(cnt/6)*20
mes cnt-1
loop
PR