summaryrefslogtreecommitdiff
path: root/npc/events/gdevent_sch.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/events/gdevent_sch.txt')
-rw-r--r--npc/events/gdevent_sch.txt232
1 files changed, 112 insertions, 120 deletions
diff --git a/npc/events/gdevent_sch.txt b/npc/events/gdevent_sch.txt
index a6df13889..22b70836e 100644
--- a/npc/events/gdevent_sch.txt
+++ b/npc/events/gdevent_sch.txt
@@ -29,7 +29,7 @@ OnTimer3600000:
schg_dun01,1,2,1 script Monster Controler1#sch 4_DOG01,{
OnEnable:
- set .@callwhere,rand(1,4);
+ .@callwhere = rand(1,4);
if (.@callwhere == 1) {
monster "schg_dun01",164,236,"Kublin",1980,1,"Monster Controler1#sch::OnMyMobDead";
}
@@ -67,8 +67,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
.@chk_yourgdname$ = getguildname(getcharid(2));
if ($@gdeventv_s1 == 0) {
if ($@gdevents_s$ == "") {
- set $@gdeventv_s1,1;
- set $@gdevents_s$,.@chk_yourgdname$;
+ $@gdeventv_s1 = 1;
+ $@gdevents_s$ = .@chk_yourgdname$;
mes "[Dwarf]";
mes "Help me!";
mes "Please, help me!";
@@ -141,8 +141,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
next;
switch(select("Wait! I'm not ready yet.:Let's go!")) {
case 1:
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
mes "[Morestone]";
mes "Take your time, and find a place to gather your friends.";
close;
@@ -152,8 +152,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
mes "If your friends visit me again later, I will guide them to that area again.";
mes "Don't forget, dwarves are grateful beings! Hahaha!";
delitem 6010,1; //Pickaxe
- set $@gdeventv_s1,1;
- set $@gdevents_s$,.@chk_yourgdname$;
+ $@gdeventv_s1 = 1;
+ $@gdevents_s$ = .@chk_yourgdname$;
close2;
setquest 2144;
warp "schg_que01",103,133;
@@ -161,16 +161,16 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
mes "[Morestone]";
mes "I will tell you how to find him.";
mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
close;
}
case 2:
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
emotion e_sob;
mes "[Dwarf]";
mes "Ahhh...";
@@ -199,8 +199,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_s1,1;
- set $@gdevents_s$,.@chk_yourgdname$;
+ $@gdeventv_s1 = 1;
+ $@gdevents_s$ = .@chk_yourgdname$;
mes "[Dwarf]";
mes "Help me!";
mes "Please, help me!";
@@ -273,8 +273,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
next;
switch(select("Wait! I'm not ready yet.:Let's go!")) {
case 1:
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
mes "[Morestone]";
mes "Take your time, and find a place to gather your friends.";
close;
@@ -284,8 +284,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
mes "If your friends visit me again later, I will guide them to that area again.";
mes "Don't forget, dwarves are grateful beings! Hahaha!";
delitem 6010,1; //Pickaxe
- set $@gdeventv_s1,1;
- set $@gdevents_s$,.@chk_yourgdname$;
+ $@gdeventv_s1 = 1;
+ $@gdevents_s$ = .@chk_yourgdname$;
close2;
setquest 2144;
warp "schg_que01",103,133;
@@ -293,16 +293,16 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
mes "[Morestone]";
mes "I will tell you how to find him.";
mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
close;
}
case 2:
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
emotion e_sob;
mes "[Dwarf]";
mes "Ah....";
@@ -341,8 +341,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_s1,1;
- set $@gdevents_s$,.@chk_yourgdname$;
+ $@gdeventv_s1 = 1;
+ $@gdevents_s$ = .@chk_yourgdname$;
mes "[Dwarf]";
mes "Help me!";
mes "Please, help me!";
@@ -415,8 +415,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
next;
switch(select("Wait! I'm not ready yet.:Let's go!")) {
case 1:
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
mes "[Morestone]";
mes "Take your time, and find a place to gather you friends.";
close;
@@ -426,8 +426,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
mes "If your friends visit me again later, I will guide them to that area again.";
mes "Don't forget, dwarves are grateful beings! Hahaha!";
delitem 6010,1; //Pickaxe
- set $@gdeventv_s1,1;
- set $@gdevents_s$,.@chk_yourgdname$;
+ $@gdeventv_s1 = 1;
+ $@gdevents_s$ = .@chk_yourgdname$;
close2;
setquest 2144;
warp "schg_que01",103,133;
@@ -435,16 +435,16 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
mes "[Morestone]";
mes "I will tell you how to find him.";
mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
close;
}
case 2:
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
emotion e_sob;
mes "[Dwarf]";
mes "Ah....";
@@ -464,8 +464,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
OnInit:
disablenpc "Dwarf#sch_gd";
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
end;
OnEnable:
@@ -475,7 +475,7 @@ OnEnable:
schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
specialeffect EF_POISONHIT;
- set .@sprchg_gd,rand(1,5);
+ .@sprchg_gd = rand(1,5);
if (.@sprchg_gd == 1) {
setnpcdisplay "Pierrot Pier#sch_gd", 4_GHOSTRING;
}
@@ -656,7 +656,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
mes "[Pierrot Pier]";
mes "Let the game.. Begin!";
mapannounce "schg_que01", "Pierrot Pier: Let the game.. Begin!",bc_map,"0x99CC00";
- set $@gdeventv_s2,1;
+ $@gdeventv_s2 = 1;
donpcevent "Controller#gdevent_s::OnGame_start";
erasequest 2143;
close;
@@ -673,7 +673,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
next;
if (countitem(6031) > 0) {
donpcevent "Controller#gdevent_s::OnStop";
- set $@gdeventv_s2,3;
+ $@gdeventv_s2 = 3;
donpcevent "eff_mvp#sch_gd::OnMVP";
mes "[Pierrot Pier]";
mes "Wow~~!!";
@@ -758,7 +758,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
mes "[Pierrot Pier]";
mes "Let the game.. Begin!";
mapannounce "schg_que01", "Pierrot Pier: Let the game.. Begin!",bc_map,"0x99CC00";
- set $@gdeventv_s2,10;
+ $@gdeventv_s2 = 10;
donpcevent "Controller#gdevent_s::OnGame_start";
close;
}
@@ -781,7 +781,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
mapannounce "schg_que01", "Pierrot Pier: You've completeled an unbelievable task, I will give you the wonderful gift my master has prepared!! Ha!",bc_map,"0x99CC00";
mapannounce "schg_que01", "Pierrot Pier: Here, take Pierre's Treasure Boxes.",bc_map,"0x99CC00";
donpcevent "eff_mvp#sch_gd::OnMVP";
- set $@gdeventv_s2,5;
+ $@gdeventv_s2 = 5;
getitem 14596,10; //Pierre_Treasurebox
close;
}
@@ -814,7 +814,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
next;
if (countitem(6031) > 0) {
donpcevent "Controller#gdevent_s::OnStop";
- set $@gdeventv_s2,3;
+ $@gdeventv_s2 = 3;
donpcevent "eff_mvp#sch_gd::OnMVP";
mes "[Pierrot Pier]";
mes "Wow~~!!";
@@ -924,7 +924,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
next;
if (countitem(6031) > 0) {
donpcevent "Controller#gdevent_s::OnStop";
- set $@gdeventv_s2,3;
+ $@gdeventv_s2 = 3;
donpcevent "eff_mvp#sch_gd::OnMVP";
mes "[Pierrot Pier]";
mes "Wow~~!!";
@@ -988,7 +988,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
next;
if (countitem(6031) > 0) {
donpcevent "Controller#gdevent_s::OnStop";
- set $@gdeventv_s2,3;
+ $@gdeventv_s2 = 3;
donpcevent "eff_mvp#sch_gd::OnMVP";
mes "[Pierrot Pier]";
mes "Wow~~!!";
@@ -1017,7 +1017,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
schg_que01,10,10,3 script Controller#gdevent_s 4_DOG01,{
OnInit:
- set $@gdeventv_s2,0;
+ $@gdeventv_s2 = 0;
end;
OnWin:
@@ -1035,7 +1035,7 @@ OnGame_start:
donpcevent "paper_sp_7_s::OnEnable";
donpcevent "paper_sp_8_s::OnEnable";
donpcevent "paper_sp_9_s::OnEnable";
- set .@roulette_where,rand(1,9);
+ .@roulette_where = rand(1,9);
if (.@roulette_where == 1) {
donpcevent "paper_sp_1_s::OnBingo";
}
@@ -1077,7 +1077,7 @@ OnTimer60000:
mapannounce "schg_que01", "Pierrot Pier: Time is up!",bc_map,"0x99CC00";
mapwarp "schg_que01","schg_que01",100,79;
enablenpc "removepp_sch_gd";
- set $@gdeventv_s2,2;
+ $@gdeventv_s2 = 2;
end;
OnTimer63000:
@@ -1089,23 +1089,22 @@ schg_que01,87,93,0 script paper_sp_1_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while1,0;
+ .@paper_while1 = 0;
while(1) {
if (.@paper_while1 == 100) {
break;
- }
- else {
- set .@paper_while1,.@paper_while1+1;
- set .@paper_x1,rand(81,95);
- set .@paper_y1,rand(87,100);
+ } else {
+ ++.@paper_while1;
+ .@paper_x1 = rand(81,95);
+ .@paper_y1 = rand(87,100);
makeitem 6030,1,"schg_que01",.@paper_x1,.@paper_y1; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x1,rand(81,95);
- set .@paper_y1,rand(87,100);
+ .@paper_x1 = rand(81,95);
+ .@paper_y1 = rand(87,100);
makeitem 6031,1,"schg_que01",.@paper_x1,.@paper_y1; //Glitering_PaperB
end;
}
@@ -1114,23 +1113,22 @@ schg_que01,102,93,0 script paper_sp_2_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while2,0;
+ .@paper_while2 = 0;
while(1) {
if (.@paper_while2 == 100) {
break;
- }
- else {
- set .@paper_while2,.@paper_while2+1;
- set .@paper_x2,rand(96,110);
- set .@paper_y2,rand(87,100);
+ } else {
+ ++.@paper_while2;
+ .@paper_x2 = rand(96,110);
+ .@paper_y2 = rand(87,100);
makeitem 6030,1,"schg_que01",.@paper_x2,.@paper_y2; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x2,rand(96,110);
- set .@paper_y2,rand(87,100);
+ .@paper_x2 = rand(96,110);
+ .@paper_y2 = rand(87,100);
makeitem 6031,1,"schg_que01",.@paper_x2,.@paper_y2; //Glitering_PaperB
end;
}
@@ -1139,23 +1137,22 @@ schg_que01,117,93,0 script paper_sp_3_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while3,0;
+ .@paper_while3 = 0;
while(1) {
if (.@paper_while3 == 100) {
break;
- }
- else {
- set .@paper_while3,.@paper_while3+1;
- set .@paper_x3,rand(111,124);
- set .@paper_y3,rand(87,100);
+ } else {
+ ++.@paper_while3;
+ .@paper_x3 = rand(111,124);
+ .@paper_y3 = rand(87,100);
makeitem 6030,1,"schg_que01",.@paper_x3,.@paper_y3; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x3,rand(111,124);
- set .@paper_y3,rand(87,100);
+ .@paper_x3 = rand(111,124);
+ .@paper_y3 = rand(87,100);
makeitem 6031,1,"schg_que01",.@paper_x3,.@paper_y3; //Glitering_PaperB
end;
}
@@ -1164,23 +1161,22 @@ schg_que01,87,80,0 script paper_sp_4_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while4,0;
+ .@paper_while4 = 0;
while(1) {
if (.@paper_while4 == 100) {
break;
- }
- else {
- set .@paper_while4,.@paper_while4+1;
- set .@paper_x4,rand(81,95);
- set .@paper_y4,rand(73,86);
+ } else {
+ ++.@paper_while4;
+ .@paper_x4 = rand(81,95);
+ .@paper_y4 = rand(73,86);
makeitem 6030,1,"schg_que01",.@paper_x4,.@paper_y4; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x4,rand(81,95);
- set .@paper_y4,rand(73,86);
+ .@paper_x4 = rand(81,95);
+ .@paper_y4 = rand(73,86);
makeitem 6031,1,"schg_que01",.@paper_x4,.@paper_y4; //Glitering_PaperB
end;
}
@@ -1189,23 +1185,23 @@ schg_que01,102,80,0 script paper_sp_5_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while5,0;
+ .@paper_while5 = 0;
while(1) {
if (.@paper_while5 == 100) {
break;
}
else {
- set .@paper_while5,.@paper_while5+1;
- set .@paper_x5,rand(96,110);
- set .@paper_y5,rand(73,86);
+ ++.@paper_while5;
+ .@paper_x5 = rand(96,110);
+ .@paper_y5 = rand(73,86);
makeitem 6030,1,"schg_que01",.@paper_x5,.@paper_y5; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x5,rand(96,110);
- set .@paper_y5,rand(73,86);
+ .@paper_x5 = rand(96,110);
+ .@paper_y5 = rand(73,86);
makeitem 6031,1,"schg_que01",.@paper_x5,.@paper_y5; //Glitering_PaperB
end;
}
@@ -1214,23 +1210,22 @@ schg_que01,117,80,0 script paper_sp_6_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while6,0;
+ .@paper_while6 = 0;
while(1) {
if (.@paper_while6 == 100) {
break;
- }
- else {
- set .@paper_while6,.@paper_while6+1;
- set .@paper_x6,rand(111,124);
- set .@paper_y6,rand(73,86);
+ } else {
+ ++.@paper_while6;
+ .@paper_x6 = rand(111,124);
+ .@paper_y6 = rand(73,86);
makeitem 6030,1,"schg_que01",.@paper_x6,.@paper_y6; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x6,rand(111,124);
- set .@paper_y6,rand(73,86);
+ .@paper_x6 = rand(111,124);
+ .@paper_y6 = rand(73,86);
makeitem 6031,1,"schg_que01",.@paper_x6,.@paper_y6; //Glitering_PaperB
end;
}
@@ -1239,23 +1234,22 @@ schg_que01,87,65,0 script paper_sp_7_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while7,0;
+ .@paper_while7 = 0;
while(1) {
if (.@paper_while7 == 100) {
break;
- }
- else {
- set .@paper_while7,.@paper_while7+1;
- set .@paper_x7,rand(81,95);
- set .@paper_y7,rand(59,72);
+ } else {
+ ++.@paper_while7;
+ .@paper_x7 = rand(81,95);
+ .@paper_y7 = rand(59,72);
makeitem 6030,1,"schg_que01",.@paper_x7,.@paper_y7; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x7,rand(81,95);
- set .@paper_y7,rand(59,72);
+ .@paper_x7 = rand(81,95);
+ .@paper_y7 = rand(59,72);
makeitem 6031,1,"schg_que01",.@paper_x7,.@paper_y7; //Glitering_PaperB
end;
}
@@ -1264,23 +1258,22 @@ schg_que01,102,65,0 script paper_sp_8_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while8,0;
+ .@paper_while8 = 0;
while(1) {
if (.@paper_while8 == 100) {
break;
- }
- else {
- set .@paper_while8,.@paper_while8+1;
- set .@paper_x8,rand(96,110);
- set .@paper_y8,rand(59,72);
+ } else {
+ ++.@paper_while8;
+ .@paper_x8 = rand(96,110);
+ .@paper_y8 = rand(59,72);
makeitem 6030,1,"schg_que01",.@paper_x8,.@paper_y8; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x8,rand(96,110);
- set .@paper_y8,rand(59,72);
+ .@paper_x8 = rand(96,110);
+ .@paper_y8 = rand(59,72);
makeitem 6031,1,"schg_que01",.@paper_x8,.@paper_y8; //Glitering_PaperB
end;
}
@@ -1289,23 +1282,22 @@ schg_que01,117,65,0 script paper_sp_9_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while9,0;
+ .@paper_while9 = 0;
while(1) {
if (.@paper_while9 == 100) {
break;
- }
- else {
- set .@paper_while9,.@paper_while9+1;
- set .@paper_x9,rand(111,124);
- set .@paper_y9,rand(59,72);
+ } else {
+ ++.@paper_while9;
+ .@paper_x9 = rand(111,124);
+ .@paper_y9 = rand(59,72);
makeitem 6030,1,"schg_que01",.@paper_x9,.@paper_y9; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x9,rand(111,124);
- set .@paper_y9,rand(59,72);
+ .@paper_x9 = rand(111,124);
+ .@paper_y9 = rand(59,72);
makeitem 6031,1,"schg_que01",.@paper_x9,.@paper_y9; //Glitering_PaperB
end;
}
@@ -1318,8 +1310,8 @@ OnInit:
end;
OnTouch2:
- set .@paper_sch_gd,countitem(6030);
- set .@spaper_sch_gd,countitem(6031);
+ .@paper_sch_gd = countitem(6030);
+ .@spaper_sch_gd = countitem(6031);
if ((.@paper_sch_gd > 0) || (.@spaper_sch_gd > 0)) {
delitem 6030,.@paper_sch_gd; //Glitering_PaperA
delitem 6031,.@spaper_sch_gd; //Glitering_PaperB
@@ -1443,7 +1435,7 @@ OnEnable:
OnMyMobDead:
if (mobcount("schg_que01","treg#sch_gd::OnMyMobDead") == 0) {
mapannounce "schg_que01", "Pierrot Pier: Beep! Oh, you already opened the gift? You sure are fast now, beep!",bc_map,"0x99CC00";
- set $@gdeventv_s2,5;
+ $@gdeventv_s2 = 5;
}
end;
}
@@ -1521,9 +1513,9 @@ schg_dun01,5,5,1 script Event controller#sch_gd 4_DOG01,{
donpcevent "Monster Controler1#sch::OnControler1#sch_gd";
donpcevent "Monster Controler1#sch::OnControler1#sch_gd";
disablenpc "Dwarf#sch_gd";
- set $@gdeventv_s1,0;
- set $@gdeventv_s2,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdeventv_s2 = 0;
+ $@gdevents_s$ = "";
close;
case 2:
mes "Good bye~";
generated by cgit v1.2.3-60-g2f50 (git 2.42.0) at 2024-07-03 19:58:05 +0000