Мечты карандаша
Жил – был веселый карандаш. Стало ему скучно жить и решил он освоить компьютер, чтобы создавать рисунки с помощью программы Qbasic. -С ЧЕГО ЖЕ НАЧАТЬ? – ПОДУМАЛ КАРАНДАШ. СКОРО ЛЕТО, ХОЧЕТСЯ НА МОРЕ… И СОСТАВИЛ КАРАНДАШ ПРОГРАММУ С ПОМОЩЬЮ ОПЕРАТОРОВ LINE,COLOR,PAINT,LINE,CIRCLE,DRAW,PRESET 10 SCREEN 7 11 COLOR 2, 1 12 PRESET (50, 100) 14 DRAW "c6e60c6f60" 15 PRESET (130, 60) 16 DRAW "c6e40c6f40" 17 PRESET (162, 110) 18 DRAW "c6e70c6f75" 19 PRESET (85, 67) 20 DRAW "c6f20c6e10c6r5c6e13" 21 PRESET (140, 50) 22 DRAW "c6f15c6r15c6e23" 23 PRESET (206, 65) 24 DRAW "c6f19c6e25" 25 CIRCLE (30, 35), 15, 1426 PAINT (30, 35), 14 27 CIRCLE (160, 150), 150, 9, , , .2 28 PAINT (160, 150), 9 29 CIRCLE (25, 140), 25, 2 30 PAINT (25, 140), 2 31 LINE (20, 150)-(30, 200), 6, BF 32 CIRCLE (70, 30), 1, 14 33 CIRCLE (110, 25), 1, 14 34 CIRCLE (130, 40), 1, 14 35 CIRCLE (150, 19), 1, 14 36 CIRCLE (168, 5), 1, 14 37 CIRCLE (190, 20), 1, 14 38 CIRCLE (128, 15), 1, 14 39 CIRCLE (80, 20), 1, 14 40 CIRCLE (220, 30), 1, 14 41 CIRCLE (195, 10), 1, 14 42 CIRCLE (240, 32), 1, 14 43 CIRCLE (260, 50), 1, 14 44 CIRCLE (290, 15), 1, 14 45 CIRCLE (269, 19), 1, 14 46 CIRCLE (240, 15), 1, 14 47 CIRCLE (300, 43), 1, 14 48 PRESET (25, 65) 49 DRAW "c15e3c15f6c15e6c15f3" 50 PRESET (12, 74) 51 DRAW "c15e2c15f5c15e5c15f2" 52 PRESET (33, 78) 53 DRAW "c15e2c15f4c15e4c15f2" 54 PRESET (130, 115) 55 DRAW "c8r35c8e15c8151c8d15" 56 PRESET (140, 140) 57 DRAW "c12u30c12f25c12125" 58 CIRCLE (135, 148), 3, 12 59 CIRCLE (163, 148), 3, 12 60 CIRCLE (149, 148), 3, 12