Files
gw-basic-2026/tests/programs/diamond.bas
Eremey Valetov 1f4c460f4f Phase 5: CI, terminal I/O, Sixel graphics, classic programs
Add GitHub Actions CI with automated build and test. Implement real
terminal I/O with raw mode (enable_raw/disable_raw, proper INKEY$
polling via VMIN=0/VTIME=0, INPUT$ function). Add Sixel graphics
engine with virtual framebuffer (SCREEN 1: 320x200, SCREEN 2:
640x200), Bresenham line drawing, midpoint circle, flood fill PAINT,
DRAW mini-language parser, and Sixel encoder with RLE. Replace all
graphics stubs with real implementations (PSET, LINE, CIRCLE, DRAW,
PAINT, COLOR, SCREEN, POINT). Fix AND/OR/XOR operator precedence
to be lower than relational operators. Add 13 classic test programs
(39 total). Bump version to 0.5.0.
2026-02-10 16:46:34 -05:00

12 lines
285 B
QBasic

10 REM Diamond pattern using STRING$ and SPACE$
20 N% = 7
30 REM Top half
40 FOR I = 1 TO N%
50 PRINT SPACE$(N% - I); STRING$(2 * I - 1, "*")
60 NEXT I
70 REM Bottom half
80 FOR I = N% - 1 TO 1 STEP -1
90 PRINT SPACE$(N% - I); STRING$(2 * I - 1, "*")
100 NEXT I
110 PRINT "Diamond OK"