omega-rpg/movef.c

363 lines
11 KiB
C

/* omega copyright (C) by Laurence Raphael Brothers, 1987,1988,1989 */
/* movef.c */
/* the movefunctions switch functions, for player and monster*/
#include "glob.h"
void p_movefunction(int movef)
{
/* loc functs above traps should be activated whether levitating or not */
drawvision(Player.x,Player.y);
sign_print(Player.x,Player.y,FALSE);
if (Player.status[SHADOWFORM])
switch(movef) { /* player in shadow form is unable to do most things */
case L_CHAOS:l_chaos(); break;
case L_ABYSS:l_abyss(); break;
case L_ARENA_EXIT:l_arena_exit(); break;
case L_ENTER_COURT:l_enter_court(); break;
case L_ESCALATOR:l_escalator(); break;
case L_COLLEGE:l_college(); break;
case L_SORCERORS:l_sorcerors(); break;
case L_ALTAR:l_altar(); break;
case L_TACTICAL_EXIT:l_tactical_exit(); break;
case L_HOUSE_EXIT:l_house_exit(); break;
case L_HOUSE: l_house(); break;
case L_HOVEL: l_hovel(); break;
case L_MANSION: l_mansion(); break;
case L_COUNTRYSIDE:l_countryside(); break;
case L_ORACLE:l_oracle(); break;
case L_TEMPLE_WARNING:l_temple_warning(); break;
case L_ENTER_CIRCLE:l_enter_circle(); break;
case L_CIRCLE_LIBRARY:l_circle_library(); break;
case L_TOME1: l_tome1(); break;
case L_TOME2: l_tome2(); break;
case L_ADEPT:l_adept(); break;
case L_VOICE1:l_voice1();break;
case L_VOICE2:l_voice2();break;
case L_VOICE3:l_voice3();break;
case L_VOID:l_void();break;
case L_FIRE_STATION:l_fire_station();break;
case L_EARTH_STATION:l_earth_station();break;
case L_WATER_STATION:l_water_station();break;
case L_AIR_STATION:l_air_station();break;
case L_VOID_STATION:l_void_station();break;
}
else if ((! Player.status[LEVITATING]) ||
gamestatusp(MOUNTED) ||
(Cmd == '@') || /* @ command activates all effects under player */
(movef < LEVITATION_AVOIDANCE)) {
if (movef != L_NO_OP) {
resetgamestatus(FAST_MOVE);
dataprint();
}
switch(movef) {
/* miscellaneous */
case L_NO_OP:l_no_op(); break;
case L_HEDGE:l_hedge(); break;
case L_WATER:l_water(); break;
case L_LIFT:l_lift(); break;
case L_LAVA:l_lava(); break;
case L_FIRE:l_fire(); break;
case L_WHIRLWIND:l_whirlwind(); break;
case L_RUBBLE:l_rubble(); break;
case L_MAGIC_POOL:l_magic_pool(); break;
case L_CHAOS:l_chaos(); break;
case L_ABYSS:l_abyss(); break;
case L_PORTCULLIS_TRAP:l_portcullis_trap(); break;
case L_RAISE_PORTCULLIS:l_raise_portcullis(); break;
case L_DROP_EVERY_PORTCULLIS:l_drop_every_portcullis(); break;
case L_ARENA_EXIT:l_arena_exit(); break;
case L_TRIFID:l_trifid(); break;
case L_ENTER_COURT:l_enter_court(); break;
case L_ESCALATOR:l_escalator(); break;
case L_THRONE:l_throne(); break;
case L_TRAP_DART:l_trap_dart(); break;
case L_TRAP_SIREN:l_trap_siren(); break;
case L_TRAP_PIT:l_trap_pit(); break;
case L_TRAP_DOOR:l_trap_door(); break;
case L_TRAP_SNARE:l_trap_snare(); break;
case L_TRAP_BLADE:l_trap_blade(); break;
case L_TRAP_FIRE:l_trap_fire(); break;
case L_TRAP_TELEPORT:l_trap_teleport(); break;
case L_TRAP_DISINTEGRATE:l_trap_disintegrate(); break;
case L_TRAP_SLEEP_GAS:l_trap_sleepgas(); break;
case L_TRAP_MANADRAIN:l_trap_manadrain(); break;
case L_TRAP_ACID:l_trap_acid(); break;
case L_TRAP_ABYSS:l_trap_abyss(); break;
/*door functions */
case L_BANK:l_bank(); break;
case L_ARMORER:l_armorer(); break;
case L_CLUB:l_club(); break;
case L_GYM:l_gym(); break;
case L_BROTHEL:l_brothel(); break;
case L_THIEVES_GUILD:l_thieves_guild(); break;
case L_COLLEGE:l_college(); break;
case L_HEALER:l_healer(); break;
case L_STATUE_WAKE:l_statue_wake(); break;
case L_CASINO:l_casino(); break;
case L_COMMANDANT:l_commandant(); break;
case L_DINER:l_diner(); break;
case L_CRAP:l_crap(); break;
case L_TAVERN:l_tavern(); break;
case L_MERC_GUILD:l_merc_guild(); break;
#ifdef INCLUDE_MONKS
case L_MONASTERY:l_monastery(); break;
#endif
case L_ALCHEMIST:l_alchemist(); break;
case L_SORCERORS:l_sorcerors(); break;
case L_CASTLE:l_castle(); break;
case L_ARENA:l_arena(); break;
case L_VAULT:l_vault(); break;
case L_DPW:l_dpw(); break;
case L_LIBRARY:l_library(); break;
case L_PAWN_SHOP:l_pawn_shop(); break;
case L_CONDO:l_condo(); break;
case L_TOURIST:l_tourist(); break;
case L_ALTAR:l_altar(); break;
case L_TACTICAL_EXIT:l_tactical_exit(); break;
case L_HOUSE_EXIT:l_house_exit(); break;
case L_SAFE: l_safe(); break;
case L_HOUSE: l_house(); break;
case L_HOVEL: l_hovel(); break;
case L_MANSION: l_mansion(); break;
case L_COUNTRYSIDE:l_countryside(); break;
case L_ORACLE:l_oracle(); break;
case L_ORDER:l_order(); break;
case L_CARTOGRAPHER:l_cartographer(); break;
case L_TEMPLE_WARNING:l_temple_warning(); break;
case L_ENTER_CIRCLE:l_enter_circle(); break;
case L_CIRCLE_LIBRARY:l_circle_library(); break;
case L_TOME1: l_tome1(); break;
case L_TOME2: l_tome2(); break;
case L_CHARITY: l_charity(); break;
case L_CHAOSTONE:l_chaostone();break;
case L_VOIDSTONE:l_voidstone();break;
case L_BALANCESTONE:l_balancestone();break;
case L_LAWSTONE:l_lawstone();break;
case L_SACRIFICESTONE:l_sacrificestone(); break;
case L_MINDSTONE:l_mindstone(); break;
/* challenge functions */
case L_ADEPT:l_adept(); break;
case L_VOICE1:l_voice1();break;
case L_VOICE2:l_voice2();break;
case L_VOICE3:l_voice3();break;
case L_VOID:l_void();break;
case L_FIRE_STATION:l_fire_station();break;
case L_EARTH_STATION:l_earth_station();break;
case L_WATER_STATION:l_water_station();break;
case L_AIR_STATION:l_air_station();break;
case L_VOID_STATION:l_void_station();break;
}
}
}
/* execute some move function for a monster */
void m_movefunction(pmt m, int movef)
{
/* loc functs above traps should be activated whether levitating or not */
if (! m_statusp(m,FLYING) && ! m_statusp(m, INTANGIBLE))
switch(movef) {
/* miscellaneous */
case L_NO_OP:m_no_op(m); break;
case L_WATER:m_water(m); break;
case L_LAVA:m_lava(m); break;
case L_FIRE:m_fire(m); break;
case L_MAGIC_POOL:m_water(m); break;
case L_ABYSS: m_abyss(m); break;
case L_TRAP_DART:m_trap_dart(m); break;
case L_TRAP_PIT:m_trap_pit(m); break;
case L_TRAP_DOOR:m_trap_door(m); break;
case L_TRAP_SNARE:m_trap_snare(m); break;
case L_TRAP_BLADE:m_trap_blade(m); break;
case L_TRAP_FIRE:m_trap_fire(m); break;
case L_TRAP_TELEPORT:m_trap_teleport(m); break;
case L_TRAP_DISINTEGRATE:m_trap_disintegrate(m); break;
case L_TRAP_MANADRAIN:m_trap_manadrain(m); break;
case L_TRAP_SLEEP_GAS:m_trap_sleepgas(m); break;
case L_TRAP_ACID:m_trap_acid(m); break;
case L_TRAP_ABYSS:m_trap_abyss(m);break;
case L_ALTAR:m_altar(m); break;
}
}
#ifdef MSDOS_SUPPORTED_ANTIQUE
/* ****Moved here from another file**** */
/* if signp is true, always print message, otherwise do so only sometimes */
void sign_print(int x, int y, int signp)
{
if ((Level->site[x][y].p_locf >= CITYSITEBASE) &&
(Level->site[x][y].p_locf < CITYSITEBASE+NUMCITYSITES))
CitySiteList[Level->site[x][y].p_locf - CITYSITEBASE][0] = TRUE;
switch(Level->site[x][y].p_locf) {
case L_CHARITY:
print1("You notice a sign: The Rampart Orphanage And Hospice For The Needy.");
break;
case L_MANSION:
print1("You notice a sign:");
print2("This edifice protected by DeathWatch Devices, Ltd.");
morewait();
break;
case L_GRANARY:
print1("You notice a sign:");
print2("Public Granary: Entrance Strictly Forbidden.");
break;
case L_PORTCULLIS:
if (Level->site[x][y].locchar == FLOOR)
print1("You see a groove in the floor and slots above you.");
break;
case L_STABLES:
print1("You notice a sign:");
print2("Village Stables");
break;
case L_COMMONS:
print1("You notice a sign:");
print2("Village Commons: No wolves allowed.");
break;
case L_MAZE:
print1("You notice a sign:");
print2("Hedge maze closed for trifid extermination.");
break;
case L_BANK:
if (signp) {
print1("You notice a sign:");
print2("First Bank of Omega: Autoteller Carrel.");
}
break;
case L_TEMPLE:
print1("You see the ornate portico of the Rampart Pantheon");
break;
case L_ARMORER:
if (signp) {
print1("You notice a sign:");
print2("Julie's Armor of Proof and Weapons of Quality");
}
break;
case L_CLUB:
if (signp) {
print1("You notice a sign:");
print2("Rampart Explorers' Club.");
}
break;
case L_GYM:
if (signp) {
print1("You notice a sign:");
print2("The Rampart Gymnasium, (affil. Rampart Coliseum).");
}
break;
case L_HEALER:
if (signp) {
print1("You notice a sign:");
print2("Rampart Healers. Member RMA.");
}
break;
case L_CASINO:
if (signp) {
print1("You notice a sign:");
print2("Rampart Mithril Nugget Casino.");
}
break;
case L_SEWER:
print1("A sewer entrance. You don't want to go down THERE, do you?");
break;
case L_COMMANDANT:
if (signp) {
print1("You notice a sign:");
print2("Commandant Sonder's Rampart-fried Lyzzard partes. Open 24 hrs.");
}
break;
case L_DINER:
if (signp) {
print1("You notice a sign:");
print2("The Rampart Diner. All you can eat, 25Au.");
}
break;
case L_CRAP:
if (signp) {
print1("You notice a sign:");
print2("Les Crapeuleaux. (****)");
}
break;
case L_TAVERN:
if (signp) {
print1("You notice a sign:");
print2("The Centaur and Nymph -- J. Riley, prop.");
}
break;
case L_ALCHEMIST:
if (signp) {
print1("You notice a sign:");
print2("Ambrosias' Potions et cie.");
}
break;
case L_DPW:
if (signp) {
print1("You notice a sign:");
print2("Rampart Department of Public Works.");
}
break;
case L_LIBRARY:
if (signp) {
print1("You notice a sign:");
print2("Rampart Public Library.");
}
break;
case L_CONDO:
if (signp) {
print1("You notice a sign:");
if (gamestatusp(SOLD_CONDO))
print2("Home Sweet Home");
else print2("Luxury Condominium For Sale; Inquire Within");
}
break;
case L_PAWN_SHOP:
if (signp) {
print1("You notice a sign:");
print2("Knight's Pawn Shop.");
}
break;
case L_CEMETARY:
print1("You notice a sign:");
print2("Rampart City Cemetary. Closed -- Full.");
break;
case L_GARDEN:
print1("You notice a sign:");
print2("Rampart Botanical Gardens---Do not deface statues.");
break;
case L_JAIL:
print1("You notice a sign:");
print2("Rampart City Gaol -- always room for more.");
break;
#ifdef INCLUDE_MONKS
case L_MONASTERY:
print1("You notice a sign:");
print2("Tholian Monastery. Truthseekers Welcome.");
break;
#endif
case L_ORACLE:
print1("You notice a sign:");
print2("The Oracle of the Cyan Flames");
morewait();
break;
case L_PAWN_SHOP:
if (signp) {
print1("You notice a sign:");
print2("Knight's Pawn Shop.");
}
break;
}
}
#endif