1
0
mirror of https://github.com/mbirth/gwbasic.git synced 2024-09-19 16:53:26 +01:00
gwbasic/HCV1.BAS
1995-09-21 08:34:32 +02:00

18 lines
1.0 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 11,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 END