Guest User

Untitled

a guest
Aug 9th, 2013
180
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.80 KB | None | 0 0
  1. //===== rAthena Script =======================================
  2. //= Alberta Guides
  3. //===== By: ==================================================
  4. //= L0ne_W0lf
  5. //===== Current Version: =====================================
  6. //= 1.1
  7. //===== Compatible With: =====================================
  8. //= rAthena SVN
  9. //===== Description: =========================================
  10. //= [Official Conversion]
  11. //= Guides for the city of Alberta
  12. //===== Additional Comments: =================================
  13. //= 1.0 First version, Renewal guides.
  14. //= 1.1 Navigation system update. [Euphy]
  15. //============================================================
  16.  
  17. alberta,23,238,4 script Guide#01alberta::AlbertaGuide 105,{
  18. cutin "prt_soldier",2;
  19. mes "[Alberta Guide]";
  20. mes "Welcome to ^8B4513Alberta^000000,";
  21. mes "the Port City.";
  22. mes "Do you need help navigating the city?";
  23. F_Navi("[Alberta Guide]");
  24. next;
  25. set .@str$,"Would you like to check any other locations?";
  26. while (1) {
  27. switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:[ Destination Ports ]:Remove Marks from Mini-Map:Cancel")) {
  28. case 1:
  29. set .@loop,1;
  30. while (.@loop) {
  31. switch(select("[ Tool Shop ]:[ Forge ]:[ Weapon & Armor Shop ]:[ Inn ]:[ Beauty Salon ]:[ Merchant Guild ]:Previous Menu")) {
  32. case 1:
  33. mes "[Alberta Guide]";
  34. mes "Let me mark the location of the";
  35. mes "the "+F_Navi("Tool Shop","alberta,98,154","^0000FF");
  36. mes "on your mini-map.";
  37. mes .@str$;
  38. viewpoint 1,98,154,0,0x0A82FF;
  39. next;
  40. break;
  41. case 2:
  42. mes "[Alberta Guide]";
  43. mes "The "+F_Navi("Forge","alberta,35,41","^B9062F")+" is currently";
  44. mes "located inside the Merchant Guild building.";
  45. mes .@str$;
  46. viewpoint 1,35,41,1,0xFF0000;
  47. next;
  48. break;
  49. case 3:
  50. mes "[Alberta Guide]";
  51. mes "Let me mark the location of the";
  52. mes "the "+F_Navi("Weapon & Armor Shop","alberta,117,37","^FF5400");
  53. mes "on your mini-map.";
  54. mes .@str$;
  55. viewpoint 1,117,37,2,0xFFB400;
  56. next;
  57. break;
  58. case 4:
  59. mes "[Alberta Guide]";
  60. mes "Let me mark the location of the";
  61. mes "the "+F_Navi("Inn","alberta,65,233","^006400");
  62. mes "on your mini-map.";
  63. mes .@str$;
  64. viewpoint 1,65,233,3,0xAAFF00;
  65. next;
  66. break;
  67. case 5:
  68. mes "[Alberta Guide]";
  69. mes "Let me mark the location of the";
  70. mes "the "+F_Navi("Beauty Salon","alberta,48,145","^7F3300");
  71. mes "on your mini-map.";
  72. mes .@str$;
  73. viewpoint 1,48,145,4,0xD2691E;
  74. next;
  75. break;
  76. case 6:
  77. mes "[Alberta Guide]";
  78. mes "The "+F_Navi("Merchant Guild","alberta,33,41")+" is where";
  79. mes "you can change your job to ^800080Merchant^000000.";
  80. mes "Let me mark its location";
  81. mes "on your mini-map.";
  82. mes .@str$;
  83. viewpoint 1,33,41,5,0xDA70D6;
  84. next;
  85. break;
  86. case 7:
  87. set .@loop,0;
  88. break;
  89. }
  90. }
  91. break;
  92. case 2:
  93. set .@loop,1;
  94. while (.@loop) {
  95. switch(select("[ Eden Teleport Officer ]:[ Kafra Employee ]:[ Cool Event Employee ]:[ Bullet Merchant ]:[ Cooking Ingredient Merchant ]:Previous Menu")) {
  96. case 1:
  97. mes "[Alberta Guide]";
  98. mes "^B9062FEden Teleport Officers^000000 are located in "+F_Navi("south Alberta","alberta,121,68");
  99. mes "and inside the "+F_Navi("Merchant Guild","alberta,33,41")+" building.";
  100. mes "Let me mark their locations on your mini-map.";
  101. mes .@str$;
  102. viewpoint 1,33,41,6,0xFF0000;
  103. viewpoint 1,121,68,7,0xFF0000;
  104. next;
  105. break;
  106. case 2:
  107. mes "[Alberta Guide]";
  108. mes "Let me mark the location of the";
  109. mes "^0000FFKafra Employees^000000";
  110. mes "on your mini-map.";
  111. mes .@str$;
  112. viewpoint 1,33,41,8,0x0A82FF;
  113. viewpoint 1,113,60,9,0x0A82FF;
  114. next;
  115. break;
  116. case 3:
  117. mes "[Alberta Guide]";
  118. mes "When you win event items,";
  119. mes "you can claim them through the "+F_Navi("Cool Event Employee","alberta,148,57","^FF5400")+".";
  120. mes .@str$;
  121. viewpoint 1,148,57,10,0xFFB400;
  122. next;
  123. break;
  124. case 4:
  125. mes "[Alberta Guide]";
  126. mes "The ^7F3300Bullet Merchants^000000 for ^7F3300Gunslingers^000000";
  127. mes "are located";
  128. mes "near the "+F_Navi("center of the city","alberta,117,158")+".";
  129. mes .@str$;
  130. viewpoint 1,117,158,11,0xD2691E;
  131. next;
  132. break;
  133. case 5:
  134. mes "[Alberta Guide]";
  135. mes "The "+F_Navi("Chef Assistant","alberta,167,135","^006400")+" in Alberta";
  136. mes "has many regular customers,";
  137. mes "especially for his ^006400Delicious Fishes^000000.";
  138. mes .@str$;
  139. viewpoint 1,167,135,12,0xAAFF00;
  140. next;
  141. break;
  142. case 6:
  143. set .@loop,0;
  144. break;
  145. }
  146. }
  147. break;
  148. case 3:
  149. set .@loop,1;
  150. while (.@loop) {
  151. switch(select("[ Port - Northern Dock ]:[ Port - Central Dock ]:[ Port - Southern Dock ]:Previous Menu")) {
  152. case 1:
  153. mes "[Alberta Guide]";
  154. mes "You can use the "+F_Navi("Northern Dock","alberta,192,196");
  155. mes "to go to ^0000FFPort Malaya^000000 or ^0000FFDewata^000000.";
  156. mes .@str$;
  157. viewpoint 1,192,196,13,0xFF0000;
  158. next;
  159. break;
  160. case 2:
  161. mes "[Alberta Guide]";
  162. mes "You can use the "+F_Navi("Central Dock","alberta,192,151");
  163. mes "to go to the ^B9062FSunken Ship^000000 or ^B9062FIzlude Marina^000000.";
  164. mes .@str$;
  165. viewpoint 1,192,151,14,0xFF0000;
  166. next;
  167. break;
  168. case 3:
  169. mes "[Alberta Guide]";
  170. mes "You can use the "+F_Navi("Southern Dock","alberta,245,86");
  171. mes "to go to ^0000FFTurtle Island^000000, ^0000FFBrasilis^000000, ^0000FFAmatsu^000000, ^0000FFKunlun^000000, ^0000FFMoscovia^000000, ^0000FFLouyang^000000, or ^0000FFAyothaya^000000.";
  172. mes .@str$;
  173. viewpoint 1,245,86,15,0xFF0000;
  174. next;
  175. break;
  176. case 4:
  177. set .@loop,0;
  178. break;
  179. }
  180. }
  181. break;
  182. case 4:
  183. mes "[Alberta Guide]";
  184. mes "Sure, I'll remove all marks from your mini-map.";
  185. mes "Is there anything else I can do for you?";
  186. viewpoint 2,1,1,0,0xFFFF00;
  187. viewpoint 2,1,1,1,0x000000;
  188. viewpoint 2,1,1,2,0xFF0000;
  189. viewpoint 2,1,1,3,0xFFFF00;
  190. viewpoint 2,1,1,4,0xFFFF00;
  191. viewpoint 2,1,1,5,0xFFFF00;
  192. viewpoint 2,1,1,6,0xFFFF00;
  193. viewpoint 2,1,1,7,0xFFFF00;
  194. viewpoint 2,1,1,8,0xFFFF00;
  195. viewpoint 2,1,1,9,0xFFFF00;
  196. viewpoint 2,1,1,10,0xFFFF00;
  197. viewpoint 2,1,1,11,0xFFFF00;
  198. viewpoint 2,1,1,12,0x000000;
  199. viewpoint 2,1,1,13,0xFFFF00;
  200. viewpoint 2,1,1,14,0xFFFF00;
  201. viewpoint 2,1,1,15,0xFFFF00;
  202. next;
  203. break;
  204. case 5:
  205. mes "[Alberta Guide]";
  206. mes "Enjoy your stay.";
  207. close2;
  208. cutin "prt_soldier",255;
  209. end;
  210. }
  211. }
  212. }
  213. alberta,120,60,3 duplicate(AlbertaGuide) Guide#02alberta 105
  214. alberta,184,143,4 duplicate(AlbertaGuide) Guide#03alberta 105
Advertisement
Add Comment
Please, Sign In to add comment