User Interface Extension Library Usage Example 3.
The following example is a variation of my previous CorelSCRIPT game Arcanoid with new graphic interface.
Drag horizontal slider and the racket will follow it.
The BuildPreview creates the game field by drawing a filled rectangle (the racket) and circle (the ball):
SUB BuildPreview BeginImage Width,Height,0 ImageFillRect Pos-rx\2,Height-ry-2,Pos+rx\2,Height-2,RGB(255,0,0) ImageFillEllipse x,y,x+cx,y+cy,RGB(255,255,255) EndImage ImageFile$ MainDialog.Preview.SetImage ImageFile$ END SUB
Copyright © 2000 by Alex Vakulenko. All rights reserved.