;＊＊＊　テストプログラム　＊＊＊

;＝＝＝初期設定＝＝＝

*define
caption "テスト"
deletemenu
game

;＝＝＝ゲーム開始＝＝＝

*start
setwindow 16,350,25,4,24,24,0,6,20,1,1,#999999,8,345,631,471
bg "img\haikei.jpg",1

だれの紹介を見る？\
select
"SARUTOBiくん",*sarutobi,
"キリちゃん",*kiri,
"三好清海入道",*seikai,
"タヌキおやじ",*tanuki

;SARUTOBiくん登場
*sarutobi
ld c,"img\sarutobi.bmp",1
ぼく、ＳＡＲＵＴＯＢｉくん\
goto *gameend

;キリちゃん登場
*kiri
ld c,"img\kiri.bmp",1
わたし、キリちゃん\
goto *gameend

;三好清海入道登場
*seikai
ld c,"img\seikai.bmp",1
拙者、三好清海入道\
goto *gameend

;たぬきオヤジ登場
*tanuki
ld c,"img\tanuki.bmp",1
わし、タヌキおやじ\
goto *gameend

;終了
*gameend
end