DATAは、まず、
@DATA
DATA "anything"'どの文字をどのBGにするかは自分で
DATA
DATA"EOF"'終わりの目印、EOFから適当に変えられるけど付けないとOut of Data
…
RESTORE @DATA
とする。
次に、BGSCREENの大きさに調整した二重FORループの中で、READからの自分が決めた規則で解析、BGPUT 0,W(X),H(Y),(番号)'ただしWとHは関数ではなく上のプログラムの変数
後は↑
えーと…処理の重たさだったらどれも大差ない(行数制限腹立つ)
'===for example
ACLS:BGSCREEN 0,30,30
FOR W=0 TO 29:FOR H=0 TO 29
BGPUT 0,W,H,RND(100)
NEXT:NEXT
'MAIN
WHILE 1
BGOFS 0 OUT BGX,BGY:K=button()
IF K AND #UP THEN DEC Y
IF K AND #DOWN THEN INC Y
IF K AND #LEFT THEN DEC X
IF K AND #RIGHT THEN INC X
BGOFS 0,X,Y:WEND'EOF
求めるものと違う気がするけどBG動かすのはこんな感じ?
'どうせ画像あってもなくても自分が手打ちすることは変わらないのに…
'理屈は一つ上の方と同じです。
'以下、例
WHILE 1'infinty loop
OLD_TIME=TIME
TOUCH OUT TIME,Touch_X,Touch_Y
IF !!OTM&&TIME==1 THEN ? "You're Touch Now"
IF !OTM&&!!TIME THEN ? "You're Not Touch Now"
VSYNC 1
WEND
'英語(とリスト)があっているか心配