/* /verbs/rooms/fly.c
* from the Dead Souls Mud Library
* Like go, except for flying around
* created by Descartes of Borg 961013
* Version: @(#) fly.c 1.2@(#)
* Last modified: 96/10/13
*/
#include <lib.h>
#include <medium.h>
#include <daemons.h>
#include <position.h>
#include "include/fly.h"
inherit LIB_VERB;
static void create(){
verb::create();
SetVerb("fly");
SetRules("", "STR", "into STR");
SetErrorMessage("Fly in which direction?");
SetHelp("Syntax: fly [DIRECTION]\n"
" fly into <PLACE>\n\n"
"Moves you towards the direction you specify, or into the place "
"you specify. The command \"fly into\" is synonymous with the "
"\"enter\" command.\n"
"See also: climb, enter, go, jump, swim");
}
int StaminaCost(){
int cost = 15;
int bonus = this_player()->GetStatLevel("durability")/10;
bonus += this_player()->GetStatLevel("coordination")/20;
bonus += this_player()->GetFood()/40;
bonus += this_player()->GetDrink()/40;
cost -= bonus;
if(cost < 1) cost = 1;
return cost;
}
mixed can_fly(){
object env = environment(this_player());
if( !env ){
return "You are nowhere to begin with!";
}
if(this_player()->GetPosition() == POSITION_FLYING)
return "You are already flying.";
if(env->CanFly(this_player())) return this_player()->CanFly();
return "You can't fly here.";
}
mixed can_fly_str(string str){
object env = environment(this_player());
int envpos = env->GetPosition();
if( !env ){
return "You are nowhere.";
}
if( this_player()->GetStaminaPoints() < 15 ){
return "You are too tired to fly anywhere right now.";
}
if(env->CanFly(this_player(), str)){
if(envpos == POSITION_FLYING) return 1;
return this_player()->CanFly();
}
if(this_player()->GetPosition() != POSITION_FLYING &&
envpos != POSITION_FLYING){
return "You are not flying.";
}
return 0;
}
mixed can_fly_into_str(string str){
object env = environment(this_player());
int envpos = env->GetPosition();
if( !env ){
return "You are nowhere.";
}
if( this_player()->GetStaminaPoints() < 3 )
return "You are too tired right now.";
if(environment(this_player())->CanEnter(this_player(), str)){
if(envpos == POSITION_FLYING) return 1;
return this_player()->CanFly();
}
if(this_player()->GetPosition() != POSITION_FLYING &&
envpos != POSITION_FLYING){
return "You are not flying.";
}
else return 0;
}
mixed do_fly(){
return this_player()->eventFly();
}
mixed do_fly_str(string str){
this_player()->AddStaminaPoints(-StaminaCost());
return environment(this_player())->eventGo(this_player(), str);
}
mixed do_fly_into_str(string str){
this_player()->AddStaminaPoints(-StaminaCost());
return environment(this_player())->eventEnter(this_player(), str);
}
