END SUB\r
\r
SUB DrawSprite (p, o, m, fr, teler)\r
-\r
-' Renders a sprite on screen based on predefined character patterns.\r
-'\r
-' How it works:\r
-' The subroutine uses a lookup table (ao array) containing string representations\r
-' of each sprite. Each character in these strings represents a pixel color.\r
-' Depending on the parameters, it either:\r
-' - Draws individual pixels (ScaleFactor=1)\r
-' - Draws filled rectangles for each pixel (ScaleFactor>1 but not 50)\r
-' - Draws flipped version of individual pixels (SpriteVariant=50)\r
+' Renders a sprite on screen loaded from file "img/<m>.i01"\r
'\r
-' This flexible approach allows the same sprite data to be rendered at different\r
-' sizes and orientations without storing multiple copies of the sprite data.\r
-\r
+' File format: First line = height (number of rows)\r
+' Subsequent lines = strings of digit characters ('0'-'3') representing pixel colors</m>\r
+DIM rowText AS STRING\r
+fileName$ = "img/" + LTRIM$(STR$(m)) + ".i01"\r
+OPEN fileName$ FOR INPUT AS #1\r
+INPUT #1, height%\r
DIM ao(1 TO 100) AS STRING\r
-SELECT CASE m\r
-CASE 1 ' Solid block pattern\r
-ao(1) = "00000000000000000000"\r
-ao(2) = "00111111111111111100"\r
-ao(3) = "01222222222222222210"\r
-ao(4) = "01233333333333333210"\r
-ao(5) = "01232222222222223210"\r
-ao(6) = "01232111111111123210"\r
-ao(7) = "01232111111111123210"\r
-ao(8) = "01232111111111123210"\r
-ao(9) = "01232111111111123210"\r
-ao(10) = "01232111111111123210"\r
-ao(11) = "01232111111111123210"\r
-ao(12) = "01232111111111123210"\r
-ao(13) = "01232111111111123210"\r
-ao(14) = "01232111111111123210"\r
-ao(15) = "01232111111111123210"\r
-ao(16) = "01232222222222223210"\r
-ao(17) = "01233333333333333210"\r
-ao(18) = "01222222222222222210"\r
-ao(19) = "00111111111111111100"\r
-ao(20) = "00000000000000000000"\r
-CASE 2 ' Cloud sprite\r
-ao(1) = "000000022200000222220000002222222200000000000222222000000000"\r
-ao(2) = "000000022222002222222000222222222222000000222222222220000000"\r
-ao(3) = "000000222222222222222202222222222222222222222222222222200000"\r
-ao(4) = "000000222222222222222222222333333222220222222222222221110000"\r
-ao(5) = "000000222222233333322222223333333322222222222222222221111000"\r
-ao(6) = "000000022333333333333222233333333333222233322222222221111000"\r
-ao(7) = "000002222333333333333322233333333333333333333222222221111100"\r
-ao(8) = "000222222333333333333333333333333333333333333322222221111100"\r
-ao(9) = "002222223333333333333333333333333333333333333333222221111100"\r
-ao(10) = "022223333333333333333333333333333333333333333333222221111110"\r
-ao(11) = "022233333333333333333333333333333333333333333333322222111110"\r
-ao(12) = "222333333333333333333333333333333333333333333333322222111110"\r
-ao(13) = "222333333333333333333333323333333323131113333333221221111110"\r
-ao(14) = "223333333333333333333331112233331121111133333322112211111110"\r
-ao(15) = "213333333333333333333331111133111111111111111112222111111110"\r
-ao(16) = "111333313333333333333111111122111111111111111111221111111110"\r
-ao(17) = "111333311111111333111111111111111111111111111111111111111100"\r
-ao(18) = "011111111111111111111111111111111111111111111111111111111100"\r
-ao(19) = "011111111111111111111111111111111111111111111111111111111100"\r
-ao(20) = "011111111111111111111111111111111111111111111111111111111000"\r
-ao(21) = "001111111111111111111111111111111111111111111111110111100000"\r
-ao(22) = "001111111111111100111111111111111111111111111111100000000000"\r
-ao(23) = "000111111111110000011111111111100011111111111111000000000000"\r
-ao(24) = "000011111111100000000111111111000000011111111100000000000000"\r
-ao(25) = "000001111110000000000001111110000000000000000000000000000000"\r
-CASE 3\r
-ao(1) = "0000010000"\r
-ao(2) = "0000010000"\r
-ao(3) = "0000121000"\r
-ao(4) = "0000131000"\r
-ao(5) = "1111232111"\r
-ao(6) = "0123333210"\r
-ao(7) = "0123333210"\r
-ao(8) = "0012332100"\r
-ao(9) = "0001221000"\r
-ao(10) = "0012112100"\r
-ao(11) = "0121001210"\r
-ao(12) = "0110000110"\r
-ao(13) = "1100000011"\r
-CASE 4\r
-ao(1) = "01111111110111111111"\r
-ao(2) = "01222222210122222221"\r
-ao(3) = "01233333210123333321"\r
-ao(4) = "01233333210123333321"\r
-ao(5) = "01233333210123333321"\r
-ao(6) = "01233333210123333321"\r
-ao(7) = "01233333210123333321"\r
-ao(8) = "01222222210122222221"\r
-ao(9) = "01111111110111111111"\r
-ao(10) = "00000000000000000000"\r
-ao(11) = "01111111110111111111"\r
-ao(12) = "01222222210122222221"\r
-ao(13) = "01233333210123333321"\r
-ao(14) = "01233333210123333321"\r
-ao(15) = "01233333210123333321"\r
-ao(16) = "01233333210123333321"\r
-ao(17) = "01233333210123333321"\r
-ao(18) = "01222222210122222221"\r
-ao(19) = "01111111110111111111"\r
-ao(20) = "00000000000000000000"\r
-CASE 5\r
-ao(1) = "0000333000"\r
-ao(2) = "0033333300"\r
-ao(3) = "0332222220"\r
-ao(4) = "3322222222"\r
-ao(5) = "3222111112"\r
-ao(6) = "3111111111"\r
-ao(7) = "1111111111"\r
-CASE 6\r
-ao(1) = "00111100"\r
-ao(2) = "01222210"\r
-ao(3) = "12233221"\r
-ao(4) = "12233221"\r
-ao(5) = "12233221"\r
-ao(6) = "12233221"\r
-ao(7) = "12233221"\r
-ao(8) = "12233221"\r
-ao(9) = "01222210"\r
-ao(10) = "00111100"\r
-CASE 7\r
-ao(1) = "000000000000000033333300000000"\r
-ao(2) = "000000000000000333333333000000"\r
-ao(3) = "000000333300003332222222300000"\r
-ao(4) = "000003333330333322232222220000"\r
-ao(5) = "000033322333333222222222222000"\r
-ao(6) = "003332222223332222322212222200"\r
-ao(7) = "033222232222222222111211122200"\r
-ao(8) = "033222222232111111111111112220"\r
-ao(9) = "332223222111121121111111111222"\r
-ao(10) = "322222111111111111121111111111"\r
-CASE 8\r
-ao(1) = "0000000002222222000000000"\r
-ao(2) = "0000000222111112220000000"\r
-ao(3) = "0000002211131311122000000"\r
-ao(4) = "0000022113331133112200000"\r
-ao(5) = "0000022133331333312200000"\r
-ao(6) = "0000221133331333311220000"\r
-ao(7) = "0000221333331333331220000"\r
-ao(8) = "0000221333331333331220000"\r
-ao(9) = "0000221111111111111220000"\r
-ao(10) = "0000221333331333331220000"\r
-ao(11) = "0002211333331333331122000"\r
-ao(12) = "0002213333331333333122000"\r
-ao(13) = "0002213333331333333122000"\r
-ao(14) = "0002213333331333333122000"\r
-ao(15) = "0002213333331333333122000"\r
-ao(16) = "0002213333331333333122000"\r
-ao(17) = "0002213333331333333122000"\r
-ao(18) = "0002211111111111111122000"\r
-ao(19) = "2222222222222222222222222"\r
-ao(20) = "0222222222222222222222220"\r
-CASE 9\r
-ao(1) = "00000001112220000000"\r
-ao(2) = "00001112222111120000"\r
-ao(3) = "00112222111122221100"\r
-ao(4) = "02222111122221111110"\r
-ao(5) = "01111122221111122220"\r
-ao(6) = "11122221111122221111"\r
-ao(7) = "22221111122221111111"\r
-ao(8) = "21111122221111112222"\r
-ao(9) = "11222221111112222111"\r
-ao(10) = "22221111112222111111"\r
-CASE 10\r
-ao(1) = "33333333333333333333333333333333333333333333333333333333333333333333333333333333"\r
-ao(2) = "30000000000000000000000000000000000000000000000000000000000000000000000000000003"\r
-ao(3) = "30000110000111001110011111100011111110011111100000000000000000000000000000000003"\r
-ao(4) = "30001111100111001110011111110011111110011111110000000000000000002222000000000003"\r
-ao(5) = "30011001100011001100011100110011100110011100111000000000000000222222220000000003"\r
-ao(6) = "30011000000011001100011111110011100000011100111000000000000000222222222222000003"\r
-ao(7) = "30011000000011001100011111100011100110011111110000000000000000330330330002200003"\r
-ao(8) = "30011111000011001100011100000011111110011111100000000000000000333333330000000003"\r
-ao(9) = "30001111100011001100011100000011111110011100100000000000000000332222330000000003"\r
-ao(10) = "30000001100011001100011100000011100000011100110000000000000000033333300000000003"\r
-ao(11) = "30110001100011001100011100000011100110011100111000000000000030000111000000000003"\r
-ao(12) = "30111011100011111100011100000011111110011100111000000000000331111111111000000003"\r
-ao(13) = "30111111000001111000011100000011111110011100111000000000000331111111111100000003"\r
-ao(14) = "30000000000000000000000000000000000000000000000000000000000000001111101100000003"\r
-ao(15) = "30000000000000000000000000000000000000000000000000000000000000001111101100000003"\r
-ao(16) = "30000000000000000000000000000000000000000000000000000000000000001101100000000003"\r
-ao(17) = "30000000000000000000000000000000000000000000000000000000000000011101110000000003"\r
-ao(18) = "30000000000000000000000000000000000000000000000000000000000000011101110000000003"\r
-ao(19) = "30000000000000000000000000000000000000000000000000000000000000333303330000000003"\r
-ao(20) = "30000000000000000000000000000000000000000000000000000000000000000000000000000003"\r
-ao(21) = "30000000000000000000000000000000000000000000000000000000000000000000000000000003"\r
-ao(22) = "30000000000000000000000000000000000000000000000000000000000000000000000000000003"\r
-ao(23) = "30000000000000000000000000000000000000000000000000000000000000000000000000000003"\r
-ao(24) = "30000000000000000000000000000000000000000000000000000000000000000000000000000003"\r
-ao(25) = "30000000000000000000000000000000000000000000000000000000000000000000000000000003"\r
-ao(26) = "30000000000000000000000000000000000000000000000000000000000000000000000000000003"\r
-ao(27) = "30000000000000000000000000000000000000000000000000000000000000000000000000000003"\r
-ao(28) = "30000000000000000000000000000000000000000000000000000000000000000000000000000003"\r
-ao(29) = "30000000000000000000000000000000000000000000000000000000000000000000000000000003"\r
-ao(30) = "33333333333333333333333333333333333333333333333333333333333333333333333333333333"\r
-CASE 11\r
-ao(1) = "00000000000111111110000000000000000000000000000000"\r
-ao(2) = "00000000011111111111000001100000000000000000000000"\r
-ao(3) = "00000000111111111111110011110000000000000000000000"\r
-ao(4) = "00000001101111111111111111111000000000000000000000"\r
-ao(5) = "00000011111111111111111111111111000000000000000000"\r
-ao(6) = "00000111111111111111111111111111000000000000000000"\r
-ao(7) = "00000111111111111111111111111111001100000000000000"\r
-ao(8) = "00000111111111111111111111111111111111100000000000"\r
-ao(9) = "00000111111111111111111111111111111111100000000000"\r
-ao(10) = "00000111111111111111111111111111111111110000000000"\r
-ao(11) = "00000111111111111111111111111111111111111000000000"\r
-ao(12) = "00000111111111111111111111111111111111111100000000"\r
-ao(13) = "00000111111111111111111111111111111111111100000000"\r
-ao(14) = "00000111111111111111111111111111111111111100000000"\r
-ao(15) = "00000111111111111111111111111111111111111100000000"\r
-ao(16) = "00000111111111111111111111111111111111111100000000"\r
-ao(17) = "00011111111111111111111111111111111111111100000000"\r
-ao(18) = "00011111111111111111111111111111111111111100000000"\r
-ao(19) = "00111111110111111111111111111111111111111100000000"\r
-ao(20) = "01110111111111111111111111111111111111111100000000"\r
-ao(21) = "11111111111111111111111111111111111111111111100000"\r
-ao(22) = "11111111111111111111111111111111111111111111100000"\r
-ao(23) = "11111111111111111111111111111111111111111111100000"\r
-ao(24) = "11111111111111111111111111111111111111111111100000"\r
-ao(25) = "11111111111111111111111111111111111111111111111110"\r
-ao(26) = "11111111111111111111111111111111111111111111110111"\r
-ao(27) = "11111111111111111111111111111111111111111111111111"\r
-ao(28) = "11011111111111111111111111111111111111111111111101"\r
-ao(29) = "11111111111111111111111111111111111111111111111111"\r
-ao(30) = "11111111111111111111111111111111111111111111111111"\r
-ao(31) = "11111111111111111111111111111111111111111111111011"\r
-ao(32) = "11111111111111111111111111111111111111111111111100"\r
-ao(33) = "11111111111111111111111111111111111111111111111000"\r
-ao(34) = "01111111111111111111111111111111111111111111110000"\r
-ao(35) = "11111111111111111111111111111111111111111110110000"\r
-ao(36) = "11111111111111111111111111111111111111111110110000"\r
-ao(37) = "11111111111111111111111111111111111111111111110000"\r
-ao(38) = "01111111111111111111111111111111111111111111110000"\r
-ao(39) = "01111111111111111111111111111111111111111111110000"\r
-ao(40) = "00011111111111111111111111111111111111111111100000"\r
-ao(41) = "00111111111111111111111111111111111111111111100000"\r
-ao(42) = "00011111111111111111111111111111111111111111110000"\r
-ao(43) = "00001111111111111111111111111111111111111111110000"\r
-ao(44) = "00001111111111111111111111111111111111111111111000"\r
-ao(45) = "0000110111111111111111111111111111111111111111100"\r
-ao(46) = "0000110011111111111111111111011111111111111100000"\r
-ao(47) = "0000111101101111111111111111111111111110111000000"\r
-ao(48) = "0000000000001111111111111111111111111111110000000"\r
-ao(49) = "0000000000000001111111111111111111110111110000000"\r
-ao(50) = "0000000000000000000011111111111111100111110000000"\r
-ao(51) = "0000000000000000000001111020111000000000000000000"\r
-ao(52) = "0000000000000000000001111222200000000000000000000"\r
-ao(53) = "0000000000000000000000222222220000000000000000000"\r
-ao(54) = "0000000000000000000000222222020000000000000000000"\r
-ao(55) = "0000000000000000000000202222220000000000000000000"\r
-ao(56) = "0000000000000000000000222222220000000000000000000"\r
-ao(57) = "0000000000000000000000220202220000000000000000000"\r
-ao(58) = "0000000000000000000000222222220000000000000000000"\r
-ao(59) = "0000000000000000000000202222220000000000000000000"\r
-ao(60) = "0000000000000000000000222222220000000000000000000"\r
-ao(61) = "000000000000000000000022022220000000000"\r
-ao(62) = "0000000000000000000000222222220000000000000000000"\r
-ao(63) = "0000000000000000000000220222200000000000000000000"\r
-ao(64) = "0000000000000000000000222220200000000000000000000"\r
-ao(65) = "0000000000000000000000220222200000000000000000000"\r
-ao(66) = "0000000000000000000000222222200000000000000000000"\r
-ao(67) = "0000000000000000000000222222200000000000000000000"\r
-ao(68) = "0000000000000000000000202222000000000000000000000"\r
-ao(69) = "0000000000000000002000222222220000000000000000000"\r
-ao(70) = "0000000000000000002200222222000000000000000000000"\r
-ao(71) = "0000000000000000000222222222000000000000000000000"\r
-ao(72) = "0000000000000000000222222222000000000000000000000"\r
-ao(73) = "0000000000000000000022222222000000000000000000000"\r
-ao(74) = "0000000000000000000022222222000000000000000000000"\r
-ao(75) = "0000000000000000000020222222000000000000000000000"\r
-ao(76) = "0000000000000000000222222202000000000000000000000"\r
-ao(77) = "000000000000000000022022222200000000000"\r
-ao(78) = "0000000000000000022222222222200000000000000000000"\r
-ao(79) = "0000000000000000220222222222220000"\r
-ao(80) = "000000000000000022222222222222"\r
-CASE 12\r
-ao(1) = "11111111111111111111"\r
-ao(2) = "11111111111111111111"\r
-ao(3) = "11111111112111111111"\r
-ao(4) = "11111111112211111111"\r
-ao(5) = "11111111112221111111"\r
-ao(6) = "11111111112222111111"\r
-ao(7) = "11111111112222211111"\r
-ao(8) = "11122222222222221111"\r
-ao(9) = "11122222222222222111"\r
-ao(10) = "11122222222222222211"\r
-ao(11) = "11122222222222222211"\r
-ao(12) = "11122222222222222111"\r
-ao(13) = "11122222222222221111"\r
-ao(14) = "11111111112222211111"\r
-ao(15) = "11111111112222111111"\r
-ao(16) = "11111111112221111111"\r
-ao(17) = "11111111112211111111"\r
-ao(18) = "11111111112111111111"\r
-ao(19) = "11111111111111111111"\r
-ao(20) = "11111111111111111111"\r
-CASE 13\r
-ao(1) = "03333333333333333330"\r
-ao(2) = "33333333222233333333"\r
-ao(3) = "33333332222223333333"\r
-ao(4) = "33333332222223333333"\r
-ao(5) = "33333332222223333333"\r
-ao(6) = "33333332222223333333"\r
-ao(7) = "33333332222223333333"\r
-ao(8) = "33333332222223333333"\r
-ao(9) = "33333332222223333333"\r
-ao(10) = "33333332222223333333"\r
-ao(11) = "33333333222233333333"\r
-ao(12) = "33333333333333333333"\r
-ao(13) = "33333333333333333333"\r
-ao(14) = "33333333222233333333"\r
-ao(15) = "33333332222223333333"\r
-ao(16) = "33333332222223333333"\r
-ao(17) = "33333332222223333333"\r
-ao(18) = "33333333222233333333"\r
-ao(19) = "33333333333333333333"\r
-ao(20) = "03333333333333333330"\r
-CASE 14\r
-\r
-ao(1) = "00000000022220000000"\r
-ao(2) = "00000000022220000000"\r
-ao(3) = "00000000022222000000"\r
-ao(4) = "00000000033333000000"\r
-ao(5) = "00000000033333300000"\r
-ao(6) = "00000000033333300000"\r
-ao(7) = "00000000003333000000"\r
-ao(8) = "00000000011100000000"\r
-ao(9) = "00000003111130000000"\r
-ao(10) = "00000003111130000000"\r
-ao(11) = "00000003111130000000"\r
-ao(12) = "00000003111133000000"\r
-ao(13) = "00000003111130000000"\r
-ao(14) = "00000003111130000000"\r
-ao(15) = "00000000333300000000"\r
-ao(16) = "00000000333300000000"\r
-ao(17) = "00000003303300000000"\r
-ao(18) = "00000003303300000000"\r
-ao(19) = "00000033302220000000"\r
-ao(20) = "00000022200000000000"\r
-\r
-\r
-CASE 15\r
-ao(1) = "00000000022220000000"\r
-ao(2) = "00000000022220000000"\r
-ao(3) = "00000000022222000000"\r
-ao(4) = "00000000033333000000"\r
-ao(5) = "00000000033333300000"\r
-ao(6) = "00000000033333300000"\r
-ao(7) = "00000000003333000000"\r
-ao(8) = "00000000011100000000"\r
-ao(9) = "00000003111130000000"\r
-ao(10) = "00000003111130000000"\r
-ao(11) = "00000003111130000000"\r
-ao(12) = "00000033111130000000"\r
-ao(13) = "00000003111130000000"\r
-ao(14) = "00000003111130000000"\r
-ao(15) = "00000000333300000000"\r
-ao(16) = "00000000333300000000"\r
-ao(17) = "00000000330330000000"\r
-ao(18) = "00000000330330000000"\r
-ao(19) = "00000002220333000000"\r
-ao(20) = "00000000000222000000"\r
-\r
-CASE 16\r
-\r
-ao(1) = "00000000022220000000"\r
-ao(2) = "00000000022220000000"\r
-ao(3) = "00000000022222000000"\r
-ao(4) = "00000000033333000000"\r
-ao(5) = "00000000033333300000"\r
-ao(6) = "00000000033333300000"\r
-ao(7) = "00000000103330100000"\r
-ao(8) = "00000001111111000000"\r
-ao(9) = "00000000311130000000"\r
-ao(10) = "00000000311130000000"\r
-ao(11) = "00000000311130000000"\r
-ao(12) = "00000000311130000000"\r
-ao(13) = "00000000311130000000"\r
-ao(14) = "00000000311130000000"\r
-ao(15) = "00000000333300000000"\r
-ao(16) = "00000000333300000000"\r
-ao(17) = "00000000330330000000"\r
-ao(18) = "00000000330330000000"\r
-ao(19) = "00000000330330000000"\r
-ao(20) = "00000000222222000000"\r
-\r
-CASE 17 ' Door sprite\r
-ao(1) = "00000022222222000000"\r
-ao(2) = "00002222222222220000"\r
-ao(3) = "00022220000000222000"\r
-ao(4) = "00020002222222002000"\r
-ao(5) = "00202222222222222200"\r
-ao(6) = "00202222222222220200"\r
-ao(7) = "00202222222222220200"\r
-ao(8) = "02202222222222220220"\r
-ao(9) = "02022222222222220220"\r
-ao(10) = "02022323232323322020"\r
-ao(11) = "02022323232323222020"\r
-ao(12) = "02022323233223332020"\r
-ao(13) = "22022323232322232022"\r
-ao(14) = "20222323232322232202"\r
-ao(15) = "20222232232323332202"\r
-ao(16) = "20222222222222222202"\r
-ao(17) = "20222222222222112202"\r
-ao(18) = "20222222222222112202"\r
-ao(19) = "20222222222222112202"\r
-ao(20) = "20222222222222222202"\r
-ao(21) = "20222222222222222202"\r
-ao(22) = "20222222222222222202"\r
-ao(23) = "20222222222222222202"\r
-ao(24) = "20222222222222222202"\r
-ao(25) = "20222222222222222202"\r
-ao(26) = "20222222222222222202"\r
-ao(27) = "20222222222222222202"\r
-ao(28) = "20222222222222222202"\r
-ao(29) = "20000000000000000002"\r
-ao(30) = "22222222222222222222"\r
-\r
-END SELECT\r
+FOR a = 1 TO height%\r
+LINE INPUT #1, ao(a)\r
+NEXT a\r
+CLOSE #1\r
IF fr = 50 THEN GOTO DrawFlippedSprite\r
IF fr > 1 THEN GOTO DrawScaledSprite\r
-\r
FOR a = 1 TO 100 ' Normal sprite\r
IF ao(a) = "" THEN GOTO FinishDrawing\r
FOR b = 1 TO LEN(ao(a))\r
NEXT b\r
NEXT a\r
GOTO FinishDrawing\r
-\r
DrawScaledSprite: ' Scaled sprite\r
FOR a = 1 TO 100\r
IF ao(a) = "" THEN GOTO FinishDrawing\r
NEXT b\r
NEXT a\r
GOTO FinishDrawing\r
-\r
DrawFlippedSprite: ' Horizontally flipped sprite\r
FOR a = 1 TO 100\r
IF ao(a) = "" THEN GOTO FinishDrawing\r
FOR b = 1 TO LEN(ao(a))\r
-PSET ((p + b) \ teler, (o + a) \ teler), ASC(LEFT$(RIGHT$(ao(a), b), 1)) - 48\r
+PSET ((p + (LEN(ao(a)) - b + 1)) \ teler, (o + a) \ teler), ASC(RIGHT$(LEFT$(ao(a), b), 1)) - 48\r
NEXT b\r
NEXT a\r
-\r
FinishDrawing:\r
ERASE ao\r
END SUB\r
asciiLevelData(8) = " mm h m"\r
asciiLevelData(9) = " v mmm mm"\r
asciiLevelData(10) = "mmmmmmmmmmmmmmmm"\r
+graphicsMode = 1\r
CASE 3\r
asciiLevelData(1) = "mmmmmmmmmmmmmmmm"\r
asciiLevelData(2) = " h h h h h ym11"\r
projects / qbasicapps.git / commitdiff