samplv1_programs::Bank *samplv1_programs::add_bank ( uint16_t bank_id, const QString& bank_name ) { Bank *bank = find_bank(bank_id); if (bank) { bank->set_name(bank_name); } else { bank = new Bank(bank_id, bank_name); m_banks.insert(bank_id, bank); } return bank; }
void do_balance( CHAR_DATA *ch, char *argument ) { BANK_DATA *bank; CHAR_DATA *banker; char buf[MAX_STRING_LENGTH]; if ( !( banker = find_banker( ch ) ) ) { send_to_char( "You're not in a bank!\r\n", ch ); return; } if ( IS_NPC( ch ) ) { snprintf( buf, MSL, "say Sorry, %s, we don't do business with mobs.", ch->name ); interpret( banker, buf ); return; } if ( ch->pcdata->bank == NULL ) { send_to_char( "You don't have any bank account open now.\r\n", ch ); return; } /* * Just to make sure that we are retrieving the latest bank info, not relying on the * stale bank info in pcdata struct */ bank = find_bank( ch->pcdata->bank->name ); if ( !bank ) { send_to_char( "There is no account by that name!\r\n", ch ); return; } ch_printf( ch, "&CFor the %s bank account the following funds are available:\r\n", bank->name ); ch_printf( ch, "&YThere is %d gold.\r\n", bank->gold ); ch_printf( ch, "&YThere is %d silver.\r\n", bank->silver ); ch_printf( ch, "&YThere is %d bronze.\r\n", bank->bronze ); ch_printf( ch, "&YThere is %d copper.\r\n", bank->copper ); }
void do_bankinfo( CHAR_DATA *ch, char *argument ) { BANK_DATA *bank; char arg1[MAX_INPUT_LENGTH]; char arg2[MAX_INPUT_LENGTH]; if ( IS_NPC( ch ) ) return; if ( !argument || argument[0] == '\0' ) { send_to_char( "Syntax: bankinfo all/old\r\nSyntax: bankinfo [name]\r\n", ch ); return; } argument = one_argument( argument, arg1 ); argument = one_argument( argument, arg2 ); if ( !str_cmp( arg1, "all" ) ) { int iHash; int counter = 0; BANK_DATA *bank; for ( iHash = 0; iHash < 27; iHash++ ) { for ( bank = bank_index[iHash]; bank; bank = bank->next ) { counter++; ch_printf( ch, "%d. %s %s\r\n", counter, bank->lastused == 0 ? "Never" : c_time( bank->lastused, -1 ), bank->name ); } } return; } else if ( !str_cmp( arg1, "old" ) ) { int iHash, counter = 0, days; BANK_DATA *bank; for ( iHash = 0; iHash < 27; iHash++ ) { for ( bank = bank_index[iHash]; bank; bank = bank->next ) { if ( !bank->lastused ) days = 0; else { days = ( ( current_time - bank->lastused ) / 86400 ); if ( days < 30 ) continue; } ch_printf( ch, "%d. %s %s\r\n", ++counter, days == 0 ? "Never" : c_time( bank->lastused, -1 ), bank->name ); } } if ( counter == 0 ) send_to_char( "All banks have been used in the last 30 days.\r\n", ch ); return; } bank = find_bank( arg1 ); if ( !bank ) { send_to_char( "There is no account with that name!\r\n", ch ); return; } ch_printf( ch, "Name: %s\r\nPassword: %s\r\nLastUsed: %d\r\nBalance: %d\r\n", bank->name, bank->password, c_time( bank->lastused, -1 ), bank->amount ); }
void do_bankedit( CHAR_DATA *ch, char *argument ) { BANK_DATA *bank; int type = DEFAULT_CURR; char arg1[MAX_INPUT_LENGTH]; char arg2[MAX_INPUT_LENGTH]; char arg3[MAX_INPUT_LENGTH]; char arg4[MIL]; char arg5[MSL]; int amount; if ( IS_NPC( ch ) ) { return; } if ( argument[0] == '\0' ) { send_to_char ( "Syntax:\tbankedit [delete/password/amount] [name] [new password or amount] [currency] [add/subtract]\r\n", ch ); return; } argument = one_argument( argument, arg1 ); argument = one_argument( argument, arg2 ); bank = find_bank( arg2 ); if ( !bank ) { send_to_char( "There is no account with that name!\r\n", ch ); return; } if ( !str_cmp( arg1, "delete" ) ) { ch_printf( ch, "Deleting... (%s)\r\n", bank->name ); free_bank_to_chars( bank ); unlink_bank( bank ); free_bank( bank ); save_bank( ); send_to_char( "The account has successfully been deleted.\r\n", ch ); return; } argument = one_argument( argument, arg3 ); if ( !str_cmp( arg1, "password" ) ) { char *pwdnew, *p; if ( arg3 == '\0' ) { send_to_char( "You have to have something for a password.\r\n", ch ); return; } if ( strlen( arg3 ) < 5 ) { send_to_char( "Invalid Password. Must be at least 5 characters in length.\r\n", ch ); return; } if ( arg3[0] == '!' ) { send_to_char( "Password cannot begin with the '!' character.\r\n", ch ); return; } pwdnew = crypt( arg3, bank->name ); for ( p = pwdnew; *p != '\0'; p++ ) { if ( *p == '~' ) { send_to_char( "Password not acceptable, try again.\r\n", ch ); return; } } STRFREE( bank->password ); bank->password = STRALLOC( pwdnew ); bank->lastused = current_time; save_bank( ); ch_printf( ch, "The password has been changed to %s.\r\n", arg3 ); return; } argument = one_argument( argument, arg4 ); if ( !str_cmp( arg1, "amount" ) ) { amount = atoi( arg3 ); if ( arg3 && arg4 ) type = get_currency_type( arg4 ); if ( amount < 0 ) { send_to_char( "A positive value please.\r\n", ch ); return; } if ( !str_cmp( arg5, "add" ) ) { if ( type == CURR_BRONZE ) { bank->bronze += amount; } if ( type == CURR_COPPER ) { bank->copper += amount; } if ( type == CURR_GOLD ) { bank->gold += amount; } if ( type == CURR_SILVER ) { bank->silver += amount; } } if ( !str_cmp( arg5, "subtract" ) ) { if ( type == CURR_BRONZE ) { bank->bronze -= amount; } if ( type == CURR_COPPER ) { bank->copper -= amount; } if ( type == CURR_GOLD ) { bank->gold -= amount; } if ( type == CURR_SILVER ) { bank->silver -= amount; } } bank->lastused = current_time; save_bank( ); ch_printf( ch, "The amount has been changed to %d.\r\n", bank->amount ); return; } }
void do_send( CHAR_DATA *ch, char *argument ) { BANK_DATA *bank; BANK_DATA *victim_bank; CHAR_DATA *banker; char buf[MAX_STRING_LENGTH]; int type = DEFAULT_CURR; int amount = 0; char arg1[MAX_INPUT_LENGTH]; char arg2[MAX_INPUT_LENGTH]; char arg3[MAX_INPUT_LENGTH]; if ( !( banker = find_banker( ch ) ) ) { send_to_char( "You're not in a bank!\r\n", ch ); return; } if ( IS_NPC( ch ) ) { snprintf( buf, MSL, "say Sorry, %s, we don't do business with mobs.", ch->name ); interpret( banker, buf ); return; } if ( argument[0] == '\0' ) { send_to_char( "Syntax: send [amount] [currency] [destination account]\r\n\r\n", ch ); interpret( banker, ( char * ) "say if you need help type &WHELP BANK&D." ); return; } if ( ch->pcdata->bank == NULL ) { send_to_char( "You don't have any bank account open now.\r\n", ch ); return; } /* * Just to make sure that we are retrieving the latest bank info,not relying on the * stale bank info in pcdata struct */ bank = find_bank( ch->pcdata->bank->name ); if ( !bank ) { send_to_char( "There is no account by that name!\r\n", ch ); return; } argument = one_argument( argument, arg1 ); argument = one_argument( argument, arg2 ); argument = one_argument( argument, arg3 ); if ( !str_cmp( arg1, "all" ) ) { amount = -1; } else if ( !is_number( arg1 ) ) { send_to_char( "You can only withdraw coins.\r\n", ch ); return; } else { amount = atoi( arg1 ); } if ( arg1 && arg2 ) type = get_currency_type( arg2 ); if ( type == CURR_NONE ) { send_to_char( "You don't have any of that kind of coin.\r\n", ch ); return; } if ( amount <= 0 ) { send_to_char( "You can't do that.\r\n", ch ); return; } victim_bank = find_bank( arg3 ); if ( !victim_bank ) { sprintf( buf, "%s There is no account by that name here.", ch->name ); do_tell( banker, buf ); return; } if ( type == CURR_BRONZE ) { if ( amount > bank->bronze ) { ch_printf( ch, "You don't have that much %s in the bank.\r\n", curr_types[type] ); return; } bank->bronze -= amount; victim_bank->bronze += amount; } else if ( type == CURR_COPPER ) { if ( amount > bank->copper ) { ch_printf( ch, "You don't have that much %s in the bank.\r\n", curr_types[type] ); return; } bank->copper -= amount; victim_bank->copper += amount; } else if ( type == CURR_GOLD ) { if ( amount > bank->gold ) { ch_printf( ch, "You don't have that much %s in the bank.\r\n", curr_types[type] ); return; } bank->gold -= amount; victim_bank->gold += amount; } else if ( type == CURR_SILVER ) { if ( amount > bank->silver ) { ch_printf( ch, "You don't have that much %s in the bank.\r\n", curr_types[type] ); return; } bank->silver -= amount; victim_bank->silver += amount; } ch_printf( ch, "You send %d %s coins from your account to theirs.\r\n", amount, curr_types[type] ); bank->lastused = current_time; save_bank( ); return; }
void do_withdraw( CHAR_DATA *ch, char *argument ) { BANK_DATA *bank; CHAR_DATA *banker; char arg1[MAX_INPUT_LENGTH]; char arg2[MAX_INPUT_LENGTH]; char buf[MAX_STRING_LENGTH]; int type = DEFAULT_CURR; int amount = 0; /* * arg1 == amount * arg2 == currency */ if ( !( banker = find_banker( ch ) ) ) { send_to_char( "You're not in a bank!\r\n", ch ); return; } if ( IS_NPC( ch ) ) { snprintf( buf, MSL, "say Sorry, %s, we don't do business with mobs.", ch->name ); interpret( banker, buf ); return; } if ( argument[0] == '\0' ) { send_to_char( "Syntax: withdraw [amount] [currency]\n", ch ); interpret( banker, ( char * ) "say if you need help type &WHELP BANK&D." ); return; } if ( ch->pcdata->bank == NULL ) { send_to_char( "You don't have any bank account open now.\r\n", ch ); return; } /* * Just to make sure that we are retrieving the latest bank info, not relying on the * stale bank info in pcdata struct */ bank = find_bank( ch->pcdata->bank->name ); if ( !bank ) { send_to_char( "There is no account by that name!\r\n", ch ); return; } argument = one_argument( argument, arg1 ); argument = one_argument( argument, arg2 ); if ( !str_cmp( arg1, "all" ) ) { amount = -1; } else if ( !is_number( arg1 ) ) { send_to_char( "You can only withdraw coins.\r\n", ch ); return; } else { amount = atoi( arg1 ); } if ( arg1 && arg2 ) type = get_currency_type( arg2 ); if ( type == CURR_NONE ) { send_to_char( "You don't have any of that kind of coin.\r\n", ch ); return; } if ( amount <= 0 ) { send_to_char( "You can't do that.\r\n", ch ); return; } if ( money_weight( amount, type ) + ch->carry_weight >= can_carry_w( ch ) ) { send_to_char( "You can't carry that much.\r\n", ch ); return; } if ( type == CURR_BRONZE ) { if ( amount > bank->bronze ) { ch_printf( ch, "You don't have that much %s in the bank.\r\n", curr_types[type] ); return; } bank->bronze -= amount; ch_printf( ch, "This brings your account bronze balance to %d.\r\n", bank->bronze ); } else if ( type == CURR_COPPER ) { if ( amount > bank->copper ) { ch_printf( ch, "You don't have that much %s in the bank.\r\n", curr_types[type] ); return; } bank->copper -= amount; ch_printf( ch, "This brings your account copper balance to %d.\r\n", bank->copper ); } else if ( type == CURR_GOLD ) { if ( amount > bank->gold ) { ch_printf( ch, "You don't have that much %s in the bank.\r\n", curr_types[type] ); return; } bank->gold -= amount; ch_printf( ch, "This brings your account gold balance to %d.\r\n", bank->gold ); } else if ( type == CURR_SILVER ) { if ( amount > bank->silver ) { ch_printf( ch, "You don't have that much %s in the bank.\r\n", curr_types[type] ); return; } bank->silver -= amount; ch_printf( ch, "This brings your account silver balance to %d.\r\n", bank->silver ); } else { send_to_char( "No such currency.\r\n", ch ); return; } GET_MONEY( ch, type ) += amount; ch_printf( ch, "You took %d %s coins from the bank.\r\n", amount, curr_types[type] ); bank->lastused = current_time; save_bank( ); save_char_obj( ch ); return; }
void do_deposit( CHAR_DATA *ch, char *argument ) { BANK_DATA *bank; CHAR_DATA *banker; char arg1[MAX_INPUT_LENGTH]; char arg2[MAX_INPUT_LENGTH]; char buf[MAX_STRING_LENGTH]; int type = DEFAULT_CURR; int amount = 0, x; bool dall = FALSE, ssave = FALSE; /* * arg1 == amount * arg2 == currency */ if ( !( banker = find_banker( ch ) ) ) { send_to_char( "You're not in a bank!\r\n", ch ); return; } if ( IS_NPC( ch ) ) { snprintf( buf, MSL, "say Sorry, %s, we don't do business with mobs.", ch->name ); interpret( banker, buf ); return; } if ( !argument || argument[0] == '\0' ) { send_to_char( "Syntax: deposit [amount] [currency]\n", ch ); interpret( banker, ( char * ) "say if you need help type &WHELP BANK&D." ); return; } if ( !ch->pcdata->bank ) { send_to_char( "You don't have any bank account open now.\r\n", ch ); return; } /* * Just to make sure that we are retrieving the latest bank info, not relying on the * stale bank info in pcdata struct */ bank = find_bank( ch->pcdata->bank->name ); if ( !bank ) { send_to_char( "There is no account by that name!\r\n", ch ); return; } argument = one_argument( argument, arg1 ); argument = one_argument( argument, arg2 ); if ( arg1 && !str_cmp( arg1, "all" ) ) dall = TRUE; if ( dall && ( !arg2 || arg2[0] == '\0' ) ) { for ( x = 0; x < MAX_CURR_TYPE; x++ ) { if ( GET_MONEY( ch, x ) > 0 ) { ssave = TRUE; amount = GET_MONEY( ch, x ); GET_MONEY( ch, x ) -= amount; ch_printf( ch, "You put %d %s coins in the bank.\r\n", amount, curr_types[x] ); if ( x == CURR_BRONZE ) { bank->bronze += amount; ch_printf( ch, "This brings your account's bronze balance to %d.\r\n", bank->bronze ); } else if ( x == CURR_COPPER ) { bank->copper += amount; ch_printf( ch, "This brings your account's copper balance to %d.\r\n", bank->copper ); } else if ( x == CURR_GOLD ) { bank->gold += amount; ch_printf( ch, "This brings your account's gold balance to %d.\r\n", bank->gold ); } else if ( x == CURR_SILVER ) { bank->silver += amount; ch_printf( ch, "This brings your account's silver balance to %d.\r\n", bank->silver ); } } } if ( ssave ) { save_char_obj( ch ); bank->lastused = current_time; save_bank( ); } return; } if ( !dall && !is_number( arg1 ) ) { send_to_char( "How much do you wish to deposit.\r\n", ch ); return; } if ( !dall ) amount = atoi( arg1 ); if ( arg2 ) type = get_currency_type( arg2 ); if ( dall ) amount = GET_MONEY( ch, type ); if ( amount <= 0 ) { send_to_char( "You can't do that.\r\n", ch ); return; } if ( amount > GET_MONEY( ch, type ) ) { send_to_char( "You don't have that much.\r\n", ch ); return; } if ( type != CURR_BRONZE && type != CURR_COPPER && type != CURR_GOLD && type != CURR_SILVER ) { send_to_char( "No such currency.\r\n", ch ); return; } GET_MONEY( ch, type ) -= amount; ch_printf( ch, "You put %d %s coins in the bank.\r\n", amount, curr_types[type] ); if ( type == CURR_BRONZE ) { bank->bronze += amount; ch_printf( ch, "This brings your account's bronze balance to %d.\r\n", bank->bronze ); } else if ( type == CURR_COPPER ) { bank->copper += amount; ch_printf( ch, "This brings your account's copper balance to %d.\r\n", bank->copper ); } else if ( type == CURR_GOLD ) { bank->gold += amount; ch_printf( ch, "This brings your account's gold balance to %d.\r\n", bank->gold ); } else if ( type == CURR_SILVER ) { bank->silver += amount; ch_printf( ch, "This brings your account's silver balance to %d.\r\n", bank->silver ); } save_char_obj( ch ); bank->lastused = current_time; save_bank( ); }
void do_account( CHAR_DATA *ch, char *argument ) { BANK_DATA *bank; CHAR_DATA *banker; char arg1[MAX_INPUT_LENGTH]; char arg2[MAX_INPUT_LENGTH]; char arg3[MAX_INPUT_LENGTH]; char buf[MSL], *pwdnew, *p; int currtime = time( 0 ); /* * arg1 == account name * arg2 == password (if none, close it) */ if ( !( banker = find_banker( ch ) ) ) { send_to_char( "You're not in a bank!\r\n", ch ); return; } if ( IS_NPC( ch ) || IS_IMMORTAL( ch ) ) { snprintf( buf, MSL, "say Sorry, %s, we don't do business with mobs, or 6D STAFF.", ch->name ); interpret( banker, buf ); return; } if ( argument[0] == '\0' ) { send_to_char( "Syntax: account [account name] [account password]\n", ch ); send_to_char( "Syntax: account [account name] [account password] [create/delete]\n", ch ); send_to_char( "Syntax: account [account name]\n", ch ); interpret( banker, ( char * ) "say if you need help type &WHELP BANK&D." ); return; } argument = one_argument( argument, arg1 ); argument = one_argument( argument, arg2 ); argument = one_argument( argument, arg3 ); bank = find_bank( arg1 ); if ( !str_cmp( arg3, "create" ) ) { if ( strlen( arg1 ) < 4 ) { send_to_char( "Account name must be at least 4 characters.\r\n", ch ); return; } if ( strlen( arg2 ) < 5 ) { send_to_char( "Invalid Password. Must be at least 5 characters in length.\r\n", ch ); return; } if ( arg2[0] == '!' ) { send_to_char( "Password cannot begin with the '!' character.\r\n", ch ); return; } if ( bank ) { send_to_char( "There is already an account with that name!\r\n", ch ); return; } if ( ( currtime - ch->pcdata->lastaccountcreated ) < 3600 ) { send_to_char ( "Please wait at least one hour from previous creation time to make a new account.\r\n", ch ); return; } pwdnew = crypt( arg2, arg1 ); for ( p = pwdnew; *p != '\0'; p++ ) { if ( *p == '~' ) { send_to_char( "Password not acceptable, try again.\r\n", ch ); return; } } CREATE( bank, BANK_DATA, 1 ); bank->lastused = current_time; bank->name = STRALLOC( arg1 ); bank->password = STRALLOC( pwdnew ); bank->bronze = 0; bank->copper = 0; bank->gold = 0; bank->silver = 0; add_bank( bank ); save_bank( ); ch->pcdata->lastaccountcreated = currtime; save_char_obj( ch ); saving_char = NULL; send_to_char( "Your account has been added.\r\n", ch ); return; } else if ( !str_cmp( arg3, "delete" ) ) { if ( !bank ) { send_to_char( "There is no account with that name!\r\n", ch ); return; } if ( strcmp( crypt( arg2, bank->password ), bank->password ) ) { send_to_char( "Invalid password.\r\n", ch ); return; } GET_MONEY( ch, CURR_GOLD ) += bank->gold; GET_MONEY( ch, CURR_SILVER ) += bank->silver; GET_MONEY( ch, CURR_BRONZE ) += bank->bronze; GET_MONEY( ch, CURR_COPPER ) += bank->copper; ch_printf( ch, "Deleting... (%s)\r\n", bank->name ); free_bank_to_chars( bank ); unlink_bank( bank ); free_bank( bank ); save_bank( ); ch->pcdata->lastaccountcreated = 0; save_char_obj( ch ); saving_char = NULL; send_to_char( "Your account has successfully been deleted.\r\n", ch ); return; } if ( !bank ) { send_to_char( "There is no account by that name!\r\n", ch ); return; } if ( !str_cmp( arg2, "" ) ) { if ( ch->pcdata->bank == NULL ) { send_to_char( "You don't have any bank account open now.\r\n", ch ); return; } snprintf( buf, MSL, "You have closed the account %s.\r\n", ch->pcdata->bank->name ); send_to_char( buf, ch ); ch->pcdata->bank = NULL; return; } if ( strcmp( crypt( arg2, bank->password ), bank->password ) ) { send_to_char( "Invalid password.\r\n", ch ); return; } snprintf( buf, MSL, "You have opened the account %s.\r\n", bank->name ); send_to_char( buf, ch ); ch->pcdata->bank = bank; }
void samplv1_programs::remove_bank ( uint16_t bank_id ) { Bank *bank = find_bank(bank_id); if (bank && m_banks.remove(bank_id)) delete bank; }