QB64 is open source under GPLv2/LGPL. Manual text © 2024. Freely distributable.
IF score >= 90 THEN PRINT "Grade: A" ELSEIF score >= 80 THEN PRINT "Grade: B" ELSE PRINT "Grade: C or lower" END IF
' DO WHILE / DO UNTIL x = 1 DO WHILE x <= 5 PRINT x x = x + 1 LOOP ' Infinite loop with EXIT DO DO INPUT "Enter password: ", p$ IF p$ = "secret" THEN EXIT DO LOOP
laser& = _SNDOPEN("laser.wav") _SNDPLAY laser&
LINE (0,0)-(200,200), _RGB(255,0,0), BF ' filled red square CIRCLE (400,300), 50, _RGB(0,255,0) PAINT (400,300), _RGB(0,255,0), _RGB(0,255,0) ' fill circle Loading an image:
COLOR _RGB(255, 255, 0) ' yellow text COLOR _RGB(0, 0, 0), _RGB(255, 255, 255) ' black on white PSET (100, 200), _RGB(255,0,0) ' draw a red pixel | Command | Syntax | Description | |---------|--------|-------------| | PSET | PSET (x,y), color | Set single pixel | | LINE | LINE (x1,y1)-(x2,y2), color | Line or rectangle | | CIRCLE | CIRCLE (cx,cy), radius, color | Circle/ellipse | | PAINT | PAINT (x,y), fill_color, border_color | Flood fill |