これも感想を聞かせてください
;uparupasoft does not take responsibility at all
screen 0,400,150
year=2007
kuso=0
print "$タイムマシン$未来行き(多分)"
wait 150
*top
cls
print "タイムマシンで君は2018年に行くのだ"
button "+",*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」と「くさいう○こ」\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"うそだよ"
mes"もう戻れるよ"
stop
*ex
end