Neuter Female Male> Name:
Aliases
Linedesc: Race: Demon Class: Lesser / - Gen:
Level: Align: Height: cm Weight: kg
Str: Int: Wis: Dex: Con: Cha:
Hitp: d + Mana: Move: AC:
Hitroll: Damroll: Speed: DR:
Gold: Cash:
Position: Sleeping Default Pos: Sleeping Attack: Claw
NPC Flags: Sentinel Scavenger Loot Noflow
Special: Postmaster Barehand dam: d Morale: Lair: Leader:
Voice: None Tongue speaking: Abyssal
Description: root 90 1 0 09:15 ? 00:00:00 sendmail: accepting connections
Prog: -- The first prog *after command whap *require keyword sendmail daemon demon speak abyssal wake yell HEY!!! *pause 1 slap $N *pause 4 >$N jerk! *pause 2 sleep -- Death stress test *after command > *require keyword sendmail daemon demon *require keyword die wake stand bow *pause 2 *damage self 30000 lightning bolt -- Ambience *handle idle *require randomly 1 *require randomly 1 *echo room A sendmail daemon murmurs sleepily, 'spam... spam...' -- oload tester *after command say ' *require keyword gimme *oload 51090 self max 5 wake stand drop all sleep -- giveexp tester *after command say ' *require keyword experience *giveexp 50000 *before dying wake ' You have slain me, evildoer! *oload 51095 self -- Prog vars *after command > sayto speak common -- Stop handling when they're not talking to daemon *unless alias mob 51089 *halt *resume -- Handle the question who is your friend with no friend *require keyword who *require keyword your *require keyword friend friend? *require variable friend >$N I don't have any friends. weep *halt *resume -- Handle the question 'who is your friend' with a friend *require keyword who *require keyword your *require keyword friend friend? *unless variable friend >$N My friend right now is $friend. smile *halt *resume -- Handle setting up the friend variable *require keyword I I'm *require not keyword not *require keyword your *require keyword friend friend. *set friend $N >$friend Ok, you're my friend *halt *resume -- Handle clearing the friend variable *require keyword I I'm *require keyword not *require keyword your *require keyword friend friend. *unless variable friend $N >$N I'm not your friend either. *halt *resume -- Handle clearing the friend variable *require keyword I I'm *require keyword not *require keyword your *require keyword friend friend. *require variable friend $N ' Now I'm all alone! sob $N *set friend *halt *resume -- Sayto from a friend *require variable friend $N agree $N *halt *resume -- Sayto from a non-friend >$N Huh? You're not my friend.