Address BJKBIZYHXAATYMZTJ55SJXHKNNSQLLGO, transactions and portfolio

BJKBIZYHXAATYMZTJ55SJXHKNNSQLLGO

Definition

1	[
2	"autonomous agent",
3	{
4	"init": "{
5	$asset_ct = 'hd936lRtPN11pkgNv8qVnqN2OHMyAp8P/NsLp6KsuqA=';
6	if(!var['_ Last price'] and !trigger.data.price) bounce('Price must be defined before first exchange');
7
8	if(trigger.data.price){
9	//bytes per 1 asset
10	$ratio = round(trigger.data.price);
11	if($ratio <= 0) bounce('Price not allowed');
12	}
13	else $ratio = var['_ Last price'];
14
15	//asset detection and checks
16	if(trigger.output[[asset!=base]].asset != 'none')
17	$asset = trigger.output[[asset!=base]].asset;
18	if($asset){
19	if($asset == 'ambiguous') bounce('Only 1 asset per tx');
20	if($asset != $asset_ct) bounce('Asset not allowed, please send ' \|\| $asset_ct);
21	$asset_inp = (trigger.output[[asset!=base]] != 0) ? trigger.output[[asset!=base]] : bounce('Zero asset tx');
22	}
23
24	$addr = trigger.address;
25	$base_inp = trigger.output[[asset=base]] - 700;
26
27	//user amounts-price
28	$base_key = '_' \|\| $addr \|\| $ratio \|\| 'b';
29	$asset_key = '_' \|\| $addr \|\| $ratio;
30
31	//total amounts-price
32	$total_key = 'b' \|\| $ratio;
33	$total_asset_key = 'a' \|\| $ratio;
34
35	//exchanged amounts, allow users to withdraw afterwards
36	$exch_key = 'b_' \|\| $ratio ;
37	$exch_asset_key = 'a_' \|\| $ratio ;
38
39	//exchanged amounts are 'protected' until owners withdraw, defines also max amount to cancel
40	$max_b_to_exchange = var[$total_key] - var[$exch_key];
41	$max_a_to_exchange = var[$total_asset_key] - var[$exch_asset_key];
42
43	//base_inp without leftover bytes
44	$base_inp_round = ($base_inp - ($base_inp % $ratio));
45
46	}",
47	"messages": {
48	"cases": [
49	{
50	"if": "{
51	//allowed if there is exchanged amount and user deposited previously
52	$withdraw_asset = var[$exch_asset_key] and var[$base_key] and var[$exch_asset_key] > 0 and var[$base_key] > 0;
53	$withdraw_base = var[$exch_key] and var[$asset_key] and var[$exch_key] > 0 and var[$asset_key] > 0;
54
55	$withdraw_asset or $withdraw_base
56	}",
57	"init": "{
58	if($asset) bounce('You must withdraw, send byte only transaction please');
59	$withdraw_key = $withdraw_asset ? $exch_asset_key : $exch_key;
60	$w_total_key = $withdraw_asset ? $total_asset_key : $total_key;
61	$max_to_withdraw = $withdraw_asset ? (var[$base_key] / $ratio) : (var[$asset_key] * $ratio);
62	$key = $withdraw_asset ? $base_key : $asset_key;
63	//user can withdraw all their exchanged amount or a part of their exchanged amount (rest of order could be cancel)
64	$withdraw_amount = (var[$withdraw_key] <= $max_to_withdraw) ? var[$withdraw_key] : $max_to_withdraw;
65	}",
66	"messages": [
67	{
68	"app": "payment",
69	"payload": {
70	"asset": "base",
71	"outputs": [
72	{
73	"address": "{$addr}",
74	"amount": "{ $withdraw_asset ? $base_inp : ($withdraw_amount + $base_inp) }"
75	}
76	]
77	}
78	},
79	{
80	"if": "{$withdraw_asset}",
81	"app": "payment",
82	"payload": {
83	"asset": "{$asset_ct}",
84	"outputs": [
85	{
86	"address": "{$addr}",
87	"amount": "{$withdraw_amount}"
88	}
89	]
90	}
91	},
92	{
93	"app": "state",
94	"state": "{
95	//substract withdrawn amount
96	var[$w_total_key] -= $withdraw_amount;
97	if(var[$w_total_key] == 0) var[$w_total_key] = false;
98
99	//substract exchanged amount
100	var[$withdraw_key] -= $withdraw_amount;
101	if(var[$withdraw_key] == 0) var[$withdraw_key] = false;
102
103	//substract user deposit
104	var[$key] -= $withdraw_asset ? ($withdraw_amount * $ratio) : ($withdraw_amount / $ratio);
105	if(var[$key] == 0) var[$key] = false;
106
107	response['message'] = 'withdrawn exchanged amount ('\|\|($withdraw_asset ? 'assets': 'bytes')\|\|') at '\|\|$ratio\|\|' bytes per token';
108	}"
109	}
110	]
111	},
112	{
113	"if": "{
114	//allowed if there is amount to exchange
115	$exchange_asset = $asset and $max_b_to_exchange > 0;
116	$exchange_base = !$asset and $max_a_to_exchange > 0;
117
118	!trigger.data.cancel and ($exchange_asset or $exchange_base)
119	}",
120	"init": "{
121	$max_to_ex = $asset ? $max_b_to_exchange : $max_a_to_exchange;
122	$inp_in_other = $asset ? $asset_inp*$ratio : $base_inp_round/$ratio;
123	if($inp_in_other > $max_to_ex){
124	//user sent more amount than allowed, exchange to max allowed/return leftover if any
125	$byte_amount = $asset ? $max_to_ex : (($inp_in_other - $max_to_ex) * $ratio);
126	$asset_amount = $asset ? ((($inp_in_other - $max_to_ex) - (($inp_in_other - $max_to_ex) % $ratio)) / $ratio) : $max_to_ex;
127	}
128	else{
129	//user sent less or equal amount than allowed, exchange to user input
130	if($inp_in_other == 0) bounce('Not enough funds for minimum');
131	$byte_amount = $asset ? $inp_in_other : 0;
132	$asset_amount = $asset ? 0 : $inp_in_other;
133	}
134	}",
135	"messages": [
136	{
137	"if": "{$exchange_asset or $byte_amount > 0}",
138	"app": "payment",
139	"payload": {
140	"asset": "base",
141	"outputs": [
142	{
143	"address": "{$addr}",
144	"amount": "{$exchange_asset ? ($byte_amount + $base_inp) : $byte_amount}"
145	}
146	]
147	}
148	},
149	{
150	"if": "{$exchange_base or $asset_amount > 0}",
151	"app": "payment",
152	"payload": {
153	"asset": "{$asset_ct}",
154	"outputs": [
155	{
156	"address": "{$addr}",
157	"amount": "{$asset_amount}"
158	}
159	]
160	}
161	},
162	{
163	"app": "state",
164	"state": "{
165	var['_ Last price'] = $ratio;
166	if($exchange_asset){
167	//sum exchanged amount
168	var[$total_asset_key] += $asset_inp - $asset_amount;
169	var[$exch_asset_key] += $asset_inp - $asset_amount;
170
171	//substract taken amount
172	var[$total_key] -= $byte_amount;
173	if(var[$total_key] == 0) var[$total_key] = false;
174	response['message'] = 'sold '\|\|($asset_inp - $asset_amount)\|\|' assets for '\|\|($byte_amount)\|\|' bytes';
175	}
176	else{
177	//sum exchanged amount
178	var[$total_key] += $base_inp_round - $byte_amount;
179	var[$exch_key] += $base_inp_round - $byte_amount;
180
181	//substract taken amount
182	var[$total_asset_key] -= $asset_amount;
183	if(var[$total_asset_key] == 0) var[$total_asset_key] = false;
184	response['message'] = 'bought '\|\|($asset_amount)\|\|' assets for '\|\|($base_inp_round - $byte_amount)\|\|' bytes';
185	}
186	}"
187	}
188	]
189	},
190	{
191	"if": "{
192	//allowed if user has non-filled or partial filled orders to cancel
193	$cancel_asset = var[$asset_key] and var[$asset_key] > 0;
194	$cancel_base = var[$base_key] and var[$base_key] > 0;
195	//if we are here, means user does not fulfill conditions to withdraw
196	trigger.data.cancel and ($cancel_asset or $cancel_base)
197	}",
198	"init": "{
199	$max_to_cancel = $cancel_asset ? $max_a_to_exchange : $max_b_to_exchange;
200	$key = $cancel_asset ? $asset_key : $base_key;
201	$cancel_tot_key = $cancel_asset ? $total_asset_key : $total_key;
202	//trying to cancel a executed order
203	if($max_to_cancel <= 0) bounce('Not allowed');
204	//cancel all amount if possible
205	$cancel_amount = ($max_to_cancel <= var[$key]) ? $max_to_cancel : var[$key];
206	}",
207	"messages": [
208	{
209	"app": "payment",
210	"payload": {
211	"asset": "base",
212	"outputs": [
213	{
214	"address": "{$addr}",
215	"amount": "{$cancel_asset ? $base_inp : ($cancel_amount + $base_inp)}"
216	}
217	]
218	}
219	},
220	{
221	"if": "{$cancel_asset}",
222	"app": "payment",
223	"payload": {
224	"asset": "{$asset_ct}",
225	"outputs": [
226	{
227	"address": "{$addr}",
228	"amount": "{$cancel_amount}"
229	}
230	]
231	}
232	},
233	{
234	"app": "state",
235	"state": "{
236	var[$cancel_tot_key] -= $cancel_amount;
237	if(var[$cancel_tot_key] == 0)var[$cancel_tot_key] = false;
238	var[$key] -= $cancel_amount;
239	if(var[$key] == 0)var[$key] = false;
240	response['message'] = 'canceled order ('\|\|($cancel_asset?'sell':'buy')\|\|' at '\|\|$ratio\|\|' bytes per token)';
241	}"
242	}
243	]
244	},
245	{
246	"messages": [
247	{
248	"if": "{$asset}",
249	"app": "payment",
250	"payload": {
251	"asset": "base",
252	"outputs": [
253	{
254	"address": "{$addr}",
255	"amount": "{$base_inp}"
256	}
257	]
258	}
259	},
260	{
261	"app": "state",
262	"state": "{
263	if($asset){
264	var[$total_asset_key] += $asset_inp;
265	var[$asset_key] += $asset_inp;
266	response['message'] = 'deposited '\|\|$asset_inp\|\|' assets to sell at '\|\|$ratio\|\|' bytes per token';
267	}
268	else{
269	var[$total_key] += $base_inp_round;
270	var[$base_key] += $base_inp_round;
271	response['message'] = 'deposited '\|\|$base_inp_round\|\|' bytes to buy at '\|\|$ratio\|\|' bytes per token';
272	}
273	}"
274	}
275	]
276	}
277	]
278	}
279	}
280	]

Show transactions in assets:

Transactions

No transactions found, it may be worth changing the filter