int n , nn , c , x , y 
String clicked[6]
debug()

display(800,600) //画面を800x600で作成する
midiLoad(midi00.mid)//MIDIファイルmidi00.midを読み込む

setTextArea(100,400,600,50) //テキスト領域を指定する。
setFont("DIALOG",1,20)//フォントを指定する。

SetCellNumber(10) //0-10番までの10枚のセルを使用
SetCellImage(0,back001.jpg) //0番セルにback001.jpgを読み込み割り当てる
SetCellSize(0,800,600) //背景なので画面サイズにあわせて拡大

SetCellImage(1,cell001.bmp)
SetCellImage(2,cell002.bmp)
SetCellImage(3,cell003.bmp)
SetCellImage(4,cell004.bmp)
SetCellImage(5,cell005.bmp)

SetCellPosition(1,10,100)
SetCellPosition(2,210,50)
SetCellPosition(3,400,10)
SetCellPosition(4,700,450)
SetCellPosition(5,300,200)

viewDisplay(1111110000,_FADEIN)

clicked[0] = 背景
clicked[1] = Ａ
clicked[2] = Ｂ
clicked[3] = Ｃ
clicked[4] = Ｄ
clicked[5] = Ｅ

SetCellTransColor(1,0,0,0)
SetCellTransColor(2,0,0,0)
SetCellTransColor(3,0,0,0)
SetCellTransColor(4,0,0,0)
SetCellTransColor(5,0,0,0)

viewDisplay(111111,_FADEIN)

★クリックテストを５回行います
nowaitText(+　アルファベットをクリックしてください)
for ( nn = 1 , nn < 6 , nn = nn + 1 ) {
	cellClick(c);
	nowaitText(（+nn+）「+clicked[c]+」がクリックされました)
}
　

nowaitText(★時間待ちテスト（１０秒）)
Wait(10000)

★トランケーションテスト（MIDIとの同時動作スレッド）
SetCellImage(1,back002.jpg) //1番セルにback002.jpgを読み込み割り当てる
SetCellSize(1,800,600) //背景なので画面サイズにあわせて拡大
SetCellImage(2,back003.jpg) //2番セルにback003.jpgを読み込み割り当てる
SetCellSize(2,800,600) //背景なので画面サイズにあわせて拡大
SetCellImage(3,back004.jpg) //3番セルにback003.jpgを読み込み割り当てる
SetCellSize(3,800,600) //背景なので画面サイズにあわせて拡大
midiplay()
viewDisplay(001000,_ZOOMIN)
ZOOMIN
viewDisplay(01000,_FADEIN)
FADEIN
viewDisplay(00100,_MOSAIC)
MOSAIC
viewDisplay(00010,_WIPE)
WIPE
viewDisplay(10000,_HASH)
HASH
viewDisplay(11000,_BOOKLEFT)
BOOKLEFT
viewDisplay(10000,_BOOKRIGHT)
BOOKRIGHT

★選択テスト
setSelectArea(80,400,640,100)
select(nn,あ,か,さ,た,な,は,ま,や,ら,わ)
nn = nn + 1
選択されたのは+nn+番目のボタンです。

★セル重ね合わせテスト
SetCellImage(4,trans00.bmp) //4番セルに透過用BMPをセット
viewDisplay(00011,_FADEIN)
SetCellImage(1,back002.jpg)
SetCellSize(1,800,600)

★透過テスト（座標指定）
SetCellTransColor(4,0,0,0) //4番セルの座標0,0の色について透明度を0にする
viewDisplay(10001,_WIPE)

★透過テスト（色指定）
SetCellTransColor(4,0xff0000,128)//4番セルの座標0,0の色について透明度を0にする
viewDisplay(10001,_HASH)
　
SetCellTransColor(4,0x00ff00,64)
viewDisplay(10001,_FADEIN)

★ＭＩＤＩ切り替え
midiLoad(midi01.mid)//MIDIファイルmidi01.midを読み込む
midiPlay()

★セル座標位置指定テスト
x = 0
y = 400
while ( y > 0) {
 SetCellPosition(4 , x , y)
 viewDisplay()
　
 x = x + 70 
 y = y - 40 
}


★テキスト連結出力

古池や
+　　かわず飛び込む
+　　　水の音



★セル座標位置指定テスト２
 SetCellPosition(4 , _LEFT , _UPPER)
 viewDisplay()
ＬＥＦＴ・ＵＰＰＥＲ
 SetCellPosition(4 , _LEFT , _MIDDLE)
 viewDisplay()
ＬＥＦＴ・ＭＩＤＤＬＥ
 SetCellPosition(4 , _LEFT , _LOWER)
 viewDisplay()
ＬＥＦＴ・ＬＯＷＥＲ
 SetCellPosition(4 , _CENTER , _UPPER)
 viewDisplay()
ＣＥＮＴＥＲ・ＵＰＰＥＲ
 SetCellPosition(4 , _CENTER , _MIDDLE)
 viewDisplay()
ＣＥＮＴＥＲ・ＭＩＤＤＬＥ
 SetCellPosition(4 , _CENTER , _LOWER)
 viewDisplay()
ＣＥＮＴＥＲ・ＬＯＷＥＲ
 SetCellPosition(4 , _RIGHT , _UPPER)
 viewDisplay()
ＲＩＧＨＴ・ＵＰＰＥＲ
 SetCellPosition(4 , _RIGHT , _MIDDLE)
 viewDisplay()
ＲＩＧＨＴ・ＭＩＤＤＬＥ
 SetCellPosition(4 , _RIGHT , _LOWER)
 viewDisplay()
ＲＩＧＨＴ・ＬＯＷＥＲ


★画面系テスト終了
midiStop()


