Don't like ads? PRO users don't see any ads ;-)
Public Pastes
Guest

Untitled

By: a guest on Jun 21st, 2012  |  syntax: None  |  size: 1.25 KB  |  hits: 10  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  2. ;; Author: SamTechnnologeek                                      ;;
  3. ;; Title: Voyager OS                                             ;;
  4. ;; Version: InDev.                                               ;;
  5. ;; Date: 21st of July 2012 AC                                    ;;
  6. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  7.  
  8. ;Map Hardware
  9. HWN I
  10. :HW_MAP
  11. SUB I, 1
  12. HWQ I
  13. IFE B, 0x7349
  14.   IFE A, 0xf615
  15.     SET [MONITOR], I
  16. IFE B, 0x30cf
  17.   IFE A, 0x7406
  18.     SET [KEYBOARD], I
  19. IFE B, 0x12d0
  20.   IFE A, 0xb402
  21.     SET [CLOCK], I
  22. IFN I, 0
  23.   SET PC, HW_MAP
  24. ;Map Hardware end
  25.  
  26. ;Set up LEM1802 in MEM_MAP_SCREEN mode
  27. SET A, 0
  28. SET B, 0x8000
  29. HWI [MONITOR]
  30.  
  31. SET J, 0
  32. ;Draw logo
  33. :LOGO_LOOP
  34. SET [0x8000+J], LOGO
  35. IFE LOGO, 0
  36.         SET PC, MAIN
  37. ADD J, 1
  38. SET PC, LOGO_LOOP
  39. ;Draw logo end
  40.  
  41. :MAIN
  42. SET PC, MAIN
  43.  
  44. :MONITOR
  45. DAT 0
  46. :CLOCK
  47. DAT 0
  48. :KEYBOARD
  49. DAT 0
  50. :LOGO DAT " __   __                                             "  
  51.  dat "\\ \\ / /___  _  _  __ _  __ _  ___  _ _                  "
  52. dat "  \\ V // _ \\| || |/ _` |/ _` |/ -_)| '_|                 "
  53. dat "   \\_/ \\___/ \\_, |\\__,_|\\__, |\\___||_|               "
  54.  dat "            |__/       |___/            ", 0
create a new version of this paste RAW Paste Data