| 1 | //===== eAthena Script ======================================= |
|---|
| 2 | //= White Day Event Script |
|---|
| 3 | //===== By: ================================================== |
|---|
| 4 | //= 1.0a Muad_Dib (Prometheus Project) |
|---|
| 5 | //===== Current Version: ===================================== |
|---|
| 6 | //= 1.0a |
|---|
| 7 | //===== Compatible With: ===================================== |
|---|
| 8 | //= Any Athena Version; RO Episode 6+ |
|---|
| 9 | //===== Description: ========================================= |
|---|
| 10 | //= Sells candy, candy cane and well baked cookie. |
|---|
| 11 | //===== Additional Comments: ================================= |
|---|
| 12 | //= 07/06/05 : Added 1st Version. [Muad_Dib] |
|---|
| 13 | //= Converted to eAthena format by Dr.Evil |
|---|
| 14 | //============================================================ |
|---|
| 15 | |
|---|
| 16 | |
|---|
| 17 | alberta,188,64,4 script Sugar 91,{ |
|---|
| 18 | set @maplenum,0; |
|---|
| 19 | set @mapleItemID,0; |
|---|
| 20 | set @maplePrice,0; |
|---|
| 21 | set @maplePriceT,0; |
|---|
| 22 | mes "[Sugar]"; |
|---|
| 23 | mes "Welcome!"; |
|---|
| 24 | mes "How delicious are sweets?"; |
|---|
| 25 | mes "My teacher........."; |
|---|
| 26 | mes "The sweets craftsman of ARUBERUTA"; |
|---|
| 27 | mes "There are sweets that is built hard."; |
|---|
| 28 | next; |
|---|
| 29 | mes "[Sugar]"; |
|---|
| 30 | mes "It was given by the darling person."; |
|---|
| 31 | mes "In return of the present ...."; |
|---|
| 32 | mes "heartfelt like"; |
|---|
| 33 | mes "the sweetness of the present some how."; |
|---|
| 34 | next; |
|---|
| 35 | menu "Please give me!",-,"I don't need it.",M_END,"The teacher.",M_L1; |
|---|
| 36 | |
|---|
| 37 | mes "[Sugar]"; |
|---|
| 38 | mes "Yes!"; |
|---|
| 39 | mes "Select from menu here."; |
|---|
| 40 | mes "Since there is a limitation in numbers"; |
|---|
| 41 | mes "Not more than ^ff0000 5 pieces^000000."; |
|---|
| 42 | mes "are allowed to carry out?"; |
|---|
| 43 | next; |
|---|
| 44 | menu "Candy",-,"Candy Cane",L0_2,"Well baked cookie",L0_3; |
|---|
| 45 | |
|---|
| 46 | set @maplePrice,3000; |
|---|
| 47 | set @mapleItemID,529; |
|---|
| 48 | mes "[Sugar]"; |
|---|
| 49 | mes "It is a candy, and the price is"; |
|---|
| 50 | mes "3000 Zeny each."; |
|---|
| 51 | mes "How many do you like to purchase?"; |
|---|
| 52 | next; |
|---|
| 53 | goto L_INPUT; |
|---|
| 54 | L0_2: |
|---|
| 55 | set @maplePrice,4000; |
|---|
| 56 | set @mapleItemID,530; |
|---|
| 57 | mes "[Sugar]"; |
|---|
| 58 | mes "It is a candy cane, and the price is"; |
|---|
| 59 | mes "4000 Zeny each."; |
|---|
| 60 | mes "How many do you like to purchase?"; |
|---|
| 61 | next; |
|---|
| 62 | goto L_INPUT; |
|---|
| 63 | L0_3: |
|---|
| 64 | set @maplePrice,2000; |
|---|
| 65 | set @mapleItemID,538; |
|---|
| 66 | mes "[Sugar]"; |
|---|
| 67 | mes "It is a well baked cookie, and the price is"; |
|---|
| 68 | mes "2000 Zeny each."; |
|---|
| 69 | mes "How many do you like to purchase?"; |
|---|
| 70 | next; |
|---|
| 71 | |
|---|
| 72 | L_INPUT: |
|---|
| 73 | input @maplenum; |
|---|
| 74 | if (@maplenum > 5) goto L_ERROR; |
|---|
| 75 | if (@maplenum == 0) goto M_END; |
|---|
| 76 | set @maplePriceT,@maplePrice*@maplenum; |
|---|
| 77 | if (Zeny < @maplePriceT) goto L_ERROR2; |
|---|
| 78 | set Zeny,Zeny- @maplePriceT; |
|---|
| 79 | getitem @mapleItemID,@maplenum; |
|---|
| 80 | mes "[Sugar]"; |
|---|
| 81 | mes "Thank you!!!"; |
|---|
| 82 | mes "These sweets are really delicious."; |
|---|
| 83 | mes "Since my teacher of sweet is the No.1 teacher's in world!"; |
|---|
| 84 | mes "Although you may eat by yourself"; |
|---|
| 85 | mes "don't eat so much or you'll grow fat."; |
|---|
| 86 | mes "Please take care!!!"; |
|---|
| 87 | close; |
|---|
| 88 | |
|---|
| 89 | M_L1: |
|---|
| 90 | mes "[Sugar]"; |
|---|
| 91 | mes "Yes"; |
|---|
| 92 | mes "The teacher of mine"; |
|---|
| 93 | mes "is Mr. Kuberu, a sweets craftsman."; |
|---|
| 94 | mes "Making sweets under two persons."; |
|---|
| 95 | mes "which is allowed to self-train."; |
|---|
| 96 | next; |
|---|
| 97 | mes "[Sugar]"; |
|---|
| 98 | mes "Although selling is seemingly to carried out ...."; |
|---|
| 99 | mes "Where he is now?"; |
|---|
| 100 | mes "Which I don't know."; |
|---|
| 101 | close; |
|---|
| 102 | |
|---|
| 103 | L_ERROR: |
|---|
| 104 | mes "[Sugar]"; |
|---|
| 105 | mes "???"; |
|---|
| 106 | mes "You seem to have a failure on hearing."; |
|---|
| 107 | mes "I will tell you once again?"; |
|---|
| 108 | mes "You can only purchase"; |
|---|
| 109 | mes "^ff0000 5 pieces^000000 at once."; |
|---|
| 110 | next; |
|---|
| 111 | goto L_INPUT; |
|---|
| 112 | |
|---|
| 113 | L_ERROR2: |
|---|
| 114 | mes "[Sugar]"; |
|---|
| 115 | mes "???"; |
|---|
| 116 | mes "Hmmm it seems you don't have enough money"; |
|---|
| 117 | mes "to make that purchase."; |
|---|
| 118 | mes "I will ask you to check your money first."; |
|---|
| 119 | close; |
|---|
| 120 | |
|---|
| 121 | M_END: |
|---|
| 122 | mes "[Sugar]"; |
|---|
| 123 | mes "Really .... You might regret it.."; |
|---|
| 124 | mes "If you change your mind."; |
|---|
| 125 | mes "I am just here ok."; |
|---|
| 126 | mes "Have a nice day!"; |
|---|
| 127 | close; |
|---|
| 128 | } |
|---|
