小ワザ/スクリプトの書き方

  1
  2
  3
  4

-
|
|
!

mes {"
	ここには、１行まるまる直接メッセージを
	書いてもいいです。
"}

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17

x=100            ;x(変数)に100(数値)を代入
y=200            ;y(変数)に200(数値)を代入
pos x,y            ;100,200座標に移動
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
x="strings"            ;x(変数)に「strings」(文字列)を代入
mes x            ;x(変数)の内容を画面に表示
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
//特殊な代入
a=a+10            ;上と下は
a+=10            ;同じことをしています。
//その弐
a=a+1            ;上と下は
a++            ;同じことをしています。
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
//型の変換
int a            ; 変数aを数値型にする
str b            ; 変数bを文字列型にする

  1
  2
  3
  4

    変数=1
    mes 変数    ;こちらは変数「変数」
    mes "変数"  ;こちらは文字列「変数」
    stop

  1
  2
  3
  4
  5
  6
  7
  8
  9

x.0=1            ;x(変数)の要素0に1を代入
x.1=2
//連続代入
x=1,2            ;上の例と同じ
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
//要素の拡張(数値)
dim a,20            ; 変数aの要素は0〜19まで使えるようになります
//要素の拡張(文字列)
sdim a,32,5             ; 変数aは32文字までの文字列を５つの要素で扱えます

  1
  2
  3

x(0)=1            ;x(変数)の要素0に1を代入
x(1)=2
x(1+b)=3            ;配列要素として式も指定可能

  1
  2
  3

 *label
    mes "Wait.":wait 100
    goto *label            ; 無限ループを生成

  1
  2
  3
  4

onclick goto *ラベル
stop
*ラベル
    mes "OK"

  1
  2
  3
  4
  5
  6
  7
  8
  9

    mes "GO!"
 *@
    mes "A="+a
    a+
    if a=5 : goto *@forward        ; 後のローカルラベルに進む
    if a<5 : goto *@back        ; 前のローカルラベルに戻る
 *@
    mes "STOP"
    stop