tx · CMPVXWkuLRGLDaV3Zo4i8NPS966xdeQtS5nygwQbDWpj

3MpKvUfNxrgF7QotPjFwi8thMagSveNScKe:  -0.01400000 Waves

2020.11.01 21:48 [1246624] smart account 3MpKvUfNxrgF7QotPjFwi8thMagSveNScKe > SELF 0.00000000 Waves

{ "type": 13, "id": "CMPVXWkuLRGLDaV3Zo4i8NPS966xdeQtS5nygwQbDWpj", "fee": 1400000, "feeAssetId": null, "timestamp": 1604256529762, "version": 2, "chainId": 84, "sender": "3MpKvUfNxrgF7QotPjFwi8thMagSveNScKe", "senderPublicKey": "9GE2xN4fms9YNDxR1hGg52RynqDd8125TA42g4X29ZV7", "proofs": [ "2VEDyEeGhibGuGLbkBvS1dS2F54N7dK1WBWHhj9oFCLn5fJBFx2bDPThF9NiUiwQKGJfZphaUWch57AGRpZBbxxk" ], "script": "base64:AAIEAAAAAAAAABUIAhIGCgQIAQEIEgQKAggIEgMKAQgAAAAEAAAAAAJjZgkBAAAAFGFkZHJlc3NGcm9tUHVibGljS2V5AAAAAQkAAlkAAAABAgAAACxKN3Z5b1VBOEdkNVFNcTRZVnRlZHB2MTlkd0NZcm9aRVlyTjhiS2dMenFWOAAAAAAEb3BicgEAAAAgmfy5oa9oHbJYecHXssaagqIhQYzkPpfErZjoZUq4xX8BAAAAEGdldEFsbG93ZWRUb2tlbnMAAAABAAAAB3Rva2VuSWQEAAAABWFsbG93BAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAAB3Rva2VuSWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQcFAAAABWFsbG93AQAAAAtjb21wYXJlSGFzaAAAAAIAAAABYwAAAAFoCQAAAAAAAAIJAAH1AAAAAQkAAfYAAAABCQABmwAAAAEFAAAAAWMJAAJZAAAAAQUAAAABaAAAAAMAAAABaQEAAAAHb3BickJ1eQAAAAQAAAAHdG9rZW5JZAAAAANxdGQAAAAFcHJpY2UAAAAEaGFzaAQAAAAJYnV5ZXJBZGRyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAA3BtdAgFAAAAAWkAAAAIcGF5bWVudHMEAAAAB2FsbG93ZWQJAQAAABBnZXRBbGxvd2VkVG9rZW5zAAAAAQUAAAAHdG9rZW5JZAMJAAAAAAAAAgkAAZAAAAABBQAAAANwbXQAAAAAAAAAAAAJAAACAAAAAQIAAAAhUGF5bWVudCBmb3IgZXhjaGFuZ2UgaXMgbWFuZGF0b3J5AwkBAAAAASEAAAABCQEAAAALY29tcGFyZUhhc2gAAAACCQABLAAAAAIFAAAAB3Rva2VuSWQJAAGkAAAAAQkAAGgAAAACBQAAAANxdGQFAAAABXByaWNlBQAAAARoYXNoCQAAAgAAAAECAAAAJFB1cmNoYXNlIGluZm9ybWF0aW9uIGlzIGluY29tcGF0aWJsZQMDCQEAAAAJaXNEZWZpbmVkAAAAAQgJAAGRAAAAAgUAAAADcG10AAAAAAAAAAAAAAAAB2Fzc2V0SWQJAAAAAAAAAgUAAAAHYWxsb3dlZAcHCQAAAgAAAAECAAAAHlRoZSB1c2VkIHRva2VuIGlzIG5vdCBhY2NlcHRlZAMDCQEAAAAJaXNEZWZpbmVkAAAAAQgJAAGRAAAAAgUAAAADcG10AAAAAAAAAAAAAAAAB2Fzc2V0SWQJAQAAAAIhPQAAAAIJAAJZAAAAAQUAAAAHdG9rZW5JZAgJAAGRAAAAAgUAAAADcG10AAAAAAAAAAAAAAAAB2Fzc2V0SWQHCQAAAgAAAAECAAAAMGRlY2xhcmVkIHRva2VuIGlzIGRpZmZlcmVudCBmcm9tIHN1Ym1pdHRlZCB0b2tlbgQAAAABYwkAAGsAAAADAAAAAAAAAAABCAkAAZEAAAACBQAAAANwbXQAAAAAAAAAAAAAAAAGYW1vdW50AAAAAAAAAABkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAADcXRkBQAAAARvcGJyCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAAmNmBQAAAAFjCAkAAZEAAAACBQAAAANwbXQAAAAAAAAAAAAAAAAHYXNzZXRJZAUAAAADbmlsAAAAAWkBAAAACXRva2VuTGlzdAAAAAIAAAAHdG9rZW5JZAAAAAZ0aWNrZXIEAAAABEFkZHIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwMJAQAAAAIhPQAAAAIFAAAABEFkZHIJAAQlAAAAAQUAAAAEdGhpcwkAAAIAAAABAgAAACxUaGUgYWRkcmVzcyBpcyBub3QgYXV0aG9yaXplZCB0byBsaXN0IHRva2VucwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAd0b2tlbklkBQAAAAZ0aWNrZXIJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAACY2YAAAAAAAAPQkAFAAAABHVuaXQFAAAAA25pbAAAAAFpAQAAAAt0b2tlbkRlbGlzdAAAAAEAAAAHdG9rZW5JZAQAAAAEQWRkcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAwkBAAAAAiE9AAAAAgUAAAAEQWRkcgkABCUAAAABBQAAAAR0aGlzCQAAAgAAAAECAAAALlRoZSBhZGRyZXNzIGlzIG5vdCBhdXRob3JpemVkIHRvIGRlbGlzdCB0b2tlbnMJAARMAAAAAgkBAAAAC0RlbGV0ZUVudHJ5AAAAAQUAAAAHdG9rZW5JZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAJjZgAAAAAAAJiWgAUAAAAEdW5pdAUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXl8gjNm", "height": 1246624, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: M4MXnUH4KNTZYJZPk9wsR8jESYVTC3LRohH7ygwd3sH Next: 37qPGv7987a7mXYAqAA78pbs4CGL1hDv2NpAZh75B1F7 Diff:
OldNewDifferences
11 {-# STDLIB_VERSION 4 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let fK = addressFromPublicKey(fromBase58String("CXDnabHuaPwwZQRJuRzkFeDLPKoyDUc1aQnfMiUPKtHF"))
4+let cf = addressFromPublicKey(fromBase58String("J7vyoUA8Gd5QMq4YVtedpv19dwCYroZEYrN8bKgLzqV8"))
5+
6+let opbr = base58'BN6ta4Sfmmh8tfmJE4pqJrSxLNJReAqnerPePYqkjcjG'
7+
8+func getAllowedTokens (tokenId) = {
9+ let allow = match getString(this, tokenId) {
10+ case a: String =>
11+ a
12+ case _ =>
13+ false
14+ }
15+ allow
16+ }
17+
18+
19+func compareHash (c,h) = (keccak256(blake2b256(toBytes(c))) == fromBase58String(h))
20+
521
622 @Callable(i)
7-func opbrBuy () = {
23+func opbrBuy (tokenId,qtd,price,hash) = {
824 let buyerAddr = toBase58String(i.caller.bytes)
925 let pmt = i.payments
26+ let allowed = getAllowedTokens(tokenId)
1027 if ((size(pmt) == 0))
1128 then throw("Payment for exchange is mandatory")
12- else throw(("Payment for exchange is mandatory" + toString(pmt[0].amount)))
29+ else if (!(compareHash((tokenId + toString((qtd * price))), hash)))
30+ then throw("Purchase information is incompatible")
31+ else if (if (isDefined(pmt[0].assetId))
32+ then (allowed == false)
33+ else false)
34+ then throw("The used token is not accepted")
35+ else if (if (isDefined(pmt[0].assetId))
36+ then (fromBase58String(tokenId) != pmt[0].assetId)
37+ else false)
38+ then throw("declared token is different from submitted token")
39+ else {
40+ let c = fraction(1, pmt[0].amount, 100)
41+[ScriptTransfer(i.caller, qtd, opbr), ScriptTransfer(cf, c, pmt[0].assetId)]
42+ }
1343 }
1444
1545
1949 let Addr = toBase58String(i.caller.bytes)
2050 if ((Addr != toString(this)))
2151 then throw("The address is not authorized to list tokens")
22- else [StringEntry(tokenId, ticker), ScriptTransfer(fK, 1000000, unit)]
52+ else [StringEntry(tokenId, ticker), ScriptTransfer(cf, 1000000, unit)]
2353 }
2454
2555
2959 let Addr = toBase58String(i.caller.bytes)
3060 if ((Addr != toString(this)))
3161 then throw("The address is not authorized to delist tokens")
32- else [DeleteEntry(tokenId), ScriptTransfer(fK, 10000000, unit)]
62+ else [DeleteEntry(tokenId), ScriptTransfer(cf, 10000000, unit)]
3363 }
3464
3565
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 4 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let fK = addressFromPublicKey(fromBase58String("CXDnabHuaPwwZQRJuRzkFeDLPKoyDUc1aQnfMiUPKtHF"))
4+let cf = addressFromPublicKey(fromBase58String("J7vyoUA8Gd5QMq4YVtedpv19dwCYroZEYrN8bKgLzqV8"))
5+
6+let opbr = base58'BN6ta4Sfmmh8tfmJE4pqJrSxLNJReAqnerPePYqkjcjG'
7+
8+func getAllowedTokens (tokenId) = {
9+ let allow = match getString(this, tokenId) {
10+ case a: String =>
11+ a
12+ case _ =>
13+ false
14+ }
15+ allow
16+ }
17+
18+
19+func compareHash (c,h) = (keccak256(blake2b256(toBytes(c))) == fromBase58String(h))
20+
521
622 @Callable(i)
7-func opbrBuy () = {
23+func opbrBuy (tokenId,qtd,price,hash) = {
824 let buyerAddr = toBase58String(i.caller.bytes)
925 let pmt = i.payments
26+ let allowed = getAllowedTokens(tokenId)
1027 if ((size(pmt) == 0))
1128 then throw("Payment for exchange is mandatory")
12- else throw(("Payment for exchange is mandatory" + toString(pmt[0].amount)))
29+ else if (!(compareHash((tokenId + toString((qtd * price))), hash)))
30+ then throw("Purchase information is incompatible")
31+ else if (if (isDefined(pmt[0].assetId))
32+ then (allowed == false)
33+ else false)
34+ then throw("The used token is not accepted")
35+ else if (if (isDefined(pmt[0].assetId))
36+ then (fromBase58String(tokenId) != pmt[0].assetId)
37+ else false)
38+ then throw("declared token is different from submitted token")
39+ else {
40+ let c = fraction(1, pmt[0].amount, 100)
41+[ScriptTransfer(i.caller, qtd, opbr), ScriptTransfer(cf, c, pmt[0].assetId)]
42+ }
1343 }
1444
1545
1646
1747 @Callable(i)
1848 func tokenList (tokenId,ticker) = {
1949 let Addr = toBase58String(i.caller.bytes)
2050 if ((Addr != toString(this)))
2151 then throw("The address is not authorized to list tokens")
22- else [StringEntry(tokenId, ticker), ScriptTransfer(fK, 1000000, unit)]
52+ else [StringEntry(tokenId, ticker), ScriptTransfer(cf, 1000000, unit)]
2353 }
2454
2555
2656
2757 @Callable(i)
2858 func tokenDelist (tokenId) = {
2959 let Addr = toBase58String(i.caller.bytes)
3060 if ((Addr != toString(this)))
3161 then throw("The address is not authorized to delist tokens")
32- else [DeleteEntry(tokenId), ScriptTransfer(fK, 10000000, unit)]
62+ else [DeleteEntry(tokenId), ScriptTransfer(cf, 10000000, unit)]
3363 }
3464
3565
3666 @Verifier(tx)
3767 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
3868

github/deemru/w8io/3ef1775 
33.59 ms