Advertisement
Runer112

8*8=16 Crazy

Jan 4th, 2012
145
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. .align $800
  2. MulAbyE_High_0:
  3.     ld  e,a
  4.     inc h
  5.     ld  l,c
  6.     ld  l,(hl)
  7.     jp  (hl)
  8. MulAbyE:
  9.     ld  c,a
  10.     ld  d,%11110000
  11.     and d
  12.     ld  h,MulAbyE_High_0>>8
  13.     ld  l,a
  14.     xor c
  15.     jp  (hl)
  16. .align $10
  17. MulAbyE_High_1:
  18.     inc h
  19.     ld  l,c
  20.     ld  l,(hl)
  21.     jp  (hl)
  22. .align $10
  23. MulAbyE_High_2:
  24.     sla e
  25.     rl  d
  26.     inc h
  27.     ld  l,c
  28.     ld  l,(hl)
  29.     jp  (hl)
  30. .align $10
  31. MulAbyE_High_3:
  32.     ld  l,e
  33.     add hl,hl
  34.     add hl,de
  35.     ex  de,hl
  36.     ld  h,MulAbyE_Low>>8
  37.     ld  l,c
  38.     ld  l,(hl)
  39.     jp  (hl)
  40. .align $10
  41. MulAbyE_High_4:
  42.     ex  de,hl
  43.     add hl,hl
  44.     add hl,hl
  45.     ex  de,hl
  46.     inc h
  47.     ld  l,c
  48.     ld  l,(hl)
  49.     jp  (hl)
  50. .align $10
  51. MulAbyE_High_5:
  52.     ld  l,e
  53.     add hl,hl
  54.     add hl,hl
  55.     add hl,de
  56.     ex  de,hl
  57.     ld  h,MulAbyE_Low>>8
  58.     ld  l,c
  59.     ld  l,(hl)
  60.     jp  (hl)
  61. .align $10
  62. MulAbyE_High_6:
  63.     ld  l,e
  64.     add hl,hl
  65.     add hl,de
  66.     add hl,hl
  67.     ex  de,hl
  68.     ld  h,MulAbyE_Low>>8
  69.     ld  l,c
  70.     ld  l,(hl)
  71.     jp  (hl)
  72. .align $10
  73. MulAbyE_High_7:
  74.     ld  l,e
  75.     add hl,hl
  76.     add hl,de
  77.     add hl,hl
  78.     add hl,de
  79.     ex  de,hl
  80.     ld  h,MulAbyE_Low>>8
  81.     ld  l,c
  82.     ld  l,(hl)
  83.     jp  (hl)
  84. .align $10
  85. MulAbyE_High_8:
  86.     ex  de,hl
  87.     add hl,hl
  88.     add hl,hl
  89.     add hl,hl
  90.     ex  de,hl
  91.     inc h
  92.     ld  l,c
  93.     ld  l,(hl)
  94.     jp  (hl)
  95. .align $10
  96. MulAbyE_High_9:
  97.     ld  l,e
  98.     add hl,hl
  99.     add hl,hl
  100.     add hl,hl
  101.     add hl,de
  102.     ex  de,hl
  103.     ld  h,MulAbyE_Low>>8
  104.     ld  l,c
  105.     ld  l,(hl)
  106.     jp  (hl)
  107. .align $10
  108. MulAbyE_High_A:
  109.     ld  l,e
  110.     add hl,hl
  111.     add hl,hl
  112.     add hl,de
  113.     add hl,hl
  114.     ex  de,hl
  115.     ld  h,MulAbyE_Low>>8
  116.     ld  l,c
  117.     ld  l,(hl)
  118.     jp  (hl)
  119. .align $10
  120. MulAbyE_High_B:
  121.     ld  l,e
  122.     add hl,hl
  123.     add hl,hl
  124.     add hl,de
  125.     add hl,hl
  126.     add hl,de
  127.     ex  de,hl
  128.     ld  h,MulAbyE_Low>>8
  129.     ld  l,c
  130.     ld  l,(hl)
  131.     jp  (hl)
  132. .align $10
  133. MulAbyE_High_C:
  134.     ld  l,e
  135.     add hl,hl
  136.     add hl,de
  137.     add hl,hl
  138.     add hl,hl
  139.     ex  de,hl
  140.     ld  h,MulAbyE_Low>>8
  141.     ld  l,c
  142.     ld  l,(hl)
  143.     jp  (hl)
  144. .align $10
  145. MulAbyE_High_D:
  146.     ld  l,e
  147.     add hl,hl
  148.     add hl,de
  149.     add hl,hl
  150.     add hl,hl
  151.     add hl,de
  152.     ex  de,hl
  153.     ld  h,MulAbyE_Low>>8
  154.     ld  l,c
  155.     ld  l,(hl)
  156.     jp  (hl)
  157. .align $10
  158. MulAbyE_High_E:
  159.     ld  l,e
  160.     add hl,hl
  161.     add hl,de
  162.     add hl,hl
  163.     add hl,de
  164.     add hl,hl
  165.     ex  de,hl
  166.     ld  h,MulAbyE_Low>>8
  167.     ld  l,c
  168.     ld  l,(hl)
  169.     jp  (hl)
  170. .align $10
  171. MulAbyE_High_F:
  172.     ld  l,e
  173.     add hl,hl
  174.     add hl,de
  175.     add hl,hl
  176.     add hl,de
  177.     add hl,hl
  178.     add hl,de
  179.     ex  de,hl
  180.     ld  h,MulAbyE_Low>>8
  181.     ld  l,c
  182.     ld  l,(hl)
  183.     jp  (hl)
  184. MulAbyE_Low:
  185.     .db MulAbyE_Low_0&$FF,MulAbyE_Low_1&$FF,MulAbyE_Low_2&$FF,MulAbyE_Low_3&$FF
  186.     .db MulAbyE_Low_4&$FF,MulAbyE_Low_5&$FF,MulAbyE_Low_6&$FF,MulAbyE_Low_7&$FF
  187.     .db MulAbyE_Low_8&$FF,MulAbyE_Low_9&$FF,MulAbyE_Low_A&$FF,MulAbyE_Low_B&$FF
  188.     .db MulAbyE_Low_C&$FF,MulAbyE_Low_D&$FF,MulAbyE_Low_E&$FF,MulAbyE_Low_F&$FF
  189. MulAbyE_Low_0:
  190.     ex  de,hl
  191.     add hl,hl
  192.     add hl,hl
  193.     add hl,hl
  194.     add hl,hl
  195.     ret
  196. MulAbyE_Low_1:
  197.     ld  h,d
  198.     ld  l,e
  199.     add hl,hl
  200.     add hl,hl
  201.     add hl,hl
  202.     add hl,hl
  203.     add hl,de
  204.     ret
  205. MulAbyE_Low_2:
  206.     ld  h,d
  207.     ld  l,e
  208.     add hl,hl
  209.     add hl,hl
  210.     add hl,hl
  211.     add hl,de
  212.     add hl,hl
  213.     ret
  214. MulAbyE_Low_3:
  215.     ld  h,d
  216.     ld  l,e
  217.     add hl,hl
  218.     add hl,hl
  219.     add hl,hl
  220.     add hl,de
  221.     add hl,hl
  222.     add hl,de
  223.     ret
  224. MulAbyE_Low_4:
  225.     ld  h,d
  226.     ld  l,e
  227.     add hl,hl
  228.     add hl,hl
  229.     add hl,de
  230.     add hl,hl
  231.     add hl,hl
  232.     ret
  233. MulAbyE_Low_5:
  234.     ld  h,d
  235.     ld  l,e
  236.     add hl,hl
  237.     add hl,hl
  238.     add hl,de
  239.     add hl,hl
  240.     add hl,hl
  241.     add hl,de
  242.     ret
  243. MulAbyE_Low_6:
  244.     ld  h,d
  245.     ld  l,e
  246.     add hl,hl
  247.     add hl,hl
  248.     add hl,de
  249.     add hl,hl
  250.     add hl,de
  251.     add hl,hl
  252.     ret
  253. MulAbyE_Low_7:
  254.     ld  h,d
  255.     ld  l,e
  256.     add hl,hl
  257.     add hl,hl
  258.     add hl,de
  259.     add hl,hl
  260.     add hl,de
  261.     add hl,hl
  262.     add hl,de
  263.     ret
  264. MulAbyE_Low_8:
  265.     ld  h,d
  266.     ld  l,e
  267.     add hl,hl
  268.     add hl,de
  269.     add hl,hl
  270.     add hl,hl
  271.     add hl,hl
  272.     ret
  273. MulAbyE_Low_9:
  274.     ld  h,d
  275.     ld  l,e
  276.     add hl,hl
  277.     add hl,de
  278.     add hl,hl
  279.     add hl,hl
  280.     add hl,hl
  281.     add hl,de
  282.     ret
  283. MulAbyE_Low_A:
  284.     ld  h,d
  285.     ld  l,e
  286.     add hl,hl
  287.     add hl,de
  288.     add hl,hl
  289.     add hl,hl
  290.     add hl,de
  291.     add hl,hl
  292.     ret
  293. MulAbyE_Low_B:
  294.     ld  h,d
  295.     ld  l,e
  296.     add hl,hl
  297.     add hl,de
  298.     add hl,hl
  299.     add hl,hl
  300.     add hl,de
  301.     add hl,hl
  302.     add hl,de
  303.     ret
  304. MulAbyE_Low_C:
  305.     ld  h,d
  306.     ld  l,e
  307.     add hl,hl
  308.     add hl,de
  309.     add hl,hl
  310.     add hl,de
  311.     add hl,hl
  312.     add hl,hl
  313.     ret
  314. MulAbyE_Low_D:
  315.     ld  h,d
  316.     ld  l,e
  317.     add hl,hl
  318.     add hl,de
  319.     add hl,hl
  320.     add hl,de
  321.     add hl,hl
  322.     add hl,hl
  323.     add hl,de
  324.     ret
  325. MulAbyE_Low_E:
  326.     ld  h,d
  327.     ld  l,e
  328.     add hl,hl
  329.     add hl,de
  330.     add hl,hl
  331.     add hl,de
  332.     add hl,hl
  333.     add hl,de
  334.     add hl,hl
  335.     ret
  336. MulAbyE_Low_F:
  337.     ld  h,d
  338.     ld  l,e
  339.     add hl,hl
  340.     add hl,de
  341.     add hl,hl
  342.     add hl,de
  343.     add hl,hl
  344.     add hl,de
  345.     add hl,hl
  346.     add hl,de
  347.     ret
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement