Mirroristas/rathena
2
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Cleaned up global permanent variables in Airship Quest

Browse Source 
git-svn-id: https://svn.code.sf.net/p/rathena/svn/trunk@9306 54d463be-8e91-2dee-dedb-b68131a5f0ec
This commit is contained in:
KarLaeda 2006-11-24 11:24:21 +00:00
parent 05b2d83b43
commit 78d9c69d88
3 changed files with 42 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
npc/Changelog.txt
View File

@ -33,6 +33,8 @@ KarLaeda
Date Added
======
11/24
* Cleaned up global permanent variables in Airship Quest [KarLaeda]
11/23
* Fixed Mage Tutorial Quest [KarLaeda]
- Fixed typos in Ninja Quest

64
npc/airports/airships.txt
View File

@ -394,7 +394,7 @@ airplane.gat,65,63,4 script Maelin 714,{
}
airplane.gat,32,61,4 script Nils::TypingContest 49,{
callfunc "F_ClearGarbage"; //Clear outdated, unused variables
loopback:
mes "[Nils]";
mes "Welcome to the";
@ -421,20 +421,20 @@ s_Play:
next;
//below arrays are for simplified entering of new lines ;P
//first lines array
setarray $textstringsa$[0],"^00FFFFthkelfkskeldmsiejdlsle^0000FFhfndkelsheidl",
"^993366hfjdkeldjsieldjs^663366hfjdjeiskdlefvbd",
"^00FFFFCoboman no chikara-yumei na",
"^993366belief love luck grimace sweat rush",
"^00FFFFcallipygian salacious lascivious",
"^663366uNflAPPaBLe LoVaBLe SeCreTs AnD",
"^00CCFFburrdingdingdilidingdingphoohudaamb",
"^FF33CCbarapaphurarlandreamduranbatuhi^990066wooi",
"^FF33CCLiGhTsPeEd RiGhT SPEed leFT TURn",
"^00CCFFI'm the King of all Weirdos! Now",
"^00CCFFBy the power of^000000",
"^00CCFF...silence. quiet benevolence...";
setarray $@textstringsa$[0],"^00FFFFthkelfkskeldmsiejdlsle^0000FFhfndkelsheidl",
"^993366hfjdkeldjsieldjs^663366hfjdjeiskdlefvbd",
"^00FFFFCoboman no chikara-yumei na",
"^993366belief love luck grimace sweat rush",
"^00FFFFcallipygian salacious lascivious",
"^663366uNflAPPaBLe LoVaBLe SeCreTs AnD",
"^00CCFFburrdingdingdilidingdingphoohudaamb",
"^FF33CCbarapaphurarlandreamduranbatuhi^990066wooi",
"^FF33CCLiGhTsPeEd RiGhT SPEed leFT TURn",
"^00CCFFI'm the King of all Weirdos! Now",
"^00CCFFBy the power of^000000",
"^00CCFF...silence. quiet benevolence...";
//second lines array
setarray $textstringsb$[0],"skemd",
setarray $@textstringsb$[0],"skemd",
"",
"chikara-dalookii na chikara da ze!",
"folktale rodimus optimus bumblebee",
@ -447,7 +447,7 @@ s_Play:
"p-po-poi-po-poi-poin-poing",
"soul mate... wonder. enigma...";
//for the few 3-liners... =X
setarray $textstringsc$[0],"",
setarray $@textstringsc$[0],"",
"",
"COBO ON!",
"",
@ -458,9 +458,9 @@ s_Play:
"",
"",
"GOD-POING. I NEVER LOSE!",
"cloud.";
"cloud.";
//comparisation strings
setarray $compstring$[0],"thkelfkskeldmsiejdlslehfndkelsheidlskemd",
setarray $@compstring$[0],"thkelfkskeldmsiejdlslehfndkelsheidlskemd",
"hfjdkeldjsieldjshfjdjeiskdlefvbd",
"Coboman no chikara-yumei na chikara-dalookii na chikara da ze! COBO ON",
"belief love luck grimace sweat rush folktale rodimus optimus bumblebee",
@ -473,26 +473,26 @@ s_Play:
"By the power of p-po-poi-po-poi-poin-poing GOD-POING. I NEVER LOSE!",
"...silence. quiet benevolence... soul mate... wonder. enigma... cloud";
//lengths
setarray $lengths[0],20,32,73,73,65,66,67,55,67,66,67,69;
setarray $@lengths[0],20,32,73,73,65,66,67,55,67,66,67,69;
// initnpctimer;
mes "[Nils]";
set @index,rand(1,getarraysize($textstringsa$))-1;
set @string1a$,$textstringsa$[@index];
set @string1b$,$textstringsb$[@index];
set @string1c$,$textstringsc$[@index];
set @typingstring1$,$compstring$[@index];
set @typingkeys,$lengths[@index];
set @index2,rand(1,getarraysize($textstringsa$))-1;
set @index,rand(1,getarraysize($@textstringsa$))-1;
set @string1a$,$@textstringsa$[@index];
set @string1b$,$@textstringsb$[@index];
set @string1c$,$@textstringsc$[@index];
set @typingstring1$,$@compstring$[@index];
set @typingkeys,$@lengths[@index];
set @index2,rand(1,getarraysize($@textstringsa$))-1;
while (@index2 == @index) {
set @index2,rand(1,getarraysize($textstringsa$))-1;
set @index2,rand(1,getarraysize($@textstringsa$))-1;
}
set @string2a$,$textstringsa$[@index2];
set @string2b$,$textstringsb$[@index2];
set @string2c$,$textstringsc$[@index2];
set @typingstring2$,$compstring$[@index2];
set @typingkeys,@typingkeys+$lengths[@index2];
set @string2a$,$@textstringsa$[@index2];
set @string2b$,$@textstringsb$[@index2];
set @string2c$,$@textstringsc$[@index2];
set @typingstring2$,$@compstring$[@index2];
set @typingkeys,@typingkeys+$@lengths[@index2];
set @start,gettime(3)*60*60+gettime(2)*60+gettime(1);
mes @string1a$;
mes @string1a$;
if(@string1b$ != "")mes @string1b$;
if(@string1c$ != "")mes @string1c$;
input @comparisonvar$[1];

8
npc/other/Global_Functions.txt
View File

@ -90,6 +90,14 @@ function script F_ClearGarbage {
set num6,0; set num7,0; set num8,0; set num9,0;
set hzdun,0; set cubekey,0; set piciburn,0;
}
//Airship
if($lengths){
cleararray $textstringsa$[0],"",getarraysize($textstringsa$);
cleararray $textstringsb$[0],"",getarraysize($textstringsb$);
cleararray $textstringsc$[0],"",getarraysize($textstringsc$);
cleararray $compstring$[0],"",getarraysize($compstring$);
cleararray $lengths[0],0,getarraysize($lengths);
}
return;
}