/* Wealth.c, created by Fudge - Mon Feb 23 14:15:30 1998 */ void main( string str ) { int i; int ducats; int royals; int crowns; mixed *money; money = this_player()->query_all_coins(); if( sizeof( money ) == 0 ) { this_player()->write( "You are broke." ); return; } for( i = 0; i < sizeof( money ); i++ ) { switch( money[i][0] ) { case "ducat" : ducats = money[i][1]; break; case "royal" : royals = money[i][1]; break; case "crown" : crowns = money[i][1]; break; default: break; } } write( "Ducats: " + ducats ); write( "Royals: " + royals ); write( "Crowns: " + crowns ); }