Change all script folders

Script files fixes are comming

8 files changed, 197 insertions, 0 deletions

diff --git a/npc/002-1_Sandstorm/_import.txt b/npc/002-1_Sandstorm/_import.txt
new file mode 100644
index 00000000..4697808e
--- /dev/null
+++ b/npc/002-1_Sandstorm/_import.txt
@@ -0,0 +1,8 @@
+map: 002-1.gat
+npc: npc/002-1_Sandstorm/rogue.txt
+npc: npc/002-1_Sandstorm/nomads.txt
+npc: npc/002-1_Sandstorm/monsters.txt
+npc: npc/002-1_Sandstorm/merchant.txt
+npc: npc/002-1_Sandstorm/dark_mage.txt
+npc: npc/002-1_Sandstorm/_warps.txt
+npc: npc/002-1_Sandstorm/_mobs.txt
diff --git a/npc/002-1_Sandstorm/_mobs.txt b/npc/002-1_Sandstorm/_mobs.txt
new file mode 100644
index 00000000..2ef2a902
--- /dev/null
+++ b/npc/002-1_Sandstorm/_mobs.txt
@@ -0,0 +1,13 @@
+// 002-1 Sandstorm mobs
+
+002-1.gat,0,0,0,0	monster	Maggot	1002,20,1000,500,Mob002-1::On1002
+
+
+002-1.gat,0,0,0	script	Mob002-1	-1,{
+On1002:
+	set @mobID, 1002;
+	callfunc "MobPoints";
+	break;
+
+	end;
+}
diff --git a/npc/002-1_Sandstorm/_warps.txt b/npc/002-1_Sandstorm/_warps.txt
new file mode 100644
index 00000000..5153e83b
--- /dev/null
+++ b/npc/002-1_Sandstorm/_warps.txt
@@ -0,0 +1,7 @@
+// 002-1 Sandstorm warps
+
+002-1.gat,58,12	warp	ToTulimshar	3,-1,001-1.gat,44,80
+002-1.gat,108,79	warp	ToEasternDesert	-1,1,005-1.gat,23,40
+002-1.gat,12,66	warp	ToWesternDesert	-1,3,003-1.gat,168,76
+002-1.gat,28,13	warp	ToBeach	1,-1,004-1.gat,84,111
+002-1.gat,20,94	warp	ToCave	-1,-1,002-3.gat,37,32
diff --git a/npc/002-1_Sandstorm/dark_mage.txt b/npc/002-1_Sandstorm/dark_mage.txt
new file mode 100644
index 00000000..1bf8df8c
--- /dev/null
+++ b/npc/002-1_Sandstorm/dark_mage.txt
@@ -0,0 +1,46 @@
+new_1-1.gat,24,24,0	script	SoulThief	103,{
+
+	if (class == 1) goto L_Soul;
+	mes "[Dark Mage]";
+	mes "\"Psss hey would you like to have more power?\"";
+	next;
+	
+	menu
+		"You fool, that's not possible", -,
+		"I'm listening...", L_Go;
+	close;
+
+L_Go:
+	mes "[Dark Mage]";
+	mes "\"I can give you ancient powers that will let you become the greatest warrior in The Mana World, or the best merchant.";
+	mes "But everything has got his price...\"";
+	next;
+	
+	mes "[Dark Mage]";
+	mes "\"Oh nothing important nor expensive.";
+	mes "Just your soul!\"";
+	next;
+	
+	menu
+		"My soul? Here it is", L_Soul,
+		"I need a better explanation!", -;
+	
+	mes "[Dark Mage]";
+	mes "Well there's a very small possibility that your player will be translated into the new server.";
+	mes "I said a very, very small possibility.";
+	mes "Players without a soul instead will be lost forever...";
+	mes "Come on, you won't loose that much!\"";
+	next;
+	
+	menu
+		"Hmmm ok, I guess you can take it.", L_Soul,
+		"Maybe I'll think about it a bit more", -;
+	mes "\"I know you'll come here again when you'll get killed by a maggot, begging me to help you\"";
+	close;	
+
+L_Soul:
+	mes "[Dark Mage]";
+	mes "\"Hrhrhr, your soul is finally mine!\"";
+	jobchange 1;
+	close;
+}
\ No newline at end of file
diff --git a/npc/002-1_Sandstorm/merchant.txt b/npc/002-1_Sandstorm/merchant.txt
new file mode 100644
index 00000000..d01a9164
--- /dev/null
+++ b/npc/002-1_Sandstorm/merchant.txt
@@ -0,0 +1 @@
+new_1-1.gat,19,99,0     shop    Ishyah        109,525:800,531:3000,530:8000,1199:3,603:-1
diff --git a/npc/002-1_Sandstorm/monsters.txt b/npc/002-1_Sandstorm/monsters.txt
new file mode 100644
index 00000000..a98c8406
--- /dev/null
+++ b/npc/002-1_Sandstorm/monsters.txt
@@ -0,0 +1,24 @@
+// Map: new_1-1
+// This is the Desert (Sandstorm) south of Tulimshar.
+//
+
+new_1-1.gat,0,0,0,0	monster	GreenSlime	1005,50,0,0,Mob1::OnGreenSlime
+new_1-1.gat,0,0,0,0	monster	GiantMaggot	1006,30,0,0,Mob1::OnGiantMaggot
+new_1-1.gat,0,0,0,0	monster	RedScorpion	1004,20,0,0,Mob1::OnRedScorpion
+
+new_1-1.gat,0,0,0	script	Mob1	-1,{
+OnGreenSlime:
+	set @mobID, 1005;
+	callfunc "MobPoints";
+	break;
+
+OnGiantMaggot:
+	set @mobID, 1006;
+	callfunc "MobPoints";
+	break;
+
+OnRedScorpion:
+	set @mobID, 1004;
+	callfunc "MobPoints";
+	break;
+}
diff --git a/npc/002-1_Sandstorm/nomads.txt b/npc/002-1_Sandstorm/nomads.txt
new file mode 100644
index 00000000..13edea35
--- /dev/null
+++ b/npc/002-1_Sandstorm/nomads.txt
@@ -0,0 +1,14 @@
+new_1-1.gat,15,67,0	script	Samuel	132,{
+	mes "[Samuel the Nomad]";
+	mes "\"This is really a nice place.\"";
+	
+	mes "Don't you think so?\"";
+	close;
+}
+
+new_1-1.gat,18,68,0	script	Elijah	128,{
+	mes "[Elijah the Nomad]";
+	mes "\"If I only had a tent...\"";
+	
+	close;
+}
diff --git a/npc/002-1_Sandstorm/rogue.txt b/npc/002-1_Sandstorm/rogue.txt
new file mode 100644
index 00000000..87ec45fa
--- /dev/null
+++ b/npc/002-1_Sandstorm/rogue.txt
@@ -0,0 +1,84 @@
+new_1-1.gat,22,21,0	script	Malivox	103,{
+
+//	if (ResetA_charstate == 1) goto L_Multiple;
+
+//	set @cost, 10000000 / ($ResetA_uses + 1);
+
+	set @cost, baselevel * 100;
+
+	mes "[Rogue Mage]";
+	mes "\"I have come across a spell that will";
+	mes "reset your status points.";
+	mes "Normally this spell is expensive, but";
+        mes "due to an unusual constellation of the";
+        mes "stars I can cast it very cheaply!";
+        mes "For you it will cost only "+@cost+" gp.\"";
+	next;
+
+	menu "Reset my stats",-,"Forget about it",L_Pass;
+
+	if (zeny<@cost) goto L_NoMoney;
+
+//	set $ResetA_uses, $ResetA_uses + 1;
+//	set ResetA_charstate, 1;
+
+L_Reset:
+
+	set zeny, zeny-@cost;
+
+	resetstatus;
+
+	// even though statusup2 takes a number, it does not
+	// decrease chars statspoint, hence the repeating.
+
+	statusup bStr;
+	statusup bStr;
+	statusup bStr;
+	statusup bStr;
+
+	statusup bvit;
+	statusup bvit;
+	statusup bvit;
+	statusup bvit;
+
+	statusup bInt;
+	statusup bInt;
+	statusup bInt;
+	statusup bInt;
+
+	statusup bAgi;
+	statusup bAgi;
+	statusup bAgi;
+	statusup bAgi;
+
+	statusup bDex;
+	statusup bDex;
+	statusup bDex;
+	statusup bDex;
+
+	statusup bLuk;
+	statusup bLuk;
+	statusup bLuk;
+	statusup bLuk;
+
+	mes "[Rogue Mage]";
+	mes "\"There you are.";
+	mes "";
+	mes "Good as new!\"";
+	next;
+	close;
+
+L_Pass:
+	mes "[Rogue Mage]";
+	mes "\"Very well then, see you.\"";
+	next;
+	close;
+
+L_NoMoney:
+	mes "[Rogue Mage]";
+	mes "\"Oh dear, the price cannot be bargained.";
+	mes "";
+	mes "Perhaps you can borrow from a friend?\"";
+	next;
+	close;
+}