> > http://edoya.dyndns.org/cgi-bin/-_-/gw.cgi/nekodaisuki11799.exe
> > さっきのアドベンチャーゲームを.exe化してみた
> > activebasicの使い方もようやく分かってきた
> やっぱりexeは実行するのが嫌だからｿｰｽにしてくれ(;´Д`)

#prompt
   10 CLS
   15 PRINT""
   20 PRINT"あなたは警視庁の刑事です。どうしましますか？"
   30 PRINT"１：移動する"
   40 PRINT"２：話す"
   50 PRINT"３：アイテム"
   60 PRINT"４：犯人を探す"
   70 dim A$, I:A$=Inkey$()
   80 IF A$="1" THEN PRINT"密室なので移動できません":GOTO 15
   81 IF A$="2" THEN PRINT"ヤス：リスボンじゃ香辛料を買うといいぜ":PRINT"あなた：サンクスコ":GOTO 15
   82 IF A$="3" THEN PRINT"何も持っていません":GOTO 15
   83 IF A$="4" THEN PRINT"捜索中・・・":FOR I=1 TO 900000:NEXT I:PRINT"残念ながらいませんでした":BEEP:GOTO 15
   90 GOTO 70

このbasicは変数を使う前に宣言を要求しやがる

参考：2004/07/20(火)04時49分55秒