Fantafaust

HGSS DSPRE Script File 3 Fix

Oct 31st, 2024 (edited)
137
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 23.22 KB | None | 0 0
  1. Function 1:
  2. ShowBoard 2
  3. LocalScript
  4. End
  5.  
  6. Function 2:
  7. ShowBoard 4
  8. WaitBoard
  9. Menu
  10. LocalScript
  11. End
  12.  
  13. Function 3:
  14. GetItemPocket 0x8004 0x800C
  15. SetVarFromVariable 0x8008 0x800C
  16. CompareVarValue 0x8008 7
  17. JumpIf EQUAL Function#47
  18. CompareVarValue 0x8008 0
  19. JumpIf EQUAL Function#48
  20. CompareVarValue 0x8008 4
  21. JumpIf EQUAL Function#48
  22. CompareVarValue 0x8008 1
  23. JumpIf EQUAL Function#48
  24. CompareVarValue 0x8008 2
  25. JumpIf EQUAL Function#48
  26. CompareVarValue 0x8008 6
  27. JumpIf EQUAL Function#48
  28. CompareVarValue 0x8008 5
  29. JumpIf EQUAL Function#49
  30. CompareVarValue 0x8008 3
  31. JumpIf EQUAL Function#50
  32. End
  33.  
  34. Function 4:
  35. CheckFlag 100
  36. JumpIf EQUAL Function#51
  37. SetFlag 100
  38. Message 4
  39. TextPlayerName 0
  40. Message 5
  41. OpenTouchScreen
  42. YesNoTouchScreen 0x800C
  43. CloseTouchScreen
  44. CompareVarValue 0x800C 0
  45. JumpIf EQUAL Function#52
  46. Message 9
  47. WaitButton
  48. CloseMessage
  49. ReleaseAll
  50. LocalScript
  51. End
  52.  
  53. Function 5:
  54. MessageFlex 0x8004
  55. OpenTouchScreen
  56. YesNoTouchScreen 0x800C
  57. CompareVarValue 0x800C 0
  58. JumpIf EQUAL Function#6
  59. CompareVarValue 0x800C 1
  60. JumpIf EQUAL Function#7
  61. End
  62.  
  63. Function 6:
  64. CheckPlayerForm 0x800C
  65. CompareVarValue 0x800C 3
  66. JumpIf DIFFERENT Function#53
  67. SetPlayerForm 2048
  68. Jump Function#54
  69.  
  70. Function 7:
  71. Message 3
  72. WaitButton
  73. CloseTouchScreen
  74. CloseMessage
  75. ReleaseAll
  76. LocalScript
  77. End
  78.  
  79. Function 8:
  80. IncrementVar 0x8005 1
  81. CompareVars 0x8004 0x8005
  82. JumpIf DIFFERENT Function#9
  83. CountAlivePokemonExceptFirst 0x800C 6
  84. CompareVarValue 0x800C 0
  85. JumpIf EQUAL Function#10
  86. CloseMessage
  87. ReleaseAll
  88. End
  89.  
  90. Function 9:
  91. SurvivePoison 0x800C 0x8005
  92. CompareVarValue 0x800C 0
  93. JumpIf EQUAL Function#8
  94. TextPokeNickname 0 0x8005
  95. Message 53
  96. IncrementVar 0x8005 1
  97. CompareVars 0x8004 0x8005
  98. JumpIf DIFFERENT Function#9
  99. CountAlivePokemonExceptFirst 0x800C 6
  100. CompareVarValue 0x800C 0
  101. JumpIf EQUAL Function#10
  102. CloseMessage
  103. ReleaseAll
  104. End
  105.  
  106. Function 10:
  107. TextPlayerName 0
  108. Message 11
  109. WaitAB
  110. CloseMessage
  111. FadeOutMusic 0 10
  112. FadeScreen 6 1 0 0
  113. WaitFadeScreen
  114. CMD_436
  115. DummyLostBattle
  116. End
  117.  
  118. Function 11:
  119. ShowSaveBox
  120. Message 13
  121. OpenTouchScreen
  122. YesNoTouchScreen 0x800C
  123. CompareVarValue 0x800C 1
  124. JumpIf EQUAL Function#55
  125. CheckSaveGame 0x800C
  126. CompareVarValue 0x800C 0
  127. JumpIf EQUAL Function#56
  128. CompareVarValue 0x800C 1
  129. JumpIf EQUAL Function#57
  130. CompareVarValue 0x800C 2
  131. JumpIf EQUAL Function#58
  132. CompareVarValue 0x800C 3
  133. JumpIf EQUAL Function#59
  134. End
  135.  
  136. Function 12:
  137. PlaySound 1191
  138. CMD_403 0x8004 0x8005
  139. TextAccessory 0 0x8004
  140. Message 25
  141. WaitSound
  142. TextPlayerName 0
  143. TextAccessory 1 0x8004
  144. Return
  145.  
  146. Function 13:
  147. Call Function#3
  148. GiveItem 0x8004 0x8005 0x800C
  149. GetItemPocket 0x8004 0x800C
  150. CompareVarValue 0x800C 7
  151. CallIf EQUAL Function#60
  152. CompareVarValue 0x800C 7
  153. CallIf DIFFERENT Function#61
  154. CompareVarValue 0x8005 1
  155. JumpIf GREATER Function#62
  156. Message 30
  157. Jump Function#63
  158.  
  159. Function 14:
  160. Message 27
  161. WaitButton
  162. Return
  163.  
  164. Function 15:
  165. CMD_500 90
  166. CMD_501 90
  167. WaitDoor 90
  168. Return
  169.  
  170. Function 16:
  171. TextPlayerName 0
  172. Message 34
  173. MultiTouchStandardText 1 1 0 1 0x8006
  174. CheckFlag 2422
  175. CallIf LESS Function#64
  176. CheckFlag 2422
  177. CallIf EQUAL Function#65
  178. CreateMultiTouchBox 63 255 1
  179. CheckFlag 2404
  180. JumpIf EQUAL Function#66
  181. CheckFlag 2404
  182. JumpIf LESS Function#67
  183. Jump Function#67
  184.  
  185. Function 17:
  186. SetPlayerForm 256
  187. UpdatePlayerForm
  188. Movement Player Action#3
  189. WaitMovement
  190. Message 44
  191. Call Function#68
  192. Call Function#69
  193. CheckBadge 0 0x800C
  194. CompareVarValue 0x800C 1
  195. JumpIf EQUAL Function#70
  196. Message 45
  197. Movement Player Action#4
  198. WaitMovement
  199. CheckPlayerForm 0x800C
  200. CompareVarValue 0x800C 3
  201. JumpIf DIFFERENT Function#71
  202. SetPlayerForm 1024
  203. Jump Function#72
  204.  
  205. Function 18:
  206. UpdatePlayerForm
  207. Movement Player Action#3
  208. WaitMovement
  209. Message 44
  210. Call Function#68
  211. Call Function#69
  212. CheckBadge 0 0x800C
  213. CompareVarValue 0x800C 1
  214. JumpIf EQUAL Function#70
  215. Message 45
  216. Movement Player Action#4
  217. WaitMovement
  218. CheckPlayerForm 0x800C
  219. CompareVarValue 0x800C 3
  220. JumpIf DIFFERENT Function#71
  221. SetPlayerForm 1024
  222. Jump Function#72
  223.  
  224. Function 19:
  225. End
  226.  
  227. Function 20:
  228. Message 60
  229. YesNoBox 0x800C
  230. CompareVarValue 0x800C 1
  231. JumpIf EQUAL Function#21
  232. RideBike 0
  233. CloseMessage
  234. ReleaseAll
  235. End
  236.  
  237. Function 21:
  238. CloseMessage
  239. ReleaseAll
  240. End
  241.  
  242. Function 22:
  243. Message 108
  244. Jump Function#25
  245.  
  246. Function 23:
  247. MultiTouchLocalText 1 1 0 1 0x800C
  248. CreateMultiTouchBox 112 255 0
  249. CreateMultiTouchBox 113 255 1
  250. CreateMultiTouchBox 114 255 2
  251. CreateMultiTouchBox 115 255 3
  252. CreateMultiTouchBox 116 255 4
  253. CloseMultiTouch
  254. CompareVarValue 0x800C 4
  255. JumpIf GREATER/EQUAL Function#22
  256. SetVar 0x8004 104
  257. IncrementVar 0x8004 0x800C
  258. MessageFlex 0x8004
  259. FadeScreen 6 1 0 0
  260. WaitFadeScreen
  261. CloseMessage
  262. SetVar 0x8000 2
  263. IncrementVar 0x8000 0x800C
  264. CMD_492 0x8000 0x800C 0x8001
  265. ReturnScreen
  266. FadeScreen 6 1 1 0
  267. WaitFadeScreen
  268. CompareVarValue 0x800C 0
  269. JumpIf EQUAL Function#22
  270. Message 109
  271. YesNoTouchScreen 0x800C
  272. CompareVarValue 0x800C 0
  273. JumpIf EQUAL Function#23
  274. CompareVarValue 0x8001 0xFFFF
  275. JumpIf EQUAL Function#24
  276. CMD_494 0 0x8001
  277. Message 111
  278. Jump Function#25
  279.  
  280. Function 24:
  281. Message 110
  282. WaitButton
  283. CloseMessage
  284. CloseTouchScreen
  285. ReleaseAll
  286. End
  287.  
  288. Function 25:
  289. WaitButton
  290. CloseMessage
  291. CloseTouchScreen
  292. ReleaseAll
  293. End
  294.  
  295. Function 26:
  296. PlaySound 1191
  297. CMD_406 0x8004
  298. CMD_531 0 0x8004
  299. Message 25
  300. WaitSound
  301. TextPlayerName 0
  302. CMD_531 1 0x8004
  303. Return
  304.  
  305. Function 27:
  306. CMD_087 1161
  307. Return
  308.  
  309. Function 28:
  310. CMD_087 1160
  311. Return
  312.  
  313. Function 29:
  314. Call Function#3
  315. GiveItem 0x8004 0x8005 0x800C
  316. GetItemPocket 0x8004 0x800C
  317. CompareVarValue 0x800C 7
  318. CallIf EQUAL Function#60
  319. CompareVarValue 0x800C 7
  320. CallIf DIFFERENT Function#61
  321. Message 89
  322. Return
  323.  
  324. Function 30:
  325. PlayFanfare 2168
  326. WaitFanfare 2168
  327. PlayFanfare 2168
  328. WaitFanfare 2168
  329. FadeScreen 6 1 0 0
  330. WaitFadeScreen
  331. StartPokeGearCall
  332. ReturnScreen
  333. FadeScreen 6 1 1 0
  334. WaitFadeScreen
  335. Return
  336.  
  337. Function 31:
  338. LocalScript
  339. End
  340.  
  341. Function 32:
  342. ReturnScreen
  343. FadeScreen 6 1 1 0
  344. WaitFadeScreen
  345. LocalScript
  346. End
  347.  
  348. Function 33:
  349. OpenTouchScreen
  350. MultiTouchStandardText 1 1 0 1 0x800C
  351. CreateMultiTouchBox 321 255 0
  352. CreateMultiTouchBox 322 255 1
  353. CreateMultiTouchBox 323 255 2
  354. CloseMultiTouch
  355. SetVarFromVariable 0x8008 0x800C
  356. CompareVarValue 0x8008 0
  357. JumpIf EQUAL Function#73
  358. CompareVarValue 0x8008 1
  359. JumpIf EQUAL Function#74
  360. CompareVarValue 0x8008 2
  361. JumpIf EQUAL Function#75
  362. End
  363.  
  364. Function 34:
  365. CMD_438 3 0x800C
  366. CMD_440 0x800C 6
  367. FreezeMessage
  368. Jump Function#33
  369.  
  370. Function 35:
  371. OpenTouchScreen
  372. MultiTouchStandardText 1 1 0 1 0x800C
  373. CreateMultiTouchBox 321 255 0
  374. CreateMultiTouchBox 322 255 1
  375. CreateMultiTouchBox 323 255 2
  376. CloseMultiTouch
  377. SetVarFromVariable 0x8008 0x800C
  378. CompareVarValue 0x8008 0
  379. JumpIf EQUAL Function#76
  380. CompareVarValue 0x8008 1
  381. JumpIf EQUAL Function#77
  382. CompareVarValue 0x8008 2
  383. JumpIf EQUAL Function#78
  384. End
  385.  
  386. Function 36:
  387. CheckFlag 367
  388. JumpIf EQUAL Function#79
  389. CheckFlag 368
  390. JumpIf EQUAL Function#80
  391. CheckFlag 369
  392. JumpIf EQUAL Function#81
  393. CheckFlag 394
  394. JumpIf EQUAL Function#82
  395. CMD_438 3 0x800C
  396. CMD_440 0x800C 6
  397. FreezeMessage
  398. Jump Function#35
  399.  
  400. Function 37:
  401. CMD_438 3 0x800C
  402. CMD_440 0x800C 2
  403. Jump Function#83
  404.  
  405. Function 38:
  406. CMD_438 3 0x800C
  407. CMD_440 0x800C 3
  408. Jump Function#83
  409.  
  410. Function 39:
  411. CMD_438 3 0x800C
  412. CMD_440 0x800C 4
  413. Jump Function#83
  414.  
  415. Function 40:
  416. CMD_438 3 0x800C
  417. CMD_440 0x800C 5
  418. Jump Function#83
  419.  
  420. Function 41:
  421. CMD_771
  422. LocalScript
  423. End
  424.  
  425. Function 42:
  426. CloseTouchScreen
  427. LocalScript
  428. End
  429.  
  430. Function 43:
  431. CloseTouchScreen
  432. LocalScript
  433. End
  434.  
  435. Function 44:
  436. CMD_772
  437. LocalScript
  438. End
  439.  
  440. Function 45:
  441. CloseTouchScreen
  442. LocalScript
  443. End
  444.  
  445. Function 46:
  446. CloseTouchScreen
  447. LocalScript
  448. End
  449.  
  450. Function 47:
  451. PlaySound 1186
  452. Return
  453.  
  454. Function 48:
  455. PlaySound 1185
  456. Return
  457.  
  458. Function 49:
  459. PlaySound 1195
  460. Return
  461.  
  462. Function 50:
  463. PlaySound 1190
  464. Return
  465.  
  466. Function 51:
  467. TextPlayerName 0
  468. Message 6
  469. OpenTouchScreen
  470. YesNoTouchScreen 0x800C
  471. CloseTouchScreen
  472. CompareVarValue 0x800C 0
  473. JumpIf EQUAL Function#52
  474. Message 9
  475. WaitButton
  476. CloseMessage
  477. ReleaseAll
  478. LocalScript
  479. End
  480.  
  481. Function 52:
  482. SetVar 0x8004 1
  483. Jump Function#6
  484.  
  485. Function 53:
  486. SetPlayerForm 256
  487. UpdatePlayerForm
  488. Movement Player Action#3
  489. WaitMovement
  490. FollowingPokePCAnimation
  491. CheckTrainerCardLevel 0x800C
  492. CompareVarValue 0x800C 4
  493. CallIf GREATER/EQUAL Function#84
  494. CompareVarValue 0x800C 4
  495. CallIf LESS Function#85
  496. Call Function#69
  497. CheckFlag 101
  498. JumpIf LESS Function#86
  499. Jump Function#87
  500.  
  501. Function 54:
  502. UpdatePlayerForm
  503. Movement Player Action#3
  504. WaitMovement
  505. FollowingPokePCAnimation
  506. CheckTrainerCardLevel 0x800C
  507. CompareVarValue 0x800C 4
  508. CallIf GREATER/EQUAL Function#84
  509. CompareVarValue 0x800C 4
  510. CallIf LESS Function#85
  511. Call Function#69
  512. CheckFlag 101
  513. JumpIf LESS Function#86
  514. Jump Function#87
  515.  
  516. Function 55:
  517. HideSaveBox
  518. CloseTouchScreen
  519. SetVar 0x800C 0
  520. Return
  521.  
  522. Function 56:
  523. HideSaveBox
  524. CloseTouchScreen
  525. Message 20
  526. WaitAB
  527. SetVar 0x800C 0
  528. Return
  529.  
  530. Function 57:
  531. Message 21
  532. Jump Function#88
  533.  
  534. Function 58:
  535. Message 14
  536. YesNoTouchScreen 0x800C
  537. CompareVarValue 0x800C 1
  538. JumpIf EQUAL Function#55
  539. Message 21
  540. Jump Function#88
  541.  
  542. Function 59:
  543. Message 14
  544. YesNoTouchScreen 0x800C
  545. CompareVarValue 0x800C 1
  546. JumpIf EQUAL Function#55
  547. CheckFlag 32
  548. JumpIf LESS Function#89
  549. CheckFlag 32
  550. JumpIf EQUAL Function#90
  551. End
  552.  
  553. Function 60:
  554. TextPlayerName 0
  555. CMD_194 1 0x8004
  556. Message 28
  557. Jump Function#91
  558.  
  559. Function 61:
  560. CompareVarValue 0x8005 1
  561. JumpIf GREATER Function#92
  562. CMD_194 0 0x8004
  563. Jump Function#93
  564.  
  565. Function 62:
  566. Message 31
  567. WaitButton
  568. Return
  569.  
  570. Function 63:
  571. WaitButton
  572. Return
  573.  
  574. Function 64:
  575. CreateMultiTouchBox 61 255 0
  576. Return
  577.  
  578. Function 65:
  579. CreateMultiTouchBox 62 255 0
  580. Return
  581.  
  582. Function 66:
  583. CreateMultiTouchBox 64 255 2
  584. CreateMultiTouchBox 66 255 3
  585. CloseMultiTouch
  586. SetVarFromVariable 0x8008 0x8006
  587. CompareVarValue 0x8008 0
  588. JumpIf EQUAL Function#94
  589. CompareVarValue 0x8008 1
  590. JumpIf EQUAL Function#95
  591. CompareVarValue 0x8008 2
  592. JumpIf EQUAL Function#96
  593. Jump Function#97
  594.  
  595. Function 67:
  596. CreateMultiTouchBox 66 255 2
  597. CloseMultiTouch
  598. SetVarFromVariable 0x8008 0x8006
  599. CompareVarValue 0x8008 0
  600. JumpIf EQUAL Function#94
  601. CompareVarValue 0x8008 1
  602. JumpIf EQUAL Function#95
  603. Jump Function#97
  604.  
  605. Function 68:
  606. GetCurrentHeaderID 0x8004
  607. CompareVarValue 0x8004 69
  608. JumpIf EQUAL Function#98
  609. CompareVarValue 0x8004 158
  610. JumpIf EQUAL Function#99
  611. CompareVarValue 0x8004 166
  612. JumpIf EQUAL Function#100
  613. CompareVarValue 0x8004 236
  614. JumpIf EQUAL Function#101
  615. CompareVarValue 0x8004 185
  616. JumpIf EQUAL Function#102
  617. CompareVarValue 0x8004 81
  618. JumpIf EQUAL Function#103
  619. CompareVarValue 0x8004 246
  620. JumpIf EQUAL Function#104
  621. CompareVarValue 0x8004 293
  622. JumpIf EQUAL Function#105
  623. CompareVarValue 0x8004 169
  624. JumpIf EQUAL Function#106
  625. SetVar 0x8007 0
  626. Return
  627.  
  628. Function 69:
  629. Movement 0x8007 Action#5
  630. WaitMovement
  631. CountPartyBornPokemon 0x8006
  632. PCHealAnimation 0x8006
  633. Movement 0x8007 Action#6
  634. WaitMovement
  635. GetFirstAlivePokemonSlot 0x8008
  636. HealPokemon
  637. Return
  638.  
  639. Function 70:
  640. Movement Player Action#4
  641. WaitMovement
  642. CheckPlayerForm 0x800C
  643. CompareVarValue 0x800C 3
  644. JumpIf DIFFERENT Function#107
  645. SetPlayerForm 1024
  646. Jump Function#108
  647.  
  648. Function 71:
  649. SetPlayerForm 1
  650. UpdatePlayerForm
  651. Movement 0x8007 Action#7
  652. WaitMovement
  653. Message 46
  654. WaitButton
  655. CloseMessage
  656. ReleaseAll
  657. End
  658.  
  659. Function 72:
  660. UpdatePlayerForm
  661. Movement 0x8007 Action#7
  662. WaitMovement
  663. Message 46
  664. WaitButton
  665. CloseMessage
  666. ReleaseAll
  667. End
  668.  
  669. Function 73:
  670. MartScreen 0x8004
  671. Jump Function#34
  672.  
  673. Function 74:
  674. CMD_782
  675. Jump Function#34
  676.  
  677. Function 75:
  678. CloseTouchScreen
  679. CMD_438 3 0x800C
  680. CMD_440 0x800C 1
  681. WaitButton
  682. CloseMessage
  683. LocalScript
  684. End
  685.  
  686. Function 76:
  687. SpMartScreen 0x8004
  688. Jump Function#36
  689.  
  690. Function 77:
  691. CMD_782
  692. Jump Function#36
  693.  
  694. Function 78:
  695. CloseTouchScreen
  696. CheckFlag 367
  697. JumpIf EQUAL Function#37
  698. CheckFlag 368
  699. JumpIf EQUAL Function#38
  700. CheckFlag 369
  701. JumpIf EQUAL Function#39
  702. CheckFlag 394
  703. JumpIf EQUAL Function#40
  704. CMD_438 3 0x800C
  705. CMD_440 0x800C 1
  706. WaitButton
  707. CloseMessage
  708. LocalScript
  709. End
  710.  
  711. Function 79:
  712. CMD_438 3 0x800C
  713. CMD_440 0x800C 7
  714. Jump Function#109
  715.  
  716. Function 80:
  717. CMD_438 3 0x800C
  718. CMD_440 0x800C 8
  719. Jump Function#109
  720.  
  721. Function 81:
  722. CMD_438 3 0x800C
  723. CMD_440 0x800C 9
  724. Jump Function#109
  725.  
  726. Function 82:
  727. CMD_438 3 0x800C
  728. CMD_440 0x800C 10
  729. Jump Function#109
  730.  
  731. Function 83:
  732. WaitButton
  733. CloseMessage
  734. LocalScript
  735. End
  736.  
  737. Function 84:
  738. Message 7
  739. Return
  740.  
  741. Function 85:
  742. Message 1
  743. Return
  744.  
  745. Function 86:
  746. CheckPokerus 0x8006
  747. CompareVarValue 0x8006 1
  748. JumpIf EQUAL Function#110
  749. Jump Function#87
  750.  
  751. Function 87:
  752. CompareVarValue 0x8004 1
  753. JumpIf EQUAL Function#111
  754. Message 2
  755. Movement Player Action#4
  756. WaitMovement
  757. CheckPlayerForm 0x800C
  758. CompareVarValue 0x800C 3
  759. JumpIf DIFFERENT Function#112
  760. SetPlayerForm 1024
  761. Jump Function#113
  762.  
  763. Function 88:
  764. CMD_512 3
  765. End
  766.  
  767. Function 89:
  768. Message 15
  769. Jump Function#88
  770.  
  771. Function 90:
  772. CMD_642 0x800C
  773. CompareVarValue 0x800C 0
  774. JumpIf EQUAL Function#114
  775. Jump Function#89
  776.  
  777. Function 91:
  778. WaitSound
  779. TextPlayerName 0
  780. CompareVarValue 0x8005 1
  781. JumpIf GREATER Function#115
  782. CMD_194 1 0x8004
  783. Jump Function#116
  784.  
  785. Function 92:
  786. TextItemPlural 0 0x8004
  787. Message 25
  788. Jump Function#91
  789.  
  790. Function 93:
  791. Message 25
  792. Jump Function#91
  793.  
  794. Function 94:
  795. PlayFanfare 1548
  796. TextPlayerName 0
  797. Message 35
  798. Call Function#117
  799. Jump Function#118
  800.  
  801. Function 95:
  802. PlayFanfare 1548
  803. TextPlayerName 0
  804. Message 36
  805. Jump Function#119
  806.  
  807. Function 96:
  808. PlayFanfare 1548
  809. CloseMessage
  810. CMD_706 0x800C
  811. CompareVarValue 0x800C 1
  812. JumpIf EQUAL Function#120
  813. Call Function#121
  814. CMD_164 150 26 33 0
  815. Jump Function#16
  816.  
  817. Function 97:
  818. CloseMessage
  819. PlayFanfare 1549
  820. Call Function#122
  821. CloseTouchScreen
  822. ReleaseAll
  823. End
  824.  
  825. Function 98:
  826. SetVar 0x8007 0
  827. Return
  828.  
  829. Function 99:
  830. SetVar 0x8007 3
  831. Return
  832.  
  833. Function 100:
  834. SetVar 0x8007 6
  835. Return
  836.  
  837. Function 101:
  838. SetVar 0x8007 3
  839. Return
  840.  
  841. Function 102:
  842. SetVar 0x8007 0
  843. Return
  844.  
  845. Function 103:
  846. SetVar 0x8007 0
  847. Return
  848.  
  849. Function 104:
  850. SetVar 0x8007 2
  851. Return
  852.  
  853. Function 105:
  854. SetVar 0x8007 3
  855. Return
  856.  
  857. Function 106:
  858. SetVar 0x8007 3
  859. Return
  860.  
  861. Function 107:
  862. SetPlayerForm 1
  863. UpdatePlayerForm
  864. Movement 0x8007 Action#7
  865. WaitMovement
  866. Message 40
  867. WaitButton
  868. CloseMessage
  869. ReleaseAll
  870. End
  871.  
  872. Function 108:
  873. UpdatePlayerForm
  874. Movement 0x8007 Action#7
  875. WaitMovement
  876. Message 40
  877. WaitButton
  878. CloseMessage
  879. ReleaseAll
  880. End
  881.  
  882. Function 109:
  883. FreezeMessage
  884. Jump Function#35
  885.  
  886. Function 110:
  887. SetFlag 101
  888. CMD_148 1 94
  889. CMD_255 244 0
  890. WaitMovement
  891. CheckPlayerForm 0x800C
  892. CompareVarValue 0x800C 3
  893. JumpIf DIFFERENT Function#123
  894. SetPlayerForm 1024
  895. Jump Function#124
  896.  
  897. Function 111:
  898. Message 8
  899. Movement Player Action#4
  900. WaitMovement
  901. CheckPlayerForm 0x800C
  902. CompareVarValue 0x800C 3
  903. JumpIf DIFFERENT Function#125
  904. SetPlayerForm 1024
  905. Jump Function#126
  906.  
  907. Function 112:
  908. SetPlayerForm 1
  909. UpdatePlayerForm
  910. GetFirstAlivePokemonSlot 0x8009
  911. CompareVars 0x8008 0x8009
  912. JumpIf EQUAL Function#127
  913. WaitTime 15 0x800A
  914. FadeScreen 6 1 0 0
  915. WaitFadeScreen
  916. CloseMessage
  917. CMD_436
  918. ReturnScreen
  919. FadeScreen 6 1 1 0
  920. WaitFadeScreen
  921. TextPokeNickname 0 0x8009
  922. Message 102
  923. Movement 0x8007 Action#7
  924. WaitMovement
  925. Message 3
  926. WaitButton
  927. CloseMessage
  928. CloseTouchScreen
  929. ReleaseAll
  930. LocalScript
  931. End
  932.  
  933. Function 113:
  934. UpdatePlayerForm
  935. GetFirstAlivePokemonSlot 0x8009
  936. CompareVars 0x8008 0x8009
  937. JumpIf EQUAL Function#127
  938. WaitTime 15 0x800A
  939. FadeScreen 6 1 0 0
  940. WaitFadeScreen
  941. CloseMessage
  942. CMD_436
  943. ReturnScreen
  944. FadeScreen 6 1 1 0
  945. WaitFadeScreen
  946. TextPokeNickname 0 0x8009
  947. Message 102
  948. Movement 0x8007 Action#7
  949. WaitMovement
  950. Message 3
  951. WaitButton
  952. CloseMessage
  953. CloseTouchScreen
  954. ReleaseAll
  955. LocalScript
  956. End
  957.  
  958. Function 114:
  959. Message 21
  960. Jump Function#88
  961.  
  962. Function 115:
  963. TextItemPlural 1 0x8004
  964. GetItemPocket 0x8004 0x800C
  965. SetVarFromVariable 0x8008 0x800C
  966. CompareVarValue 0x8008 7
  967. JumpIf EQUAL Function#128
  968. CompareVarValue 0x8008 0
  969. JumpIf EQUAL Function#129
  970. CompareVarValue 0x8008 4
  971. JumpIf EQUAL Function#130
  972. CompareVarValue 0x8008 1
  973. JumpIf EQUAL Function#131
  974. CompareVarValue 0x8008 2
  975. JumpIf EQUAL Function#132
  976. CompareVarValue 0x8008 6
  977. JumpIf EQUAL Function#133
  978. CompareVarValue 0x8008 5
  979. JumpIf EQUAL Function#134
  980. CompareVarValue 0x8008 3
  981. JumpIf EQUAL Function#135
  982. End
  983.  
  984. Function 116:
  985. GetItemPocket 0x8004 0x800C
  986. SetVarFromVariable 0x8008 0x800C
  987. CompareVarValue 0x8008 7
  988. JumpIf EQUAL Function#128
  989. CompareVarValue 0x8008 0
  990. JumpIf EQUAL Function#129
  991. CompareVarValue 0x8008 4
  992. JumpIf EQUAL Function#130
  993. CompareVarValue 0x8008 1
  994. JumpIf EQUAL Function#131
  995. CompareVarValue 0x8008 2
  996. JumpIf EQUAL Function#132
  997. CompareVarValue 0x8008 6
  998. JumpIf EQUAL Function#133
  999. CompareVarValue 0x8008 5
  1000. JumpIf EQUAL Function#134
  1001. CompareVarValue 0x8008 3
  1002. JumpIf EQUAL Function#135
  1003. End
  1004.  
  1005. Function 117:
  1006. MultiTouchStandardText 1 1 0 1 0x800C
  1007. CreateMultiTouchBox 67 76 0
  1008. CreateMultiTouchBox 68 77 1
  1009. CreateMultiTouchBox 69 78 2
  1010. CreateMultiTouchBox 70 79 3
  1011. CreateMultiTouchBox 72 81 5
  1012. Return
  1013.  
  1014. Function 118:
  1015. CloseMultiTouch
  1016. SetVarFromVariable 0x8008 0x800C
  1017. CompareVarValue 0x8008 0
  1018. JumpIf EQUAL Function#136
  1019. CompareVarValue 0x8008 1
  1020. JumpIf EQUAL Function#137
  1021. CompareVarValue 0x8008 2
  1022. JumpIf EQUAL Function#138
  1023. CompareVarValue 0x8008 3
  1024. JumpIf EQUAL Function#139
  1025. CompareVarValue 0x8008 4
  1026. JumpIf EQUAL Function#140
  1027. Jump Function#16
  1028.  
  1029. Function 119:
  1030. Call Function#141
  1031. CMD_616 0x4000
  1032. CompareVarValue 0x4000 0
  1033. JumpIf DIFFERENT Function#142
  1034. CloseMultiTouch
  1035. SetVarFromVariable 0x8008 0x800C
  1036. CompareVarValue 0x8008 0
  1037. JumpIf EQUAL Function#143
  1038. CompareVarValue 0x8008 1
  1039. JumpIf EQUAL Function#144
  1040. Jump Function#16
  1041.  
  1042. Function 120:
  1043. Message 94
  1044. Jump Function#16
  1045.  
  1046. Function 121:
  1047. FadeScreen 6 1 0 0
  1048. WaitFadeScreen
  1049. FreeDoor 90
  1050. Return
  1051.  
  1052. Function 122:
  1053. CMD_502 0x345A 0x5A01
  1054. FreeDoor 90
  1055. Return
  1056.  
  1057. Function 123:
  1058. SetPlayerForm 1
  1059. UpdatePlayerForm
  1060. GetFirstAlivePokemonSlot 0x8009
  1061. CompareVars 0x8008 0x8009
  1062. JumpIf EQUAL Function#145
  1063. WaitTime 15 0x800A
  1064. FadeScreen 6 1 0 0
  1065. WaitFadeScreen
  1066. CloseMessage
  1067. CMD_436
  1068. ReturnScreen
  1069. FadeScreen 6 1 1 0
  1070. WaitFadeScreen
  1071. TextPokeNickname 0 0x8009
  1072. Message 102
  1073. Message 10
  1074. WaitButton
  1075. CloseMessage
  1076. CloseTouchScreen
  1077. ReleaseAll
  1078. LocalScript
  1079. End
  1080.  
  1081. Function 124:
  1082. UpdatePlayerForm
  1083. GetFirstAlivePokemonSlot 0x8009
  1084. CompareVars 0x8008 0x8009
  1085. JumpIf EQUAL Function#145
  1086. WaitTime 15 0x800A
  1087. FadeScreen 6 1 0 0
  1088. WaitFadeScreen
  1089. CloseMessage
  1090. CMD_436
  1091. ReturnScreen
  1092. FadeScreen 6 1 1 0
  1093. WaitFadeScreen
  1094. TextPokeNickname 0 0x8009
  1095. Message 102
  1096. Message 10
  1097. WaitButton
  1098. CloseMessage
  1099. CloseTouchScreen
  1100. ReleaseAll
  1101. LocalScript
  1102. End
  1103.  
  1104. Function 125:
  1105. SetPlayerForm 1
  1106. UpdatePlayerForm
  1107. GetFirstAlivePokemonSlot 0x8009
  1108. CompareVars 0x8008 0x8009
  1109. JumpIf EQUAL Function#146
  1110. WaitTime 15 0x800A
  1111. FadeScreen 6 1 0 0
  1112. WaitFadeScreen
  1113. CloseMessage
  1114. CMD_436
  1115. ReturnScreen
  1116. FadeScreen 6 1 1 0
  1117. WaitFadeScreen
  1118. TextPokeNickname 0 0x8009
  1119. Message 102
  1120. Movement 0x8007 Action#7
  1121. WaitMovement
  1122. Message 9
  1123. WaitButton
  1124. CloseMessage
  1125. ReleaseAll
  1126. LocalScript
  1127. End
  1128.  
  1129. Function 126:
  1130. UpdatePlayerForm
  1131. GetFirstAlivePokemonSlot 0x8009
  1132. CompareVars 0x8008 0x8009
  1133. JumpIf EQUAL Function#146
  1134. WaitTime 15 0x800A
  1135. FadeScreen 6 1 0 0
  1136. WaitFadeScreen
  1137. CloseMessage
  1138. CMD_436
  1139. ReturnScreen
  1140. FadeScreen 6 1 1 0
  1141. WaitFadeScreen
  1142. TextPokeNickname 0 0x8009
  1143. Message 102
  1144. Movement 0x8007 Action#7
  1145. WaitMovement
  1146. Message 9
  1147. WaitButton
  1148. CloseMessage
  1149. ReleaseAll
  1150. LocalScript
  1151. End
  1152.  
  1153. Function 127:
  1154. Movement 0x8007 Action#7
  1155. WaitMovement
  1156. Message 3
  1157. WaitButton
  1158. CloseMessage
  1159. CloseTouchScreen
  1160. ReleaseAll
  1161. LocalScript
  1162. End
  1163.  
  1164. Function 128:
  1165. GetItemPocket 0x8004 0x800C
  1166. CMD_195 2 0x800C
  1167. Jump Function#147
  1168.  
  1169. Function 129:
  1170. GetItemPocket 0x8004 0x800C
  1171. CMD_195 2 0x800C
  1172. Jump Function#147
  1173.  
  1174. Function 130:
  1175. GetItemPocket 0x8004 0x800C
  1176. CMD_195 2 0x800C
  1177. Jump Function#147
  1178.  
  1179. Function 131:
  1180. GetItemPocket 0x8004 0x800C
  1181. CMD_195 2 0x800C
  1182. Jump Function#147
  1183.  
  1184. Function 132:
  1185. GetItemPocket 0x8004 0x800C
  1186. CMD_195 2 0x800C
  1187. Jump Function#147
  1188.  
  1189. Function 133:
  1190. GetItemPocket 0x8004 0x800C
  1191. CMD_195 2 0x800C
  1192. Jump Function#147
  1193.  
  1194. Function 134:
  1195. GetItemPocket 0x8004 0x800C
  1196. CMD_195 2 0x800C
  1197. Jump Function#147
  1198.  
  1199. Function 135:
  1200. GetItemPocket 0x8004 0x800C
  1201. CMD_195 2 0x800C
  1202. Jump Function#147
  1203.  
  1204. Function 136:
  1205. CloseMessage
  1206. Call Function#121
  1207. CMD_158 0
  1208. ReturnScreen
  1209. Jump Function#148
  1210.  
  1211. Function 137:
  1212. CloseMessage
  1213. Call Function#121
  1214. CMD_158 1
  1215. ReturnScreen
  1216. Jump Function#148
  1217.  
  1218. Function 138:
  1219. CloseMessage
  1220. Call Function#121
  1221. CMD_158 2
  1222. ReturnScreen
  1223. Jump Function#148
  1224.  
  1225. Function 139:
  1226. CloseMessage
  1227. Call Function#121
  1228. CMD_158 3
  1229. ReturnScreen
  1230. Jump Function#148
  1231.  
  1232. Function 140:
  1233. CloseMessage
  1234. Call Function#121
  1235. CMD_158 4
  1236. ReturnScreen
  1237. Jump Function#148
  1238.  
  1239. Function 141:
  1240. MultiTouchStandardText 1 1 0 1 0x800C
  1241. CreateMultiTouchBox 73 82 0
  1242. CreateMultiTouchBox 74 83 1
  1243. CMD_616 0x4000
  1244. CompareVarValue 0x4000 0
  1245. JumpIf DIFFERENT Function#149
  1246. CreateMultiTouchBox 75 84 2
  1247. Return
  1248.  
  1249. Function 142:
  1250. CloseMultiTouch
  1251. SetVarFromVariable 0x8008 0x800C
  1252. CompareVarValue 0x8008 0
  1253. JumpIf EQUAL Function#143
  1254. CompareVarValue 0x8008 1
  1255. JumpIf EQUAL Function#144
  1256. CompareVarValue 0x8008 2
  1257. JumpIf EQUAL Function#150
  1258. Jump Function#16
  1259.  
  1260. Function 143:
  1261. CloseMessage
  1262. CountMail 0x800C
  1263. CompareVarValue 0x800C 0
  1264. JumpIf EQUAL Function#151
  1265. Call Function#121
  1266. MailScreen
  1267. ReturnScreen
  1268. Jump Function#152
  1269.  
  1270. Function 144:
  1271. CMD_572 0x800C
  1272. CompareVarValue 0x800C 0
  1273. JumpIf EQUAL Function#153
  1274. CloseMessage
  1275. Call Function#121
  1276. CMD_156
  1277. Jump Function#154
  1278.  
  1279. Function 145:
  1280. Message 10
  1281. WaitButton
  1282. CloseMessage
  1283. CloseTouchScreen
  1284. ReleaseAll
  1285. LocalScript
  1286. End
  1287.  
  1288. Function 146:
  1289. Movement 0x8007 Action#7
  1290. WaitMovement
  1291. Message 9
  1292. WaitButton
  1293. CloseMessage
  1294. ReleaseAll
  1295. LocalScript
  1296. End
  1297.  
  1298. Function 147:
  1299. Return
  1300.  
  1301. Function 148:
  1302. TextPlayerName 0
  1303. MessageAll 34
  1304. Call Function#117
  1305. Call Function#15
  1306. FadeScreen 6 1 1 0
  1307. Jump Function#118
  1308.  
  1309. Function 149:
  1310. CreateMultiTouchBox 65 85 2
  1311. CreateMultiTouchBox 75 84 3
  1312. Return
  1313.  
  1314. Function 150:
  1315. CloseMessage
  1316. Call Function#121
  1317. CMD_617
  1318. ReturnScreen
  1319. Jump Function#155
  1320.  
  1321. Function 151:
  1322. Message 47
  1323. Jump Function#119
  1324.  
  1325. Function 152:
  1326. TextPlayerName 0
  1327. MessageAll 34
  1328. Call Function#141
  1329. Call Function#15
  1330. FadeScreen 6 1 1 0
  1331. Jump Function#156
  1332.  
  1333. Function 153:
  1334. Message 79
  1335. Jump Function#119
  1336.  
  1337. Function 154:
  1338. TextPlayerName 0
  1339. MessageAll 34
  1340. Call Function#141
  1341. Call Function#15
  1342. FadeScreen 6 1 1 0
  1343. Jump Function#156
  1344.  
  1345. Function 155:
  1346. TextPlayerName 0
  1347. MessageAll 34
  1348. Call Function#141
  1349. Call Function#15
  1350. FadeScreen 6 1 1 0
  1351. Jump Function#156
  1352.  
  1353. Function 156:
  1354. CMD_616 0x4000
  1355. CompareVarValue 0x4000 0
  1356. JumpIf DIFFERENT Function#142
  1357. CloseMultiTouch
  1358. SetVarFromVariable 0x8008 0x800C
  1359. CompareVarValue 0x8008 0
  1360. JumpIf EQUAL Function#143
  1361. CompareVarValue 0x8008 1
  1362. JumpIf EQUAL Function#144
  1363. Jump Function#16
Advertisement
Add Comment
Please, Sign In to add comment