Advertisement
Guest User

Untitled

a guest
Jun 30th, 2020
29
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.85 KB | None | 0 0
  1.  
  2. ; MSX C ver 1.10r (code generator)
  3.  
  4. cseg
  5. ?59999:
  6. defb 114,101,115,117,108,116,32,61,32,37
  7. defb 100,10,0
  8.  
  9. main@:
  10. push hl
  11. push bc
  12. push bc
  13. push bc
  14. push de
  15. call ?laut8
  16. pop de
  17. ld hl,1
  18. push hl
  19. ld de,2
  20. ld bc,3
  21. ld hl,4
  22. push de
  23. call ?saut4
  24. pop de
  25. ld hl,5
  26. push de
  27. call ?saut6
  28. pop de
  29. ld hl,6
  30. push de
  31. call ?saut8
  32. pop de
  33. pop hl
  34. add hl,de
  35. add hl,bc
  36. push hl
  37. ld hl,2
  38. add hl,sp
  39. ld e,(hl)
  40. inc hl
  41. ld d,(hl)
  42. pop hl
  43. add hl,de
  44. push hl
  45. ld hl,4
  46. add hl,sp
  47. ld e,(hl)
  48. inc hl
  49. ld d,(hl)
  50. pop hl
  51. add hl,de
  52. push hl
  53. ld hl,6
  54. add hl,sp
  55. ld e,(hl)
  56. inc hl
  57. ld d,(hl)
  58. pop hl
  59. add hl,de
  60. ld bc,?59999
  61. push bc
  62. ld hl,1
  63. call printf
  64. pop bc
  65. ld hl,0
  66. pop bc
  67. pop bc
  68. pop bc
  69. pop bc
  70. ret
  71.  
  72.  
  73. public main@
  74. extrn printf
  75. extrn ?laut8
  76. extrn ?saut4
  77. extrn ?saut6
  78. extrn ?saut8
  79.  
  80. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement