home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 6 / 06.iso / b / b077 / 1.img / SBGL.ZIP / XZP1.PRG < prev    next >
Encoding:
Text File  |  1980-01-01  |  1.1 KB  |  27 lines

  1. set talk off
  2. clear
  3. @ 3,24 say '==================='
  4. @ 4,24 say ' ╟δ─·╔╘║ε,╒²╘┌┤≥╙í'
  5. @ 5,24 say '==================='
  6. set devi to print 
  7. set print on
  8. @ 1,1 say '                       ╕≈╧ε╓╕▒Ω▒╚╓╪╚╖╢¿▒φ'
  9. @ 2,1 say '                       =================='
  10. @ 3,1 say ' '
  11. @ 4,1 say '╔Φ▒╕├√│╞:                                 ╞└╣└╚╦: '
  12. @ 5,1 say '================================================================'
  13. @ 6,1 say '|╨╘─▄| ╛¡╝├ | ┐╔┐┐ | ╥╫╨▐ | ╜┌─▄ |╗╖▒ú░▓╚½| ═¿╙├ | ╩╩╙├ | ═Γ╣█ |'
  14. @ 7,1 say '|====|======|======|======|======|========|======|======|======|'
  15. @ 8,1 say '|╖╓╓╡|      |      |      |      |        |      |      |      |'
  16. @ 9,1 say '|----|------|------|------|------|--------|------|------|------|'
  17. @ 10,1 say '|╒╝úÑ| ***  | ***  | ***  | ***  | ***    | ***  | ***  | ***  |'
  18. @ 11,1 say '================================================================'
  19. @ 12,1 say '╫ó: ú▒.╕≈╧ε╨╘─▄╡─╖╓╓╡╙╔╞└╖╓╚╦╓≈╣█╚╖╢¿,╓≈╥¬╕∙╛▌╕├╔Φ▒╕╘┌╔·▓·╓╨'
  20. @ 13,1 say '       ╦∙┤ª╡╪╬╗╡─╥¬╟≤└┤╞└╢¿.'
  21. @ 14,1 say '    ú▓.┤°ú¬└╕─┐▓╗╠ε .  '
  22. @ 15,1 say ' '
  23. set print off
  24. set devi to screen
  25. return
  26.  
  27.