Archived
1
0
This repository has been archived on 2025-03-31. You can view files and clone it, but cannot push or open issues or pull requests.
gwbasic/HCV1.BAS
1995-09-21 08:34:32 +02:00

18 lines
1.0 KiB
QBasic
Raw Permalink 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