Inicio Explorar Axuda
Iniciar sesión
MineRobber9000
/
pokered-rematch
Seguir 1
Destacar 0
Fork 0
Ficheiros Incidencias 0 Pull Requests 0 Wiki
Rama: master
Ramas Etiquetas
pokered-rema...
/
scripts
/
route15gateupstairs.asm

route15gateupstairs.asm 939 B
Permalink Histórico Raw

123456789101112131415161718192021222324252627282930313233343536373839404142434445 
  1. Route15GateUpstairsScript:
    2. 

  2. 	jp DisableAutoTextBoxDrawing
    3. 

  3. 

  4. Route15GateUpstairsTextPointers:
    5. 

  5. 	dw Route15GateUpstairsText1
    6. 

  6. 	dw Route15GateUpstairsText2
    7. 

  7. 

  8. Route15GateUpstairsText1:
    9. 

  9. 	TX_ASM
    10. 

  10. 	CheckEvent EVENT_GOT_EXP_ALL
    11. 

  11. 	jr nz, .asm_49683
    12. 

  12. 	ld a, 50 ; pokemon needed
    13. 

  13. 	ld [hOaksAideRequirement], a
    14. 

  14. 	ld a, EXP_ALL ; oak's aide reward
    15. 

  15. 	ld [hOaksAideRewardItem], a
    16. 

  16. 	ld [wd11e], a
    17. 

  17. 	call GetItemName
    18. 

  18. 	ld hl, wcd6d
    19. 

  19. 	ld de, wOaksAideRewardItemName
    20. 

  20. 	ld bc, ITEM_NAME_LENGTH
    21. 

  21. 	call CopyData
    22. 

  22. 	predef OaksAideScript
    23. 

  23. 	ld a, [hOaksAideResult]
    24. 

  24. 	cp $1
    25. 

  25. 	jr nz, .asm_49689
    26. 

  26. 	SetEvent EVENT_GOT_EXP_ALL
    27. 

  27. .asm_49683
    28. 

  28. 	ld hl, Route15GateUpstairsText_4968c
    29. 

  29. 	call PrintText
    30. 

  30. .asm_49689
    31. 

  31. 	jp TextScriptEnd
    32. 

  32. 

  33. Route15GateUpstairsText_4968c:
    34. 

  34. 	TX_FAR _Route15GateUpstairsText_4968c
    35. 

  35. 	db "@"
    36. 

  36. 

  37. Route15GateUpstairsText2:
    38. 

  38. 	TX_ASM
    39. 

  39. 	ld hl, Route15GateUpstairsText_49698
    40. 

  40. 	jp GateUpstairsScript_PrintIfFacingUp
    41. 

  41. 

  42. Route15GateUpstairsText_49698:
    43. 

  43. 	TX_FAR _Route15GateUpstairsText_49698
    44. 

  44. 	db "@"
    45. 

  45.