[
"autonomous agent",
{
"bounce_fees": {
"base": 10000
},
"init": "{\r
$HOUSE_CUT = 0.1; //We will take this cut on the debut of an NFT in our platform. We charge 0% for foreign NFTs.\r
$ARTIST_CUT = 0.01; //The artist will get 1% from every resale of their NFT\r
$INVESTMENT_CUT = 0.01;//We take a 1% cut from all maecenas investments\r
$HALF_HOUR = 1800; //30m = 1800s. An auction is extended by 1800s every time there is a new bid near the deadline\r
\r
$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\r
/*\r
** Strips $NFT of computed fields to reduce AA's storage size\r
*/\r
$stripToken = $NFT=>{\r
delete($NFT, "isBanned");\r
delete($NFT, "issuer");\r
delete($NFT, "cap");\r
delete($NFT, "mintedAt");\r
delete($NFT, "duration"); //For foreign NFTs\r
return $NFT;\r
};\r
if (NOT exists(trigger.data["method"]))\r
bounce("method field is mandatory");\r
$_lambertW = $x=>{\r
if ($x == 1)\r
return 0.5671432904097838729999686622103555497538157871865125081351310792;\r
if ($x == 2)\r
return 0.8526055020137254913464724146953174668984533001514035087721073946;\r
$ev = ln($x);\r
return $ev - ln($ev - ln($ev - ln($ev - ln($ev - ln($ev - ln($ev - ln($ev - ln($ev - ln($ev - ln($ev - ln($ev - ln($ev - ln($ev)))))))))))));\r
};\r
}",
"getters": "{\r
$_maecenasCurve = $x=>69069420 * $x^2;\r
// TOKEN RELATED GETTERS\r
/*\r
** All the information about the given NFT\r
*/\r
$tokenInfo = $NFT=>{\r
$baseInfo = var[$NFT];\r
$unitInfo = unit[$NFT];\r
if (NOT $baseInfo)\r
bounce("NFT not found");\r
return ($baseInfo ||\r
{\r
isBanned: data_feed[[oracles=this_address, feed_name=$NFT, ifnone=false, ifseveral="last", type="string"]] == "REVOKED",\r
issuer: asset[$NFT].definer_address,\r
cap: $unitInfo.messages[[.app="asset"]].payload.cap,\r
mintedAt: $unitInfo[$NFT].timestamp\r
});\r
};\r
$smallTokenInfo = $NFT=>{\r
$baseInfo = var[$NFT];\r
if (NOT $baseInfo)\r
bounce("NFT not found");\r
return $baseInfo || {\r
cap: unit[$NFT].messages[[.app="asset"]].payload.cap,\r
mintedAt: unit[$NFT].timestamp\r
};\r
};\r
/*\r
** How many copies of a given NFT were initially minted wether they were sold or not\r
*/\r
$mintedUnits = $NFT=>{\r
if (NOT var[$NFT])\r
bounce("NFT not found");\r
if (NOT asset[$NFT].exists)\r
bounce("That NFT does not exist");\r
return asset[$NFT].cap;\r
};\r
/*\r
** How many copies of the NFT were sold, bounces if we did not mint the NFT\r
*/\r
$circulatingSupply = $NFT=>{\r
$info = $tokenInfo($NFT);\r
if ($info.isBanned)\r
bounce("That NFT was revoked");\r
if ($info.issuer != this_address)\r
bounce("That NFT was not minted by us, thus we don't know how many of them are out in the wild");\r
return $info.unitsSold OTHERWISE 1;\r
};\r
\r
\r
\r
//ARTIST AND MAECENAS RELATED GETTERS\r
/*\r
** All the artist information\r
*/\r
\r
$artistInfo = $artist=>var["artist_" || $artist];\r
$profile = $artist=>var["profile_" || $artist];\r
/*\r
** How many BYTES have maecenas invested in a given artist\r
*/\r
$totalArtistInvestment = $artist=>{\r
if (NOT is_valid_address($artist))\r
bounce("artist address is invalid");\r
$artistInf = $artistInfo($artist);\r
if (NOT $artistInf)\r
bounce("That artist does not accept maecenas");\r
return 11511570 * $artistInf.supply * (1 + $artistInf.supply) * (1 + 2 * $artistInf.supply);\r
};\r
/*\r
** How many BYTES does the next share of the given artist costs\r
*/\r
$artistSharePrice = $artist=>{\r
$artistInf = var["artist_" || $artist];\r
if (NOT $artistInf)\r
bounce("That artist does not accept investments");\r
return $_maecenasCurve($artistInf.supply);\r
};\r
/*\r
** How many BYTES does it take to buy $shares amount of the given artist shares\r
*/\r
$artistSharesPrice = ($artist, $shares)=>{\r
if (NOT is_integer($shares))\r
bounce("shares must be an integer");\r
if ($shares <= 0)\r
bounce("shares must be a positive integer");\r
if (NOT is_valid_address($artist))\r
bounce("artist address is invalid");\r
\r
$artistInf = $artistInfo($artist);\r
\r
if (NOT $artistInf)\r
bounce("that artist does not accept maecenas");\r
\r
$x0 = $artistInf.supply;\r
$x1 = $artistInf.supply + $shares;\r
$upToFirstToken = 11511570 * $x0 * (1 + $x0) * (1 + 2 * $x0);\r
$upToTargetPurchase = 11511570 * $x1 * (1 + $x1) * (1 + 2 * $x1);\r
\r
return round($upToTargetPurchase - ($upToFirstToken OTHERWISE 0), 0);\r
};\r
/*\r
** How many SHARES of the given artist has the given maecenas\r
*/\r
$maecenasArtistShares = ($maecenas, $artist)=>{\r
if (NOT is_valid_address($artist))\r
bounce("artist address is invalid");\r
if (NOT is_valid_address($maecenas))\r
bounce("maecenas address is invalid");\r
\r
$shares = var["maecenas_" || $maecenas || "_" || $artist];\r
return $shares OTHERWISE 0;\r
};\r
/*\r
** How many BYTES have an investor accrued from the given artist\r
*/\r
$maecenasPnL = ($maecenas, $artist)=>{\r
if (NOT is_valid_address($artist))\r
bounce("artist address is invalid");\r
if (NOT is_valid_address($maecenas))\r
bounce("maecenas address is invalid");\r
$artistInf = $artistInfo($artist);\r
return floor($artistInf.share * $maecenasArtistShares($maecenas) / $artistInf.supply, 0);\r
};\r
}",
"messages": {
"cases": [
{
"if": "{\r
NOT var["owner"] //The owner has not been set\r
}",
"messages": [
{
"app": "state",
"state": "{\r
var["owner"] = "
IUU43O7TS2TBYKAPGKUARDZHOTAE275A"; //Set the Owner to my address\r
var["locked"] = 0; //Bytes locked in bids are not withdrawable by the Owner\r
}"
}
]
},
{
"if": "{\r
trigger.address == var["owner"]\r
AND (trigger.data["method"] == "mint"\r
OR trigger.data["method"] == "payout"\r
OR trigger.data["method"] == "approve"\r
OR trigger.data["method"] == "revoke"\r
OR trigger.data["method"] == "transferOwnership"\r
OR trigger.data["method"] == "verifyProfile")\r
}",
"messages": {
"cases": [
{
"if": "{\r
trigger.data["method"] == "mint"\r
}",
"init": "{\r
if (NOT exists(trigger.data["amount"]))\r
bounce("amount field is mandatory");\r
if (NOT is_valid_amount(trigger.data["amount"]))\r
bounce("The amount of NFT copies to mint is not valid");\r
if (NOT exists(trigger.data["ipfs"]))\r
bounce("ipfs field is mandatory");\r
if (NOT exists(trigger.data["seller"]))\r
bounce("seller field is mandatory");\r
if (NOT is_valid_address(trigger.data["seller"]))\r
bounce("The seller address is not valid");\r
if (NOT exists(trigger.data["endTime"]))\r
bounce("endTime field is mandatory");\r
if (NOT is_integer(trigger.data["endTime"]))\r
bounce("endTime field is not a timestamp");\r
if (trigger.data["endTime"] <= timestamp)\r
bounce("The endTime cannot be set in the past");\r
if (trigger.data["endTime"] - timestamp > 2628000)\r
bounce("You cannot set the end time in more than 30 days in the future");\r
}",
"messages": {
"cases": [
{
"if": "{\r
trigger.data["amount"] == 1\r
}",
"messages": [
{
"app": "asset",
"payload": {
"cap": 1,
"is_private": false,
"is_transferrable": true,
"auto_destroy": false,
"fixed_denominations": false,
"issued_by_definer_only": true,
"cosigned_by_definer": false,
"spender_attested": false
}
},
{
"app": "state",
"state": "{\r
var[response_unit] = {\r
bid: 20000, //Max current bid (a NFT can have this field because it was resold. Check for price field instead)\r
by: trigger.data["seller"],\r
at: timestamp, //Max bid time\r
ipfs: trigger.data["ipfs"], //Hash of the content\r
author: trigger.data["seller"], //The original seller\r
soldAt: trigger.data["endTime"], //End of the auction\r
soldBy: trigger.data["seller"] //Who is currently selling the NFT\r
};\r
}"
}
]
},
{
"init": "{\r
if (NOT exists(trigger.data["price"]))\r
bounce("price field is mandatory if you intend to sell more than one NFT copy");\r
if (trigger.data["price"] < 20000)\r
bounce("The minium price is 20000 bytes");\r
if (NOT is_valid_amount(trigger.data["price"]))\r
bounce("price is not valid");\r
}",
"messages": [
{
"app": "asset",
"payload": {
"cap": "{trigger.data["amount"]}",
"is_private": false,
"is_transferrable": true,
"auto_destroy": false,
"fixed_denominations": false,
"issued_by_definer_only": true,
"cosigned_by_definer": false,
"spender_attested": false
}
},
{
"app": "state",
"state": "{\r
var[response_unit] = {\r
price: trigger.data["price"], //Sale price (this field is only present if the first sale was a fixed price one)\r
at: timestamp, //Max bid time\r
ipfs: trigger.data["ipfs"], //Hash of the content\r
unitsSold: 0,\r
author: trigger.data["seller"], //The original seller\r
soldAt: trigger.data["endTime"], //End of the auction\r
soldBy: trigger.data["seller"] //Who is currently selling the NFT\r
};\r
}"
}
]
}
]
}
},
{
"if": "{\r
trigger.data["method"] == "payout"\r
}",
"init": "{\r
$payout = balance["base"] - var["locked"] - storage_size - 200000; //Always keep at least storage_size + 200.000 bytes to pay for txs\r
if ($payout <= storage_size + 200000)\r
bounce("There are not enought funds to withdraw");\r
}",
"messages": [
{
"app": "payment",
"payload": {
"asset": "base",
"outputs": [
{
"address": "{trigger.address}",
"amount": "{$payout}"
}
]
}
}
]
},
{
"if": "{\r
trigger.data["method"] == "approve"\r
}",
"init": "{\r
if (NOT exists(trigger.data["NFT"]))\r
bounce("NFT field is mandatory");\r
\r
$NFT = var[trigger.data["NFT"]];\r
\r
if (NOT $NFT)\r
bounce("That NFT is not known by this AA");\r
if (NOT $NFT.pendingAproval)\r
bounce("That NFT is not pendingAproval");\r
}",
"messages": [
{
"app": "state",
"state": "{\r
var[trigger.data["NFT"]] ||= {pendingAproval: '', duration: '', foreign: true, bid: 20000, by: $NFT.soldBy, at: timestamp, soldAt: timestamp + $NFT.duration};\r
}"
}
]
},
{
"if": "{\r
trigger.data["method"] == "verifyProfile"\r
}",
"init": "{\r
if (NOT exists(trigger.data["artist"]))\r
bounce("artist field is mandatory");\r
if (NOT is_valid_address(trigger.data["artist"]))\r
bounce("artist address is invalid");\r
}",
"messages": [
{
"app": "state",
"state": "{\r
var["profile_" || trigger.data["artist"]] ||= {verified: true};\r
}"
}
]
},
{
"if": "{\r
trigger.data["method"] == "revoke"\r
}",
"init": "{\r
if (NOT exists(trigger.data["NFT"]))\r
bounce("NFT field is mandatory");\r
}",
"messages": [
{
"app": "data_feed",
"payload": {
"{trigger.data["NFT"]}": "REVOKED"
}
}
]
},
{
"if": "{\r
trigger.data["method"] == "transferOwnership"\r
}",
"init": "{\r
if (NOT exists(trigger.data["newOwner"]))\r
bounce("newOwner field is mandatory");\r
if (NOT is_valid_address(trigger.data["newOwner"]))\r
bounce("newOwner field is not a valid address");\r
}",
"messages": [
{
"app": "state",
"state": "{\r
var["owner"] = trigger.data["newOwner"];//Ownership is transferred\r
}"
}
]
}
]
}
},
{
"if": "{\r
trigger.data["method"] == "BUY"\r
}",
"init": "{\r
if (NOT exists(trigger.data["NFT"]))\r
bounce("NFT field is mandatory");\r
\r
$NFT = $tokenInfo(trigger.data["NFT"]); //[we need $NFT.cap here] This already checks wether NFT exists\r
$isAuction = (typeof($NFT.bid) == "number") ? true : false; //It can only NOT be an auction if it is first sold and thus $NFT.bid does not exist\r
\r
\r
response["nft"] = json_stringify($NFT);\r
response["auction"] = $isAuction;\r
$hasBidders = false;\r
}",
"messages": {
"cases": [
{
"if": "{\r
$isAuction\r
}",
"init": "{\r
if (trigger.output[[asset=base]].amount < 20000)\r
bounce("The minimum bid is 20000 bytes");\r
if (trigger.output[[asset=base]].amount <= $NFT.bid)\r
bounce("Your bid is lower or equal to the last bid. You must increase it");\r
if ($NFT.soldBy == trigger.address)\r
bounce("You cannot bid on your own auction");\r
}",
"messages": [
{
"app": "payment",
"if": "{\r
$NFT.by != $NFT.soldBy //If we don't check for this the artists could steal bytes from the AA\r
}",
"payload": {
"asset": "base",
"outputs": [
{
"address": "{$NFT.by}",
"amount": "{$NFT.bid - 10000}"
}
]
}
},
{
"app": "state",
"state": "{\r
var["locked"] += trigger.output[[asset=base]].amount - ($hasBidders ? $NFT.bid : 0); //Increase non-withdrawable funds by the difference between previous and last bid\r
$NFT.bid = trigger.output[[asset=base]].amount;\r
$NFT.by = trigger.address;\r
var[trigger.data["NFT"]] ||= $stripToken($extendDeadLine($NFT));\r
}"
}
]
},
{
"init": "{\r
if ($NFT.unitsSold == $NFT.cap)\r
bounce("All NFT copies have been already sold");\r
if (trigger.output[[asset=base]].amount < $NFT.price)\r
bounce("Your payment is lower than the NFT price. You have to send " || $NFT.price || " bytes");\r
\r
$artist = $artistInfo($NFT.author);\r
$hasMaecenas = (typeof($artist) == "object");\r
}",
"messages": [
{
"app": "payment",
"if": "{\r
floor($NFT.price * (1 - $HOUSE_CUT - ($hasMaecenas ? $artist.sharePercent : 0)) - 10000, 0) > 0\r
}",
"payload": {
"asset": "base",
"outputs": [
{
"address": "{$NFT.soldBy}",
"amount": "{floor($NFT.price * (1 - $HOUSE_CUT - ($hasMaecenas ? $artist.sharePercent : 0)) - 10000, 0)}"
}
]
}
},
{
"app": "payment",
"payload": {
"asset": "{trigger.data['NFT']}",
"outputs": [
{
"address": "{trigger.address}",
"amount": 1
}
]
}
},
{
"app": "state",
"state": "{\r
var[trigger.data["NFT"]] ||= {unitsSold: $NFT.unitsSold + 1};\r
if ($hasMaecenas){\r
$increment = floor($NFT.price * (1 - $artist.sharePercent), 0);\r
var["locked"] += $increment;\r
var["artist_" || $NFT.author] ||= {share: $artist.share + $increment};\r
}\r
}"
}
]
}
]
}
},
{
"if": "{\r
trigger.data["method"] == "CLAIM"\r
}",
"init": "{\r
if (NOT exists(trigger.data["NFT"]))\r
bounce("NFT field is mandatory");\r
$NFT = var[trigger.data["NFT"]];\r
if (timestamp <= $NFT.soldAt)\r
bounce("The auction is not over yet");\r
if ($NFT.bid == 0 AND typeof($NFT.bid) == "number")\r
bounce("That auction was already claimed");\r
\r
$artistInf = $artistInfo($NFT.author);\r
\r
$hasMaecenas = (typeof($artistInf) == "object");\r
\r
if ($hasMaecenas){\r
$maecenasShare = $artistInf.sharePercent * $NFT.bid; //Amount of bytes that is going to the maecenas\r
$p = $artistInf.share + $maecenasShare; //Pool value after the sale\r
$k = 1 / ($artistInf.supply + 1); //My fraction of the pool\r
$price = $_maecenasCurve($artistInf.supply + 1);//Price of buying one share\r
\r
\r
$ln1lessk = ln(1 - $k); //Save complexity\r
$logArgument = ($k - 1) != 0 ? ($k * $p * $ln1lessk) / ($k - 1) : 1;\r
\r
$lambertW = (($k - 1) != 0) ? $_lambertW($logArgument) : $price < $p ? 1 : 0;\r
\r
if ($logArgument <= e)\r
$sharesToBuy = 0;\r
\r
else {\r
$s = (1 - $k) != 0 ? ((-1 * $lambertW) - $ln1lessk / ($ln1lessk)):0;\r
$sharesToBuy = abs(floor($s, 0));\r
} \r
}\r
\r
$buyShares = ($hasMaecenas AND $sharesToBuy > 0);\r
$myProfit = $buyShares ? $sharesToBuy / ($artistInf.supply + $sharesToBuy) * $p : 0; //0 if no shares are bought\r
}",
"messages": {
"cases": [
{
"if": "{//NFT was first sold\r
$NFT.soldBy == $NFT.author\r
}",
"messages": [
{
"app": "payment",
"if": "{\r
floor($NFT.bid * (1 - $HOUSE_CUT - $hasMaecenas ? $artistInf.sharePercent : 0) - 10000 + ($buyShares ? $artistSharePrice($NFT.author) * $sharesToBuy : 0), 0) > 0 //enough to be worth paying\r
AND $NFT.soldBy != $NFT.by //there is at least a bid\r
}",
"payload": {
"asset": "base",
"outputs": [
{
"address": "{$NFT.soldBy}",
"amount": "{floor($NFT.bid * (1 - $HOUSE_CUT - ($hasMaecenas ? $artistInf.sharePercent: 0)) - 10000 + ($buyShares ? $artistSharePrice($NFT.author) * $sharesToBuy : 0), 0)}"
}
]
}
},
{
"app": "payment",
"payload": {
"asset": "{trigger.data['NFT']}",
"outputs": [
{
"address": "{$NFT.by}",
"amount": 1
}
]
}
},
{
"app": "state",
"state": "{ //Reset bid and by fields\r
var["locked"] -= ($NFT.bid + $myProfit); //These bytes are no longer locked as the buyer has already withdrawn them\r
var[trigger.data["NFT"]] ||= {bid: 0, by: ''}; //Prepare the state for the next auction\r
if ($hasMaecenas){\r
var["locked"] += $maecenasShare;\r
var["artist_" || $NFT.author] ||= {share: $artistInf.share + $maecenasShare};\r
}\r
}"
}
]
},
{
"messages": [
{
"app": "payment",
"if": "{\r
$NFT.soldBy != $NFT.by //If we don't do this check the seller could steal bytes from the AA if there were no bids\r
}",
"payload": {
"asset": "base",
"outputs": {
"cases": [
{
"if": "{\r
floor($NFT.bid * $ARTIST_CUT, 0) - 10000 > 0 //It is worth to pay the artist\r
AND is_valid_address($NFT.author)\r
}",
"outputs": [
{
"address": "{$NFT.soldBy}",
"amount": "{floor($NFT.bid * (1 - $ARTIST_CUT) - 10000, 0)}"
},
{
"address": "{$NFT.author}",
"amount": "{floor($NFT.bid * $ARTIST_CUT, 0) - 10000}"
}
]
},
{
"outputs": [
{
"address": "{$NFT.soldBy}",
"amount": "{floor($NFT.bid * (1 - $ARTIST_CUT) - 10000, 0)}"
}
]
}
]
}
}
},
{
"app": "payment",
"payload": {
"asset": "{trigger.data['NFT']}",
"outputs": [
{
"address": "{$NFT.by}",
"amount": 1
}
]
}
},
{
"app": "state",
"state": "{\r
var["locked"] -= $NFT.bid;\r
}"
}
]
}
]
}
},
{
"if": "{//[PUBLIC] Resell a NFT\r
trigger.data["method"] == "SELL"\r
}",
"init": "{\r
//Parameter validation\r
if (NOT exists(trigger.data["endTime"]))\r
bounce("endTime field is mandatory");\r
if (trigger.data["endTime"] < timestamp)\r
bounce("You cannot set the end time in the past");\r
if (trigger.data["endTime"] - timestamp > 2628000)\r
bounce("You cannot set the end time in more than 30 days");\r
\r
if (NOT exists(trigger.data["initialPrice"]))\r
bounce("initialPrice field is mandatory");\r
if (NOT is_valid_amount(trigger.data["initialPrice"]))\r
bounce("initialPrice must be a valid amount");\r
if (trigger.data["initialPrice"] < 20000)\r
bounce("The minimum initialPrice is 20000 bytes");\r
\r
//NFT validation\r
if (trigger.output[[asset!="base"]].asset == "ambigous")\r
bounce("You cannot send more than one NFT type at a time");\r
if (NOT var[trigger.output[[asset!="base"]].asset])\r
bounce("You need to send an actual NFT but you are sending only bytes");\r
\r
$NFT = $tokenInfo(trigger.output[[asset!="base"]].asset); //[We need $NFT.isBanned]This already checks for $NFT existence\r
\r
if (trigger.output[[asset!="base"]].amount!=1)\r
bounce("You cannot auction more than 1 copy of an NFT at a time");\r
if ($NFT.isBanned)\r
bounce("We revoked the trading of that token probably due to copyright reasons");\r
\r
if (timestamp < $NFT.soldAt)\r
bounce("A copy of that NFT is already being auctioned. The auction is expected to end at " || timestamp_to_string($NFT.soldAt) || " UTC but may be delayed depending on the number of bids");\r
else if ($NFT.bid AND typeof($NFT.bid) == "number" AND $NFT.bid != 0)\r
bounce("A copy of that NFT is already being auctioned. The auction has already ended but it has not been claimed. You can close it yourself even if you are not the max bidder");\r
}",
"messages": [
{
"app": "state",
"state": "{\r
$NFT.bid = trigger.data["initialPrice"];\r
$NFT.by = trigger.address;\r
$NFT.soldBy = trigger.address;\r
$NFT.at = timestamp;\r
$NFT.soldAt = trigger.data["endTime"];\r
var[trigger.output[[asset!="base"]].asset] ||= $stripToken($NFT);\r
}"
}
]
},
{
"if": "{\r
trigger.data["method"] == "PRELIST"\r
}",
"init": "{\r
if (NOT exists(trigger.data["NFT"]))\r
bounce("NFT field is mandatory");\r
if (NOT asset[trigger.data["NFT"]].exists)\r
bounce("That NFT does not exist within the Obyte network");\r
if (NOT asset[trigger.data["NFT"]].is_transferrable)\r
bounce("That NFT is not tradeable");\r
if (NOT exists(trigger.data["ipfs"]))\r
bounce("ipfs field is mandatory");\r
if (NOT exists(trigger.data["seller"]))\r
bounce("seller field is mandatory");\r
if (NOT is_valid_address(trigger.data["seller"]))\r
bounce("The seller address is not valid");\r
if (NOT exists(trigger.data["duration"]))\r
bounce("duration field is mandatory. Enter the auction duration in seconds");\r
if (NOT is_integer(trigger.data["duration"]))\r
bounce("duration field is not a valid amount of seconds");\r
if (trigger.data["duration"] > 2628000)\r
bounce("The auction cannot last more than 30 days");\r
}",
"messages": [
{
"app": "state",
"state": "{\r
var[trigger.data["NFT"]] = {\r
ipfs: trigger.data["ipfs"], //Hash of the content\r
author: 'foreign', //The original seller is locked to foreign for foreign NFTs\r
soldBy: trigger.data["seller"],\r
duration: trigger.data["duration"] //Duration of the auction in seconds\r
};\r
}"
}
]
},
{
"if": "{\r
trigger.data["method"] == "ENABLE_INVESTING"\r
}",
"init": "{\r
if (var["artist_" || trigger.address])\r
bounce("You are already accepting investments");\r
if (NOT exists(trigger.data["share"]))\r
bounce("share field is mandatory");\r
if (NOT is_integer(trigger.data["share"]) OR trigger.data["share"] < 1 OR trigger.data["share"] > 50)\r
bounce("share must be an integer between 1 - 50");\r
}",
"messages": [
{
"app": "state",
"state": "{\r
var["artist_" || trigger.address] = {\r
supply: 0,\r
share: 0,\r
sharePercent: trigger.data["share"] / 100\r
};\r
}"
}
]
},
{
"if": "{\r
trigger.data["method"] == "DIVEST"\r
}",
"init": "{\r
if (NOT exists(trigger.data["artist"]))\r
bounce("artist field is mandatory");\r
if (NOT is_valid_address(trigger.data["artist"]))\r
bounce("artist's address is invalid");\r
\r
$artist = $artistInfo(trigger.data["artist"]);\r
\r
if (NOT $artist)\r
bounce("That artist never accepted maecenas");\r
\r
if (NOT trigger.data["amount"])\r
bounce("amount field is mandatory");\r
if (NOT is_integer(trigger.data["amount"]) OR trigger.data["amount"] <= 0)\r
bounce("amount must be an integer > 0");\r
\r
$investedAmount = var["maecenas_" || trigger.address || "_" || trigger.data["artist"]];\r
\r
if (NOT $investedAmount)\r
bounce("You have no shares of that artist");\r
\r
if (trigger.data["amount"] > ($investedAmount OTHERWISE 0))\r
bounce("You only have " || $investedAmount || " shares of that artist");\r
\r
$yourShare = floor($artist.share * trigger.data["amount"] / $artist.supply, 0);\r
\r
\r
if (($artist.supply - trigger.data["amount"]) > 0){\r
$p = $artist.share - trigger.data["amount"] / $artist.supply * $artist.share; //Pool value after user divevsted\r
$k = 1/($artist.supply + 1); //My fraction of the pool\r
$price = $_maecenasCurve($artist.supply + 1);\r
\r
\r
$ln1lessk = ln(1 - $k); //Save complexity\r
$logArgument = (($k - 1) != 0) ? ($k * $p * $ln1lessk) / ($k - 1) : 1;\r
\r
$lambertW = (($k - 1) != 0) ? $_lambertW($logArgument) : $price< $p ? 1 : 0;\r
\r
if ($logArgument <= e)\r
$sharesToBuy = 0;\r
\r
else {\r
$s = (1 - $k)!=0?((-1 * $lambertW) - $ln1lessk / ($ln1lessk)):0;\r
$sharesToBuy = abs(floor($s, 0));\r
} \r
}\r
$buyShares = ($sharesToBuy > 0);\r
$myProfit = $sharesToBuy ? $sharesToBuy / ($artist.supply + $sharesToBuy) * $p : 0;\r
\r
\r
if ($yourShare < 20000)\r
bounce("It is not worth divesting your share");\r
}",
"messages": [
{
"app": "payment",
"payload": {
"asset": "base",
"outputs": [
{
"address": "{trigger.address}",
"amount": "{$yourShare - 10000}"
}
]
}
},
{
"app": "state",
"state": "{\r
var["artist_" || trigger.data["artist"]] ||= {\r
share: $artist.share - $yourShare, //Decrease the share by the amount just divested\r
supply: $artist.supply - trigger.data["amount"] //Decrease the supply by the shares used to divest\r
};\r
$tmp = var["maecenas_" || trigger.address || "_" || trigger.data["artist"]];\r
\r
var["maecenas_" || trigger.address || "_" || trigger.data["artist"]] = (($tmp - trigger.data["amount"])==0) ? false : ($tmp - trigger.data["amount"]);\r
var["locked"] -= ($yourShare + $myProfit);\r
}"
}
]
},
{
"if": "{\r
trigger.data["method"] == "INVEST"\r
}",
"init": "{\r
if (NOT exists(trigger.data["artist"]))\r
bounce("artist field is mandatory");\r
if (NOT is_valid_address(trigger.data["artist"]))\r
bounce("artist field is not a valid address");\r
if (NOT var["artist_" || trigger.data["artist"]])\r
bounce("That artist is not accepting maecenas");\r
if (NOT exists(trigger.data["amount"]))\r
bounce("amount field is mandatory");\r
if (NOT is_integer(trigger.data["amount"]) OR trigger.data["amount"] <= 0)\r
bounce("amount must be a positive integer");\r
\r
$artist = $artistInfo(trigger.data["artist"]);\r
\r
$x0 = $artist.supply;\r
$x1 = $artist.supply + trigger.data["amount"];\r
\r
$upToFirstToken = 11511570 * $x0 * (1 + $x0) * (1 + 2 * $x0);\r
$upToTargetPurchase = 11511570 * $x1 * (1 + $x1) * (1 + 2 * $x1);\r
\r
$totalCost = round($upToTargetPurchase - ($upToFirstToken OTHERWISE 0), 0);\r
\r
if (trigger.output[[asset="base"]].amount < $totalCost)\r
bounce("Your payment is not enough for that purchase. You need to send " || $totalCost || " bytes" || (trigger.data["amount"]>1 ? " or reduce the amount of maecenas tokens you are buying" : ""));\r
}",
"messages": [
{
"app": "payment",
"payload": {
"asset": "base",
"outputs": [
{
"address": "{trigger.data["artist"]}",
"amount": "{floor($totalCost * (1 - $INVESTMENT_CUT) - 10000, 0)}"
}
]
}
},
{
"app": "state",
"state": "{\r
var["artist_" || trigger.data["artist"]] ||= {supply: $artist.supply + trigger.data["amount"]};\r
\r
if (var["maecenas_" || trigger.address || "_" || trigger.data["artist"]])\r
var["maecenas_" || trigger.address || "_" || trigger.data["artist"]] += trigger.data["amount"];\r
else\r
var["maecenas_" || trigger.address || "_" || trigger.data["artist"]] = trigger.data["amount"];\r
}"
}
]
},
{
"if": "{\r
trigger.data["method"] == "PROFILE"\r
}",
"init": "{\r
$prof = $profile(trigger.address);\r
\r
if ($prof.verified)\r
bounce("You have to contact support to modify a verified profile. We do this to prevent already verified accounts from impersonating other artists");\r
\r
$profileObj = $prof || trigger.data || {verified: false};\r
delete($profileObj, "method");\r
}",
"messages": [
{
"app": "state",
"state": "{\r
var["profile_" || trigger.address] = $profileObj;\r
}"
}
]
}
]
}
}
]