Draft for AF King Arthur quest

1 files changed, 81 insertions, 0 deletions

diff --git a/npc/024-7/afking.txt b/npc/024-7/afking.txt
index 9ac836967..0060e05af 100644
--- a/npc/024-7/afking.txt
+++ b/npc/024-7/afking.txt
@@ -6,15 +6,96 @@
 //    AFK Cap quest (Lv 47)
 
 024-7,40,24,0	script	AF King	NPC_PLAYER,{
+	function AFPrologue;
+	function AFGrinding;
+	function AFKingGelid;
+	function AFItemList;
+	//function AF
+
 	if (BaseLevel < 47) {
 		npctalkonce l("*AFK: I am Away From Keyboard*");
 		end;
 	}
+	.@q=getq(FrostiaQuest_AFKCap);
+
+	switch (.@q) {
+	case 0: // Mission not started
+		mesn;
+		mesq l("I'm back, I'm here, I'm great! I am the AF King Arthur!");
+		next;
+		do {
+			mesn;
+			mesq l("But can I help you?");
+			next;
+			select
+				l("Good, I need to talk with the King."),
+				l("You have a nice hat."),
+				l("Do you know where I can level up?"),
+				l("Nothing, good bye!");
+			mes "";
+			switch (@menu) {
+			case 1:
+				AFKingGelid();
+			case 2:
+				AFPrologue();
+			case 3:
+				AFGrinding();
+			default:
+				close;
+			}
+		} while (true);
+		break;
+	case 1: // Mission accepted
+		break;
+	case 2: // Mission complete
+		break;
+	}
 
     closedialog;
     goodbye;
     close;
 
+function AFPrologue {
+	mesn;
+	mesq l("No one is more there than here than me! Look at my hat, it symbolizes that I am an useless player!");
+	next;
+	mesn;
+	mesq l("And if you listen to Tulimshar's Professor lecture wearing it, you'll gain more experience!");
+	next;
+	mesn;
+	mesq l("Basically, no one else disturbs me anymore when I'm busy snoring in class! ^.^");
+	next;
+	return;
+}
+
+function AFGrinding {
+	mesn;
+	mesq l("Uhh... Not really! I love to kill Yetis, but sometimes they are really shy!");
+	next;
+	mesn;
+	mesq l("They must be hiding in some cave... It's a shame!");
+	next;
+	return;
+}
+
+function AFKingGelid {
+	mesn;
+	mesq l("Uhm, I'm not the king of Frostia, I'm the king of all useless adventurers.");
+	next;
+	mesn;
+	mesq l("I just go out removing swords from rocks, and then throwing them again at the lake. All that while I drink coffee.");
+	next;
+	mesn;
+	mesq l("If you need to talk with King Gelid, he should be in the castle north here.");
+	next;
+	return;
+}
+
+function AFItemList {
+	mesc l("TODO"), 1;
+	return;
+}
+
 OnInit:
     .@npcId = getnpcid(.name$);
     setunitdata(.@npcId, UDT_HEADTOP, AFKCap);