top of page
Search

RAINBOW COLOUR CONE IN QB64

Updated: Dec 3, 2021


This the commands you should put in QB64 space. The commands are:




DIM SW AS INTEGER
DIM SH AS INTEGER
DIM COLOURS AS INTEGER
DIM X AS INTEGER
SW = 1920
SH = 1080
SCREEN _NEWIMAGE(SW, SH, 256)
FOR X = 1 TO SW / 2
    CIRCLE ((SW / 2 - X - 1), (SH / 2 - 1)), X, COLORS
    COLORS = COLORS + 1
    IF COLORS = 256 THEN
    END IF
    _DISPLAY


Start to run the program



The program is going on...


The program came.

This is the rainbow cone in qb64.


You liked the program comment below.

bye for now see you Tomorro