summaryrefslogtreecommitdiff
path: root/npc/other/CashShop_Functions.txt
diff options
context:
space:
mode:
authorultramage <ultramage@54d463be-8e91-2dee-dedb-b68131a5f0ec>2007-07-27 19:06:40 +0000
committerultramage <ultramage@54d463be-8e91-2dee-dedb-b68131a5f0ec>2007-07-27 19:06:40 +0000
commitbba15f5d17900a5e9cb85c796555f8ed1591ea2a (patch)
tree37842cee4078170b560984ffb540a1ec329e1419 /npc/other/CashShop_Functions.txt
parente82df73e8a0d6c1757ef10a8532545ab0cd80ac4 (diff)
downloadhercules-bba15f5d17900a5e9cb85c796555f8ed1591ea2a.tar.gz
hercules-bba15f5d17900a5e9cb85c796555f8ed1591ea2a.tar.bz2
hercules-bba15f5d17900a5e9cb85c796555f8ed1591ea2a.tar.xz
hercules-bba15f5d17900a5e9cb85c796555f8ed1591ea2a.zip
* Simplified exp gain equations (now more FPU-friendly and precise), also fixes the uninitialized variable problem
* Corrected one exp calculation overflow (mainly affected high-rate pk servers) * Fixed Neuralizer item script typo git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@10921 54d463be-8e91-2dee-dedb-b68131a5f0ec
Diffstat (limited to 'npc/other/CashShop_Functions.txt')
-rw-r--r--npc/other/CashShop_Functions.txt186
1 files changed, 93 insertions, 93 deletions
diff --git a/npc/other/CashShop_Functions.txt b/npc/other/CashShop_Functions.txt
index 209a6b29b..8dca165b5 100644
--- a/npc/other/CashShop_Functions.txt
+++ b/npc/other/CashShop_Functions.txt
@@ -1,94 +1,94 @@
-//===== eAthena Script =======================================
-//= Cash Shop Functions
-//===== By: ==================================================
-//= L0ne_W0lf
-//===== Current Version: =====================================
-//= 1.0
-//===== Compatible With: =====================================
-//= eAthena SVN
-//===== Description: =========================================
-//= Used explicitly in the Item Database for Cash shop items
-//= - Kafra Card
-//= - Giant Fly Wing
-//= - Neuralizer
-//= - Dungeon Teleport Scroll
-//===== Additional Comments: =================================
-//= 1.0 First version. [L0ne_W0lf]
-//= F_CashPartyCall Optimized by Trancid.
-//============================================================
-
-// Kafra Card
-//============================================================
-// - Open player's storage.
-// - No arguments.
-function script F_CashStore {
- cutin "kafra_01",2;
- mes "[Kafra Employee]";
- mes "Welcome to the Kafra Corporation.";
- mes "Here, let me open your Storage for you.";
- close2;
- openstorage;
- cutin "",255;
- return;
-}
-
-
-// Giant Fly Wing
-//============================================================
-// - Warp party leader to random spot on the map.
-// - Summon Party members on party leader map to that location.
-// - No arguments.
-function script F_CashPartyCall {
- warp "Random",0,0;
- if(getpartyleader(getcharid(1),2) == getcharid(0)) {
- getmapxy .@mapl$, .@xl, .@yl, 0;
- getpartymember getcharid(1);
- set .@partymembercount, $@partymembercount;
- copyarray .@partymembername$[0], $@partymembername$[0], .@partymembercount;
- for(set .@i, 0; .@i < .@partymembercount; set .@i, .@i + 1)
- if(!(getmapxy(.@mapm$, .@xm, .@ym, 0, .@partymembername$[.@i])) && (.@mapm$ == .@mapl$))
- warpchar .@mapl$, .@xl, .@yl, getcharid(0, .@partymembername$[.@i]);
- }
- return;
-}
-
-// Neuralizer
-//============================================================
-// - Reset players skills. Weight must be 0, options must be off.
-// - No arguments.
-function script F_CashReset {
- if (Class != Job_Novice) {
- if (Weight < 1) {
- if (checkriding() || checkfalcon() || checkcart()) return;
- else {
- resetskill;
- sc_end SC_ALL;
- }
- }
- }
- return;
-}
-
-// Dungeon Teleport Scroll
-//============================================================
-// - Warp player to random location of selected dungeon
-// due to lack of information.
-// - No arguments.
-function script F_CashDungeon {
- switch(select("Nogg Road:Mjolnir Dead Pit:Umbala Dungeon:Einbroch Mine Dungeon:Payon Dungeon:Toy Dungeon:Glast Heim Underprison:Louyang Dungeon:Hermit's Checkers:Izlude Dungeon:Turtle Island Dungeon:Clock Tower B3f:Clock Tower")) {
- case 1: warp "mag_dun01",0,0; end;
- case 2: warp "mjolnir_02",0,0; end;
- case 3: warp "um_dun01",0,0; end;
- case 4: warp "ein_dun01",0,0; end;
- case 5: warp "pay_dun00",0,0; end;
- case 6: warp "xmas_dun01",0,0; end;
- case 7: warp "gl_prison",0,0; end;
- case 8: warp "lou_dun01",0,0; end;
- case 9: warp "gon_dun02",0,0; end;
- case 10: warp "iz_dun00",0,0; end;
- case 11: warp "tur_dun02",0,0; end;
- case 12: warp "alde_dun03",0,0; end;
- case 13: warp "c_tower1",0,0; end;
- }
- return;
+//===== eAthena Script =======================================
+//= Cash Shop Functions
+//===== By: ==================================================
+//= L0ne_W0lf
+//===== Current Version: =====================================
+//= 1.0
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//= Used explicitly in the Item Database for Cash shop items
+//= - Kafra Card
+//= - Giant Fly Wing
+//= - Neuralizer
+//= - Dungeon Teleport Scroll
+//===== Additional Comments: =================================
+//= 1.0 First version. [L0ne_W0lf]
+//= F_CashPartyCall Optimized by Trancid.
+//============================================================
+
+// Kafra Card
+//============================================================
+// - Open player's storage.
+// - No arguments.
+function script F_CashStore {
+ cutin "kafra_01",2;
+ mes "[Kafra Employee]";
+ mes "Welcome to the Kafra Corporation.";
+ mes "Here, let me open your Storage for you.";
+ close2;
+ openstorage;
+ cutin "",255;
+ return;
+}
+
+
+// Giant Fly Wing
+//============================================================
+// - Warp party leader to random spot on the map.
+// - Summon Party members on party leader map to that location.
+// - No arguments.
+function script F_CashPartyCall {
+ warp "Random",0,0;
+ if(getpartyleader(getcharid(1),2) == getcharid(0)) {
+ getmapxy .@mapl$, .@xl, .@yl, 0;
+ getpartymember getcharid(1);
+ set .@partymembercount, $@partymembercount;
+ copyarray .@partymembername$[0], $@partymembername$[0], .@partymembercount;
+ for(set .@i, 0; .@i < .@partymembercount; set .@i, .@i + 1)
+ if(!(getmapxy(.@mapm$, .@xm, .@ym, 0, .@partymembername$[.@i])) && (.@mapm$ == .@mapl$))
+ warpchar .@mapl$, .@xl, .@yl, getcharid(0, .@partymembername$[.@i]);
+ }
+ return;
+}
+
+// Neuralizer
+//============================================================
+// - Reset players skills. Weight must be 0, options must be off.
+// - No arguments.
+function script F_CashReset {
+ if (Class != Job_Novice) {
+ if (Weight < 1) {
+ if (checkriding() || checkfalcon() || checkcart()) return;
+ else {
+ resetskill;
+ sc_end SC_ALL;
+ }
+ }
+ }
+ return;
+}
+
+// Dungeon Teleport Scroll
+//============================================================
+// - Warp player to random location of selected dungeon
+// due to lack of information.
+// - No arguments.
+function script F_CashDungeon {
+ switch(select("Nogg Road:Mjolnir Dead Pit:Umbala Dungeon:Einbroch Mine Dungeon:Payon Dungeon:Toy Dungeon:Glast Heim Underprison:Louyang Dungeon:Hermit's Checkers:Izlude Dungeon:Turtle Island Dungeon:Clock Tower B3f:Clock Tower")) {
+ case 1: warp "mag_dun01",0,0; end;
+ case 2: warp "mjolnir_02",0,0; end;
+ case 3: warp "um_dun01",0,0; end;
+ case 4: warp "ein_dun01",0,0; end;
+ case 5: warp "pay_dun00",0,0; end;
+ case 6: warp "xmas_dun01",0,0; end;
+ case 7: warp "gl_prison",0,0; end;
+ case 8: warp "lou_dun01",0,0; end;
+ case 9: warp "gon_dun02",0,0; end;
+ case 10: warp "iz_dun00",0,0; end;
+ case 11: warp "tur_dun02",0,0; end;
+ case 12: warp "alde_dun03",0,0; end;
+ case 13: warp "c_tower1",0,0; end;
+ }
+ return;
} \ No newline at end of file