dewata.txt 33 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175
  1. //===== rAthena Script =======================================
  2. //= Dewata Town
  3. //===== By: ==================================================
  4. //= Gennosuke Kouga, Muad_Dib
  5. //===== Current Version: =====================================
  6. //= 1.4
  7. //===== Compatible With: =====================================
  8. //= rAthena Project
  9. //===== Description: =========================================
  10. //= [Official Conversion]
  11. //= Dewata Town Script
  12. //===== Additional Comments: =================================
  13. //= 1.0 First version.
  14. //= 1.1 Standardized. [Euphy]
  15. //= 1.2 Fixed Zeny check. [Joseph]
  16. //= 1.3 Updated to match the official script. [Lemongrass/Euphy]
  17. //= 1.4 Added VIP features. [Euphy]
  18. //============================================================
  19. // Dewata Transportation :: dewata_trans
  20. //============================================================
  21. alberta,212,202,4 script Dewata Sailor#alberta 536,{
  22. mes "[Dewata Sailor]";
  23. mes "Do you want to visit ^8B4513Dewata Island^000000?";
  24. mes "With its dazzling waves and charming vistas it's a great place to relax.";
  25. if (VIP_SCRIPT) {
  26. set .@cost, vip_status(VIP_STATUS_ACTIVE)?1000:10000;
  27. mes "The transit fee is 10,000 Zeny and 1,000 for VIP.";
  28. } else {
  29. set .@cost,10000;
  30. mes "The transit fee is 10,000 Zeny.";
  31. }
  32. next;
  33. switch(select("Yes!:No.")) {
  34. case 1:
  35. if (Zeny >= .@cost) {
  36. mes "[Dewata Sailor]";
  37. mes "^8B4513Dewata^000000 is a beautiful and peaceful island country.";
  38. mes "Have a nice trip~";
  39. close2;
  40. set Zeny, Zeny - .@cost;
  41. warp "dewata",232,53;
  42. end;
  43. } else {
  44. mes "[Dewata Sailor]";
  45. mes "You don't have the dough, kid.";
  46. mes "Come back when you have a bigger wallet.";
  47. close;
  48. }
  49. case 2:
  50. mes "[Dewata Sailor]";
  51. mes "Let me know";
  52. mes "when you're ready to travel~";
  53. close;
  54. }
  55. }
  56. dewata,229,49,6 script Alberta Sailor#dewata 536,{
  57. mes "[Alberta Sailor]";
  58. mes "Do you want to go back to Alberta?";
  59. next;
  60. switch(select("Yes.:No.")) {
  61. case 1:
  62. mes "[Alberta Sailor]";
  63. mes "I hope you had a lot of fun on";
  64. mes "your trip to ^8B4513Dewata^000000 Island.";
  65. mes "Please come again!";
  66. close2;
  67. warp "alberta",210,198;
  68. end;
  69. case 2:
  70. mes "[Alberta Sailor]";
  71. mes "Have some more fun before you go.";
  72. mes "^8B4513Dewata^000000 Island still has more to offer.";
  73. close;
  74. }
  75. }
  76. // Generic Dewata NPCs :: dewata_npc
  77. //============================================================
  78. dewata,221,237,5 script Young Man#dew-1 536,{
  79. mes "[Fruit Fancier]";
  80. mes "What's wrong with your faaaaaace? You must really be clueless!";
  81. next;
  82. mes "[Fruit Fancier]";
  83. mes "Let me drop some knowledge on ya.";
  84. next;
  85. mes "[Fruit Fancier]";
  86. mes "I may be a youngling, but no one knows more than I do about ^777700Palm fruit^000000. All right! What do you want to know?";
  87. next;
  88. switch(select("About the shell...:About the pulp...:About the palm kernel...:No thanks.")) {
  89. case 1:
  90. mes "[Fruit Fancier]";
  91. mes "So you want to know about Palm fruit's pulp? Let me explain.";
  92. next;
  93. mes "[Fruit Fancier]";
  94. mes "Normally Palm fruit shell is used for making oil. Palm Oil is a useful ingredient for many dishes.";
  95. next;
  96. mes "[Fruit Fancier]";
  97. if (dew_drink > 0)
  98. mes "Hmm... Have you met Memo already? Then it should be easy for you to understand.";
  99. else
  100. mes "If you want to know how to use Palm Oil, go find Memo on the north side of Dewata island. Everyday, he makes traditional drinks with Palm Oil.";
  101. next;
  102. mes "[Fruit Fancier]";
  103. mes "Anyways, we refer to the oil that comes from the Palm fruit as Palm oil or Coconut oil, which is well known for it's quality.";
  104. next;
  105. mes "[Fruit Fancier]";
  106. mes "The leftovers from oil production gets dried, and used for fuel in cooking or heating.";
  107. next;
  108. mes "[Fruit Fancier]";
  109. mes "It burns well and has a good smell, can't get better than that.";
  110. next;
  111. mes "[Fruit Fancier]";
  112. mes "Ok!! That is all about the pulp, it takes too long to explain all those useful effects for Palm fruit shells.";
  113. next;
  114. mes "[Fruit Fancier]";
  115. mes "It's not like this is the extent of my knowledge. Don't get me wrong!";
  116. close;
  117. case 2:
  118. mes "[Fruit Fancier]";
  119. mes "So you want to know about the Palm interior? Let me explain.";
  120. next;
  121. mes "[Fruit Fancier]";
  122. mes "Palm tree fruit has 2 layers of pulp. Outside is very rough, and the inside is smooth...";
  123. next;
  124. mes "[Fruit Fancier]";
  125. mes "Hmm... Yes! the pulp of Palm tree fruit is a little bit harder than a walnut shell, must be the water it contains inside.";
  126. next;
  127. mes "[Fruit Fancier]";
  128. mes "Inside of the shell, there's about 300cc water which is useful in quenching people's thirst since Dewata island has very hot weather.";
  129. next;
  130. mes "[Fruit Fancier]";
  131. mes "And it's not like we just throw it away once we drink the water inside!!";
  132. next;
  133. mes "[Fruit Fancier]";
  134. mes "We also can make a quality canteen out of it! Like I said, it has really thick outer shell enough and can act as a water bottle.";
  135. next;
  136. mes "[Fruit Fancier]";
  137. mes "It is also great to make charcoal. Charcoal made out of palm fruit is well known for long lasting and quality fire,";
  138. next;
  139. mes "[Fruit Fancier]";
  140. mes "People love to cook seafoods and chicken with Palm fruit charcoal..";
  141. next;
  142. mes "[Fruit Fancier]";
  143. mes "It has the extra bonus of being burning with a pleasant palm smell";
  144. next;
  145. mes "[Fruit Fancier]";
  146. mes "Ok!! That is all for pulp information, it takes too long to explain all those useful effects.";
  147. next;
  148. mes "[Fruit Fancier]";
  149. mes "It's not like this is all I know. Don't get me wrong!";
  150. close;
  151. case 3:
  152. mes "[Fruit Fancier]";
  153. mes "So, you want to know about tender kernel inside? Let me explain for you";
  154. next;
  155. mes "[Fruit Fancier]";
  156. mes "The kernel inside of the hard pulp is used as a natural digestive.";
  157. next;
  158. mes "[Fruit Fancier]";
  159. mes "Not much to say about the kernel inside..";
  160. next;
  161. mes "[Fruit Fancier]";
  162. mes "but we do make sure to use every part of the palm fruit.";
  163. next;
  164. mes "[Fruit Fancier]";
  165. mes "Wouldn't you agree?";
  166. close;
  167. case 4:
  168. mes "[Fruit Fancier]";
  169. mes "Arrgg! You have no interest in the world!";
  170. close;
  171. }
  172. }
  173. dewata,114,243,6 script Lazy Young Man#dew 536,1,1,{
  174. if (checkweight(1201,1) == 0 || MaxWeight - Weight < 500) {
  175. mes "[Lazy Young Man]";
  176. mes "Why are you carrying so much? Isn't it heavy?";
  177. close;
  178. }
  179. if (countitem(11534)) {
  180. mes "[Lazy Young Man]";
  181. mes "Wewt~!! Isn't that Palm Juice?";
  182. mes "Can you give me that? I just woke";
  183. mes "up, and my throat is parched!";
  184. next;
  185. switch(select("Give:Do not give")) {
  186. case 1:
  187. mes "[Lazy Young Man]";
  188. mes "Really? For me?? I'll give you this in return... Thanks... Hehe~";
  189. delitem 11534,1; //Coco_Juice
  190. getrandgroupitem(IG_GiftBox),1;
  191. close;
  192. case 2:
  193. mes "[Lazy Young Man]";
  194. mes "So be it~ Ok...";
  195. close;
  196. }
  197. }
  198. mes "[Lazy Young Man]";
  199. mes "Ah~ Thristy~ Anyone have some Palm";
  200. mes "juice for me?~";
  201. close;
  202. OnTouch:
  203. if (countitem(11534) == 0) {
  204. mes "[Lazy Young Man]";
  205. mes "Arrgg~ I'm thirsty~~ so thirsty~~";
  206. mes "Give me Palm juice... Palm Juuiice~~";
  207. emotion ET_FRET;
  208. next;
  209. emotion ET_FRET;
  210. next;
  211. emotion ET_FRET;
  212. next;
  213. emotion ET_FRET;
  214. close;
  215. }
  216. end;
  217. }
  218. dewata,159,81,4 script Tourist#dew-1 881,{
  219. mes "[Nasolo]";
  220. mes "Wow~ Pure ocean, a warm beach...";
  221. mes "Perfect for a date with a girlfriend...";
  222. next;
  223. mes "[Nasolo]";
  224. mes "If only I had one...";
  225. emotion ET_CRY;
  226. next;
  227. mes "[Nasolo]";
  228. mes "I wonder when my princess will come...";
  229. emotion ET_OHNO;
  230. close;
  231. }
  232. dewata,146,109,5 script Restauranteur#dew 886,{
  233. if (checkweight(11532,1) == 0 || checkweight(11533,1) == 0 || MaxWeight - Weight < 500) {
  234. mes "[Restauranteur]";
  235. mes "You came to taste my dish? It is always good to eat with an empty stomach.";
  236. close;
  237. }
  238. mes "[Restauranteur]";
  239. mes "Welcome to the island of Dewata.";
  240. mes "I hope you behave like a noble";
  241. mes "traveler, unlike some of these";
  242. mes "teenage punks...";
  243. next;
  244. switch(select("About Dewata dishes:Today's menu?:I'm okay.")) {
  245. case 1:
  246. mes "[Restauranteur]";
  247. mes "Need info about our foods? Well... I don't have much to talk about, but feel free to listen if you want.";
  248. next;
  249. mes "[Restauranteur]";
  250. mes "So much to cover, let me begin.";
  251. next;
  252. mes "[Restauranteur]";
  253. mes "First, Dewata dishes have special names based on each cooking recipe,";
  254. next;
  255. mes "[Restauranteur]";
  256. mes "If dish name has 'Goreng' in it, then it is either stir or deep fried food.";
  257. next;
  258. mes "[Restauranteur]";
  259. mes "If it is a type of 'Bakar', then it is a grilled food.";
  260. next;
  261. mes "[Restauranteur]";
  262. mes "And if it's 'Satay', then you are eating a skewered dish.";
  263. next;
  264. mes "[Restauranteur]";
  265. mes "Second, we have dishes named after basic ingredients,";
  266. next;
  267. mes "[Restauranteur]";
  268. mes "In Dewata island, we call rice as Nasi, noodle as Mie, bread as Roti, chicken as Ayam, fish as Ikan, and corn as Jagung.";
  269. next;
  270. mes "[Restauranteur]";
  271. mes "So, if rice is fried we call it 'Nasi Goreng', and fried noodle is 'Mie Goreng'.";
  272. next;
  273. mes "[Restauranteur]";
  274. mes "Well... This is enough to enjoy our foods in Dewata!! If you are hungry, we have our special set menu for only ^0000FF5000^000000 Zeny.";
  275. close;
  276. case 2:
  277. mes "[Restauranteur]";
  278. mes "We have 2 items 'Nasi Goreng' and 'Satay'. Which one do you want?";
  279. next;
  280. switch(select("Nasi Goreng:Satay")) {
  281. case 1:
  282. mes "[Restauranteur]";
  283. mes "This is Nasi Goreng fried with my special sauce plus egg fry on the top. It only costs ^0000FF5000^000000 Zeny.";
  284. set .@food,11532;
  285. break;
  286. case 2:
  287. mes "[Restauranteur]";
  288. mes "This is the Satay, a slice of meat skewered and grilled over Palm fruit charcoal. It costs only ^0000FF5000^000000 Zeny.";
  289. set .@food,11533;
  290. break;
  291. }
  292. next;
  293. switch(select("Taste:Walk away")) {
  294. case 1:
  295. if (Zeny < 5000) {
  296. mes "[Restauranteur]";
  297. mes "Where's the money kid? Sheesh! No free food here! Ok?";
  298. close;
  299. }
  300. mes "[Restauranteur]";
  301. mes "Here's your "+getitemname(.@food)+", you won't regret it!";
  302. set Zeny, Zeny - 5000;
  303. getitem .@food,1;
  304. close;
  305. case 2:
  306. mes "[Restauranteur]";
  307. mes "It's a shame you won't taste this great dish...";
  308. close;
  309. }
  310. case 3:
  311. mes "[Restauranteur]";
  312. mes "Are you serious? This is not even funny.";
  313. close;
  314. }
  315. }
  316. dewata,147,107,6 script Gourmet#dew 85,{
  317. mes "[Gourmet]";
  318. mes "Oh... it's like a party in my";
  319. mes "mouth... and everyone's invited!";
  320. emotion ET_CRY;
  321. next;
  322. mes "[Gourmet]";
  323. mes "Master~ One more please~";
  324. emotion ET_BEST;
  325. emotion ET_OK, getnpcid(0, "Restauranteur#dew");
  326. next;
  327. mes "[Gourmet]";
  328. mes "You must try this! The Food here is succulent~";
  329. close;
  330. }
  331. dewata,154,107,4 script Sightseer#dew 86,{
  332. mes "[Tourist]";
  333. mes "Wow...";
  334. mes "How many has he already eaten?";
  335. emotion ET_SCRATCH;
  336. next;
  337. mes "[Tourist]";
  338. mes "He must be big eater, not the gourmet...";
  339. next;
  340. mes "[Tourist]";
  341. mes "Have you been to Prontera yet? I think I've seen him somewhere..";
  342. close;
  343. }
  344. dewata,95,203,6 script Travel Guide#dew 536,{
  345. mes "[Guide]";
  346. mes "This temple behind me is called Borobudur.";
  347. mes "Borobudur temple was built in the 9th century";
  348. mes "to venerate the Great Buddha, an ancient religious figure.";
  349. emotion ET_PROFUSELY_SWEAT;
  350. next;
  351. mes "[Guide]";
  352. mes "This temple is made with 6 square platforms and 3 round platforms, and 2672 hand carved relief panels as well as 504 statue of various Buddhas.";
  353. emotion ET_PROFUSELY_SWEAT;
  354. next;
  355. mes "[Guide]";
  356. mes "The central stupa, or shrine is located at the center of high platform, which is surrounded by 72 more statues.";
  357. emotion ET_PROFUSELY_SWEAT;
  358. next;
  359. mes "[Guide]";
  360. mes "Even in modern times Borobudur temple is a pilgimage site for many monks worshiping the Buddha. It's also a major tourist attraction, as you can imagine.";
  361. emotion ET_PROFUSELY_SWEAT;
  362. next;
  363. mes "[Guide]";
  364. mes "That is all I have on Borobudur temple, are there any questions?";
  365. mes "If not, we can move to the next spot.";
  366. close;
  367. }
  368. dewata,97,207,4 script Tourist#dew1 803,{
  369. mes "[Tourist]";
  370. mes "Oh, dag-nabbit... I've gone and";
  371. mes "picked the wrong tour guide...";
  372. next;
  373. mes "[Tourist]";
  374. mes "This hombre is a real snooze...";
  375. mes "Why make it longer..";
  376. emotion ET_CONFUSE;
  377. next;
  378. mes "[Tourist]";
  379. mes "I need to change my travel agent...";
  380. emotion ET_OHNO;
  381. close;
  382. }
  383. dewata,100,206,4 script Tourist#dew2 59,{
  384. mes "[Tourist]";
  385. mes "Hey, let's go there! Hurry up,";
  386. mes "while the tour guide is explaining~";
  387. next;
  388. mes "[Tourist]";
  389. mes "Come on... It doesn't sound like";
  390. mes "he's going to stop talking anytime soon.";
  391. close;
  392. }
  393. dewata,101,206,4 script Tourist#dew3 90,{
  394. mes "[Tourist]";
  395. mes "Aren't we going to get lost without the guide?";
  396. next;
  397. mes "[Tourist]";
  398. mes "We got lost already last time...";
  399. close;
  400. }
  401. dewata,99,203,4 script Tourist#dew4 755,{
  402. mes "[Tourist]";
  403. mes "Oh~ This is very interesting. A";
  404. mes "temple that worships the Buddha...";
  405. emotion ET_OK;
  406. next;
  407. mes "[Tourist]";
  408. mes "But I don't really get all the";
  409. mes "symbology here.";
  410. next;
  411. mes "[Tourist]";
  412. mes "So beautiful... I wonder who built";
  413. mes "this place?";
  414. close;
  415. }
  416. dewata,67,186,8 script Monk#dew1 834,{
  417. mes "[Monk]";
  418. mes "I am a monk, content to spend my days in religious study.";
  419. next;
  420. mes "[Monk]";
  421. mes "I've just returned from a pilgrimage to Borobudur temple with my fellow monks...";
  422. next;
  423. mes "[Monk]";
  424. mes "Borobudur temple has many pilgrims visiting, since it is one of few temples left for worshipping the Great Buddha.";
  425. close;
  426. }
  427. dewata,65,188,8 script Monk#dew2 834,{
  428. mes "[Monk]";
  429. mes "Borobudur temple is one of few temples left for worshiping the Great Buddha.";
  430. next;
  431. mes "[Monk]";
  432. mes "I don't understand why there are only few temples left that follow our ways...";
  433. close;
  434. }
  435. dewata,63,190,8 script Monk#dew3 834,{
  436. mes "[Monk]";
  437. mes "Are you a Tourist? You can make an offering and a wish to one of the shrines.";
  438. next;
  439. mes "[Monk]";
  440. mes "Our great Buddha may grant your wish..";
  441. close;
  442. }
  443. dewata,62,192,8 script Monk#dew4 834,{
  444. mes "[Monk]";
  445. mes "Our great Buddha is the king of souls and the leader of all good Gods.";
  446. next;
  447. mes "[Monk]";
  448. mes "The Dewata tribes believes in Buddha, the strange thing is they all describe Buddha as different creatures.";
  449. next;
  450. mes "[Monk]";
  451. mes "I'm not really sure about the reason for that. Maybe because there are many different tribes in Dewata with different characteristics.";
  452. close;
  453. }
  454. dewata,89,191,6 script Small Shrine#dew1 844,{
  455. mes "There is a small shrine here. There are many people making wishes.";
  456. next;
  457. switch(select("Make a donation.:Make a wish.:Walk away.")) {
  458. case 1:
  459. mes "Donation case says:";
  460. mes "^FF00001,000 ~ 100,000 Zeny^000000";
  461. mes "How much do you want to donate?";
  462. next;
  463. input .@input,0,100000;
  464. if (.@input < 1000) {
  465. mes "- Cancelled. -";
  466. close;
  467. } else if (.@input <= 50000)
  468. set .@good_luck, rand(1,10000);
  469. else
  470. set .@good_luck, rand(1,5000);
  471. if (.@input > Zeny) {
  472. mes "- Not enough Zeny. -";
  473. close;
  474. }
  475. mes "What is your wish?";
  476. next;
  477. input(.@wish$);
  478. setarray .@wishes$[0],
  479. "Power","Strength", //1
  480. "Faster","Speed","Quickness","Agility", //2
  481. "Skillful Hands","Dex", //4
  482. "Healthy","Fitness","Vital", //8
  483. "Wisdom","Brain","Study","Int","1st place", //16
  484. "Luck","Wealth","Items","Get Item","Goods","Lotto", //32
  485. "Full Level","Level","LV", //64
  486. "Lover","Girl friend","Boy friend"; //128
  487. setarray .@index[0],
  488. 1,1,2,2,2,2,4,4,8,8,8,16,16,16,16,16,32,32,32,32,32,32,64,64,64,128,128,128;
  489. if (.@good_luck == 7 || .@good_luck == 77 || .@good_luck == 777 || .@good_luck == 7777)
  490. set .@bonus,1;
  491. for(set .@i,0; .@i<getarraysize(.@wishes$); set .@i,.@i+1) {
  492. if (compare(.@wish$,.@wishes$[.@i])) {
  493. set .@stat, .@stat | .@index[.@i];
  494. break;
  495. }
  496. }
  497. mes "You make a wish for ^0000FF" + .@wish$ + "^000000 to the small shrine.";
  498. next;
  499. callsub L_Wish;
  500. set Zeny, Zeny - .@input;
  501. if ((.@stat & 1) && .@bonus)
  502. consumeitem 12043; //Str_Dish03
  503. else if ((.@stat & 2) && .@bonus)
  504. consumeitem 12058; //Agi_Dish03
  505. else if ((.@stat & 4) && .@bonus)
  506. consumeitem 12063; //Dex_Dish03
  507. else if ((.@stat & 8) && .@bonus)
  508. consumeitem 12053; //Vit_Dish03
  509. else if ((.@stat & 16) && .@bonus)
  510. consumeitem 12048; //Int_Dish03
  511. else if ((.@stat & 32) && .@bonus)
  512. consumeitem 12068; //Luk_Dish03
  513. else if (.@stat & 64) {
  514. specialeffect2 EF_ANGEL;
  515. mes "- A celestial entity gives you a blessing. -";
  516. next;
  517. } else if (.@stat & 128) {
  518. mes "- The shrine envelops you in a loving aura. -";
  519. if ((Sex == SEX_FEMALE && compare(.@wish$,.@wishes$[26])) || (Sex == SEX_MALE && compare(.@wish$,.@wishes$[27])))
  520. specialeffect2 EF_LIGHTSPHERE;
  521. next;
  522. }
  523. mes "It feels like this wish could come true.";
  524. close;
  525. case 2:
  526. mes "What is your wish?";
  527. next;
  528. input .@wish$;
  529. mes "You have made your wish for ^0000FF" + .@wish$ + "^000000 to the small shrine.";
  530. next;
  531. callsub L_Wish;
  532. mes "It feels like this wish could come true.";
  533. close;
  534. case 3:
  535. close;
  536. }
  537. L_Wish:
  538. mes "Mysterious energy comes out from the shrine.";
  539. specialeffect EF_FLASHER,AREA,"Small Shrine#dew1";
  540. specialeffect EF_FLASHER,AREA,"Small Shrine#dew2";
  541. specialeffect EF_FLASHER,AREA,"Small Shrine#dew3";
  542. specialeffect EF_FLASHER,AREA,"Small Shrine#dew4";
  543. next;
  544. mes "You have received the shrine's blessing.";
  545. specialeffect2 EF_BLESSING;
  546. next;
  547. return;
  548. }
  549. dewata,89,212,6 duplicate(Small Shrine#dew1) Small Shrine#dew2 844
  550. dewata,68,212,6 duplicate(Small Shrine#dew1) Small Shrine#dew3 844
  551. dewata,68,191,6 duplicate(Small Shrine#dew1) Small Shrine#dew4 844
  552. dewata,75,122,6 script Monk#dewt1 834,{
  553. mes "[Monk]";
  554. mes "You are a stranger here. What brings here to this quiet place?";
  555. next;
  556. switch(select("I'm sightseeing.:No reason.")) {
  557. case 1:
  558. mes "[Monk]";
  559. mes "Oh, you are a tourist. This is the '^0000FFPagoda^000000' worshiping the great Buddha. Please be respectful of the monks praying here.";
  560. close;
  561. case 2:
  562. mes "[Monk]";
  563. mes "Good day to you...";
  564. close;
  565. }
  566. }
  567. dewata,69,101,6 script Monk#dewt2 834,{
  568. mes "[Monk]";
  569. mes "We have a pagoda for the worship of Buddhas. Each temple has one of these towers, though not many people come here besides other monks.";
  570. next;
  571. switch(select("I see...:Explain about Buddhas:Ah, okay.")) {
  572. case 1:
  573. mes "[Monk]";
  574. mes "You must feel the compassion of our Buddha!";
  575. close;
  576. case 2:
  577. mes "[Monk]";
  578. mes "Buddha is our God from Dewata myth, he is the king of souls and also the leader of good Gods.";
  579. next;
  580. mes "[Monk]";
  581. mes "Buddha is the guardian of souls whom often described in traditional dance as fighting against the magician Rangda.";
  582. next;
  583. mes "[Monk]";
  584. mes "In Dewata we belive there are many deities protecting each island and tribal locale,";
  585. next;
  586. mes "[Monk]";
  587. mes "so we do have different manifestations of the Buddha, usually described as a bear, tiger, dragon, snake, or lion";
  588. next;
  589. mes "[Monk]";
  590. mes "Great Lion is one of famous Buddhas worshipped in Dewata.";
  591. next;
  592. mes "[Monk]";
  593. mes "Hope this was good explanation for you. Let me know if you have anything else you want to know.";
  594. close;
  595. case 3:
  596. mes "[Monk]";
  597. mes "Good day to you...";
  598. close;
  599. }
  600. }
  601. dewata,71,79,6 script Monk#dewt3 834,{
  602. mes "[Monk]";
  603. mes "This tower is built on the edge of coastal cliff. You can pray with a cool ocean breeze in your hair.";
  604. next;
  605. mes "[Monk]";
  606. mes "Come, you should feel the compassion of our Buddha in this pleasant weather.";
  607. close;
  608. }
  609. dewata,211,272,4 script Lodge Owner#dew 534,2,3,{
  610. OnTouch:
  611. mes "[Lodge Owner]";
  612. mes "These days, we have many honeymooners visiting here.";
  613. next;
  614. mes "[Lodge Owner]";
  615. mes "It must be the beautiful scenery, right?";
  616. next;
  617. mes "[Lodge Owner]";
  618. mes "I'm happy with my business. Hope all we have a lot more visitors like that.";
  619. next;
  620. mes "[Lodge Owner]";
  621. mes "Ah! You should bring your lover to Dewata on your honeymoon.";
  622. mes "I'll give you a good price-";
  623. close;
  624. }
  625. dewata,245,244,4 script Lodge Employee#dew 536,2,3,{
  626. OnTouch:
  627. mes "[Lodge employee]";
  628. mes "Argg~ This is really ticking me off!";
  629. emotion ET_FRET;
  630. next;
  631. mes "[Lodge employee]";
  632. mes "How come more and more couples come here?";
  633. next;
  634. mes "[Lodge employee]";
  635. mes "And why do they have act so lovey-dovey? What's up with that?";
  636. next;
  637. mes "[Lodge employee]";
  638. mes "C'mon, show some respect to the people who work here...";
  639. close;
  640. }
  641. dewata,233,263,8 script Sweet Married Couple#1 828,2,3,{
  642. OnTouch:
  643. mes "[Sweet Husband]";
  644. mes "You are the most beautiful thing in the world baby~";
  645. emotion ET_CHUP;
  646. next;
  647. mes "[Sweet Wife]";
  648. mes "Really? I'm that beautiful? I love you, honey~";
  649. emotion ET_CHUPCHUP, getnpcid(0, "Sweet Married Couple#2");
  650. next;
  651. mes "[Sweet Married Couple]";
  652. mes "Hahahahahahahahahahahahahahahahahahahahahahahahahahahahahahahahahahahaha";
  653. mes "Hohohohohohohohohohohohohohohohohohohohohohohohohohohohohohohohohohohoho";
  654. emotion ET_SMILE;
  655. emotion ET_SMILE, getnpcid(0, "Sweet Married Couple#2");
  656. next;
  657. mes "Come on now, I'm growing tired of this. Let's go.";
  658. close;
  659. }
  660. dewata,234,263,8 script Sweet Married Couple#2 727,2,3,{
  661. OnTouch:
  662. mes "[Sweet Wife]";
  663. mes "Baby~ You know what flower that is~?";
  664. emotion ET_QUESTION;
  665. next;
  666. mes "[Sweet Husband]";
  667. mes "Hmm? I don't know. But it's really pretty.";
  668. next;
  669. mes "[Sweet Wife]";
  670. mes "Baby~ Who's prettier, me or the flower?";
  671. emotion ET_QUESTION;
  672. next;
  673. mes "[Sweet Husband]";
  674. mes "No matter how pretty the flower is, you are always more beautiful~";
  675. emotion ET_CHUP, getnpcid(0, "Sweet Married Couple#1");
  676. next;
  677. mes "[Sweet Wife]";
  678. mes "Really? I'm that pretty? I love you, sweetie~";
  679. emotion ET_CHUPCHUP;
  680. next;
  681. mes "[Sweet Married Couple]";
  682. mes "Hahahahahahahahahahahahahahahahahahahahahahahahahahahahahahahahahahahaha";
  683. mes "Hohohohohohohohohohohohohohohohohohohohohohohohohohohohohohohohohohohoho";
  684. emotion ET_SMILE, getnpcid(0, "Sweet Married Couple#1");
  685. emotion ET_SMILE;
  686. next;
  687. mes "Come on now, this bores me. Let's move on.";
  688. close;
  689. }
  690. dewata,279,213,4 script Tourist#dew-2 887,2,3,{
  691. OnTouch:
  692. mes "[Reclining Tourist]";
  693. mes "Wow~ This is really comfy~";
  694. next;
  695. mes "[Reclining Tourist]";
  696. mes "I'm having a great time just relaxing.";
  697. next;
  698. mes "[Reclining Tourist]";
  699. mes "You should lie down here too.";
  700. mes "Once you do, you'll never want to get up.";
  701. next;
  702. mes "[Reclining Tourist]";
  703. mes "That's why I haven't moved in a whole week! Hahahaha~";
  704. emotion ET_SMILE;
  705. close;
  706. }
  707. dewata,269,208,4 script Little Kid in Town#dew 538,2,3,{
  708. OnTouch:
  709. mes "[Kid]";
  710. mes "Hey "+((Sex == SEX_MALE)?"bro":"sis")+", look at that man!";
  711. next;
  712. mes "[Kid]";
  713. mes "He's been lying there for a week doin' nothin'...";
  714. next;
  715. mes "[Kid]";
  716. mes "Who IS that man?";
  717. emotion ET_QUESTION;
  718. next;
  719. mes "[Kid]";
  720. mes "I don't want to be a lazybones like him when I grow up.";
  721. close;
  722. }
  723. dewata,227,129,4 script Sarr#dew 538,2,3,{
  724. OnTouch:
  725. mes "[Sarr]";
  726. mes "They're hiding so I should seek.";
  727. mes "I'll find them for sure!-";
  728. next;
  729. mes "[Sarr]";
  730. mes "One~";
  731. next;
  732. mes "[Sarr]";
  733. mes "Two~ Three~";
  734. next;
  735. mes "[Sarr]";
  736. mes "Four~ Five~ Six~";
  737. next;
  738. mes "[Sarr]";
  739. mes "... ... ... ...";
  740. next;
  741. mes "[Sarr]";
  742. mes "Ninty nine~ One hundred!!! Now I'm coming~";
  743. close;
  744. }
  745. dewata,239,140,4 script Siyak#dew 539,2,3,{
  746. OnTouch:
  747. mes "[Siyak]";
  748. mes "Hey come on, move over~ He's gonna find me~~";
  749. next;
  750. mes "[Sarr]";
  751. mes "I found Siyak!! Come out, come out!!";
  752. emotion ET_KIK, getnpcid(0, "Sarr#dew");
  753. emotion ET_HUK;
  754. emotion ET_KIK, getnpcid(0, "Sipo#dew");
  755. emotion ET_HUK, playerattached();
  756. next;
  757. mes "[Siyak]";
  758. mes "Arrgg!! This is all your fault~!!";
  759. emotion ET_FRET;
  760. close;
  761. }
  762. dewata,193,145,4 script Sipo#dew 538,2,3,{
  763. OnTouch:
  764. mes "[Sipo]";
  765. mes "Sarr won't find me here, right?";
  766. next;
  767. mes "[Sarr]";
  768. mes "I found Siyak!! Come out come out!!";
  769. emotion ET_KIK, getnpcid(0, "Sarr#dew");
  770. emotion ET_HUK, getnpcid(0, "Siyak#dew");
  771. emotion ET_KIK;
  772. emotion ET_HUK, playerattached();
  773. next;
  774. mes "[Sipo]";
  775. mes "Hehe~ Now Siyak is IT~ I'll just keep hiding in here.";
  776. close;
  777. }
  778. dewata,228,177,4 script Majya#dew 538,2,3,{
  779. OnTouch:
  780. mes "[Majya]";
  781. mes "I was playing hide-and-seek with my friends...";
  782. next;
  783. mes "[Majya]";
  784. mes "I've been just standing here, and they haven't found me for 3 hours...";
  785. emotion ET_SCRATCH;
  786. next;
  787. mes "[Majya]";
  788. mes "What should I do? Come out? I don't want to be IT...";
  789. close;
  790. }
  791. dewata,278,100,4 script Missing Child#dew 703,2,3,{
  792. OnTouch:
  793. mes "[Ukki]";
  794. mes "WaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaa~";
  795. emotion ET_CRY;
  796. emotion ET_PROFUSELY_SWEAT;
  797. next;
  798. mes "["+strcharinfo(0)+"]";
  799. mes "Hey, kid...";
  800. next;
  801. mes "[Ukki]";
  802. mes "WaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaaWaa~";
  803. emotion ET_CRY;
  804. next;
  805. mes "[Ukki]";
  806. mes "Mama~ Papa~ Where are youuu~ Waa~";
  807. emotion ET_CRY;
  808. emotion ET_PROFUSELY_SWEAT;
  809. next;
  810. mes "["+strcharinfo(0)+"]";
  811. mes "... ... ...";
  812. emotion ET_THINK, playerattached();
  813. close;
  814. }
  815. dewata,249,87,4 script Mum#dew 101,2,3,{
  816. OnTouch:
  817. mes "[Mum]";
  818. mes "Ukki~ Ukki~ Where did she go?";
  819. emotion ET_KEK;
  820. next;
  821. mes "[Mum]";
  822. mes "I can't take my eyes of her for a second...";
  823. next;
  824. mes "[Mum]";
  825. mes "Ukki~";
  826. emotion ET_KEK;
  827. close;
  828. }
  829. dewata,251,85,6 script Poppa#dew 97,2,3,{
  830. OnTouch:
  831. mes "[Poppa]";
  832. mes "Honey, is Ukki lost again?";
  833. emotion ET_QUESTION;
  834. next;
  835. mes "[Poppa]";
  836. mes "Arrgg... I can't go anywhere with her... How many times already?";
  837. emotion ET_PROFUSELY_SWEAT;
  838. next;
  839. mes "[Daddy]";
  840. mes "She's gotten lost in Louyang, Amatsu, Moscovia, Brasilis, Kunlun,";
  841. mes "and in Ayothaya...";
  842. emotion ET_PROFUSELY_SWEAT;
  843. next;
  844. mes "[Daddy]";
  845. mes "What!! It's already been 7 times including this time in Dewata... 7 times!!!!!!";
  846. emotion ET_OTL;
  847. close;
  848. }
  849. dewata,278,281,4 script Happily Married Grandpa 534,{
  850. mes "[Happily Married Grandpa]";
  851. mes "Today, I should ask my lady to";
  852. mes "cook me some ^006400fried rice^000000.";
  853. next;
  854. mes "[Happily Married Grandpa]";
  855. mes "My wife's ^006400fried rice^000000 is";
  856. mes "always very special!";
  857. next;
  858. mes "[Happily Married Grandpa]";
  859. mes "It makes me love her even more.";
  860. mes "You can't imagine the wonderful flavor!";
  861. emotion ET_THROB;
  862. close;
  863. }
  864. dewata,280,277,4 script Happily Married Grandma 535,{
  865. mes "[Happily Married Grandma]";
  866. mes "In my younger days,";
  867. mes "there were many gentleman callers";
  868. mes "who wanted to court me.";
  869. emotion ET_PROFUSELY_SWEAT;
  870. next;
  871. mes "[Happily Married Grandma]";
  872. mes "Yet, I met just the right guy,";
  873. mes "and got married.";
  874. mes "I asked what he likes best";
  875. mes "about me, he said it was";
  876. mes "my homemade ^006400fried rice^000000";
  877. next;
  878. mes "[Happily Married Grandma]";
  879. mes "And since then, he only asks me";
  880. mes "to make ^006400fried rice^000000 for dinner.";
  881. mes "Over 40 years of marriage";
  882. mes "and he still doesn't get tired ot it.";
  883. next;
  884. mes "[Happily Married Grandma]";
  885. mes "I always think it was lucky";
  886. mes "to be growing old with a guy";
  887. mes "who loves what I cook.";
  888. emotion ET_THROB;
  889. close;
  890. }
  891. dewata,165,103,6 script Adventurer Semangat#dew 534,{
  892. mes "[Adventurer Semangat]";
  893. mes "I also traveled around the World";
  894. mes "When I was young like you.";
  895. mes "^FF0000Monkey, Cuttlefish^000000";
  896. mes "^FF0000Eagle, and Snake^000000,";
  897. mes "all were good friends I met";
  898. mes "during my travels.";
  899. next;
  900. mes "[Adventurer Semangat]";
  901. mes "I still have passion for adventure and traveling.";
  902. mes "But, I can't just leave";
  903. mes "my beloved wife and";
  904. mes "grandchildren behind...";
  905. next;
  906. mes "[Adventurer Semangat]";
  907. mes "You will also have something";
  908. mes "or someone that is as precious";
  909. mes "in your heart someday.";
  910. close;
  911. }
  912. dewata,139,114,6 script Semangat's Wife#dew 535,{
  913. mes "[Semangat's Wife]";
  914. mes "Where's that old man";
  915. mes "gone off to again?";
  916. mes "Have you seen my husband around?";
  917. next;
  918. switch(select("I think I saw him there..:No I haven't..")) {
  919. case 1:
  920. mes "[Semangat's Wife]";
  921. mes "He ran away when";
  922. mes "I was looking for him.";
  923. mes "Should be somewhere, telling tall tales";
  924. mes "to some travelers, like always.";
  925. next;
  926. mes "[Semangat's Wife]";
  927. mes "I apologize";
  928. mes "on behalf of my husband.";
  929. mes "Please don't believe his foolish stories";
  930. mes "saying he met with ^FF0000Monkeys and Snakes^000000, or";
  931. mes "that he fought alongside a ^FF0000Cuttlefish^000000.";
  932. next;
  933. mes "[Semangat's Wife]";
  934. mes "He has been living here";
  935. mes "for entire life.";
  936. mes "Yet, always find some travelers,";
  937. mes "and who will listen to his made-up tales.";
  938. close;
  939. case 2:
  940. mes "[Semangat's Wife]";
  941. mes "Oh. Please let me know";
  942. mes "if you ever see him around.";
  943. close;
  944. }
  945. }
  946. dewata,181,88,6 script Young Man#dew-2 536,{
  947. mes "[Young Man]";
  948. mes "Isn't ^8B4513Dewata^000000 beach";
  949. mes "really beautiful?";
  950. mes "The children always play";
  951. mes "at this beach. It really";
  952. mes "reminds me of my youth.";
  953. next;
  954. mes "[Young Man]";
  955. mes "At the evening, you can see";
  956. mes "fireworks from the beach.";
  957. mes "With ocean breeze, the crashing waves,";
  958. mes "and fireworks lighting the sky,";
  959. mes "the nighttime is a time of beauty here!";
  960. close;
  961. }
  962. dewata,179,204,4 script Young Lady#dew 537,{
  963. mes "[Young Lady]";
  964. mes "When you are outside of the town,";
  965. mes "and meet ^FF0000Tiger, Monkey, or pig^000000,";
  966. mes "make sure to avoid them.";
  967. next;
  968. select("What do you mean?");
  969. mes "[Young Lady]";
  970. mes "I haven't seen yet,";
  971. mes "but legend says there's a";
  972. mes "cruel monster named ^FF0000Leak^000000";
  973. mes "which can transform into an animal";
  974. mes "and hypnotize people into killing.";
  975. next;
  976. mes "[Young Lady]";
  977. mes "You know the dangers of this world.";
  978. mes "It's never hurts to be careful";
  979. mes "even if it's just an urban legend.";
  980. //emotion ET_SCRATCH; //TODO
  981. close;
  982. }
  983. dewata,280,236,4 script Settler#dew 726,{
  984. mes "[Settler]";
  985. mes "I'm not really from ^8B4513Dewata^000000.";
  986. mes "But while traveling,";
  987. mes "I found this place...";
  988. mes "And made my decision";
  989. mes "to live in this beautiful town.";
  990. next;
  991. mes "[Settler]";
  992. mes "I've been happy to live here";
  993. mes "and to find and experience";
  994. mes "all these beautiful sights.";
  995. mes "It's a dream come true.";
  996. next;
  997. mes "[Settler]";
  998. mes "Would you ever think of";
  999. mes "settling here too?";
  1000. close;
  1001. }
  1002. dewata,204,230,6 script Dieting Lady#dew 537,{
  1003. if (countitem(11533) == 0) {
  1004. mes "[Dieting Lady]";
  1005. mes "Ah~ I'm starving!!";
  1006. mes "I should be on a diet now.";
  1007. mes "Why am I still hungry?";
  1008. next;
  1009. mes "[Dieting Lady]";
  1010. mes "Don't talk to me too much!!";
  1011. mes "I want to try that grilled ^006400Satay^000000";
  1012. mes "so much~!!!!!";
  1013. close;
  1014. }
  1015. mes "[Dieting Lady]";
  1016. mes "Is that mouth-watering";
  1017. mes "^006400Satay^000000 for me?";
  1018. next;
  1019. switch(select("Yes, want a taste?:No, it's for me!")) {
  1020. case 1:
  1021. delitem 11533,1; //Satay
  1022. mes "[Dieting Lady]";
  1023. mes "Thanks so much!";
  1024. mes "I've been so hungry~!!";
  1025. mes "This smell of this ^006400Satay^000000";
  1026. mes "is so good~!";
  1027. next;
  1028. getitem 11533,1; //Satay
  1029. mes "[Dieting Lady]";
  1030. mes "Ah... gotta come back to my senses,";
  1031. mes "too much of a good thing is bad...";
  1032. mes "I should stick with my diet.";
  1033. mes "Sorry, I'll give it back to you.";
  1034. emotion ET_CRY;
  1035. close;
  1036. case 2:
  1037. mes "[Dieting Lady]";
  1038. mes "Arrgg.. You are so greedy!";
  1039. mes "Since you don't want to share.";
  1040. mes "Anyway, I shouldn't cheat on my diet";
  1041. mes "even for something that looks and smells so good...";
  1042. emotion ET_HNG;
  1043. close;
  1044. }
  1045. }
  1046. dewata,117,156,6 script Dreaming Kid#dew 538,{
  1047. mes "[Dreaming Kid]";
  1048. mes "My granny says";
  1049. mes "There was once a bird named ^FF0000Garuda^000000";
  1050. mes "who flew above this town.";
  1051. mes "Afterwards we had some great harvests";
  1052. mes "and were able to live happily.";
  1053. next;
  1054. mes "[Dreaming Kid]";
  1055. mes "I want to see that bird";
  1056. mes "flying above our town again!";
  1057. mes "Then my mom, dad";
  1058. mes "granny, and grandpa";
  1059. mes "can be happy like the old times.";
  1060. mes "What do you think?";
  1061. close;
  1062. }
  1063. dewata,144,216,4 script Energetic Kid#dew 538,{
  1064. mes "[Energetic Kid]";
  1065. mes "My parents used to tell me...";
  1066. next;
  1067. mes "- ^006400Son,^000000 -";
  1068. mes "- ^006400You should study hard.^000000 -";
  1069. mes "- ^006400Be happy.^000000 -";
  1070. mes "- ^006400Live a slow^000000 -";
  1071. mes "- ^006400and safe life.^000000 -";
  1072. mes "- ^006400The mountain over yonder^000000 -";
  1073. mes "- ^006400will always be there for you.^000000 -";
  1074. next;
  1075. mes "[Energetic Kid]";
  1076. mes "Isn't it a great philosophy?";
  1077. mes "I want to live that way";
  1078. mes "and become a great person,";
  1079. mes "and help all of the people in our town";
  1080. mes "live happily ever after!";
  1081. close;
  1082. }
  1083. dewata,127,248,6 script Wishing Kid#dew 539,{
  1084. mes "[Kid wishing to be an adult]";
  1085. mes "My family has been brewing";
  1086. mes "traditional Dewata wine for ages.";
  1087. mes "I want to drink it myself,";
  1088. mes "but my dad says I'm too young.";
  1089. mes "He said I can drink it";
  1090. mes "only after I sleep for over ^FF0000100 days^000000.";
  1091. next;
  1092. mes "[Kid wishing to be an adult]";
  1093. mes "All grown-ups love to drink";
  1094. mes "my dad's wine.";
  1095. mes "I want to try some so bad.";
  1096. mes "But, what should I do...?";
  1097. mes "I've forgotten how many ^FF0000nights^000000";
  1098. mes "I've already slept... boo hoo!";
  1099. emotion ET_CRY;
  1100. close;
  1101. }
  1102. dew_fild01,101,259,6 script Jaty Tribe Gatekeeper 541,{
  1103. mes "[Jaty Tribe Gatekeeper]";
  1104. mes "Welcome to ^FF0000Jaty^000000 town.";
  1105. mes "Our tribe reveres strength and bravery.";
  1106. mes "We wish you a safe and restful time here.";
  1107. close;
  1108. }
  1109. dew_fild01,106,306,4 script R. Jaty Tribe Warrior 541,{
  1110. mes "[Reserved Jaty Warrior]";
  1111. mes "I want to be the very best";
  1112. mes "like no one ever was.";
  1113. next;
  1114. mes "[Reserved Jaty Warrior]";
  1115. mes "I'm learning hunting skills";
  1116. mes "these days. And I'm getting";
  1117. mes "better and better";
  1118. mes "every day!";
  1119. next;
  1120. mes "[Reserved Jaty Warrior]";
  1121. mes "I won't stop until";
  1122. mes "I become a true warrior!";
  1123. close;
  1124. }