Definition: [
"autonomous agent",
{
"messages": {
"cases": [
{
"messages": [
{
"app": "state",
"state": "{if(trigger.data.a.addr == this_address){$from = trigger.data.a.from;$to = trigger.data.a.to;$value = trigger.data.a.value;}else{if(trigger.data.b.addr == this_address){$from = trigger.data.b.from;$to = trigger.data.b.to;$value = trigger.data.b.value;}}var[$ADDR|| $to] += $value;var[$ADDR|| $from] -= $value;if(var[$ADDR|| $from] == 0) var[$ADDR|| $from] = false;}"
}
],
"if": "{$PATHER_ADDR == $addr AND !trigger.data.transfer}"
},
{
"messages": [
{
"app": "state",
"state": "{var[$perm_key] = $value;if(var[$perm_key] == 0) var[$perm_key] = false;var[$byte_key] += $base_inp;var[$TOTAL] += $base_inp;response['message'] = 'Approved '||$approve||' to spend '||$value ||' from your account';}"
}
],
"if": "{trigger.data.approve AND $base == $BYTE_INP}",
"init": "{$approve = trigger.data.approve;$perm_key = $PERM || $addr || $approve;if(!is_valid_address($approve) OR $approve == $addr) bounce('approve param invalid, specify address to approve instead of any other value');if(!$value) bounce('Value param missing');if(typeof($value) != 'number' OR $value < 0) bounce('Value param invalid');}"
},
{
"messages": [
{
"app": "payment",
"payload": {
"asset": "base",
"outputs": [
{
"address": "{$PATHER_ADDR}",
"amount": "{$base-5000}"
}
]
},
"if": "{$to == $PATHER_ADDR}"
},
{
"app": "data",
"payload": {
"want": "{trigger.data.want}",
"price": "{trigger.data.price}",
"address": "{trigger.address}",
"value": "{$value?$value:''}",
"to": "{trigger.data.to?trigger.data.to:''}",
"cancel": "{trigger.data.cancel?1:''}"
},
"if": "{$to == $PATHER_ADDR}"
},
{
"app": "state",
"state": "{var[$ADDR|| $to] += $value;var[$addr_key] -= $value;$fee = unit[response_unit].headers_commission + unit[response_unit].payload_commission;if(var[$addr_key] == 0) var[$addr_key] = false;if($addr != $PATHER_ADDR){var[$byte_key] += ($to == $PATHER_ADDR?(($free_mode?$trigger_cost:0)+5000 - $fee): $base_inp );var[$TOTAL] += ($to == $PATHER_ADDR?(($free_mode?$trigger_cost:0)+5000 - $fee): $base_inp);}response['message'] = 'Transferred '||$value||' to '||trigger.data.transfer;}"
}
],
"if": "{trigger.data.transfer AND ($base == $BYTE_INP OR $addr == $PATHER_ADDR)}",
"init": "{$to = trigger.data.transfer == 'exchange' ? $PATHER_ADDR : trigger.data.transfer;if(!is_valid_address($to) OR $to == $addr) bounce('transfer param invalid, specify address to instead of any other value');if($to != $PATHER_ADDR AND !$addr_q) bounce('No funds found');if($to != $PATHER_ADDR AND !$value) bounce('Value param missing');if($value AND $value > $addr_q) bounce('You have max '||$addr_q);}"
},
{
"messages": [
{
"app": "payment",
"payload": {
"asset": "base",
"outputs": [
{
"address": "{$addr}",
"amount": "{$w_amount + $base - $w_fee}"
}
]
}
},
{
"app": "state",
"state": "{var[$byte_key] = false;var[$TOTAL] -= $w_amount;response['message'] = 'Withdrawn '||$w_amount||' bytes less '||$w_fee||' fee from your account';}"
}
],
"if": "{trigger.data.withdraw_bytes AND $base == $BYTE_INP}",
"init": "{$user_bal = var[$byte_key] otherwise 0;$w_amount = $balance < $user_bal ? $balance : $user_bal;$wt = ($w_amount / $BYTE_INP) + (1-(($w_amount / $BYTE_INP)%1));$w_fee = $ATTESTOR_ADDR AND $free_mode ?0 : (($wt > 2) ? 462+$wt*60 : 522);if($user_bal == 0) bounce('No bytes to withdraw');}"
},
{
"messages": [
{
"app": "state",
"state": "{var[$addr_key] += $asset_inp;var[$byte_key] += $base_inp;var[$TOTAL] += $base_inp;response['message'] = 'Added '||$asset_inp||' to your account';}"
}
],
"if": "{$asset AND $base == $BYTE_INP}",
"init": "{$asset_inp = trigger.output[[asset!=base]];if($asset == 'ambiguous') bounce('Only 1 asset per tx');if($asset != $ASSET) bounce('You must deposit '||$ASSET);}"
},
{
"messages": [
{
"app": "payment",
"payload": {
"asset": "{$ASSET}",
"outputs": [
{
"address": "{$addr}",
"amount": "{$w_amount}"
}
]
}
},
{
"app": "state",
"state": "{if($ATTESTOR_ADDR AND $free_mode)$w_fee = 0;else$w_fee = unit[response_unit].headers_commission + unit[response_unit].payload_commission;var[$addr_key] -= $w_amount;if(var[$addr_key] == 0) var[$addr_key]=false;var[$byte_key] += ($base_inp-$w_fee);var[$TOTAL] += ($base_inp-$w_fee);response['message'] = 'Withdrawn '||$w_amount||' from your account';}"
}
],
"if": "{trigger.data.withdraw AND $base == $BYTE_INP}",
"init": "{$max_w = $addr_q-($addr_q % 1);$w_amount = $value - ($value % 1);if(!$value) bounce('Value param missing, max to withdraw '||$max_w);if(!$addr_q) bounce('Nothing to withdraw');if($w_amount <= 0) bounce('Max to withdraw '||$max_w);if($w_amount > $max_w) bounce('Not enough asset, max to withdraw '||$max_w);}"
},
{
"messages": [
{
"app": "state",
"state": "{var[$ADDR|| $to] += $value;var[$from_key] -= $value;var[$perm_key] -= $value;if(var[$from_key] == 0) var[$from_key] = false;if(var[$perm_key] == 0) var[$perm_key] = false;var[$byte_key] += $base_inp;var[$TOTAL] += $base_inp;response['message'] = 'Transferred '||$value||' to '||$to;}"
}
],
"if": "{trigger.data.transfer_from AND $base == $BYTE_INP}",
"init": "{$from = trigger.data.transfer_from;$to = trigger.data.to;$from_key = $ADDR|| $from;$perm_key = $PERM || $from || $addr;if(!is_valid_address($from)) bounce('transfer_from param invalid, specify from address instead of any other value');if(!$to) bounce('To param missing');if(!is_valid_address($to)) bounce('To param invalid');if(!var[$from_key]) bounce('Account have no funds');if(!$value) bounce('Value param missing');if(!var[$perm_key]) bounce('Not allowed to spend');if(var[$perm_key] < $value) bounce('You can spend max '||var[$perm_key]);if(var[$from_key] < $value) bounce('Account have '||var[$from_key]);}"
},
{
"messages": [
{
"app": "state",
"state": "{if($asset) bounce('Allowed asset: '||$ASSET);response['accepted_params'] = 'withdraw, transfer, transfer_from, approve, withdraw_bytes';response['usage'] = 'Send '||$BYTE_INP||' bytes and param or deposit '||$ASSET||' = 1 for continue.';response['message'] = 'Received donation for funding AA operation, thaanks!';}"
}
]
}
]
},
"init": "{$ASSET = 'U0rLnB4lXupOc1u1woZzzrr0xscmOc50wvrpXAMWq3Q=';$PATHER_ADDR = 'OTAUFBSNCQOSKPBFAVMKWC75YL5XZMAC';$BYTE_INP = 10000;$FREE_LIMIT = 2000;$ADDR = 'a';$PERM = 'p';$BYTE = 'b';$TOTAL = 'total';$base = trigger.output[[asset=base]];$trigger_cost = unit[trigger.unit].headers_commission + unit[trigger.unit].payload_commission;$addr = trigger.address;$balance = balance[base] - $base - storage_size;$free_mode = ($balance - var[$TOTAL]) > $FREE_LIMIT;$addr_key = $ADDR || $addr;$addr_q = var[$addr_key];$byte_key = $BYTE || $addr;$base_inp = $base + ($free_mode?$trigger_cost:0);$value = trigger.data.value;if(trigger.output[[asset!=base]].asset != 'none')$asset = trigger.output[[asset!=base]].asset;if($ATTESTOR_ADDR AND !attestation[[attestors=$ATTESTOR_ADDR, address=trigger.address,ifnone=false]]) bounce('Not allowed to use, please attest your address with '||$ATTESTOR_ADDR);if(!trigger.data.approve AND $value AND (typeof($value) != 'number' OR $value <= 0)) bounce('Value param invalid');}"
}
]