Sample Codes
Some useful commands:

Start Graphics
- Graphics(320 or 640)
Clear Screen
- ClearScreen(color)
Write Text
- DrawString(text)
Set Color
- SetSolidPenPat(color)
Move Pen
- Move(x, y), MoveTo(x, y)
Set Pen Size
- SetPenSize(width, height)
Draw Line
- Line(x, y), LineTo(x, y)
Set Rectangle Size
- SetRect(rect, x1, y1, x2, y2)
Draw Rectangle
- FrameRect(rect), Paint(rect)
Draw Oval
- FrameOval(rect), PaintOval(rect)
Mouse Button Pressed
- Button(0)
Get Mouse Location
- GetMouse(point)
Check Point In Rectangle
- PtInRect(point, rect)
Get Random Number
- Random

Check the sample codes and experiment with them!
You can create a program like this easily.
Demo
Bouncing Mac
Bouncing Balls
Stars
Space Game
Simple Paint
Pascal Programming
Hosted by www.Geocities.ws

1