Address SI27GPKEKSP2TJJDLRBOVDSTSPR4NXMS, transactions and portfolio

SI27GPKEKSP2TJJDLRBOVDSTSPR4NXMS

Definition

1	[
2	"autonomous agent",
3	{
4	"bounce_fees": {
5	"base": 10000
6	},
7	"init": "{
8	$HOUSE_CUT = 0.1; //We will take this cut on the debut of an NFT in our platform. We charge 0.1% for foreign NFTs.
9	$FREEMARKET_CUT = 0.01; //We take 1% on every non-verified NFT trade
10	$ARTIST_CUT = 0.01; //The artist will get 1% from every resale of their NFT
11	$INVESTMENT_CUT = 0.01; //We take a 1% cut from all maecenas investments
12	$HALF_HOUR = 1800; //30m = 1800s. An auction is extended by 1800s every time there is a new bid near the deadline
13	$RESERVE_AMOUNT = 200000; //We will always keep > 200.000 in the AA
14	$MIN_BID_INCREMENT = 0.0001;//Bids must be at least 0.01% higher than the previous one
15	$ONE_MONTH = 2592000;
16	$USER_REGISTRY_ADDRESS = "X56TOFFTFUMMMHDMZPIE5JVFOAX6DRAU";
17	$CURRENCY_REGISTRY = "6CFKFLYQJWXP7UMV57O2SPHU3AY5SNAP";
18
19	$extendDeadLine = $NFT=>($NFT.soldAt <= timestamp + $HALF_HOUR) ? ($NFT \|\| {soldAt: $NFT.soldAt + $HALF_HOUR}) : $NFT; //Extend the auction if there is a bid less than half an hour before the auction is closed
20	/*
21	** Strips $NFT of computed fields to reduce AA's storage size
22	*/
23	$stripToken = $NFT=>{
24	delete($NFT, "isBanned");
25	delete($NFT, "cap");
26	delete($NFT, "mintedAt");
27	return $NFT;
28	};
29
30	if (NOT trigger.data["method"])
31	bounce("method field is mandatory");
32
33	$method = trigger.data["method"];
34
35	$spendableFunds = balance["base"] - var["locked"] - storage_size - $RESERVE_AMOUNT;
36	$owner = var["owner"];
37	$calculateSharesToBuy = ($price, $pool, $myShare)=>ln($price / ($pool * $myShare)) / ln($myShare);
38	$_maecenasCurve = $x=>6969420 * $x^2;
39	}",
40	"getters": "{
41	$saleInfo = $NFT=>{
42	$unit = unit[$NFT];
43	$info = var["FREE_" \|\| $NFT] OTHERWISE var["NFT_" \|\| $NFT];
44
45	if (NOT $info)
46	bounce("That NFT is not for sale or does not exist");
47
48	return $info \|\| {
49	cap: $unit.messages[[.app="asset"]]["payload"]["cap"],
50	mintedAt: $unit.timestamp
51	};
52	};
53	/*
54	** Example of a meta getter to enable platform interop
55	*/
56	$getNFTInfo = $NFT=>{
57	$unit = unit[$NFT];
58	/*
59	** Info should have at least 'author' field. 'ipfs' and 'type' field are also recommended.
60	*/
61	$info = var["FREE_" \|\| $NFT] OTHERWISE var["NFT_" \|\| $NFT];
62	$transferrable = $unit.messages[[.app="asset"]]["payload"]["transferrable"];
63
64	return $info \|\| {
65	cap: $unit.messages[[.app="asset"]]["payload"]["cap"],
66	mintedAt: $unit.timestamp,
67	transferrable: $transferrable
68	};
69	};
70	}",
71	"messages": {
72	"cases": [
73	{
74	"if": "{
75	NOT $owner
76	}",
77	"messages": [
78	{
79	"app": "state",
80	"state": "{
81	var["owner"] = "IUU43O7TS2TBYKAPGKUARDZHOTAE275A"; //Set the Owner to my address
82	var["helper"] = "IUU43O7TS2TBYKAPGKUARDZHOTAE275A";
83	var["locked"] = 0; //Bytes locked in bids are not withdrawable by the Owner
84	}"
85	}
86	]
87	},
88	{
89	"if": "{
90	trigger.address == $owner
91	AND ($method == "payout"
92	OR $method == "transferOwnership"
93	OR $method == "setHelper")
94	}",
95	"messages": {
96	"cases": [
97	{
98	"if": "{
99	$method == "payout"
100	}",
101	"messages": [
102	{
103	"app": "payment",
104	"payload": {
105	"asset": "base",
106	"outputs": [
107	{
108	"address": "{trigger.address}",
109	"amount": "{$spendableFunds}"
110	}
111	]
112	}
113	}
114	]
115	},
116	{
117	"if": "{
118	$method == "transferOwnership"
119	}",
120	"init": "{
121	if (NOT trigger.data["newOwner"])
122	bounce("newOwner field is mandatory");
123	if (NOT is_valid_address(trigger.data["newOwner"]))
124	bounce("newOwner field is not a valid address");
125	}",
126	"messages": [
127	{
128	"app": "payment",
129	"payload": {
130	"asset": "base",
131	"outputs": [
132	{
133	"address": "{trigger.address}",
134	"amount": "{$spendableFunds}"
135	}
136	]
137	}
138	},
139	{
140	"app": "state",
141	"state": "{
142	var["owner"] = trigger.data["newOwner"];//Ownership is transferred
143	}"
144	}
145	]
146	},
147	{
148	"if": "{
149	$method == "setHelper"
150	}",
151	"init": "{
152	if (NOT trigger.data["helper"])
153	bounce("helper field is mandatory");
154	}",
155	"messages": [
156	{
157	"app": "state",
158	"state": "{
159	var["helper"] = trigger.data["helper"];
160	}"
161	}
162	]
163	}
164	]
165	}
166	},
167	{
168	"if": "{
169	$method == "REGISTER"
170	}",
171	"init": "{
172	if (NOT exists(trigger.data["NFT"]))
173	bounce("That NFT does not exist");
174
175	$definer = unit[trigger.data["NFT"]].authors[0];
176
177	if (NOT $definer)
178	bounce("NFT field is not a known asset");
179
180	$meta = var[$definer]["NFT"]; //The NFT asset must be defined by the AA that holds its metadata
181
182	if (NOT $meta)
183	bounce("That NFT platform does not hold its metadata in a format compatible with ours");
184	}",
185	"messages": [
186	{
187	"app": "state",
188	"state": "{
189	var["FREE_" \|\| trigger.data["NFT"]] = $meta;
190	}"
191	}
192	]
193	},
194	{
195	"if": "{
196	(trigger.address == $owner OR trigger.address == var["helper"])
197	AND $method == "revoke"
198	}",
199	"init": "{
200	if (NOT trigger.data["NFT"])
201	bounce("NFT field is mandatory");
202	}",
203	"messages": [
204	{
205	"app": "data_feed",
206	"payload": {
207	"{trigger.data["NFT"]}": "REVOKED"
208	}
209	}
210	]
211	},
212	{
213	"if": "{
214	$method == "MINT"
215	}",
216	"init": "{
217	if (NOT trigger.data["amount"])
218	bounce("amount field is mandatory");
219
220	if (NOT is_valid_amount(trigger.data["amount"]) AND trigger.data["amount"] != 0)
221	bounce("The amount of NFT copies to mint is not valid");
222
223	if (NOT trigger.data["type"])
224	bounce("type field is mandatory");
225
226	if (trigger.data["endTime"]){
227	if (trigger.data["endTime"] <= timestamp)
228	bounce("The endTime cannot be set in the past");
229	}
230
231	if ($owner != trigger.address){ //The owner reserves the right to post sales with longer deadlines
232	if (trigger.data["endTime"] - timestamp > 2628000) //A bit more than 30 days
233	bounce("You cannot set the end time in more than 30 days in the future");
234	}
235
236	if (NOT trigger.data["title"])
237	bounce("title field is mandatory");
238
239	if (NOT trigger.data["ipfs"])
240	bounce("ipfs field is mandatory");
241
242	if (trigger.data["royalty"]){
243	if (NOT is_integer(trigger.data["royalty"]))
244	bounce("royalty must be an integer");
245	if (trigger.data["royalty"] < 0 OR trigger.data["royalty"] > 40)
246	bounce("royalty must be in the interval 0-40");
247	}
248
249	$seller = trigger.address == $owner
250	? trigger.data["seller"] OTHERWISE trigger.address
251	: trigger.address;
252
253	if (trigger.data["seller"] AND NOT is_valid_address(trigger.data["seller"])) //The owner has to specify who sells the NFT
254	bounce("The seller address is not valid");
255
256	$currency = $CURRENCY_REGISTRY.$getCurrency(trigger.data["currency"]);
257
258	if (trigger.data["currency"]){
259	if (trigger.data["amount"] == 1)
260	bounce("You cannot price an auction in other than Bytes");
261	if (NOT $currency)
262	bounce("The provided currency is not supported");
263	}
264
265	$prof = $USER_REGISTRY_ADDRESS.$profileOf($seller);
266
267	$key = $prof.verified
268	? "NFT_"
269	: "FREE_";
270	}",
271	"messages": {
272	"cases": [
273	{
274	"if": "{
275	trigger.data["amount"] == 1
276	}",
277	"messages": [
278	{
279	"app": "asset",
280	"payload": {
281	"cap": 1,
282	"is_private": false,
283	"is_transferrable": true,
284	"auto_destroy": false,
285	"fixed_denominations": false,
286	"issued_by_definer_only": true,
287	"cosigned_by_definer": false,
288	"spender_attested": false
289	}
290	},
291	{
292	"app": "data",
293	"if": "{
294	var["recordToData"]
295	}",
296	"payload": {
297	"asset": "{var["recordToData"]}",
298	"name": "{trigger.data["title"] OTHERWISE "Untitled"}",
299	"author": "{$seller}",
300	"ipfs": "{trigger.data["ipfs"]}",
301	"type": "{trigger.data["type"]}",
302	"decimals": 0
303	}
304	},
305	{
306	"app": "state",
307	"state": "{
308	var[$key \|\| response_unit] = {
309	bid: 20000, //Max current bid (a NFT can have this field because it was resold. Check for price field instead)
310	bids: 0,
311	type: trigger.data["type"],
312	by: $seller,
313	royalty: trigger.data["royalty"] OTHERWISE 0,
314	at: timestamp, //Max bid time
315	ipfs: trigger.data["ipfs"], //Hash of the content
316	author: $seller, //The original seller
317	soldAt: trigger.data["endTime"] OTHERWISE timestamp + $ONE_MONTH, //End of the auction
318	soldBy: $seller //Who is currently selling the NFT
319	};
320
321	var["recordToData"] = response_unit;
322	}"
323	}
324	]
325	},
326	{
327	"init": "{
328	$price = trigger.data["price"];
329	if (NOT $price)
330	bounce("price field is mandatory if you intend to sell more than one NFT copy");
331	if (NOT exists(trigger.data["currency"])){
332	if ($price < 20000)
333	bounce("The minium price is 20000 bytes");
334	if (NOT is_valid_amount($price)) //Must be integer for bytes
335	bounce("price is not valid");
336	}
337	}",
338	"messages": [
339	{
340	"app": "asset",
341	"if": "{
342	trigger.data["amount"] == 0 //Uncapped asset, no more units can be issued after endTime
343	}",
344	"payload": {
345	"is_private": false,
346	"is_transferrable": true,
347	"auto_destroy": false,
348	"fixed_denominations": false,
349	"issued_by_definer_only": true,
350	"cosigned_by_definer": false,
351	"spender_attested": false
352	}
353	},
354	{
355	"app": "asset",
356	"if": "{
357	trigger.data["amount"] > 0
358	}",
359	"payload": {
360	"cap": "{trigger.data["inflation"] ? trigger.data["cap"] OTHERWISE 9e15 : trigger.data["amount"]}",
361	"is_private": false,
362	"is_transferrable": true,
363	"auto_destroy": false,
364	"fixed_denominations": false,
365	"issued_by_definer_only": true,
366	"cosigned_by_definer": false,
367	"spender_attested": false
368	}
369	},
370	{
371	"app": "state",
372	"state": "{
373	var[$key \|\| response_unit] = {
374	price: $price, //Sale price (this field is only present if the first sale was a fixed price one)
375	type: trigger.data["type"],
376	at: timestamp,
377	royalty: trigger.data["royalty"] OTHERWISE 0, //Max bid time
378	ipfs: trigger.data["ipfs"], //Hash of the content
379	unitsSold: 0,
380	author: $seller, //The original seller
381	soldAt: trigger.data["endTime"] OTHERWISE timestamp + $ONE_MONTH, //End of the auction
382	soldBy: $seller, //Who is currently selling the NFT
383	redeem: trigger.data["redeem"] ? true : false,
384	currency: trigger.data["currency"] OTHERWISE false
385	};
386	}"
387	}
388	]
389	}
390	]
391	}
392	},
393	{
394	"if": "{
395	$method == "BUY"
396	OR $method == "CLAIM"
397	}",
398	"init": "{
399	$NFT = $saleInfo(trigger.data["NFT"]);
400
401	$artist = $USER_REGISTRY_ADDRESS.$artistInfoOf($NFT.author);
402
403
404	if ($method == "BUY"){ //Validate buy params
405	if (NOT exists(trigger.data["NFT"]))
406	bounce("NFT field is mandatory");
407
408	$isAuction = $NFT.bid ? true : false; //It can only NOT be an auction if it is first sold and thus $NFT.bid does not exist
409
410	if ($isAuction)
411	$hasBidders = ($NFT.soldBy != $NFT.by) ? true : false; //Booleans cannot be compared
412
413	if ($isAuction AND NOT $NFT.by)
414	bounce("There are no copies of that NFT listed for sale at the moment");
415
416	if ($isAuction){
417	if (timestamp > $NFT.soldAt){
418	if ($isAuction){
419	if ($hasBidders) //You can still bid on an auction it if there were no bidders
420	bounce("The auction is over");
421	}
422	else{
423	bounce("The sale is already over");
424	}
425	}
426	}
427	}
428
429	else if ($method == "CLAIM"){ //Validate claim params
430	if (NOT trigger.data["NFT"])
431	bounce("NFT field is mandatory");
432
433	$isAuction = $NFT.bid ? true : false;
434
435	if (NOT $isAuction)
436	bounce("You cannot claim a non-auction sale");
437
438	$hasBidders = ($NFT.soldBy != $NFT.by) ? true : false;
439
440	if (timestamp <= $NFT.soldAt)
441	bounce("The auction is not over yet");
442
443	if ($NFT.claimed)
444	bounce("That auction was already claimed");
445	}
446
447	if ($artist AND (($isAuction AND $hasBidders) OR (NOT $isAuction))){
448	$allowsMaecenas = ($artist.sharePercent >= 0.01) ? true : false;
449	$hasMaecenas = $allowsMaecenas
450	? $artist.supply > 0
451	? true
452	: false
453	: false;
454
455
456	if ($allowsMaecenas){
457	if ($method == "BUY")
458	$maecenasShare = floor($artist.sharePercent * trigger.output[[asset="base"]].amount, 0);
459	else if ($method == "CLAIM" AND $hasBidders)
460	$maecenasShare = floor($artist.sharePercent * $NFT.bid, 0);
461	else
462	$maecenasShare = 0;
463
464	$sharesInThePool = ($method != "DIVEST")
465	? $artist.supply
466	: ($artist.supply - trigger.data["amount"]); //If divesting we need to substract divested shares
467
468	if ($method == "DIVEST")
469	$p = $artist.share - floor((trigger.data["amount"] / $artist.supply) * $artist.share, 0); //Current share minus what was just divested
470	else
471	$p = $artist.share + $maecenasShare; //Pool value after the sale
472
473	$k = 1 / ($sharesInThePool + 1); //The fraction of the pool 1 share represents
474	$price = $_maecenasCurve($sharesInThePool + 1); //Price of buying one share
475
476
477	if ($method == "BUY"){
478	if ($NFT.soldBy == $NFT.author){ //We do not need to check for auction as we do not invest in those until the claim phase
479	$totalSpendable = floor(
480	$spendableFunds
481	+ $price * $INVESTMENT_CUT //What I save from investment cut as it is paid to myself
482	+ floor(trigger.output[[asset="base"]].amount * $HOUSE_CUT, 0) //What I got as cut from the triggering tx
483	, 0);
484	}
485	else{
486	$totalSpendable = floor(
487	$spendableFunds
488	+ $price * $INVESTMENT_CUT //What I save from investment cut as it is paid to myself
489	- trigger.output[[asset="base"]].amount //Cannot spend the trigering tx as it will be locked
490	, 0);
491	}
492	}
493	else if ($method == "CLAIM"){
494	$totalSpendable = floor(
495	$spendableFunds //Initial amount
496	+ $price * $INVESTMENT_CUT //What I save from investment cut
497	+ $NFT.bid * (1 - $HOUSE_CUT) //What I get from house cut
498	, 0);
499	}
500	else{
501	$totalSpendable = floor($spendableFunds + $price * $INVESTMENT_CUT, 0);
502	}
503
504	$sharesToBuy = $sharesInThePool == 0 ? 0 : ceil($calculateSharesToBuy($price, $p, $k), 0);//Can be 0 and I would still afford 1 share if profitable
505
506	if ($k == 1){
507	$sharesICanAfford = $price < $totalSpendable ? 1 : 0;
508	}
509	else {
510	if ($totalSpendable > $price AND $sharesToBuy >= 1){
511	$sharesICanAfford = floor($totalSpendable / ($price * $sharesToBuy * (1 - $INVESTMENT_CUT)), 0); //Do not buy more shares than what I can afford
512	}
513	else{
514	$sharesICanAfford = 0;
515	}
516	}
517	}
518
519	if ($allowsMaecenas AND $sharesICanAfford > 0){
520	$buyShares = true;
521	}
522	else{
523	$buyShares = false;
524	}
525
526	$shareIWillfinallyBuy = min($sharesToBuy, $sharesICanAfford); //Maybe I can afford more shares than what is profitable to buy
527	$myProfit = floor($buyShares ? $p - $p * $k^$shareIWillfinallyBuy : 0, 0); //0 if no shares are bought
528	$poolFinalValue = $p - $myProfit; //Not actual profit but what I got out of the pool
529	}
530	else {
531	$allowsMaecenas = false;
532	$buyShares = false;
533	$hasMaecenas = false;
534	$maecenasShare = 0;
535	$myProfit = 0;
536	$poolFinalValue = 0;
537	}
538	}",
539	"messages": {
540	"cases": [
541	{
542	"if": "{
543	trigger.data["method"] == "BUY"
544	}",
545	"messages": {
546	"cases": [
547	{
548	"if": "{
549	$isAuction
550	}",
551	"init": "{
552	if (trigger.output[[asset="base"]].amount < 20000)
553	bounce("The minimum bid is 20000 bytes");
554	if (trigger.output[[asset="base"]].amount <= $NFT.bid * (1 + $MIN_BID_INCREMENT))
555	bounce("Your bid must be at least " \|\| $NFT.bid * (1 + $MIN_BID_INCREMENT) \|\| " (0.01% higher than the current)");
556
557	if ($NFT.soldBy == trigger.address)
558	bounce("You cannot bid on your own auction");
559	}",
560	"messages": [
561	{
562	"app": "payment",
563	"if": "{
564	$NFT.by != $NFT.soldBy //If we don't check for this the artists could steal bytes from the AA
565	}",
566	"payload": {
567	"asset": "base",
568	"outputs": [
569	{
570	"address": "{$NFT.by}",
571	"amount": "{$NFT.bid - 10000}"
572	}
573	]
574	}
575	},
576	{
577	"app": "state",
578	"state": "{
579	var["locked"] += trigger.output[[asset="base"]].amount - ($hasBidders ? $NFT.bid : 0); //Increase non-withdrawable funds by the difference between previous and last bid
580	$NFT.bid = trigger.output[[asset="base"]].amount;
581	$NFT.at = timestamp;
582	$NFT.bids = $NFT.bids + 1;
583	$NFT.by = trigger.address;
584	if (var["FREE_" \|\| trigger.data["NFT"]])//We do not extend the deadline of freemarket NFTs
585	var["FREE_" \|\| trigger.data["NFT"]] \|\|= $stripToken($NFT);
586	else
587	var["NFT_" \|\| trigger.data["NFT"]] \|\|= $stripToken($extendDeadLine($NFT));
588	}"
589	}
590	]
591	},
592	{
593	"init": "{
594	if ($NFT.unitsSold == $NFT.cap AND $NFT.cap != 0) //We need to make an additional check for uncapped assets
595	bounce("All NFT copies have been already sold");
596
597	$realPrice = $NFT.currency ? $CURRENCY_REGISTRY.$convert($NFT.price, $NFT.currency, "base") : $NFT.price;
598	response["realPrice"] = $realPrice;
599	response["rate"] = $CURRENCY_REGISTRY.$getExchangeRate($NFT.currency);
600
601	if (trigger.output[[asset="base"]].amount < $realPrice)
602	bounce("Your payment is lower than the NFT price. You have to send " \|\| $realPrice \|\| " bytes");
603	}",
604	"messages": [
605	{
606	"app": "payment",
607	"if": "{
608	floor($realPrice * (1 - $HOUSE_CUT - ($allowsMaecenas ? (($hasMaecenas OR $buyShares) ? $artist.sharePercent : 0) : 0)) - 10000, 0) > 0
609	}",
610	"payload": {
611	"asset": "base",
612	"outputs": {
613	"cases": [
614	{
615	"if": "{
616	$hasMaecenas
617	}",
618	"outputs": [
619	{
620	"address": "{$NFT.soldBy}",
621	"amount": "{floor($realPrice * (1 - $HOUSE_CUT - ($allowsMaecenas ? (($hasMaecenas OR $buyShares) ? $artist.sharePercent : 0) : 0)) - 10000, 0)}"
622	},
623	{
624	"address": "{$USER_REGISTRY_ADDRESS}",
625	"amount": "{$poolFinalValue - $artist.share}"
626	}
627	]
628	},
629	{
630	"outputs": [
631	{
632	"address": "{$NFT.soldBy}",
633	"amount": "{floor($realPrice * (1 - $HOUSE_CUT - ($allowsMaecenas ? (($hasMaecenas OR $buyShares) ? $artist.sharePercent : 0) : 0)) - 10000, 0)}"
634	}
635	]
636	}
637	]
638	}
639	}
640	},
641	{
642	"app": "payment",
643	"payload": {
644	"asset": "{trigger.data['NFT']}",
645	"outputs": [
646	{
647	"address": "{trigger.address}",
648	"amount": 1
649	}
650	]
651	}
652	},
653	{
654	"if": "{
655	$hasMaecenas
656	}",
657	"app": "data",
658	"payload": {
659	"share": "{$poolFinalValue - $artist.share}"
660	}
661	},
662	{
663	"app": "state",
664	"state": "{
665	if ($NFT.soldBy == $NFT.author){ //Only increase the count if sold by the author
666	if (var["FREE_" \|\| trigger.data["NFT"]])
667	var["FREE_" \|\| trigger.data["NFT"]] \|\|= {unitsSold: $NFT.unitsSold + 1};
668	else
669	var["NFT_" \|\| trigger.data["NFT"]] \|\|= {unitsSold: $NFT.unitsSold + 1};
670	//Check if all units were just sold
671	if ($NFT.unitsSold + 1 == $NFT.cap AND $NFT.cap != 0){
672	if (var["FREE_" \|\| trigger.data["NFT"]])
673	var["FREE_" \|\| trigger.data["NFT"]] \|\|= {bid: 0, price: false, soldAt: timestamp, currency: false}; //All units are sold, let's adjust soldAt so it can be already resold
674	else
675	var["NFT_" \|\| trigger.data["NFT"]] \|\|= {bid: 0, price: false, soldAt: timestamp, currency: false}; //Prepare for auction and delist it from normal sale
676	}
677	}
678	//if ($hasMaecenas){
679	// var["locked"] += $maecenasShare - $myProfit;
680	// var["artist_" \|\| $NFT.author] \|\|= {share: $poolFinalValue};
681	//}
682	}"
683	}
684	]
685	}
686	]
687	}
688	},
689	{
690	"if": "{
691	trigger.data["method"] == "CLAIM"
692	}",
693	"messages": {
694	"cases": [
695	{
696	"if": "{
697	$NFT.soldBy == $NFT.author
698	}",
699	"init": "{
700	if ($hasMaecenas OR $buyShares){
701	$paymentFromShares = $shareIWillfinallyBuy * round($price * (1 - $INVESTMENT_CUT), 0);
702	$sellerPayout = floor($NFT.bid * (1 - $HOUSE_CUT - $artist.sharePercent) - 10000 + $paymentFromShares, 0);
703	}
704	else {
705	$sellerPayout = floor($NFT.bid * (1 - $HOUSE_CUT) - 10000, 0);
706	}
707	}",
708	"messages": [
709	{
710	"app": "payment",
711	"if": "{
712	$sellerPayout > 0 //enough to be worth paying
713	AND $NFT.soldBy != $NFT.by //there is at least a bid
714	}",
715	"payload": {
716	"asset": "base",
717	"outputs": [
718	{
719	"address": "{$NFT.soldBy}",
720	"amount": "{$sellerPayout}"
721	}
722	]
723	}
724	},
725	{
726	"app": "payment",
727	"payload": {
728	"asset": "{trigger.data['NFT']}",
729	"outputs": [
730	{
731	"address": "{$NFT.by}",
732	"amount": 1
733	}
734	]
735	}
736	},
737	{
738	"if": "{
739	$hasMaecenas AND $NFT.bid > 20000 //If it does not have maecenas but accepts them pool is not increased
740	}",
741	"app": "data",
742	"payload": {
743	"share": "{$maecenasShare}"
744	}
745	},
746	{
747	"app": "state",
748	"state": "{
749	$decrement = $hasMaecenas //My share does not play a role here
750	? $NFT.bid - $maecenasShare //If it had maecenas the maecenas share remains locked
751	: $NFT.bid; //If it does not have maecenas all bytes are unlocked
752
753	if ($NFT.bid > 20000) //If it had no bids you don't need to reduce locked amount
754	var["locked"] -= $decrement; //These bytes are no longer locked as the artist is getting them in this same unit
755
756	if (var["FREE_" \|\| trigger.data["NFT"]])
757	var["FREE_" \|\| trigger.data["NFT"]] \|\|= {claimed: true};
758	else
759	var["NFT_" \|\| trigger.data["NFT"]] \|\|= {claimed: true}; //No longer listed for sale
760
761	//if ($hasMaecenas AND $NFT.bid > 20000)
762	// var["artist_" \|\| $NFT.author] \|\|= {share: $artist.share + $maecenasShare}; //Increase the artist pool value
763	}"
764	}
765	]
766	},
767	{
768	"messages": [
769	{
770	"app": "payment",
771	"if": "{
772	$NFT.soldBy != $NFT.by //If we don't do this check the seller could steal bytes from the AA if there were no bids
773	}",
774	"init": "{
775	$share = $NFT.bid * (1 - $HOUSE_CUT);
776	if ($NFT.royalty > 0 AND $NFT.soldBy != $NFT.by){
777	$royalty = $share * $NFT.royalty / 100;
778	$outputs = [
779	{//Royalty
780	address: $NFT.author,
781	amount: floor($royalty, 0) //Percentage of the whole bid, no fees are charged
782	},
783	{//Seller payment
784	address: $NFT.soldBy,
785	amount: floor($share - $royalty, 0) //We take the house cut then royalty cut
786	}
787	];
788	}
789	else{
790	$outputs = [
791	{//Seller payment
792	address: $NFT.soldBy,
793	amount: floor($share, 0)
794	}
795	];
796	}
797	$payload = {outputs: $outputs};
798	}",
799	"payload": "{$payload}"
800	},
801	{
802	"app": "payment",
803	"payload": {
804	"asset": "{trigger.data['NFT']}",
805	"outputs": [
806	{
807	"address": "{$NFT.by}",
808	"amount": 1
809	}
810	]
811	}
812	},
813	{
814	"app": "state",
815	"state": "{
816	var["locked"] -= $NFT.bid;
817	if (var["FREE_" \|\| trigger.data["NFT"]])
818	var["FREE_" \|\| trigger.data["NFT"]] \|\|= {claimed: true};
819	else
820	var["NFT_" \|\| trigger.data["NFT"]] \|\|= {claimed: true}; //No longer listed for sale
821	}"
822	}
823	]
824	}
825	]
826	}
827	}
828	]
829	}
830	},
831	{
832	"if": "{
833	$method == "REDEEM"
834	}",
835	"init": "{
836	if (NOT exists(trigger.data["signed_message"]))
837	bounce("signed_message field is mandatory");
838	if (NOT exists(trigger.data["authors"]))
839	bounce('authors field is mandatory');
840	if (NOT exists(trigger.data["meta"]))
841	bounce("meta field is mandatory");
842
843	$spack = {
844	signed_message: trigger.data["signed_message"],
845	authors: trigger.data["authors"]
846	} \|\| trigger.data["meta"];
847
848	if (NOT is_valid_signed_package($spack, $spack.authors[0]["address"]))
849	bounce("The signed message signature is invalid");
850	if (NOT $spack.signed_message["serial"])
851	bounce("The signed message does not contains a serial field");
852	if (NOT $spack.signed_message["NFT"])
853	bounce("The signer of this message did not include a NFT field");
854
855	//Check if the code has already been redeemed
856	if (var["CODE_" \|\| $spack.signed_message["NFT"] \|\| "_" \|\| sha256($spack.signed_message["serial"])])
857	bounce("That code was already redeemed");
858
859	$NFT = $saleInfo($spack.signed_message["NFT"]);
860
861	if (NOT $NFT)
862	bounce("That NFT does not exist");
863
864	//Prevent author from stealing their NFTs from other people
865	if ($NFT.soldBy != $NFT.author)
866	bounce("You cannot claim an NFT that is not being sold by their author");
867
868	if ($NFT.author != $spack.authors[0]["address"])
869	bounce("The signer of that message is not the author of that NFT");
870
871	//NFTs have to be created with redeemable: true to be redeemable
872	if (NOT $NFT.redeem)
873	bounce("That NFT is not redeemable");
874
875	//Check if sale is over and expire was set in the signed message
876	if ($spack.signed_message["expireDate"])
877	if ($NFT.soldAt < timestamp OR $spack.signed_message["expireDate"] < timestamp)
878	bounce("That NFT is no longer claimable");
879
880	//Check if the NFT is address-locked
881	if ($spack.signed_message["claimer"])
882	if ($spack.signed_message["claimer"] != trigger.address)
883	bounce("You cannot claim that NFT from that address");
884
885	$signedAmount = $spack.signed_message["amount"] OTHERWISE 1;
886
887	//Uncapped asset, we can issue whatever amount was signed
888	if (NOT $NFT.cap){
889	$amount = $signedAmount;
890	}
891	//If it is going over the cap we need to reduce the claimed amount to match the asset cap
892	else {
893	if ($NFT.unitsSold + $signedAmount > $NFT.cap)
894	$amount = $NFT.cap - $NFT.unitsSold;
895	else
896	$amount = $signedAmount;
897	}
898
899	//All copies were issued
900	if ($amount == 0)
901	bounce("All copies of that NFT have been already minted");
902	}",
903	"messages": {
904	"cases": [
905	{
906	"if": "{
907	trigger.data["NFT"]
908	}",
909	"messages": [
910	{
911	"app": "state",
912	"state": "{
913	if (var["FREE_" \|\| trigger.data["NFT"]])
914	var["FREE_" \|\| trigger.data["NFT"]] \|\|= {lastBatchDate: timestamp};
915	else
916	var["NFT_" \|\| trigger.data["NFT"]] \|\|= {lastBatchDate: timestamp};
917	}"
918	}
919	]
920	},
921	{
922	"messages": [
923	{
924	"app": "payment",
925	"payload": {
926	"asset": "{$spack.signed_message["NFT"]}",
927	"outputs": [
928	{
929	"address": "{trigger.address}",
930	"amount": "{$amount}"
931	}
932	]
933	}
934	},
935	{
936	"app": "state",
937	"state": "{
938	if (var["FREE_" \|\| $spack.signed_message["NFT"]])
939	var["FREE_" \|\| $spack.signed_message["NFT"]] \|\|= {unitsSold: $NFT.unitsSold + $amount};
940	else
941	var["NFT_" \|\| $spack.signed_message["NFT"]] \|\|= {unitsSold: $NFT.unitsSold + $amount};
942	var["CODE_" \|\| $spack.signed_message["NFT"] \|\| "_" \|\| sha256($spack.signed_message["serial"], 'base64')] = true; //Hash the serial to prevent the issuer from sending too big serials to bloat state size
943	}"
944	}
945	]
946	}
947	]
948	}
949	},
950	{
951	"if": "{
952	$method == "SELL"
953	}",
954	"init": "{
955	//Parameter validation
956	if (NOT exists(trigger.data["endTime"]))
957	bounce("endTime field is mandatory");
958	if (trigger.data["endTime"] < timestamp)
959	bounce("You cannot set the end time in the past");
960	if (trigger.data["endTime"] > timestamp + 2628000)
961	bounce("You cannot set the end time in more than 30 days");
962
963	if (NOT exists(trigger.data["initialPrice"]))
964	bounce("initialPrice field is mandatory");
965	if (NOT is_valid_amount(trigger.data["initialPrice"]))
966	bounce("initialPrice must be a valid amount");
967	if (trigger.data["initialPrice"] < 20000)
968	bounce("The minimum initialPrice is 20000 bytes");
969
970	//NFT validation
971	if (trigger.output[[asset!="base"]].asset == "ambigous")
972	bounce("You cannot send more than one NFT type at a time");
973
974	//Check that the NFT is not revoked
975	$feedData = data_feed[[oracles=this_address, feed_name=trigger.output[[asset!="base"]].asset, ifnone="OK", ifseveral="last", type="string"]];
976
977	if ($feedData == "REVOKED")
978	bounce("We revoked the trading of that token probably due to copyright reasons");
979
980	$NFT = $saleInfo(trigger.output[[asset!="base"]].asset) OTHERWISE {};
981
982	if (NOT $NFT)
983	bounce("NFT not found");
984
985	if (trigger.output[[asset!="base"]].amount != 1)
986	bounce("You cannot auction more than 1 copy of an NFT at a time");
987
988	if ($NFT.soldAt >= timestamp)//Booleans cannot be compared if NFT metadata is not present (user tried to sell an asset not issued by this AA)
989	bounce("A copy of that NFT is already being sold. The sale is expected to end at " \|\| timestamp_to_string($NFT.soldAt) \|\| " UTC but may be delayed depending on the number of bids");
990
991	if ($NFT.bid AND NOT $NFT.claimed)
992	bounce("That NFT was auctioned but the payment has not been claimed yet. You can force the saller to claim it.");
993
994	}",
995	"messages": [
996	{
997	"app": "state",
998	"state": "{
999	$NFT.bid = trigger.data["initialPrice"];
1000	$NFT.bids = 0;
1001	$NFT.by = trigger.address;
1002	$NFT.soldBy = trigger.address;
1003	$NFT.at = timestamp;
1004	$NFT.claimed = false;
1005	$NFT.soldAt = trigger.data["endTime"];
1006	if (var["FREE_" \|\| trigger.output[[asset!="base"]].asset])
1007	var["FREE_" \|\| trigger.output[[asset!="base"]].asset] = $stripToken($NFT) \|\| {claimed: false};
1008	else
1009	var["NFT_" \|\| trigger.output[[asset!="base"]].asset] = $stripToken($NFT) \|\| {claimed: false};
1010	}"
1011	}
1012	]
1013	},
1014	{
1015	"if": "{
1016	$method == "CHANGE_PRICE"
1017	}",
1018	"init": "{
1019	if (NOT trigger.data["NFT"])
1020	bounce("NFT field is mandatory");
1021
1022	$NFT = var["NFT_" \|\| trigger.data["NFT"]];
1023
1024	if (NOT $NFT)
1025	bounce("NFT not found");
1026
1027	if (NOT trigger.data["price"])
1028	bounce("price field is mandatory");
1029	if (NOT is_integer(trigger.data["price"]))
1030	bounce("price must be an integer");
1031	if (NOT is_valid_amount(trigger.data["price"]))
1032	bounce("price is invalid");
1033
1034	if (trigger.data["price"] < 20000)
1035	bounce("The minimum price is 20000 bytes");
1036
1037	if ($NFT.bid)
1038	bounce("You cannot change an auction price!");
1039
1040	if (exists(trigger.data["currency"])) //User wants price to be foreign asset based, let's check if we support the asset
1041	if (NOT $CURRENCY_REGISTRY.$getCurrency(trigger.data["currency"]))
1042	bounce("You cannot set the price in that currency");
1043	}",
1044	"messages": [
1045	{
1046	"app": "state",
1047	"state": "{
1048	var["NFT_" \|\| trigger.data["NFT"]] \|\|= {price: trigger.data["price"], currency: trigger.data["currency"] OTHERWISE false};
1049	}"
1050	}
1051	]
1052	}
1053	]
1054	}
1055	}
1056	]