‖一括処理部品集3‖huda.html 《戻る》 《玄関へ》
《 かるた会の取り札(下の句)を画面に並べる 》
【内容】
かるた会の24首の下の句を表示します。
【用例】
名札 とり札並べ
表 &TBL3,表番号=3
編集表 &TBL3
@
&N=1
&X1=4,&Y1=2,&X2=&X1+1
&X3=&X1-2,&X4=&X1-1
繰り返し &N=1,24,1
A
位置指定 行番号=&N
&I=1,&J=8
繰り返し &I=1,&J
B
&字4=#部分列([四かな],&I,1)
&字5=#部分列([五かな],&I,1)
画面表示 (&Y1,&X1)-(&Y1,&X2),&字4,白
画面表示 (&Y1,&X3)-(&Y1,&X4),&字5,白
&Y1=&Y1+1
繰り返し終了
&X1=&X1+5,&X2=&X1+1,&X3=&X1-2,&X4=&X1-1 C
条件 (&N<12) &Y1=2
条件 (&N>=12) &Y1=15
条件 (&N=6) 代入 &X1=53,&X2=&X1+1,&X3=&X1-2,&X4=&X1-1
条件 (&N=12) 代入 &X1=3,&X2=&X1+1,&X3=&X1-2,&X4=&X1-1
条件 (&N=18) 代入 &X1=54,&X2=&X1+1,&X3=&X1-2,&X4=&X1-1
繰り返し終了
手続き終了
【解説】
@ 元の表(100首)から乱数利用で25首を選び、表(&TBL3)に書き出しています。
取り札と読み札は、この書き出した表を使います。
A 25首のうち、表の先頭から24首を使っています。
B 下の句(四句目、五句目)を表示します。
C 取り札ごとに表示位置を調節しています。
【参考】

END
of FILE 《戻る》 《玄関へ》