// TMW2 Script
// Author:
// Jesusalva
// Description:
// Professor - allows you to gain EXP for idling (Speech skill)
003-0-1,35,29,0 script Professor NPC_PLAYER,{
mesn;
mesq l("I've mastered the art of speech and communication.");
next;
mesn;
mesq l("Sit on the rug in front of me and learn wisdom! Maybe you'll learn something this way.");
if (AFKING)
mesc l("Thus far, you've heard about %d hours and %d minutes of wisdom.", AFKING/1200, AFKING%1200/60*3);
if (!TUTORIAL) close;
next;
mes ".:: AFK EXP AREA ::.";
mesc l("By sitting in the rug in front of the professor (the one with benches)");
mesc l("and \"listening\" to his speech, you'll get EXP!");
mes "";
mesc l("If you get too much exp this way, a skill will level up and you'll get even more!");
mesc l("But remember: %s", b(l("You cannot sit idle for too long gaining EXP!")));
mesc l("After about 30 minutes AFK, you won't get EXP anymore.");
mesc l("But don't worry, because as they say: The more you learn, the better you get at learning!");
mes "";
mesc l("In overall, you'll get more experience by fighting monsters.");
mesc l("But if you only want to sit down and chat, this area is ideal for you!");
close;
OnInit:
.@npcId = getnpcid(.name$);
setunitdata(.@npcId, UDT_HEADTOP, GraduationCap);
setunitdata(.@npcId, UDT_HEADMIDDLE, GraduationRobe);
setunitdata(.@npcId, UDT_HEADBOTTOM, DeepBlackBoots);
setunitdata(.@npcId, UDT_WEAPON, CottonGloves);
setunitdata(.@npcId, UDT_HAIRSTYLE, 2);
setunitdata(.@npcId, UDT_HAIRCOLOR, 4);
.sex=G_MALE;
.distance=5;
initnpctimer;
end;
OnTimer3100:
areatimer2("003-0-1", 29, 34, 41, 38, 10, .name$+"::OnSpeeching");
initnpctimer;
end;
OnSpeeching:
deltimer(.name$+"::OnSpeeching"); // safeguard
// Max AFK time is determined as 30 minutes + 1 second every 10 minutes AFKed
// Capped at 2 hours (you've AFK'ed 37 days and 12 hours - 900 hours)
.@maxafk=min(7200, 1800+(AFKING/600));
// If you have been IDLE for at least 2 seconds you'll get the EXP.
// Note you don't need to sit, only be idle.
if (is_between(2, .@maxafk, checkidle())) {
.@sk=getskilllv(TMW2_SPEECH);
.@bxp=1+.@sk;
.@jxp=1+(.@sk/2);
getexp .@bxp, .@jxp;
// If you are learning TMW2_READANCIENTLANGUAGES
if (ANCIENTLANGUAGEBOUNCER) {
ANCIENTLANGUAGEBOUNCER-=1;
if (ANCIENTLANGUAGEBOUNCER == 1) {
ANCIENTLANGUAGEBOUNCER=0;
skill TMW2_ANCIENTLANGUAGES, 1, 0;
dispbottom l("It was a boring speech, but you have learned ancient languages.");
}
}
// You're being annoying, now
// 1 hour, 1200 exp, enough from level 1 to level 10
AFKING+=1;
switch (AFKING) {
case 28800:
// 24 hours, 28,800 exp
.@x=1;
case 201600:
// +1 week, +403,200 exp
.@x=(AFKING >= 201600 ? 2 : 1);
case 864000:
// +1 month, +2,592,000 exp
.@x=(AFKING >= 864000 ? 3 : 2);
case 2592000:
// +3 months, +10,368,000 exp
.@x=(AFKING >= 2592000 ? 4 : 3);
// Note: In the needed time (~4 months) you should be over 90 if you
// were fighting instead...
skill(TMW2_SPEECH, .@x, 0);
AFKING+=1;
npctalk3 l("%s, you're a good student. You have a bright future if you keep listening to me.", strcharinfo(0));
dispbottom l("Learning from seeing (aka. AFK-ing) skill LEVEL UP!!");
break;
}
// There are no further upgrades to TMW2_SPEECH skill
// You'll need to get the AFK Set if you want to level from 4 to 10.
}
deltimer(.name$+"::OnSpeeching"); // safeguard
end;
}