1
0
mirror of https://github.com/mbirth/gwbasic.git synced 2024-09-19 16:53:26 +01:00
gwbasic/IBM1.BAS

22 lines
1.2 KiB
QBasic
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

10 CLS
20 COLOR 15,0,0
30 PRINT" ÜÜÜÜÜÜÜÜÜÜ ÜÜÜÜÜÜÜÜÜÜÜÜÜÜ ÜÜÜÜÜÜ ÜÜÜÜÜÜ"
40 PRINT" ÜÜÜÜÜÜÜÜÜÜ ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ ÜÜÜÜÜÜÜ ÜÜÜÜÜÜÜ"
50 PRINT" ÜÜÜÜ ÜÜÜ ÜÜÜÜ ÜÜÜÜÜÜÜ ÜÜÜÜÜÜÜ"
60 PRINT" ÜÜÜÜ ÜÜÜÜÜÜÜÜÜÜÜÜÜ ÜÜÜÜÜÜÜÜ ÜÜÜÜÜÜÜÜ"
70 PRINT" ÜÜÜÜ ÜÜÜÜÜÜÜÜÜÜÜÜÜ ÜÜÜÜ ÜÜÜÜÜÜÜ ÜÜÜÜ"
80 PRINT" ÜÜÜÜ ÜÜÜ ÜÜÜÜ ÜÜÜÜ ÜÜÜÜÜ ÜÜÜÜ"
90 PRINT" ÜÜÜÜÜÜÜÜÜÜ ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ ÜÜÜÜÜ ÜÜÜ ÜÜÜÜÜ"
100 PRINT" ÜÜÜÜÜÜÜÜÜÜ ÜÜÜÜÜÜÜÜÜÜÜÜÜÜ ÜÜÜÜÜ Ü ÜÜÜÜÜ"
110 PRINT
120 PRINT
130 PRINT
140 PRINT"ÛÛÛÛ ÛÛÛ ÛÛÛÛ ÛÛÛ ÛÛÛÛ ÛÛ Û ÛÛÛÛ Û ÛÛÛ ÛÛÛÛ Û Û ÛÛÛÛ Û Û ÛÛÛÛÛ ÛÛÛ ÛÛÛÛ"
150 PRINT"Û Û Û Û Û Û Û Û ÛÛ Û Û Û Û Û Û Û ÛÛ ÛÛ Û Û Û Û Û Û Û Û"
160 PRINT"ÛÛÛÛ ÛÛ ÛÛÛÛ ÛÛÛ Û Û Û Û ÛÛÛÛ Û Û Û Û Û Û Û ÛÛÛÛ Û Û Û ÛÛ ÛÛÛÛ"
170 PRINT"Û Û Û Û Û Û Û Û ÛÛ Û Û Û Û Û Û Û Û Û Û Û Û Û Û Û Û"
180 PRINT"Û ÛÛÛ Û Û ÛÛÛ ÛÛÛÛ Û ÛÛ Û Û ÛÛÛ ÛÛÛ ÛÛÛÛ Û Û Û ÛÛÛÛ Û ÛÛÛ Û Û"
190 PRINT
200 PRINT
210 END