1 | //===== eAthena Script ======================================= |
---|
2 | //= Rock Scissors Roulette Script |
---|
3 | //===== By: ================================================== |
---|
4 | //= acky (1.1) |
---|
5 | //===== Current Version: ===================================== |
---|
6 | //= 1.2 |
---|
7 | //===== Compatible With: ===================================== |
---|
8 | //= Any eAthena Version |
---|
9 | //===== Description: ========================================= |
---|
10 | //= Plays a hybrid Russian Roulette Rock Scissors Paper game. |
---|
11 | //===== Additional Comments: ================================= |
---|
12 | //= Prizes customisable, Added emotions. |
---|
13 | //= 1.2 Fixes by Blackthunder and me [Poki#3] |
---|
14 | //============================================================ |
---|
15 | |
---|
16 | cmd_in02,182,126,2 script Crazy Boris 85,{ |
---|
17 | mes "Crazy Boris"; |
---|
18 | set @counter,1; |
---|
19 | mes "Hey you! Up for Rock Scissors Roulette?"; |
---|
20 | next; |
---|
21 | menu "Let me play.",PLAY,"Explain the rules.",RULES,"Leave",LEAVE; |
---|
22 | SAME: |
---|
23 | mes "Draw! Again!"; |
---|
24 | next; |
---|
25 | goto PLAY; |
---|
26 | |
---|
27 | WIN: |
---|
28 | mes "Damnit, You Win!"; |
---|
29 | emotion 19; |
---|
30 | next; |
---|
31 | goto OPPPULL; |
---|
32 | |
---|
33 | LOSE: |
---|
34 | emotion 18; |
---|
35 | mes "Boorah! You Lose!"; |
---|
36 | next; |
---|
37 | goto YOUPULL; |
---|
38 | |
---|
39 | PLAY: |
---|
40 | mes "Rock... Paper..."; |
---|
41 | set @opp,rand (1,3); |
---|
42 | menu "^0000FFROCK!",ROCK,"^FF0000SCISSORS!",SCISSORS,"^00FF00PAPER!^000000",PAPER; |
---|
43 | |
---|
44 | ROCK: |
---|
45 | if (@lastchoice == 1) set @opp,rand (1,3); |
---|
46 | if (@opp == 1) emotion 11; |
---|
47 | if (@opp == 2) emotion 10; |
---|
48 | if (@opp == 3) emotion 12; |
---|
49 | set @lastchoice,1; |
---|
50 | if (@opp == 1) goto SAME; |
---|
51 | if (@opp == 2) goto WIN; |
---|
52 | if (@opp == 3) goto LOSE; |
---|
53 | |
---|
54 | SCISSORS: |
---|
55 | if (@lastchoice == 2) set @opp,rand (1,2); |
---|
56 | if (@opp == 1) emotion 11; |
---|
57 | if (@opp == 2) emotion 10; |
---|
58 | if (@opp == 3) emotion 12; |
---|
59 | set @lastchoice,2; |
---|
60 | if (@opp == 1) goto LOSE; |
---|
61 | if (@opp == 2) goto SAME; |
---|
62 | if (@opp == 3) goto WIN; |
---|
63 | |
---|
64 | PAPER: |
---|
65 | if (@lastchoice == 3) set @opp,rand (2,3); |
---|
66 | if (@opp == 1) emotion 11; |
---|
67 | if (@opp == 2) emotion 10; |
---|
68 | if (@opp == 3) emotion 12; |
---|
69 | set @lastchoice,3; |
---|
70 | if (@opp == 1) goto WIN; |
---|
71 | if (@opp == 2) goto LOSE; |
---|
72 | if (@opp == 3) goto SAME; |
---|
73 | |
---|
74 | YOUPULL: |
---|
75 | if (@counter == 1) goto ONE; |
---|
76 | if (@counter == 2) goto TWO; |
---|
77 | if (@counter == 3) goto THREE; |
---|
78 | if (@counter == 4) goto FOUR; |
---|
79 | if (@counter == 5) goto FIVE; |
---|
80 | if (@counter == 6) goto SIX; |
---|
81 | |
---|
82 | OPPPULL: |
---|
83 | if (@counter == 1) goto ONEa; |
---|
84 | if (@counter == 2) goto TWOa; |
---|
85 | if (@counter == 3) goto THREEa; |
---|
86 | if (@counter == 4) goto FOURa; |
---|
87 | if (@counter == 5) goto FIVEa; |
---|
88 | if (@counter == 6) goto SIXa; |
---|
89 | |
---|
90 | ONE: |
---|
91 | set @counter,2; |
---|
92 | mes "1 of 6"; |
---|
93 | set @pull,rand (1,6); |
---|
94 | next; |
---|
95 | if (@pull == 1) goto DIE; |
---|
96 | if (@pull != 1) goto SAFE; |
---|
97 | |
---|
98 | TWO: |
---|
99 | set @counter,3; |
---|
100 | mes "2 of 6"; |
---|
101 | set @pull,rand (1,5); |
---|
102 | next; |
---|
103 | if (@pull == 1) goto DIE; |
---|
104 | if (@pull != 1) goto SAFE; |
---|
105 | |
---|
106 | THREE: |
---|
107 | set @counter,4; |
---|
108 | mes "3 of 6"; |
---|
109 | set @pull,rand (1,4); |
---|
110 | next; |
---|
111 | if (@pull == 1) goto DIE; |
---|
112 | if (@pull != 1) goto SAFE; |
---|
113 | |
---|
114 | FOUR: |
---|
115 | set @counter,5; |
---|
116 | mes "4 of 6"; |
---|
117 | set @pull,rand (1,3); |
---|
118 | next; |
---|
119 | if (@pull == 1) goto DIE; |
---|
120 | if (@pull != 1) goto SAFE; |
---|
121 | |
---|
122 | FIVE: |
---|
123 | set @counter,6; |
---|
124 | mes "5 of 6"; |
---|
125 | set @pull,rand (1,2); |
---|
126 | if (@pull == 1) set @pull,rand (1,2); |
---|
127 | next; |
---|
128 | if (@pull == 1) goto DIE; |
---|
129 | if (@pull != 1) goto SAFE; |
---|
130 | |
---|
131 | SIX: |
---|
132 | mes "6 of 6"; |
---|
133 | mes "Say your prayers"; |
---|
134 | set @pull,1; |
---|
135 | next; |
---|
136 | if (@pull == 1) goto DIE; |
---|
137 | if (@pull != 1) goto SAFE; |
---|
138 | |
---|
139 | ONEa: |
---|
140 | set @counter,2; |
---|
141 | mes "1 of 6"; |
---|
142 | set @pull,rand (1,6); |
---|
143 | next; |
---|
144 | if (@pull == 1) goto KILL; |
---|
145 | if (@pull != 1) goto SAFE; |
---|
146 | |
---|
147 | TWOa: |
---|
148 | set @counter,3; |
---|
149 | mes "2 of 6"; |
---|
150 | set @pull,rand (1,5); |
---|
151 | next; |
---|
152 | if (@pull == 1) goto KILL; |
---|
153 | if (@pull != 1) goto SAFE; |
---|
154 | |
---|
155 | THREEa: |
---|
156 | set @counter,4; |
---|
157 | mes "3 of 6"; |
---|
158 | set @pull,rand (1,4); |
---|
159 | next; |
---|
160 | if (@pull == 1) goto KILL; |
---|
161 | if (@pull != 1) goto SAFE; |
---|
162 | |
---|
163 | FOURa: |
---|
164 | set @counter,5; |
---|
165 | mes "4 of 6"; |
---|
166 | set @pull,rand (1,3); |
---|
167 | next; |
---|
168 | if (@pull == 1) goto KILL; |
---|
169 | if (@pull != 1) goto SAFE; |
---|
170 | |
---|
171 | FIVEa: |
---|
172 | set @counter,6; |
---|
173 | mes "5 of 6"; |
---|
174 | set @pull,rand (1,2); |
---|
175 | next; |
---|
176 | if (@pull == 1) goto KILL; |
---|
177 | if (@pull != 1) goto SAFE; |
---|
178 | |
---|
179 | SIXa: |
---|
180 | mes "6 of 6"; |
---|
181 | mes "Say your prayers"; |
---|
182 | set @pull,1; |
---|
183 | next; |
---|
184 | if (@pull == 1) goto KILL; |
---|
185 | if (@pull != 1) goto SAFE; |
---|
186 | |
---|
187 | SAFE: |
---|
188 | emotion 32; |
---|
189 | mes "*^0000FFClick^000000* whew..."; |
---|
190 | goto PLAY; |
---|
191 | |
---|
192 | DIE: |
---|
193 | specialeffect2 183; |
---|
194 | emotion 29; |
---|
195 | percentheal -100,-100; |
---|
196 | mes "*^0000FFClick^000000* *^FF0000BANG^000000*"; |
---|
197 | mes "You're dead!"; |
---|
198 | close; |
---|
199 | |
---|
200 | KILL: |
---|
201 | specialeffect 183; |
---|
202 | emotion 23; |
---|
203 | mes "*^0000FFClick^000000* *^FF0000BANG^000000*"; |
---|
204 | mes "OWWW @#$%^!! THAT HURT LIKE HELL!!"; |
---|
205 | next; |
---|
206 | goto PRIZE; |
---|
207 | |
---|
208 | RULES: |
---|
209 | mes "Ok here are the rules:"; |
---|
210 | mes "I have with me a ^FF00006^000000 chamber pistol with ^FF00001^000000 round. First we play ^FF0000Scissors ^00FF00Paper ^0000FFRock^000000. The loser pulls the trigger. The winner is whoever comes out best."; |
---|
211 | mes "Beat me to win a prize."; |
---|
212 | menu "Let me play.",CONT,"No thanks.",LEAVE; |
---|
213 | |
---|
214 | CONT: |
---|
215 | mes "Ok here we go..."; |
---|
216 | next; |
---|
217 | goto PLAY; |
---|
218 | |
---|
219 | PRIZE: |
---|
220 | mes "Congratulations! You have won..."; |
---|
221 | set @prize,rand (1,10); |
---|
222 | if (@prize == 1) goto P1; |
---|
223 | if (@prize == 2) goto P2; |
---|
224 | if (@prize == 3) goto P3; |
---|
225 | if (@prize == 4) goto P4; |
---|
226 | if (@prize == 5) goto P5; |
---|
227 | if (@prize == 6) goto P6; |
---|
228 | if (@prize == 7) goto P7; |
---|
229 | if (@prize == 8) goto P8; |
---|
230 | if (@prize == 9) goto P9; |
---|
231 | if (@prize == 10) goto P10; |
---|
232 | |
---|
233 | P1: |
---|
234 | mes "10x Oridicon!"; |
---|
235 | getitem 984,10; |
---|
236 | close; |
---|
237 | |
---|
238 | P2: |
---|
239 | mes "10x Elunium!"; |
---|
240 | getitem 985,10; |
---|
241 | close; |
---|
242 | |
---|
243 | P3: |
---|
244 | mes "100x Fly Wings!"; |
---|
245 | getitem 601,100; |
---|
246 | close; |
---|
247 | |
---|
248 | P4: |
---|
249 | mes "8x Old Blue Box!"; |
---|
250 | getitem 603,8; |
---|
251 | close; |
---|
252 | |
---|
253 | P5: |
---|
254 | mes "4x Old Violet Box!"; |
---|
255 | getitem 617,4; |
---|
256 | close; |
---|
257 | |
---|
258 | P6: |
---|
259 | mes "1x Old Card Album!"; |
---|
260 | getitem 616,1; |
---|
261 | close; |
---|
262 | |
---|
263 | P7: |
---|
264 | mes "10x Dead Branch!"; |
---|
265 | getitem 604,10; |
---|
266 | close; |
---|
267 | |
---|
268 | P8: |
---|
269 | mes "3x Gold!"; |
---|
270 | getitem 969,3; |
---|
271 | close; |
---|
272 | |
---|
273 | P9: |
---|
274 | mes "10x Elunium!"; |
---|
275 | getitem 985,10; |
---|
276 | close; |
---|
277 | |
---|
278 | P10: |
---|
279 | mes "20x Blue Potion!"; |
---|
280 | getitem 505,20; |
---|
281 | close; |
---|
282 | |
---|
283 | LEAVE: |
---|
284 | mes "Pansy."; |
---|
285 | close; |
---|
286 | } |
---|