diff options
Diffstat (limited to 'npc/re/jobs/3-1/ranger.txt')
-rw-r--r-- | npc/re/jobs/3-1/ranger.txt | 99 |
1 files changed, 51 insertions, 48 deletions
diff --git a/npc/re/jobs/3-1/ranger.txt b/npc/re/jobs/3-1/ranger.txt index d8a10820f..9ed4152b3 100644 --- a/npc/re/jobs/3-1/ranger.txt +++ b/npc/re/jobs/3-1/ranger.txt @@ -110,7 +110,7 @@ tur_dun01,156,36,5 script Survival Instructor#jr01 1_M_ORIENT01,{ mes "[Survival Instructor, Rescue]"; mes "To do this you need to be cleansed of body and soul."; mes "Make sure that your weight equals '0' to continue."; - set job_ranger01,1; + job_ranger01 = 1; setquest 8254; close2; warp "alberta",117,57; @@ -144,7 +144,7 @@ tur_dun01,156,36,5 script Survival Instructor#jr01 1_M_ORIENT01,{ mes "[Survival Instructor, Rescue]"; mes "Well, let's talk about the details when you get the qualification for taking the test."; mes "When you want to take the survival power test, please talk to me again."; - set job_ranger01,2; + job_ranger01 = 2; changequest 8254,8255; close; } @@ -193,7 +193,7 @@ tur_dun01,156,36,5 script Survival Instructor#jr01 1_M_ORIENT01,{ mes "Well, then let's start."; mes "There's no time to hesitate."; mes "Do your best."; - set job_ranger01,3; + job_ranger01 = 3; changequest 8255,8256; getitem 1703,1; //Bow__ getitem 12323,10; //N_Fly_Wing @@ -380,11 +380,11 @@ tur_dun01,91,169,3 script Test Instructor#jr02 4_M_JOB_HUNTER,{ mes "[Test Instructor, Teardrop]"; mes "If you run out of the provided items, we cannot support you more so take care."; mes "Consider this as an extension of the survival power test."; - set job_ranger01,4; + job_ranger01 = 4; changequest 8256,8257; close; } else if (job_ranger01 == 4) { - if (checkquest(8257,HUNTING) == 2) { + if (questprogress(8257,HUNTING) == 2) { if (countitem(7064) > 0) { mes "Oh! Oh! Woooooow!"; mes "You've brought it! Let me see..."; @@ -400,7 +400,7 @@ tur_dun01,91,169,3 script Test Instructor#jr02 4_M_JOB_HUNTER,{ mes "Well, before I explain, could you please give me that Dragonfly wing?"; mes "You've heard the saying, 'in any situation, eating comes first'?"; delitem 7064,1; //Dragon_Fly_Wing - set job_ranger01,5; + job_ranger01 = 5; changequest 8257,8258; close; } @@ -549,9 +549,10 @@ tur_dun01,91,169,3 script Test Instructor#jr02 4_M_JOB_HUNTER,{ mes "Okay. I'll respect your opinion."; mes "I'll cancel the job change request from "+strcharinfo(0)+"."; delitem 1703,1; //Bow__ - set job_ranger01,0; - for(set .@i,8254; .@i<=8262; set .@i,.@i+1) - if (checkquest(.@i) > -1) erasequest .@i; + job_ranger01 = 0; + for(.@i = 8254; .@i <= 8262; ++.@i) + if (questprogress(.@i)) + erasequest .@i; close; } mes "[Test Instructor, Teardrop]"; @@ -653,13 +654,13 @@ L_Start: if (countitem(1750) < 100) { mes "[Test Instructor, Teardrop]"; mes "Okay, once again I'll provide you with arrows, then I'll let you in."; - set .@arrow,1; + .@arrow = 1; next; } mes "[Test Instructor, Teardrop]"; mes "Good luck."; mes "Become a Ranger and we shall meet again."; - set job_ranger01,6; + job_ranger01 = 6; if (getarg(0) == 0) changequest 8258,8259; else { @@ -710,9 +711,10 @@ job3_rang01,30,44,3 script Test Waiting Room#jr_03 4_M_ORIENT01,{ mes "Okay. I'll respect your opinion."; mes "I'll cancel the job change request from "+strcharinfo(0)+"."; delitem 1703,1; //Bow__ - set job_ranger01,0; - for(set .@i,8254; .@i<=8262; set .@i,.@i+1) - if (checkquest(.@i) > -1) erasequest .@i; + job_ranger01 = 0; + for(.@i = 8254; .@i <= 8262; ++.@i) + if (questprogress(.@i)) + erasequest .@i; close; close2; warp "alberta",117,57; @@ -800,12 +802,12 @@ OnDisable: job3_rang02,100,95,0 script Test Supervisor#jr_04 HIDDEN_WARP_NPC,{ OnInit: - set $@job_rang_point01,0; + $@job_rang_point01 = 0; disablenpc "Test Supervisor#jr_04"; end; OnEnable: enablenpc "Test Supervisor#jr_04"; - set $@job_rang_point01,0; + $@job_rang_point01 = 0; initnpctimer; end; OnDisable: @@ -847,8 +849,8 @@ OnInit: end; OnEnable: enablenpc "First Test Timer#jr_05"; - set $@job_rang_point01,0; - set $@job_rang_text01,0; + $@job_rang_point01 = 0; + $@job_rang_text01 = 0; setarray .text$[1], "First","Second","Third","Fourth","Fifth","Sixth","Seventh","Eighth","Ninth","Tenth","Eleventh", "Twelfth","Thirteenth","Fourteenth","Fifteenth","Sixteenth","Seventeenth","Eighteenth","Nineteenth","Last"; @@ -901,7 +903,7 @@ OnTimer115000: OnTimer122000: OnTimer129000: OnTimer136000: - set $@job_rang_text01,$@job_rang_text01+1; + ++$@job_rang_text01; mapannounce "job3_rang02","Test Supervisor, Notice : "+.text$[$@job_rang_text01]+" Wave! Kill the Poring!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 donpcevent "CallCorrectAnswer#jr::OnStart"; end; @@ -910,7 +912,7 @@ OnTimer143000: end; OnTimer146000: if ($@job_rang_point01 < 1) - set $@job_rang_point01,0; + $@job_rang_point01 = 0; mapannounce "job3_rang02","Test Supervisor, Notice : I'll announce the test result. The number of Porings you killed out of 20 is ..." + $@job_rang_point01 + "!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 end; OnTimer149000: @@ -934,8 +936,8 @@ OnTimer154000: OnTimer157000: stopnpctimer; mapwarp "job3_rang02","tur_dun01",93,165; - set $@job_rang_point01,0; - set $@job_rang_text01,0; + $@job_rang_point01 = 0; + $@job_rang_text01 = 0; donpcevent "Test Supervisor#jr_04::OnDisable"; donpcevent "Test Waiting Room#jr_03::OnEnable"; donpcevent "First Test Timer#jr_05::OnDisable"; @@ -955,7 +957,7 @@ OnStart: setarray .@x[0],35,44,54,35,54,35,44,54; setarray .@y[0],58,58,58,49,49,39,39,39; setarray .@id[0],1002,1031,1242,1113; - set .@i, rand(8); + .@i = rand(8); donpcevent "CallWrongAnswer#jr::"+.@label$[.@i]; monster "job3_rang02",.@x[.@i],.@y[.@i],"Poring",.@id[rand(4)],1,"CallCorrectAnswer#jr::OnMyMobDead"; end; @@ -964,7 +966,7 @@ OnReset: end; OnMyMobDead: specialeffect2 EF_POTION_CON; - set $@job_rang_point01, $@job_rang_point01+1; + ++$@job_rang_point01; mapannounce "job3_rang02","Test Supervisor, Notice : Correct Target! You have very good eyesight!",bc_map,"0xffb6c1"; //FW_NORMAL 12 0 0 end; } @@ -1054,7 +1056,7 @@ OnReset: end; OnMyMobDead: specialeffect2 EF_DEVIL; - set $@job_rang_point01, $@job_rang_point01-1; + --$@job_rang_point01; mapannounce "job3_rang02","Test Supervisor, Notice : Wrong Target! Pull yourself together!",bc_map,"0xffb6c1"; //FW_NORMAL 12 0 0 end; } @@ -1370,7 +1372,7 @@ OnEnable: end; OnDisable: stopnpctimer; - set $@job_rang_point03,0; + $@job_rang_point03 = 0; disablenpc "Third Test Timer#jr_12"; end; OnTimer3000: @@ -1384,7 +1386,7 @@ OnTimer9000: end; OnTimer12000: mapannounce "job3_rang02","Test Supervisor, Freeze : The 'Egg Bombs' will spawn 20 times! Each time you successfully dismantle one, you get 1 point! If you get 10 or more points, you pass the practical test, so go for it! Then I'll start!!!!!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 - set .n,14; + .n = 14; end; OnTimer15000: OnTimer20000: @@ -1407,14 +1409,14 @@ OnTimer100000: OnTimer105000: OnTimer110000: donpcevent "Egg Bomb#"+(.n+rand(3))+"::OnEnable"; - if (.n == 26) set .n,14; - else set .n,.n+3; + if (.n == 26) .n = 14; + else .n += 3; end; OnTimer113000: mapannounce "job3_rang02","Test Supervisor, Freeze : The test is ooooooooooooooveeeeerrr!!!!!!!!!!!!!!!!!!!!!!!!!!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 - for(set .@i,14; .@i<=28; set .@i,.@i+1) + for(.@i = 14; .@i<=28; ++.@i) donpcevent "Egg Bomb#"+.@i+"::OnDisable"; - set .n,0; + .n = 0; end; OnTimer116000: mapannounce "job3_rang02","Test Supervisor, Freeze : Well let's see the result?!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 @@ -1435,13 +1437,13 @@ OnTimer124000: end; OnTimer127000: mapannounce "job3_rang02","Test Supervisor, Freeze : It's too bad, but you'll need to retake the test from the beginning! Please go back!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 - set $@job_rang_point03,0; + $@job_rang_point03 = 0; mapwarp "job3_rang02","tur_dun01",93,165; donpcevent "Test Supervisor#jr_13::OnDisable"; end; OnTimer130000: stopnpctimer; - set $@job_rang_point03,0; + $@job_rang_point03 = 0; donpcevent "Test Waiting Room#jr_03::OnEnable"; donpcevent "Third Test Timer#jr_12::OnDisable"; end; @@ -1450,7 +1452,7 @@ OnTimer130000: job3_rang02,251,49,3 script Test Supervisor#jr_13 4_M_JOB_HUNTER,{ mes "[Test Supervisor, Freeze]"; if (job_ranger01 == 6) { - if (checkquest(8261) == -1) { + if (!questprogress(8261)) { mes "Congrats for passing the 2nd practical test! I am the 3rd practical test supervisor Freeze!"; next; mes "[Test Supervisor, Freeze]"; @@ -1550,7 +1552,7 @@ OnTimer123000: mapannounce "job3_rang02","Test Supervisor, Freeze : You weren't on time for the test, so I am ending the 3rd practical test!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 end; OnTimer127000: - set $@job_rang_point03,0; + $@job_rang_point03 = 0; mapannounce "job3_rang02","Test Supervisor, Freeze : It's too bad, but try again!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 mapwarp "job3_rang02","tur_dun01",93,165; end; @@ -1576,9 +1578,9 @@ OnEnable: getmapxy(.@map$,.@x,.@y,1); monster "job3_rang02",.@x,.@y,"Egg Bomb",1047,1,strnpcinfo(0)+"::OnMyMobDead"; switch(atoi(strnpcinfo(2))%3) { - case 0: set .@str$,"Hey, I am going to explode. What are you going to do?"; break; - case 1: set .@str$,"I... no, I can't stand anymore!!"; break; - case 2: set .@str$,"I am almost done now... Don't stop me."; break; + case 0: .@str$ = "Hey, I am going to explode. What are you going to do?"; break; + case 1: .@str$ = "I... no, I can't stand anymore!!"; break; + case 2: .@str$ = "I am almost done now... Don't stop me."; break; } mapannounce "job3_rang02","Egg Bomb : "+.@str$,bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 end; @@ -1588,11 +1590,11 @@ OnDisable: disablenpc strnpcinfo(0); end; OnMyMobDead: - set $@job_rang_point03, $@job_rang_point03+1; + ++$@job_rang_point03; switch(atoi(strnpcinfo(2))%3) { - case 0: set .@str$,"The world is meaningless and my dream is so far away..."; break; - case 1: set .@str$,"Don't be relieved. Misery always comes from carelessness."; break; - case 2: set .@str$,"Alas, it was only a dream for a short time..."; break; + case 0: .@str$ = "The world is meaningless and my dream is so far away..."; break; + case 1: .@str$ = "Don't be relieved. Misery always comes from carelessness."; break; + case 2: .@str$ = "Alas, it was only a dream for a short time..."; break; } mapannounce "job3_rang02","Egg Bomb : "+.@str$,bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 donpcevent strnpcinfo(0)+"::OnDisable"; @@ -1647,7 +1649,7 @@ job3_rang01,90,43,3 script Ranger Master#jr_29 4_M_REIDIN_KURS,{ mes "Congratulations!"; mes "You've completed all the rough practical tests!"; if (job_ranger01 == 6) { - set job_ranger01,7; + job_ranger01 = 7; changequest 8259,8262; } next; @@ -1705,9 +1707,10 @@ job3_rang01,90,43,3 script Ranger Master#jr_29 4_M_REIDIN_KURS,{ mes "[Ranger Master, Neveragain]"; mes "What are you doing here?"; mes "You are not supposed to be here. Get out!"; - set job_ranger01,0; - for(set .@i,8254; .@i<=8262; set .@i,.@i+1) - if (checkquest(.@i) > -1) erasequest .@i; + job_ranger01 = 0; + for(.@i = 8254; .@i <= 8262; ++.@i) + if (questprogress(.@i)) + erasequest .@i; close2; warp "alberta",117,57; end; @@ -1726,7 +1729,7 @@ job3_rang01,90,43,3 script Ranger Master#jr_29 4_M_REIDIN_KURS,{ mes "From now on be active as a splendid Ranger!"; mes "I wish you luck in your future!"; delitem 1703,1; //Bow__ - set job_ranger01,8; + job_ranger01 = 8; completequest 8262; jobchange roclass(eaclass()|EAJL_THIRD); getitem 5748,1; //Sniper_Goggle @@ -1795,7 +1798,7 @@ job3_rang01,58,1,0 script Worker#job_ranger 4_M_ORIENT01,{ case 8: mes "3rd Test has been Disabled"; donpcevent "Third Test Timer#jr_12::OnDisable"; - for(set .@i,14; .@i<=28; set .@i,.@i+1) + for(.@i = 14; .@i<=28; ++.@i) donpcevent "Egg Bomb#"+.@i+"::OnDisable"; close; case 9: |