1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
|
//author: Lien
//reviewed by Pjotr Orial and Jenalya
//######################################
//#== NPC [Player] #
//# anyone want to do a funny bet #
//# ------------------------ #
//# Rock-Paper-Scissors can be playing #
//# I hope that'll make fun #
//# ------------------------ #
//######################################
//To enable: sed 's_^// __' -i npc/020-1/rockscissor.txt
// 020-1.gat,74,78,0|script|Gobmel|189,
// {
// //var
// set @NPC_name$, "[Gobmel]";
// set @NPC_point, 0;
// set @PC_point, 0;
// set @gamblerun, 0;
// setarray @CHOOSE_PC$, "Scissors", "Paper", "Rock";
// setarray @CHOSE_ID, 0, 1, 2;
// //0 : scissors; 1: Paper; 2: Rock;
// // 0 cut 1 and 1 cover 3 and break 0 ...
// //var ends
// mes @NPC_name$;
// mes "\"Hello " + strcharinfo(0) + "! Do you want to do a little party of Rock-Paper-Scissors and bet some gold?\"";
// menu
// "Yes, I want.", L_RPS,
// "Well, maybe later.", -;
// close;
// L_RPS:
// mes @NPC_name$;
// mes "\"How much money do you want to bet?\"";
// input @MONEY_BET;
// if(Zeny < @MONEY_BET) goto L_poor;
// set Zeny, Zeny - @MONEY_BET;
// L_Start:
// if(@gamblerun == 3) goto L_finish;
// //what chose the NPC ?
// set @CHOOSE_NPCID, rand(2);
// mes @NPC_name$;
// mes "[ " + @gamblerun + "/3 ]";
// mes "\"1... 2... 3...\"";
// mes "";
// mes"[chose what sign you do]";
// mes "";
// menu
// @CHOOSE_PC$[0], -,
// @CHOOSE_PC$[1], -,
// @CHOOSE_PC$[2], -;
// set @CHOSEN, @menu -1;
// mes "Gobmal: " + @CHOOSE_PC$[@CHOOSE_NPCID];
// mes strcharinfo(0)+" " + strcharinfo(0)+ ": " +@CHOOSE_PC$[@CHOSEN];
// mes "";
// if(@CHOSEN == @CHOOSE_NPCID) goto L_Start;
// if(@CHOSEN == 0 && @CHOOSE_NPCID == 2) goto L_Lost;
// if(@CHOSEN == 1 && @CHOOSE_NPCID == 0) goto L_Lost;
// if(@CHOSEN == 2 && @CHOOSE_NPCID == 1) goto L_Lost;
// L_Win:
// set @PC_point, @PC_point + 1;
// set @gamblerun, @gamblerun + 1;
// mes "Oh no! I have lost.";
// mes "";
// next;
// goto L_Start;
// L_poor:
// mes @NPC_name$;
// mes "\"Go away from me...\"";
// close;
// L_Lost:
// set @NPC_point, @NPC_point + 1;
// set @gamblerun, @gamblerun + 1;
// mes "I have won!";
// mes "";
// next;
// goto L_Start;
// L_finish:
// if(@PC_point > @NPC_point ) goto L_Won;
// mes @NPC_name$;
// mes "\"Nice! I have won, give me your gp!\"";
// close;
// L_Won:
// mes @NPC_name$;
// mes "\"Here is my money.\"";
// set Zeny, Zeny + @MONEY_BET*2;
// close;
// }
|
