global $bankid; global $server; $req = getreq2(); if (!$req) { return $false; } $msg = custmsg2('gettime', $bankid, $req); $msg = $server->process($msg); $args = $u->match_message($msg); if (is_string($args)) { return false; } return $args['time']; } // Spend tokens from bank to $id to give him an account if (!$db->contents($server->inboxkey($id)) && !$db->contents($server->balancekey($id))) { $tran = getbanktran(); $amt = 50; $spend = bankmsg('spend', $bankid, $tran, $id, $tokenid, $amt, "Welcome to Trubanc!"); $msg = $db->get($server->assetbalancekey($bankid, $tokenid)); $bal = $server->unpack_bankmsg($msg, $t->ATBALANCE, $t->BALANCE, $t->AMOUNT); echo "bal: {$bal}\n"; $bal = bankmsg('balance', $bankid, $tran, $tokenid, $bal - $amt); process("{$spend}.{$bal}"); } // Register $id, if not yet registered if (!$server->pubkeydb->get($id)) { // Get the bankid. This command does not require an acount process(custmsg('bankid', $pubkey)); process(custmsg("register", $bankid, $pubkey, "George Jetson")); process(custmsg('id', $bankid, $id));