Files
gw-basic-2026/tests/programs/bubble_sort.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

15 lines
408 B
QBasic

10 REM Bubble sort with string comparison
20 DIM A$(9)
30 DATA "banana","apple","cherry","date","elderberry"
40 DATA "fig","grape","honeydew","kiwi","lemon"
50 FOR I = 0 TO 9 : READ A$(I) : NEXT I
60 REM Sort
70 FOR I = 0 TO 8
80 FOR J = 0 TO 8 - I
90 IF A$(J) > A$(J+1) THEN SWAP A$(J), A$(J+1)
100 NEXT J
110 NEXT I
120 REM Print sorted
130 FOR I = 0 TO 9 : PRINT A$(I) : NEXT I
140 PRINT "Bubble sort OK"