crodo_mud/cnf/
crodo_mud/lib/
crodo_mud/lib/house/
crodo_mud/lib/misc/
crodo_mud/lib/plralias/F-J/
crodo_mud/lib/plralias/U-Z/
crodo_mud/lib/plrobjs/
crodo_mud/lib/plrvars/A-E/
crodo_mud/lib/plrvars/F-J/
crodo_mud/lib/plrvars/K-O/
crodo_mud/lib/plrvars/P-T/
crodo_mud/lib/plrvars/U-Z/
crodo_mud/lib/text/
crodo_mud/lib/text/help/
crodo_mud/lib/world/
crodo_mud/src/
#1200
Check OnQuest~
0 g 100
~
* If it's an npc, exit immediatly.
if (%actor.vnum% != -1)
 hault
* Ok he's not a pc test for quest 1
elseif (%actor.quest(1)% == 0) 
say I am not fancy enough to have a real complicated and neat
say way to initiate this quest.  So I'll just add you to it
say now since your quest(thisquest) flag is a 0!
wait 10
mecho %self.name% waves his hands in the air!
mquest %actor% 1 1
say Ok now go see the postmaster!
hault
* Why ain't you done it yet?
elseif (%actor.quest(1)% == 1) 
say Go see the postmaster to complete the quest scurvy dog!
say %actor.name% you are an idiot.  Maybe I'll get someone else!
hault
end
~
#1201
Go get quest~
0 g 100
~
* If it's an npc, exit immediatly.
if (%actor.vnum% != -1)
 hault
* If not on the quest tell them to go get it
elseif (%actor.quest(1)% == 0)
say Go see the innkeeper for the quest!
hault
* If they allready are on the quest complete it.
elseif (%actor.quest(1)% == 1)
say Normally, you would have to do something a bit more fancy
say for this code to execute, but since this is just an example
say I'll complete the quest for you now!
wait 10
mecho %self.name% waves his hands in the air over your head and mumbles.
say Ok you're all done there sonny.
mquest %actor% 1 -1
hault
end
~
#1202
Temp - Player Drops Cash~
1 b 80
~
eval actor %self.worn_by%
if !%actor.HasFixedGold%
  eval HasFixedGold 1
  remote HasFixedGold %actor.id%
  %send% %actor% Oops! You fumble your cash!
  %echoaround% %actor% %actor.name% displays impressive lack of dexterity.
  %force% %actor% drop all.coins
end
~
#1203
new trigger~
0 g 100
~
say trigger active
halt_detach 1203 %self.id%
say after trigger BUG
~
#1204
Player Filter~
2 c 100
n~
if %cmd.mudcommand% != north
return 0
halt
end if
if %actor.vnum% > -1
    %echoaroundc% %actor% %actor.name% is absorbed by the light.
    %send% %actor% You step into the light.
    %teleport% %actor.name% 1204
    return 1
    halt
else
    %echoaroundc% %actor% %actor.name% steps north towards the light and is zapped.
    %send% %actor% |wYou step towards the light and are zapped.|n
    %echo% The light gets brighter.
    wait 2s
    %echo% The light grows dim again.
    return 1
    halt
end
~
$~