自分が一番初めにつくったものは…
screen 0,400,150
year=2007
kuso=0
print "$タイムマシン$未来行き(多分)"
wait 150
*top
cls
objsize 200,20
print "タイムマシンで君は2018年に行くのだ"
button "未来に1年進むボタン",*up_year
print "いまの年は"+year
stop
*up_year
if year=2012:goto *sinu
year+=1:goto *top
*sinu
kuso=kuso+1
if kuso=2:goto *k
if kuso=3:goto *kk
if kuso=4:goto *kkk
if kuso=5:goto *kkkk
mes"(エラー)2012年には地球はありません"
stop
*k
mes"(エラー)無い物はない"
stop
*kk
mes"(エラー)だからもうこれ以上先には進めんの"
stop
*kkk
mes"(エラー)くどいなぁ〜おめ〜"
stop
*kkkko
cls
mes"もう戻れません"
wait 190
*kkkk
cls
mes"(システムエラー)ガガガガガガッガガ"
x=100
wait 100
cls
mes"システムエラーデス\nウイルスプログラム\n「C-popkiH678」と「do-demoiidesuyo」\nをインストールしています\nなお×ボタンはおしてもいみがありません"
onexit goto *kkkko
pos 70,100
mes"0%"
pos 320,100
mes"100%"
repeat 20
pos x,100
mes "■"
x+10
wait 50
if x=300:goto *tinpi
loop
*tinpi
cls
dialog "uparupasoft does not take\n responsibility at all",1,"責任"
mes"ウイルス作動中"
wait 400
goto *tinko
*tinko
cls
onexit goto *ex
mes"ういるすなんてうそだよ"
wait 500
goto *ex
*ex
end
こんなやつ…