平安京の悪夢:
Color RGB(255,0,0)
PlaySound LaserGun.wav
For i = 1 To 10
DrawWidth (i)
Line 0 0 0 480
Line 96 0 96 480
Line 192 0 192 480
Line 288 0 288 480
Line 384 0 384 480
Line 480 0 480 480
Line 0 0 480 0
Line 0 96 480 96
Line 0 192 480 192
Line 0 288 480 288
Line 0 384 480 384
Line 0 480 480 480
Refresh
Wait 0.5
Next
ClearPicture
Refresh
Return