SHARE
TWEET

Untitled

a guest Apr 5th, 2013 23 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ; 3e7c1
  2.         ld a, [$c711]
  3.         and a
  4.         ret nz
  5.  
  6.         ld a, [InLinkBattle]
  7.         and a
  8.         jr z, .asm_3e817
  9.  
  10.         call $6dd1
  11.  
  12.         call $309d
  13.  
  14.         ld a, [$d0ec]
  15.         and a
  16.         call z, $68e4
  17.  
  18.         call $30b4
  19.  
  20.         ld a, [$d430]
  21.         cp $e
  22.         jp z, $68bd
  23.  
  24.         cp $d
  25.         jp z, $682c
  26.  
  27.         cp $4
  28.         jp nc, $68c1
  29.  
  30.         ld [CurEnemyMoveNum], a
  31.         ld c, a
  32.         ld a, [EnemySubStatus1]
  33.         bit 6, a
  34.         jp nz, $6882
  35.  
  36.         ld a, [EnemySubStatus3]
  37.         and $13
  38.         jp nz, $6882
  39.  
  40.         ld hl, EnemySubStatus5
  41.         bit 4, [hl]
  42.         ld a, [LastEnemyMove]
  43.         jp nz, $687f
  44.  
  45.         ld hl, EnemyMonMove1
  46.         ld b, $0
  47.         add hl, bc
  48.         ld a, [hl]
  49.         jp $687f
  50.  
  51. .asm_3e817
  52.         ld hl, EnemySubStatus5
  53.         bit 4, [hl]
  54.         jr z, .asm_3e824
  55.  
  56.         ld a, [LastEnemyMove]
  57.         jp $687f
  58.  
  59. .asm_3e824
  60.         call $68d1
  61.  
  62.         jp nz, $68c1
  63.  
  64.         jr .asm_3e830
  65.  
  66.         ld a, $ff
  67.         jr .asm_3e87f
  68.  
  69. .asm_3e830
  70.         ld hl, EnemyMonMove1
  71.         ld de, EnemyMonPPMove1
  72.         ld b, $4
  73. .asm_3e838
  74.         ld a, [hl]
  75.         and a
  76.         jp z, $68bd
  77.  
  78.         ld a, [EnemyEncoredMove]
  79.         cp [hl]
  80.         jr z, .asm_3e848
  81.  
  82.         ld a, [de]
  83.         and $3f
  84.         jr nz, .asm_3e84f
  85.  
  86. .asm_3e848
  87.         inc hl
  88.         inc de
  89.         dec b
  90.         jr nz, .asm_3e838
  91.  
  92.         jr .asm_3e8bd
  93.  
  94. .asm_3e84f
  95.         ld a, [IsInBattle]
  96.         dec a
  97.         jr nz, .asm_3e882
  98.  
  99. .asm_3e855
  100.         ld hl, EnemyMonMove1
  101.         call FarBattleRNG
  102.  
  103.         and $3
  104.         ld c, a
  105.         ld b, $0
  106.         add hl, bc
  107.         ld a, [EnemyEncoreCount]
  108.         swap a
  109.         and $f
  110.         dec a
  111.         cp c
  112.         jr z, .asm_3e855
  113.  
  114.         ld a, [hl]
  115.         and a
  116.         jr z, .asm_3e855
  117.  
  118.         ld hl, EnemyMonPPMove1
  119.         add hl, bc
  120.         ld b, a
  121.         ld a, [hl]
  122.         and $3f
  123.         jr z, .asm_3e855
  124.  
  125.         ld a, c
  126.         ld [CurEnemyMoveNum], a
  127.         ld a, b
  128. .asm_3e87f
  129.         ld [CurEnemyMove], a
  130. .asm_3e882
  131.         call SetEnemyTurn
  132.  
  133.         ld hl, $5e40
  134.         ld a, $d
  135.         rst $8
  136.  
  137.         call $68d1
  138.  
  139.         jr nz, .asm_3e894
  140.  
  141.         xor a
  142.         ld [$c733], a
  143. .asm_3e894
  144.         ld a, [EnemyMoveEffect]
  145.         cp $77
  146.         jr z, .asm_3e89f
  147.  
  148.         xor a
  149.         ld [$c680], a
  150. .asm_3e89f
  151.         ld a, [EnemyMoveEffect]
  152.         cp $51
  153.         jr z, .asm_3e8af
  154.  
  155.         ld hl, EnemySubStatus4
  156.         res 6, [hl]
  157.         xor a
  158.         ld [$c72c], a
  159. .asm_3e8af
  160.         ld a, [EnemyMoveEffect]
  161.         cp $6f
  162.         ret z
  163.  
  164.         cp $74
  165.         ret z
  166.  
  167.         xor a
  168.         ld [PlayerDamageTaken], a
  169.         ret
  170.  
  171. .asm_3e8bd
  172.         ld a, $a5
  173.         jr .asm_3e87f
  174.  
  175.         xor a
  176.         ld [$c680], a
  177.         ld [PlayerDamageTaken], a
  178.         ld [$c72c], a
  179.         ld hl, EnemySubStatus4
  180.         res 6, [hl]
  181.         ret
  182.  
  183. ; 3e8d1
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top