API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Feb 8th, 2016
58
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 10.22 KB | None | 0 0
raw download clone embed print report
  1. class 1 trader_dinn : trader_dinn1
  2. {
  3. handler:
  4. EventHandler TALK_SELECTED( fhtml0, quest_id, talker )
  5. {
  6. if( _from_choice == 0 )
  7. {
  8. if( talker.level >= 75 && myself::HaveMemo( talker, 642 ) == 0 )
  9. {
  10. _choiceN = _choiceN + 1;
  11. _code = 0;
  12. myself::AddChoice( 0, "A Powerful Primeval Creature" );
  13. }
  14. if( talker.level < 75 && myself::HaveMemo( talker, 642 ) == 0 )
  15. {
  16. _choiceN = _choiceN + 1;
  17. _code = 1;
  18. myself::AddChoice( 1, "A Powerful Primeval Creature" );
  19. }
  20. if( talker.level >= 75 && myself::HaveMemo( talker, 642 ) == 1 )
  21. {
  22. _choiceN = _choiceN + 1;
  23. _code = 2;
  24. myself::AddChoice( 2, "A Powerful Primeval Creature - In Progress" );
  25. }
  26. if( _choiceN > 1 )
  27. {
  28. myself::ShowChoicePage( talker, 1 );
  29. return;
  30. }
  31. }
  32. if( _from_choice || _choiceN == 1 )
  33. {
  34. switch( _code )
  35. {
  36. case 0:
  37. {
  38. if( _from_choice == 0 ||
  39. ( talker.level >= 75 && myself::HaveMemo( talker, 642 ) == 0 ) )
  40. {
  41. myself::SetCurrentQuestID( 642 );
  42. if( myself::GetInventoryInfo( talker, 0 ) >= myself::GetInventoryInfo( talker, 1 ) * 0.800000 ||
  43. myself::GetInventoryInfo( talker, 2 ) >= myself::GetInventoryInfo( talker, 3 ) * 0.800000 )
  44. {
  45. myself::ShowSystemMessage( talker, 1118 );
  46. return;
  47. }
  48. if( myself::GetMemoCount( talker ) < 25 )
  49. {
  50. myself::FHTML_SetFileName( fhtml0, "dinn_q642_001.htm" );
  51. myself::ShowFHTML( talker, fhtml0 );
  52. }
  53. else
  54. {
  55. myself::ShowPage( talker, "fullquest.htm" );
  56. }
  57. }
  58. break;
  59. }
  60. case 1:
  61. {
  62. if( _from_choice == 0 ||
  63. ( talker.level < 75 && myself::HaveMemo( talker, 642 ) == 0 ) )
  64. {
  65. myself::SetCurrentQuestID( 642 );
  66. if( myself::GetInventoryInfo( talker, 0 ) >= myself::GetInventoryInfo( talker, 1 ) * 0.800000 ||
  67. myself::GetInventoryInfo( talker, 2 ) >= myself::GetInventoryInfo( talker, 3 ) * 0.800000 )
  68. {
  69. myself::ShowSystemMessage( talker, 1118 );
  70. return;
  71. }
  72. myself::ShowPage( talker, "dinn_q642_009.htm" );
  73. }
  74. break;
  75. }
  76. case 2:
  77. {
  78. if( _from_choice == 0 ||
  79. ( talker.level >= 75 && myself::HaveMemo( talker, 642 ) == 1 ) )
  80. {
  81. myself::SetCurrentQuestID( 642 );
  82. if( myself::GetInventoryInfo( talker, 0 ) >= myself::GetInventoryInfo( talker, 1 ) * 0.800000 ||
  83. myself::GetInventoryInfo( talker, 2 ) >= myself::GetInventoryInfo( talker, 3 ) * 0.800000 )
  84. {
  85. myself::ShowSystemMessage( talker, 1118 );
  86. return;
  87. }
  88. myself::ShowPage( talker, "dinn_q642_005.htm" );
  89. }
  90. break;
  91. }
  92. }
  93. }
  94. }
  95.  
  96. EventHandler QUEST_ACCEPTED( quest_id, talker )
  97. {
  98. if( quest_id == 642 )
  99. {
  100. myself::SetMemo( talker, 642 );
  101. myself::SetMemoState( talker, 642, 1 );
  102. myself::AddLog( 1, talker, 642 );
  103. myself::SetFlagJournal( talker, 642, 1 );
  104. myself::SoundEffect( talker, "ItemSound.quest_accept" );
  105. myself::ShowPage( talker, "dinn_q642_004.htm" );
  106. return;
  107. }
  108. super;
  109. }
  110.  
  111. EventHandler MENU_SELECTED( ask, reply, talker, i0, fhtml0, quest_id )
  112. {
  113. if( ask == 642 )
  114. {
  115. myself::SetCurrentQuestID( 642 );
  116. if( myself::GetInventoryInfo( talker, 0 ) >= myself::GetInventoryInfo( talker, 1 ) * 0.800000 ||
  117. myself::GetInventoryInfo( talker, 2 ) >= myself::GetInventoryInfo( talker, 3 ) * 0.800000 )
  118. {
  119. myself::ShowSystemMessage( talker, 1118 );
  120. return;
  121. }
  122. if( reply == 1 && myself::GetMemoState( talker, 642 ) == 1 &&
  123. myself::OwnItemCount( talker, @q_dinosaur_tissue ) >= 150 &&
  124. myself::OwnItemCount( talker, @q_dinosaur_egg ) >= 1 )
  125. {
  126. myself::ShowPage( talker, "dinn_q642_007.htm" );
  127. myself::GiveItem1( talker, @rp_sirra_s_blade_60_1, 1 );
  128. myself::GiveItem1( talker, @adena, 44000 );
  129. myself::DeleteItem1( talker, @q_dinosaur_tissue, 150 );
  130. myself::DeleteItem1( talker, @q_dinosaur_egg, 1 );
  131. }
  132. if( reply == 2 && myself::GetMemoState( talker, 642 ) == 1 &&
  133. myself::OwnItemCount( talker, @q_dinosaur_tissue ) >= 150 &&
  134. myself::OwnItemCount( talker, @q_dinosaur_egg ) >= 1 )
  135. {
  136. myself::ShowPage( talker, "dinn_q642_007.htm" );
  137. myself::GiveItem1( talker, @rp_sword_of_ipos_60_1, 1 );
  138. myself::GiveItem1( talker, @adena, 44000 );
  139. myself::DeleteItem1( talker, @q_dinosaur_tissue, 150 );
  140. myself::DeleteItem1( talker, @q_dinosaur_egg, 1 );
  141. }
  142. if( reply == 3 && myself::GetMemoState( talker, 642 ) == 1 &&
  143. myself::OwnItemCount( talker, @q_dinosaur_tissue ) >= 150 &&
  144. myself::OwnItemCount( talker, @q_dinosaur_egg ) >= 1 )
  145. {
  146. myself::ShowPage( talker, "dinn_q642_007.htm" );
  147. myself::GiveItem1( talker, @rp_barakiel_s_axe_60_1, 1 );
  148. myself::GiveItem1( talker, @adena, 44000 );
  149. myself::DeleteItem1( talker, @q_dinosaur_tissue, 150 );
  150. myself::DeleteItem1( talker, @q_dinosaur_egg, 1 );
  151. }
  152. if( reply == 4 && myself::GetMemoState( talker, 642 ) == 1 &&
  153. myself::OwnItemCount( talker, @q_dinosaur_tissue ) >= 150 &&
  154. myself::OwnItemCount( talker, @q_dinosaur_egg ) >= 1 )
  155. {
  156. myself::ShowPage( talker, "dinn_q642_007.htm" );
  157. myself::GiveItem1( talker, @rp_behemoth_s_tuning_fork_60_1, 1 );
  158. myself::GiveItem1( talker, @adena, 44000 );
  159. myself::DeleteItem1( talker, @q_dinosaur_tissue, 150 );
  160. myself::DeleteItem1( talker, @q_dinosaur_egg, 1 );
  161. }
  162. if( reply == 5 && myself::GetMemoState( talker, 642 ) == 1 &&
  163. myself::OwnItemCount( talker, @q_dinosaur_tissue ) >= 150 &&
  164. myself::OwnItemCount( talker, @q_dinosaur_egg ) >= 1 )
  165. {
  166. myself::ShowPage( talker, "dinn_q642_007.htm" );
  167. myself::GiveItem1( talker, @rp_naga_storm_60_1, 1 );
  168. myself::GiveItem1( talker, @adena, 44000 );
  169. myself::DeleteItem1( talker, @q_dinosaur_tissue, 150 );
  170. myself::DeleteItem1( talker, @q_dinosaur_egg, 1 );
  171. }
  172. if( reply == 6 && myself::GetMemoState( talker, 642 ) == 1 &&
  173. myself::OwnItemCount( talker, @q_dinosaur_tissue ) >= 150 &&
  174. myself::OwnItemCount( talker, @q_dinosaur_egg ) >= 1 )
  175. {
  176. myself::ShowPage( talker, "dinn_q642_007.htm" );
  177. myself::GiveItem1( talker, @rp_tiphon_s_spear_60_1, 1 );
  178. myself::GiveItem1( talker, @adena, 44000 );
  179. myself::DeleteItem1( talker, @q_dinosaur_tissue, 150 );
  180. myself::DeleteItem1( talker, @q_dinosaur_egg, 1 );
  181. }
  182. if( reply == 7 && myself::GetMemoState( talker, 642 ) == 1 &&
  183. myself::OwnItemCount( talker, @q_dinosaur_tissue ) >= 150 &&
  184. myself::OwnItemCount( talker, @q_dinosaur_egg ) >= 1 )
  185. {
  186. myself::ShowPage( talker, "dinn_q642_007.htm" );
  187. myself::GiveItem1( talker, @rp_shyeed_s_bow_60_1, 1 );
  188. myself::GiveItem1( talker, @adena, 44000 );
  189. myself::DeleteItem1( talker, @q_dinosaur_tissue, 150 );
  190. myself::DeleteItem1( talker, @q_dinosaur_egg, 1 );
  191. }
  192. if( reply == 8 && myself::GetMemoState( talker, 642 ) == 1 &&
  193. myself::OwnItemCount( talker, @q_dinosaur_tissue ) >= 150 &&
  194. myself::OwnItemCount( talker, @q_dinosaur_egg ) >= 1 )
  195. {
  196. myself::ShowPage( talker, "dinn_q642_007.htm" );
  197. myself::GiveItem1( talker, @rp_sobekk_s_hurricane_60_1, 1 );
  198. myself::GiveItem1( talker, @adena, 44000 );
  199. myself::DeleteItem1( talker, @q_dinosaur_tissue, 150 );
  200. myself::DeleteItem1( talker, @q_dinosaur_egg, 1 );
  201. }
  202. if( reply == 9 && myself::GetMemoState( talker, 642 ) == 1 &&
  203. myself::OwnItemCount( talker, @q_dinosaur_tissue ) >= 150 &&
  204. myself::OwnItemCount( talker, @q_dinosaur_egg ) >= 1 )
  205. {
  206. myself::ShowPage( talker, "dinn_q642_007.htm" );
  207. myself::GiveItem1( talker, @rp_themis_tongue_60_1, 1 );
  208. myself::GiveItem1( talker, @adena, 44000 );
  209. myself::DeleteItem1( talker, @q_dinosaur_tissue, 150 );
  210. myself::DeleteItem1( talker, @q_dinosaur_egg, 1 );
  211. }
  212. if( reply == 10 )
  213. {
  214. myself::ShowPage( talker, "dinn_q642_007.htm" );
  215. myself::GiveItem1( talker, @rp_cabrio_s_hand_60_1, 1 );
  216. myself::GiveItem1( talker, @adena, 44000 );
  217. myself::DeleteItem1( talker, @q_dinosaur_tissue, 150 );
  218. myself::DeleteItem1( talker, @q_dinosaur_egg, 1 );
  219. }
  220. if( reply == 11 )
  221. {
  222. myself::ShowPage( talker, "dinn_q642_007.htm" );
  223. myself::GiveItem1( talker, @rp_daimon_crystal_60_1, 1 );
  224. myself::GiveItem1( talker, @adena, 44000 );
  225. myself::DeleteItem1( talker, @q_dinosaur_tissue, 150 );
  226. myself::DeleteItem1( talker, @q_dinosaur_egg, 1 );
  227. }
  228. if( reply == 12 )
  229. {
  230. return;
  231. }
  232. if( reply == 13 &&
  233. myself::OwnItemCount( talker, @q_dinosaur_tissue ) > 0 )
  234. {
  235. i0 = myself::OwnItemCount( talker, @q_dinosaur_tissue );
  236. myself::GiveItem1( talker, @adena, 5000 * i0 );
  237. myself::DeleteItem1( talker, @q_dinosaur_tissue, i0 );
  238. }
  239. if( reply == 14 )
  240. {
  241. myself::FHTML_SetFileName( fhtml0, "dinn_q642_003.htm" );
  242. myself::FHTML_SetInt( fhtml0, "quest_id", 642 );
  243. myself::ShowFHTML( talker, fhtml0 );
  244. }
  245. if( reply == 15 && myself::GetMemoState( talker, 642 ) == 1 &&
  246. myself::OwnItemCount( talker, @q_dinosaur_tissue ) >= 150 &&
  247. myself::OwnItemCount( talker, @q_dinosaur_egg ) >= 1 )
  248. {
  249. myself::ShowPage( talker, "dinn_q642_006.htm" );
  250. }
  251. else if( reply == 15 )
  252. {
  253. myself::ShowPage( talker, "dinn_q642_008.htm" );
  254. }
  255. }
  256. super;
  257. }
  258. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
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
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!