tx · 8xJoa4kK1gpcJYi8QjgXasuUDAJE6oEpTzKKmdiStmXh

3NBYw8rxLmTvyEdsvaYor8nHG6GJ4NjB2Aw:  -0.01000000 Waves

2023.02.27 08:33 [2467692] smart account 3NBYw8rxLmTvyEdsvaYor8nHG6GJ4NjB2Aw > SELF 0.00000000 Waves

{ "type": 13, "id": "8xJoa4kK1gpcJYi8QjgXasuUDAJE6oEpTzKKmdiStmXh", "fee": 1000000, "feeAssetId": null, "timestamp": 1677476118515, "version": 2, "chainId": 84, "sender": "3NBYw8rxLmTvyEdsvaYor8nHG6GJ4NjB2Aw", "senderPublicKey": "4NDsd3dGKXuKLCoSbYvcWCX276K9ShP75cs9HTBMLJEN", "proofs": [ "2p1bRVb1t6a1YtfFpqAouzQ27wgRF8xwEFUvT1GkBvLj7inHRn6tUuKaMZx7CXLX19KZ1jEEev4RLDEwv6f2rfE2" ], "script": "base64:BgIHCAISAwoBCAIABXRlYW1zASCFY5Wj84iOsN4MF44ITr+aP5K7Jts66HaOFtwUIipIfgAFV0FWRVMBAAEBaQESbWFudWFsRnVuZFRyYW5zZmVyAQ1yZWNlcGllbnRBZGRyBAZjYWxsZXIICAUBaQZjYWxsZXIFYnl0ZXMEB3JlY2l2ZXIJANkEAQUNcmVjZXBpZW50QWRkcgQGYW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQRcmVjZXBpZW50X3BheW1lbnQJAGgCCQBpAgUGYW1vdW50AOgHAM8HBAxwbGF0Zm9ybV9mZWUJAGgCCQBpAgUGYW1vdW50AOgHABkDCQAAAggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQR1bml0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJANgEAQUGY2FsbGVyAglfdHJhbnNmZXIFBmFtb3VudAkAzAgCCQELU3RyaW5nRW50cnkCAgxwbGF0Zm9ybV9mZWUJAKQDAQUMcGxhdGZvcm1fZmVlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkA2AQBBQZjYWxsZXICDF90cmFuc2Zlcl90bwUNcmVjZXBpZW50QWRkcgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQEHQWRkcmVzcwEFB3JlY2l2ZXIFEXJlY2VwaWVudF9wYXltZW50BQR1bml0BQNuaWwDCQAAAggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQV0ZWFtcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQDYBAEFBmNhbGxlcgIJX3RyYW5zZmVyBQZhbW91bnQJAMwIAgkBC1N0cmluZ0VudHJ5AgIMcGxhdGZvcm1fZmVlCQCkAwEFDHBsYXRmb3JtX2ZlZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJANgEAQUGY2FsbGVyAgxfdHJhbnNmZXJfdG8FDXJlY2VwaWVudEFkZHIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBB0FkZHJlc3MBBQdyZWNpdmVyBRFyZWNlcGllbnRfcGF5bWVudAUFdGVhbXMFA25pbAUDbmlsANuufV8=", "height": 2467692, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: GXDWSomhmW1ghzMLXYciuMbHsrF1U6od3tuyeh4o555K Next: 7X4ZbTvZzPEyZbQV5sX7pk5ydzTf6qjfJxK9NfsQ5BL9 Diff:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let separator = "_"
5-
6-let kBuy = "buy"
7-
8-let kPrice = "price"
9-
10-let kSell = "sell"
11-
12-let maxAuctionDuration = 30
13-
144 let teams = base58'9yhJDfWjPpv6tFjWRD1AJyBQwausJf2ZdxzLn86Uknnq'
155
166 let WAVES = base58''
177
18-let kBid = "bid"
19-
20-let statusForNFT = $Tuple4("OPEN", "CLOSED", "REWARDED", "CANCELED")
21-
22-let dAppAddress = base58'3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq'
23-
24-func isNft (assetId) = match assetInfo(assetId) {
25- case token: Asset =>
26- if (if ((token.decimals == 0))
27- then (token.quantity == 1)
28- else false)
29- then (token.reissuable == false)
30- else false
31- case _ =>
32- false
33-}
34-
35-
368 @Callable(i)
37-func createNft (nft_name,nft_owner,nft_dAppAddress,nft_type,nft_tags,nft_selling_price,nft_description,nft_onSell,nft_data) = {
38- let newToken = Issue(nft_name, nft_description, 1, 0, false)
39- let issueId = calculateAssetId(newToken)
40- let txId = i.transactionId
41-[newToken, ScriptTransfer(i.caller, 1, issueId), StringEntry(((toBase58String(issueId) + separator) + "Owner"), toString(i.caller)), StringEntry(((toBase58String(issueId) + separator) + "nft_type"), nft_type), StringEntry(((toBase58String(issueId) + separator) + "nft_tags"), nft_tags), StringEntry(((toBase58String(issueId) + separator) + "nft_dAppAddress"), nft_dAppAddress), IntegerEntry(((toBase58String(issueId) + separator) + "nft_selling_price"), nft_selling_price), StringEntry(((toBase58String(issueId) + separator) + "nft_onSell"), nft_onSell), StringEntry(((toBase58String(issueId) + separator) + "nft_data"), nft_data), StringEntry(((toBase58String(txId) + separator) + "issue_nft"), toBase58String(issueId))]
42- }
43-
44-
45-
46-@Callable(i)
47-func sellNFT (price,payment_currency) = {
48- let txId = i.transactionId
49- let seller = i.caller.bytes
50- let $t019011986 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
51- let token0 = $t019011986._1
52- let amount0 = $t019011986._2
53- if (!(isNft(token0)))
54- then throw("Token is not NFT")
55- else [StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), price), StringEntry(((toString(i.caller) + separator) + kSell), (((toBase58String(token0) + separator) + toString(amount0)) + payment_currency))]
56- }
57-
58-
59-
60-@Callable(i)
61-func buyNFT (nftID,current_nft_owner) = {
62- let assetId = fromBase58String(nftID)
63- let amount = value(i.payments[0].amount)
64- let checkOwnerIsSame = match getString(this, (("nft_" + current_nft_owner) + "_owner")) {
65- case a: String =>
66- a
67- case _ =>
68- false
69- }
70- let price = getStringValue(((((kPrice + separator) + nftID) + "_") + current_nft_owner))
71- let seller_amount = ((amount / 1000) * 975)
72- let platform_fee = ((amount / 1000) * 25)
73- if ((current_nft_owner == toString(i.caller)))
74- then throw("current Owner of NFT not able to purchase")
75- else if ((i.payments[0].assetId == teams))
76- then [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(Address(fromBase58String(current_nft_owner)), seller_amount, teams), StringEntry((("nft_" + nftID) + "platform_fee"), toString(platform_fee)), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount))), DeleteEntry((("nft_" + current_nft_owner) + "_owner")), StringEntry((("nft_" + current_nft_owner) + "_owner"), toString(i.caller)), StringEntry(((nftID + separator) + "_owner"), toString(i.caller))]
77- else if ((i.payments[0].assetId == unit))
78- then [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(Address(fromBase58String(current_nft_owner)), seller_amount, unit), StringEntry((("nft_" + nftID) + "platform_fee"), toString(platform_fee)), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount))), DeleteEntry((("nft_" + current_nft_owner) + "_owner")), StringEntry((("nft_" + current_nft_owner) + "_owner"), toString(i.caller)), StringEntry(((nftID + separator) + "_owner"), toString(i.caller))]
79- else nil
80- }
81-
82-
83-
84-@Callable(i)
85-func cancelSell (nftId) = {
86- let txId = toBase58String(i.transactionId)
87- let seller = i.caller.bytes
88-[StringEntry(((txId + nftId) + "_nft_status"), "CANCELED"), ScriptTransfer(Address(seller), 1, fromBase58String(nftId))]
89- }
90-
91-
92-
93-@Callable(i)
94-func addAuction (start,end,startPrice,duration,payment_currency) = {
95- let txId = toBase58String(i.transactionId)
96- let nftId = value(i.payments[0].assetId)
97- let price = value(startPrice)
98- let endHeight = (lastBlock.height + duration)
99- let caller = i.caller.bytes
100- let checkNftAuctioned = match getString(this, (((toBase58String(nftId) + separator) + "nft_status_") + toBase58String(caller))) {
101- case a: String =>
102- true
103- case _ =>
104- false
105- }
106- if ((checkNftAuctioned == true))
107- then throw("Already in auction list")
108- else if ((duration > maxAuctionDuration))
109- then throw(("Duration is too long. Must be less than or equal to 7 " + toString(maxAuctionDuration)))
110- else if ((i.payments[0].assetId == unit))
111- then throw("NFT not attached")
112- else if ((i.payments[0].assetId == teams))
113- then throw("NFT not attached")
114- else [StringEntry(((txId + "nft_start_auction_date") + toBase58String(caller)), start), StringEntry(((txId + "nft_end_auction_date") + toBase58String(caller)), end), StringEntry((txId + "_nft_start_price"), startPrice), StringEntry((txId + "_nft_owner"), toString(i.caller)), StringEntry((txId + "_nft_on_auction"), toBase58String(nftId)), StringEntry((txId + "_previous_bidder"), "none"), StringEntry((txId + "_highest_bid"), "0"), StringEntry((txId + "_winner_of_nft"), "0"), StringEntry((txId + "_bidder_count"), "0"), StringEntry((txId + "_nft_status"), "OPEN")]
115- }
116-
117-
118-
119-@Callable(i)
120-func placeBid (auctionId,nftId,nft_owner,bid_price,current_currency) = {
121- let txId = toBase58String(i.transactionId)
122- let caller = i.caller.bytes
123- let assetId = fromBase58String(nftId)
124- let tokenType = i.payments[0].assetId
125- let currentBidPrice = i.payments[0].amount
126- let getLastWinnerBidPrice = getStringValue(this, (auctionId + "_highest_bid"))
127- let getPreviousBidderAddress = getString(this, (auctionId + "_previous_bidder"))
128- let currentBidCount = getStringValue(this, (auctionId + "_bidder_count"))
129- let getLastWinnerAddress = getStringValue(this, (auctionId + "_winner_of_nft"))
130- let checkNftAuctioned = getStringValue(this, (auctionId + "_nft_status"))
131- if ((checkNftAuctioned != "OPEN"))
132- then throw("Not open for auction")
133- else if ((parseIntValue(getLastWinnerBidPrice) >= currentBidPrice))
134- then throw("Bid is less then starting/highest Bid")
135- else if ((getLastWinnerBidPrice == "0"))
136- then [StringEntry((auctionId + "_highest_bid"), toString(currentBidPrice)), StringEntry((auctionId + "_winner_of_nft"), toBase58String(i.caller.bytes)), StringEntry((auctionId + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((auctionId + "_nft_id"), toBase58String(assetId)), StringEntry((auctionId + "_nft_owner"), nft_owner), StringEntry((((txId + "_") + auctionId) + "_highest_bid"), toString(currentBidPrice)), StringEntry((((txId + "_") + auctionId) + "_winner"), toBase58String(i.caller.bytes)), StringEntry((((txId + "_") + auctionId) + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((((txId + "_") + auctionId) + "_nft_id"), toBase58String(assetId)), StringEntry((((txId + "_") + auctionId) + "_nft_owner"), nft_owner), StringEntry((txId + "_bid_for_nft_by"), toBase58String(caller)), StringEntry((txId + "_bid_price_place"), bid_price), StringEntry((txId + "_previous_bid_amount_refund_to_address"), getLastWinnerAddress), StringEntry((txId + "_prevoius_bid_amount_refund"), getLastWinnerBidPrice)]
137- else if ((getLastWinnerBidPrice != "0"))
138- then [ScriptTransfer(Address(fromBase58String(getLastWinnerAddress)), parseIntValue(getLastWinnerBidPrice), tokenType), StringEntry((txId + "_previous_bid_amount_refund_to_address"), getLastWinnerAddress), StringEntry((txId + "_prevoius_bid_amount_refund"), getLastWinnerBidPrice), StringEntry((auctionId + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((auctionId + "_highest_bid"), toString(currentBidPrice)), StringEntry((auctionId + "_winner_of_nft"), toBase58String(i.caller.bytes)), StringEntry((auctionId + "_nft_id"), toBase58String(assetId)), StringEntry((auctionId + "_nft_owner"), nft_owner), StringEntry((((txId + "_") + auctionId) + "_highest_bid"), toString(currentBidPrice)), StringEntry((((txId + "_") + auctionId) + "_winner"), toBase58String(i.caller.bytes)), StringEntry((((txId + "_") + auctionId) + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((((txId + "_") + auctionId) + "_nft_id"), toBase58String(assetId)), StringEntry((((txId + "_") + auctionId) + "_nft_owner"), nft_owner), StringEntry((txId + "_bid_for_nft_by"), toBase58String(caller)), StringEntry((txId + "_bid_price_place"), bid_price)]
139- else nil
140- }
141-
142-
143-
144-@Callable(i)
145-func acceptBidOffer (auctionId,nftId,bid_amount_from_user,current_currency) = {
146- let asimiString = "9yhJDfWjPpv6tFjWRD1AJyBQwausJf2ZdxzLn86Uknnq"
147- let txId = toBase58String(i.transactionId)
148- let amountUnit = fromBase58String(current_currency)
149- let caller = i.caller.bytes
150- let assetId = fromBase58String(nftId)
151- let getNftWinningPrice = getStringValue(this, (auctionId + "_highest_bid"))
152- let getNftWinningamount = ((parseIntValue(getNftWinningPrice) / 1000) * 975)
153- let platform_fee = ((parseIntValue(getNftWinningPrice) / 1000) * 25)
154- let getAuctionWinner = getStringValue(this, (auctionId + "_winner_of_nft"))
155- if ((current_currency == asimiString))
156- then [ScriptTransfer(Address(caller), getNftWinningamount, amountUnit), ScriptTransfer(Address(fromBase58String(getAuctionWinner)), 1, assetId), StringEntry("platform_fee", toString(platform_fee)), StringEntry((txId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((txId + "_nft_transfer_to"), getAuctionWinner), StringEntry((txId + "_nft_status"), "REWARDED"), StringEntry((auctionId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((auctionId + "_nft_transfer_to"), getAuctionWinner), StringEntry((auctionId + "_nft_status"), "REWARDED")]
157- else if ((current_currency == "WAVES"))
158- then [ScriptTransfer(Address(caller), getNftWinningamount, unit), ScriptTransfer(Address(fromBase58String(getAuctionWinner)), 1, assetId), StringEntry("platform_fee", toString(platform_fee)), StringEntry((txId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((txId + "_nft_transfer_to"), getAuctionWinner), StringEntry((txId + "_nft_status"), "REWARDED"), StringEntry((auctionId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((auctionId + "_nft_transfer_to"), getAuctionWinner), StringEntry((auctionId + "_nft_status"), "REWARDED")]
159- else nil
160- }
161-
162-
163-
164-@Callable(i)
165-func cancelAuction (auctionId,current_currency) = {
166- let txId = toBase58String(i.transactionId)
167- let caller = i.caller.bytes
168- let auctionStatus = getStringValue(this, (auctionId + "_nft_status"))
169- let biddingWinner = getStringValue(this, (auctionId + "_winner_of_nft"))
170- let nftOwner = getStringValue(this, (auctionId + "_nft_owner"))
171- let nftId = getStringValue(this, (auctionId + "_nft_on_auction"))
172- let biddingPrice = getStringValue(this, (auctionId + "_highest_bid"))
173- if ((biddingWinner == "0"))
174- then [StringEntry(((txId + auctionId) + "_nft_status"), "CANCELED"), ScriptTransfer(Address(fromBase58String(nftOwner)), 1, fromBase58String(nftId))]
175- else if ((biddingWinner != "0"))
176- then throw("soory you can't cancel it because already auction placed by someone")
177- else nil
178- }
179-
180-
181-
182-@Callable(i)
183-func manualFundTransfer (recepientAddr,message) = {
9+func manualFundTransfer (recepientAddr) = {
18410 let caller = i.caller.bytes
18511 let reciver = fromBase58String(recepientAddr)
18612 let amount = i.payments[0].amount
19420 }
19521
19622
197-
198-@Callable(i)
199-func backValue (auctionId) = {
200- let caller = i.caller.bytes
201- let nftId = getStringValue(this, (auctionId + "_nft_on_auction"))
202- let nftOwner = getStringValue(this, (auctionId + "_nft_owner"))
203-[StringEntry((auctionId + "_nft_status"), "Auction_time over"), ScriptTransfer(Address(fromBase58String(nftOwner)), 1, fromBase58String(nftId))]
204- }
205-
206-
207-
208-@Callable(i)
209-func withdrawBid (bidTxId,current_currency) = {
210- let caller = i.caller.bytes
211- let asimiString = "9yhJDfWjPpv6tFjWRD1AJyBQwausJf2ZdxzLn86Uknnq"
212- let txId = toBase58String(i.transactionId)
213- let amountUnit = fromBase58String(current_currency)
214- let bidPrice = getStringValue(this, (bidTxId + "_highest_bid"))
215- let asBidder = getStringValue(this, (bidTxId + "_winner"))
216- let bidForNFT = getStringValue(this, (bidTxId + "_nft_id"))
217- if ((current_currency == asimiString))
218- then [StringEntry((bidTxId + "_nft_bid"), "WITHDRAW"), StringEntry((bidTxId + "_nft_id"), bidForNFT), StringEntry((bidTxId + "_bidding_price_refund_amount"), bidPrice), ScriptTransfer(i.caller, parseIntValue(bidPrice), amountUnit)]
219- else if ((current_currency == "WAVES"))
220- then [StringEntry((bidTxId + "_nft_bid"), "WITHDRAW"), StringEntry((bidTxId + "_nft_id"), bidForNFT), StringEntry((bidTxId + "_bidding_price_refund_amount"), bidPrice), ScriptTransfer(i.caller, parseIntValue(bidPrice), unit)]
221- else nil
222- }
223-
224-
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let separator = "_"
5-
6-let kBuy = "buy"
7-
8-let kPrice = "price"
9-
10-let kSell = "sell"
11-
12-let maxAuctionDuration = 30
13-
144 let teams = base58'9yhJDfWjPpv6tFjWRD1AJyBQwausJf2ZdxzLn86Uknnq'
155
166 let WAVES = base58''
177
18-let kBid = "bid"
19-
20-let statusForNFT = $Tuple4("OPEN", "CLOSED", "REWARDED", "CANCELED")
21-
22-let dAppAddress = base58'3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq'
23-
24-func isNft (assetId) = match assetInfo(assetId) {
25- case token: Asset =>
26- if (if ((token.decimals == 0))
27- then (token.quantity == 1)
28- else false)
29- then (token.reissuable == false)
30- else false
31- case _ =>
32- false
33-}
34-
35-
368 @Callable(i)
37-func createNft (nft_name,nft_owner,nft_dAppAddress,nft_type,nft_tags,nft_selling_price,nft_description,nft_onSell,nft_data) = {
38- let newToken = Issue(nft_name, nft_description, 1, 0, false)
39- let issueId = calculateAssetId(newToken)
40- let txId = i.transactionId
41-[newToken, ScriptTransfer(i.caller, 1, issueId), StringEntry(((toBase58String(issueId) + separator) + "Owner"), toString(i.caller)), StringEntry(((toBase58String(issueId) + separator) + "nft_type"), nft_type), StringEntry(((toBase58String(issueId) + separator) + "nft_tags"), nft_tags), StringEntry(((toBase58String(issueId) + separator) + "nft_dAppAddress"), nft_dAppAddress), IntegerEntry(((toBase58String(issueId) + separator) + "nft_selling_price"), nft_selling_price), StringEntry(((toBase58String(issueId) + separator) + "nft_onSell"), nft_onSell), StringEntry(((toBase58String(issueId) + separator) + "nft_data"), nft_data), StringEntry(((toBase58String(txId) + separator) + "issue_nft"), toBase58String(issueId))]
42- }
43-
44-
45-
46-@Callable(i)
47-func sellNFT (price,payment_currency) = {
48- let txId = i.transactionId
49- let seller = i.caller.bytes
50- let $t019011986 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
51- let token0 = $t019011986._1
52- let amount0 = $t019011986._2
53- if (!(isNft(token0)))
54- then throw("Token is not NFT")
55- else [StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), price), StringEntry(((toString(i.caller) + separator) + kSell), (((toBase58String(token0) + separator) + toString(amount0)) + payment_currency))]
56- }
57-
58-
59-
60-@Callable(i)
61-func buyNFT (nftID,current_nft_owner) = {
62- let assetId = fromBase58String(nftID)
63- let amount = value(i.payments[0].amount)
64- let checkOwnerIsSame = match getString(this, (("nft_" + current_nft_owner) + "_owner")) {
65- case a: String =>
66- a
67- case _ =>
68- false
69- }
70- let price = getStringValue(((((kPrice + separator) + nftID) + "_") + current_nft_owner))
71- let seller_amount = ((amount / 1000) * 975)
72- let platform_fee = ((amount / 1000) * 25)
73- if ((current_nft_owner == toString(i.caller)))
74- then throw("current Owner of NFT not able to purchase")
75- else if ((i.payments[0].assetId == teams))
76- then [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(Address(fromBase58String(current_nft_owner)), seller_amount, teams), StringEntry((("nft_" + nftID) + "platform_fee"), toString(platform_fee)), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount))), DeleteEntry((("nft_" + current_nft_owner) + "_owner")), StringEntry((("nft_" + current_nft_owner) + "_owner"), toString(i.caller)), StringEntry(((nftID + separator) + "_owner"), toString(i.caller))]
77- else if ((i.payments[0].assetId == unit))
78- then [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(Address(fromBase58String(current_nft_owner)), seller_amount, unit), StringEntry((("nft_" + nftID) + "platform_fee"), toString(platform_fee)), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount))), DeleteEntry((("nft_" + current_nft_owner) + "_owner")), StringEntry((("nft_" + current_nft_owner) + "_owner"), toString(i.caller)), StringEntry(((nftID + separator) + "_owner"), toString(i.caller))]
79- else nil
80- }
81-
82-
83-
84-@Callable(i)
85-func cancelSell (nftId) = {
86- let txId = toBase58String(i.transactionId)
87- let seller = i.caller.bytes
88-[StringEntry(((txId + nftId) + "_nft_status"), "CANCELED"), ScriptTransfer(Address(seller), 1, fromBase58String(nftId))]
89- }
90-
91-
92-
93-@Callable(i)
94-func addAuction (start,end,startPrice,duration,payment_currency) = {
95- let txId = toBase58String(i.transactionId)
96- let nftId = value(i.payments[0].assetId)
97- let price = value(startPrice)
98- let endHeight = (lastBlock.height + duration)
99- let caller = i.caller.bytes
100- let checkNftAuctioned = match getString(this, (((toBase58String(nftId) + separator) + "nft_status_") + toBase58String(caller))) {
101- case a: String =>
102- true
103- case _ =>
104- false
105- }
106- if ((checkNftAuctioned == true))
107- then throw("Already in auction list")
108- else if ((duration > maxAuctionDuration))
109- then throw(("Duration is too long. Must be less than or equal to 7 " + toString(maxAuctionDuration)))
110- else if ((i.payments[0].assetId == unit))
111- then throw("NFT not attached")
112- else if ((i.payments[0].assetId == teams))
113- then throw("NFT not attached")
114- else [StringEntry(((txId + "nft_start_auction_date") + toBase58String(caller)), start), StringEntry(((txId + "nft_end_auction_date") + toBase58String(caller)), end), StringEntry((txId + "_nft_start_price"), startPrice), StringEntry((txId + "_nft_owner"), toString(i.caller)), StringEntry((txId + "_nft_on_auction"), toBase58String(nftId)), StringEntry((txId + "_previous_bidder"), "none"), StringEntry((txId + "_highest_bid"), "0"), StringEntry((txId + "_winner_of_nft"), "0"), StringEntry((txId + "_bidder_count"), "0"), StringEntry((txId + "_nft_status"), "OPEN")]
115- }
116-
117-
118-
119-@Callable(i)
120-func placeBid (auctionId,nftId,nft_owner,bid_price,current_currency) = {
121- let txId = toBase58String(i.transactionId)
122- let caller = i.caller.bytes
123- let assetId = fromBase58String(nftId)
124- let tokenType = i.payments[0].assetId
125- let currentBidPrice = i.payments[0].amount
126- let getLastWinnerBidPrice = getStringValue(this, (auctionId + "_highest_bid"))
127- let getPreviousBidderAddress = getString(this, (auctionId + "_previous_bidder"))
128- let currentBidCount = getStringValue(this, (auctionId + "_bidder_count"))
129- let getLastWinnerAddress = getStringValue(this, (auctionId + "_winner_of_nft"))
130- let checkNftAuctioned = getStringValue(this, (auctionId + "_nft_status"))
131- if ((checkNftAuctioned != "OPEN"))
132- then throw("Not open for auction")
133- else if ((parseIntValue(getLastWinnerBidPrice) >= currentBidPrice))
134- then throw("Bid is less then starting/highest Bid")
135- else if ((getLastWinnerBidPrice == "0"))
136- then [StringEntry((auctionId + "_highest_bid"), toString(currentBidPrice)), StringEntry((auctionId + "_winner_of_nft"), toBase58String(i.caller.bytes)), StringEntry((auctionId + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((auctionId + "_nft_id"), toBase58String(assetId)), StringEntry((auctionId + "_nft_owner"), nft_owner), StringEntry((((txId + "_") + auctionId) + "_highest_bid"), toString(currentBidPrice)), StringEntry((((txId + "_") + auctionId) + "_winner"), toBase58String(i.caller.bytes)), StringEntry((((txId + "_") + auctionId) + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((((txId + "_") + auctionId) + "_nft_id"), toBase58String(assetId)), StringEntry((((txId + "_") + auctionId) + "_nft_owner"), nft_owner), StringEntry((txId + "_bid_for_nft_by"), toBase58String(caller)), StringEntry((txId + "_bid_price_place"), bid_price), StringEntry((txId + "_previous_bid_amount_refund_to_address"), getLastWinnerAddress), StringEntry((txId + "_prevoius_bid_amount_refund"), getLastWinnerBidPrice)]
137- else if ((getLastWinnerBidPrice != "0"))
138- then [ScriptTransfer(Address(fromBase58String(getLastWinnerAddress)), parseIntValue(getLastWinnerBidPrice), tokenType), StringEntry((txId + "_previous_bid_amount_refund_to_address"), getLastWinnerAddress), StringEntry((txId + "_prevoius_bid_amount_refund"), getLastWinnerBidPrice), StringEntry((auctionId + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((auctionId + "_highest_bid"), toString(currentBidPrice)), StringEntry((auctionId + "_winner_of_nft"), toBase58String(i.caller.bytes)), StringEntry((auctionId + "_nft_id"), toBase58String(assetId)), StringEntry((auctionId + "_nft_owner"), nft_owner), StringEntry((((txId + "_") + auctionId) + "_highest_bid"), toString(currentBidPrice)), StringEntry((((txId + "_") + auctionId) + "_winner"), toBase58String(i.caller.bytes)), StringEntry((((txId + "_") + auctionId) + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((((txId + "_") + auctionId) + "_nft_id"), toBase58String(assetId)), StringEntry((((txId + "_") + auctionId) + "_nft_owner"), nft_owner), StringEntry((txId + "_bid_for_nft_by"), toBase58String(caller)), StringEntry((txId + "_bid_price_place"), bid_price)]
139- else nil
140- }
141-
142-
143-
144-@Callable(i)
145-func acceptBidOffer (auctionId,nftId,bid_amount_from_user,current_currency) = {
146- let asimiString = "9yhJDfWjPpv6tFjWRD1AJyBQwausJf2ZdxzLn86Uknnq"
147- let txId = toBase58String(i.transactionId)
148- let amountUnit = fromBase58String(current_currency)
149- let caller = i.caller.bytes
150- let assetId = fromBase58String(nftId)
151- let getNftWinningPrice = getStringValue(this, (auctionId + "_highest_bid"))
152- let getNftWinningamount = ((parseIntValue(getNftWinningPrice) / 1000) * 975)
153- let platform_fee = ((parseIntValue(getNftWinningPrice) / 1000) * 25)
154- let getAuctionWinner = getStringValue(this, (auctionId + "_winner_of_nft"))
155- if ((current_currency == asimiString))
156- then [ScriptTransfer(Address(caller), getNftWinningamount, amountUnit), ScriptTransfer(Address(fromBase58String(getAuctionWinner)), 1, assetId), StringEntry("platform_fee", toString(platform_fee)), StringEntry((txId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((txId + "_nft_transfer_to"), getAuctionWinner), StringEntry((txId + "_nft_status"), "REWARDED"), StringEntry((auctionId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((auctionId + "_nft_transfer_to"), getAuctionWinner), StringEntry((auctionId + "_nft_status"), "REWARDED")]
157- else if ((current_currency == "WAVES"))
158- then [ScriptTransfer(Address(caller), getNftWinningamount, unit), ScriptTransfer(Address(fromBase58String(getAuctionWinner)), 1, assetId), StringEntry("platform_fee", toString(platform_fee)), StringEntry((txId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((txId + "_nft_transfer_to"), getAuctionWinner), StringEntry((txId + "_nft_status"), "REWARDED"), StringEntry((auctionId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((auctionId + "_nft_transfer_to"), getAuctionWinner), StringEntry((auctionId + "_nft_status"), "REWARDED")]
159- else nil
160- }
161-
162-
163-
164-@Callable(i)
165-func cancelAuction (auctionId,current_currency) = {
166- let txId = toBase58String(i.transactionId)
167- let caller = i.caller.bytes
168- let auctionStatus = getStringValue(this, (auctionId + "_nft_status"))
169- let biddingWinner = getStringValue(this, (auctionId + "_winner_of_nft"))
170- let nftOwner = getStringValue(this, (auctionId + "_nft_owner"))
171- let nftId = getStringValue(this, (auctionId + "_nft_on_auction"))
172- let biddingPrice = getStringValue(this, (auctionId + "_highest_bid"))
173- if ((biddingWinner == "0"))
174- then [StringEntry(((txId + auctionId) + "_nft_status"), "CANCELED"), ScriptTransfer(Address(fromBase58String(nftOwner)), 1, fromBase58String(nftId))]
175- else if ((biddingWinner != "0"))
176- then throw("soory you can't cancel it because already auction placed by someone")
177- else nil
178- }
179-
180-
181-
182-@Callable(i)
183-func manualFundTransfer (recepientAddr,message) = {
9+func manualFundTransfer (recepientAddr) = {
18410 let caller = i.caller.bytes
18511 let reciver = fromBase58String(recepientAddr)
18612 let amount = i.payments[0].amount
18713 let recepient_payment = ((amount / 1000) * 975)
18814 let platform_fee = ((amount / 1000) * 25)
18915 if ((i.payments[0].assetId == unit))
19016 then [IntegerEntry((toBase58String(caller) + "_transfer"), amount), StringEntry("platform_fee", toString(platform_fee)), StringEntry((toBase58String(caller) + "_transfer_to"), recepientAddr), ScriptTransfer(Address(reciver), recepient_payment, unit)]
19117 else if ((i.payments[0].assetId == teams))
19218 then [IntegerEntry((toBase58String(caller) + "_transfer"), amount), StringEntry("platform_fee", toString(platform_fee)), StringEntry((toBase58String(caller) + "_transfer_to"), recepientAddr), ScriptTransfer(Address(reciver), recepient_payment, teams)]
19319 else nil
19420 }
19521
19622
197-
198-@Callable(i)
199-func backValue (auctionId) = {
200- let caller = i.caller.bytes
201- let nftId = getStringValue(this, (auctionId + "_nft_on_auction"))
202- let nftOwner = getStringValue(this, (auctionId + "_nft_owner"))
203-[StringEntry((auctionId + "_nft_status"), "Auction_time over"), ScriptTransfer(Address(fromBase58String(nftOwner)), 1, fromBase58String(nftId))]
204- }
205-
206-
207-
208-@Callable(i)
209-func withdrawBid (bidTxId,current_currency) = {
210- let caller = i.caller.bytes
211- let asimiString = "9yhJDfWjPpv6tFjWRD1AJyBQwausJf2ZdxzLn86Uknnq"
212- let txId = toBase58String(i.transactionId)
213- let amountUnit = fromBase58String(current_currency)
214- let bidPrice = getStringValue(this, (bidTxId + "_highest_bid"))
215- let asBidder = getStringValue(this, (bidTxId + "_winner"))
216- let bidForNFT = getStringValue(this, (bidTxId + "_nft_id"))
217- if ((current_currency == asimiString))
218- then [StringEntry((bidTxId + "_nft_bid"), "WITHDRAW"), StringEntry((bidTxId + "_nft_id"), bidForNFT), StringEntry((bidTxId + "_bidding_price_refund_amount"), bidPrice), ScriptTransfer(i.caller, parseIntValue(bidPrice), amountUnit)]
219- else if ((current_currency == "WAVES"))
220- then [StringEntry((bidTxId + "_nft_bid"), "WITHDRAW"), StringEntry((bidTxId + "_nft_id"), bidForNFT), StringEntry((bidTxId + "_bidding_price_refund_amount"), bidPrice), ScriptTransfer(i.caller, parseIntValue(bidPrice), unit)]
221- else nil
222- }
223-
224-

github/deemru/w8io/c3f4982 
49.86 ms