Advertisement
Guest User

Untitled

a guest
Jun 30th, 2020
71
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.05 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. pop de
  19. push hl
  20. ld hl,2
  21. ld bc,3
  22. ld de,4
  23. push hl
  24. ld hl,6
  25. add hl,sp
  26. ld (hl),e
  27. inc hl
  28. ld (hl),d
  29. pop hl
  30. ld de,5
  31. push de
  32. call ?saut4
  33. pop de
  34. ld hl,6
  35. push hl
  36. push de
  37. ld hl,8
  38. add hl,sp
  39. ld e,(hl)
  40. inc hl
  41. ld d,(hl)
  42. push de
  43. ld hl,8
  44. add hl,sp
  45. ld e,(hl)
  46. inc hl
  47. ld d,(hl)
  48. push de
  49. call ?laut8
  50. pop de
  51. call func01
  52. pop bc
  53. pop bc
  54. pop bc
  55. push hl
  56. ld bc,?59999
  57. push bc
  58. ld hl,2
  59. call printf
  60. pop bc
  61. pop bc
  62. ld hl,0
  63. pop bc
  64. pop bc
  65. pop bc
  66. pop bc
  67. ret
  68.  
  69.  
  70. func01:
  71. push bc
  72. ld c,e
  73. ld b,d
  74. push hl
  75. call ?laut6
  76. ex de,hl
  77. pop hl
  78. add hl,bc
  79. pop bc
  80. add hl,bc
  81. add hl,de
  82. push hl
  83. call ?laut6
  84. ex de,hl
  85. pop hl
  86. add hl,de
  87. push hl
  88. call ?laut8
  89. ex de,hl
  90. pop hl
  91. add hl,de
  92. ret
  93.  
  94.  
  95. public main@
  96. public func01
  97. extrn printf
  98. extrn ?laut8
  99. extrn ?saut4
  100. extrn ?laut6
  101.  
  102. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement