/* -*- LPC -*- */ /* * $Locker: $ * $Id: rituals.c,v 1.1 1998/01/06 05:29:43 ceres Exp $ * $Log: rituals.c,v $ * Revision 1.1 1998/01/06 05:29:43 ceres * Initial revision * */ #include <spells.h> inherit "/cmds/base"; int cmd( string words ) { string spell, *religious; mapping spells; spells = this_player()->query_spells(); if ( !sizeof( spells ) ) { write( "You don't know any religious rituals.\n" ); return 1; } religious = ({ }); foreach ( spell in keys( spells ) ) { if ( sscanf( spells[ spell ][ 0 ], "%*spriest%*s" ) == 2 ) { religious += ({ spell }); continue; } if ( sscanf( spells[ spell ][ 0 ], "%*srituals%*s" ) == 2 ) { religious += ({ spell }); continue; } if ( sscanf( spells[ spell ][ 0 ], "%*swizard%*s" ) == 2 ) continue; if ( sscanf( spells[ spell ][ 0 ], "%*switch%*s" ) == 2 ) continue; if ( sscanf( spells[ spell ][ 0 ], "%*sspell%*s" ) == 2 ) continue; } if ( !sizeof( religious ) ) { write( "You don't know any religious rituals.\n" ); return 1; } if ( sizeof( religious ) ) { write( "You know the following religious ritual"+ ( sizeof( religious ) == 1 ? "" : "s" ) +":\n" ); printf( "%#-*s\n", (int)this_player()->query_cols(), implode( sort_array( religious, 1 ), "\n" ) ); } return 1; } /* cmd() */