Store Out
Get Block 1:(12@50@64@135)
Set Mouse Zone 1:(72@26@238@73)
Set Mouse Zone 2:(70@123@240@169)
Let CHK=0

[ MAIN ]

Inc CHK
If CHK=30 Then Goto MAIN2
Scroll 1 Up
Scroll 2 Down
Goto MAIN

[ MAIN2 ]

Close All Zones
Clear



Picture In PICTURES/TESTSCREEN
Pause For 20
Pen 5
Text Window 0:(9@17):How Very Boring !!!!!!
Pause For 20
Window Colour 0
Set Window 1:(57@33@254@131)
Put Block 1:(130@39)
Pause For 20
Set Mouse Zone 1:(54@126@257@159)
Let CHK2=0

[ MAIN3 ]
Inc CHK2
If CHK2=20 Then Goto QUIT
Scroll 1 Down
Goto MAIN3

[ QUIT ]
Text Window 0:(10@17):  That's better !!!
Pause For 20
Close All Zones
Close Window 1
Clear

Picture In PICTURES/KEYBOARD
Window Colour 26
Pen 31
Set Window 1:(15@7@140@37)
Text Window 1:(3@3):Point & Click
Pause For 20
Set Window 2:(76@48@185@89)
Text Window 2:(10@7):  Copyright
Text Window 2:(10@8):
Text Window 2:(10@9):1992 - P.J.G
Close Window 1
Set Window 1:(44@120@135@153)
Text Window 1:(7@17):  Hello
Pause For 20
Close Window 2
Close Window 1

Window Colour 4
Set Window 1:(13@13@129@53)
Text Window 1:(3@4):Windows....
Window Colour 3
Set Window 2:(88@66@186@110)
Text Window 2:(12@11):Can Be....
Window Colour 11
Set Window 3:(154@122@272@168)
Text Window 3:(20@18):Opened With..
Pause For 30
Window Colour 31
Pen 0
Set Window 4:(28@124@115@170)
Text Window 4:(6@18):EASE !!
Pause For 5
Close Window 1
Pause For 5
Close Window 2
Pause For 5
Close Window 3
Text Window 4:(6@18):Bye !! 
Pause For 20
Clear

Put Block 1:(123@83)
Pen 2
Text Window 0:(10@9): That's All Folks
Pen 31
Text Window 0:(10@22):Click Mouse To Exit.
Wait Click
End