10 cls
20 setcolor 0,255,0:drawstring "loading...",64,100
30 sleep 1000
40 PW "s1.mid":cls:gelload "logo","logo.png"
50 drawgel "logo",0,0
60 if fire(0) then goto 80
70 goto 50
80 cls:setcolor 0,255,0:drawstring "=Winchester=",64,100:sleep 2000
90 drawstring "2011(c)",74,110:sleep 1000
100 cls:gelload "l","l.png":x%=10:y%=230
110 drawgel "l",0,0
120 gelload "ch","ch.png"
130 spritegel "ch","ch"
140 spritemove "ch",x%,y%:sleep 100
150 if left(0) then x%=x%-1
160 if right(0) then y%=y%+1
170 if x%<0 then x%=x%+2
180 if x%<0 then x%=x%+2
190 gelload "p","p.png"
200 spritegel "p","p":w%=0:m%=0
210 spritemove "p",w%,m%
220 w%=w%+5
230 if w%>230 then goto 250
240 goto 210
250 print "bomb"