tx · 3U5nmTbUQxnnfbVN2WqCqm2F3xAZHCFEwfCKGNM16taH

3P9Typ8Wnoxt719juABnCeErU5wAvfcXAU9:  -1.00400000 Waves

2019.09.04 17:30 [1691410] smart asset 3P9Typ8Wnoxt719juABnCeErU5wAvfcXAU9 > SELF 0.00000000 TBTC

{
    "type": 15,
    "id": "3U5nmTbUQxnnfbVN2WqCqm2F3xAZHCFEwfCKGNM16taH",
    "fee": 100400000,
    "feeAssetId": null,
    "timestamp": 1567607350570,
    "version": 1,
    "sender": "3P9Typ8Wnoxt719juABnCeErU5wAvfcXAU9",
    "senderPublicKey": "8aTd48D3ZAesTTu91EY4oDZGFZ1KzCCZF3rrDKZgpfoR",
    "proofs": [
        "2z9LkLPjV6JYDzf4bK9eCjC1dqwq77HRTMFVUeFHe5sNFE3vTVrP36r2i14F9HH6PocQwENYC1a659ZyTBNEn4Ek"
    ],
    "assetId": "9SxLVHaEGTeEjRiAMnEw74YWWndQDRw8SZhknK9EYoUd",
    "script": "base64:AwQAAAAObWF0Y2hlckFkZHJlc3MJAQAAABFhZGRyZXNzRnJvbVN0cmluZwAAAAECAAAAIzNQSmp3RlJFZzhGOVY2Q3A5Zm5VdUV3UnRzNkhRUWE1bmZQBAAAABBtYXRjaGVyUHVibGljS2V5AQAAACDByq8/10uSb4ln/m2DiE93I/Ngal7Wm/IdCLfujs7XHwQAAAAOZ2F0ZXdheUFkZHJlc3MJAQAAABFhZGRyZXNzRnJvbVN0cmluZwAAAAECAAAAIzNQOVR5cDhXbm94dDcxOWp1QUJuQ2VFclU1d0F2ZmNYQVU5BAAAABB3aGl0ZWxpc3RBZGRyZXNzCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAACMzUDg3SGVWRXZKOHhXaVFXNk4zZnBDQkhNeHdjemVHcXlxRAQAAAAUZEFwcFdoaXRlbGlzdEFkZHJlc3MJAQAAAAdBZGRyZXNzAAAAAQEAAAAaAVfO6lLVWHe4KvIB5hQNUIPqAqvCPbIOsNMEAAAAGmdhdGV3YXlDb250cm9sQXNzZXRBZGRyZXNzAQAAACD+GAqhD0IxDHBjbPaZoYqvgxte2kvyIxgEXy6OmEJbNAQAAAAJcEFkZHJlc3MxCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAACMzUEF4Q0p5ZmtHZjJaSGlES1h3dEd1SmRjc0Y2MzU3N0VpagQAAAAJcEFkZHJlc3MyCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAACMzUEVoSnN5VFFCdW1rRzRCSEhaaWhzczROVDFiUTRpWXd4QgQAAAAJcEFkZHJlc3MzCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAACMzUFFucEZyQ0wzTFNkUkw3QVlrNXRaYTV1WVhZZ1ZmdzdBbwQAAAAJcEFkZHJlc3M0CQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAACMzUEpxMThNWGlOdVdYSFVCZVJvYWlwMnNSWlNWOHlqS2lVOAQAAAAJcEFkZHJlc3M1CQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAACMzUENRaGFMb3A5VWVUTUQ5NEtMWkpkOTQ3TkJMS24zbkdWSwQAAAAKdmFsaWRTdGF0ZQAAAAAAAAAD6AQAAAADdmVyAgAAAAsyLjAuMC1hc3NldAQAAAAHJG1hdGNoMAUAAAACdHgDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAF01hc3NUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAcDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBAAAAA1pc0RBcHBBbGxvd2VkBAAAAAckbWF0Y2gxCQAEGgAAAAIFAAAAFGRBcHBXaGl0ZWxpc3RBZGRyZXNzCQACWAAAAAEICAUAAAACdHgAAAAGc2VuZGVyAAAABWJ5dGVzAwkAAAEAAAACBQAAAAckbWF0Y2gxAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDEFAAAAAWEA/////////wEDCQEAAAACIT0AAAACBQAAAA1pc0RBcHBBbGxvd2VkAP////////8BBgMDCQEAAAACIT0AAAACCAUAAAACdHgAAAAGc2VuZGVyBQAAAA5nYXRld2F5QWRkcmVzcwkBAAAAAiE9AAAAAggFAAAAAnR4AAAACXJlY2lwaWVudAUAAAAOZ2F0ZXdheUFkZHJlc3MHCQAAAgAAAAECAAAALE9ubHkgdHJhbnNhY3Rpb25zIHdpdGggYSBnYXRld2F5IGFyZSBhbGxvd2VkAwkAAAAAAAACCAUAAAACdHgAAAAGc2VuZGVyBQAAAA5nYXRld2F5QWRkcmVzcwYEAAAACndoaXRlMUxpc3QJAAJYAAAAAQgIBQAAAAJ0eAAAAAZzZW5kZXIAAAAFYnl0ZXMEAAAACGFzc2V0VHh0CQACWAAAAAEJAQAAAAdleHRyYWN0AAAAAQgFAAAAAnR4AAAAB2Fzc2V0SWQEAAAAD3doaXRlMUxpc3RBc3NldAkAASwAAAACCQABLAAAAAIFAAAACndoaXRlMUxpc3QCAAAAAV8FAAAACGFzc2V0VHh0BAAAABF3aGl0ZTFMaXN0T3ZlcmFsbAkAASwAAAACAgAAAARyZXNfBQAAAAhhc3NldFR4dAQAAAAPd2hpdGUxTGlzdEVudHJ5CQAEGgAAAAIJAQAAAAdleHRyYWN0AAAAAQUAAAAQd2hpdGVsaXN0QWRkcmVzcwUAAAAKd2hpdGUxTGlzdAMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEFAAAAD3doaXRlMUxpc3RFbnRyeQkAAAIAAAABAgAAAC1UaGUgc2VuZGVyJ3MgYWRkcmVzcyBpcyBub3QgaW4gdGhlIHdoaXRlIGxpc3QDCQEAAAACIT0AAAACBQAAAA93aGl0ZTFMaXN0RW50cnkFAAAACnZhbGlkU3RhdGUJAAACAAAAAQIAAAAcU2VuZGVyIGlzIG5vdCBpbiB2YWxpZCBzdGF0ZQQAAAAUd2hpdGUxTGlzdEFzc2V0RW50cnkJAAQaAAAAAgkBAAAAB2V4dHJhY3QAAAABBQAAABB3aGl0ZWxpc3RBZGRyZXNzBQAAAA93aGl0ZTFMaXN0QXNzZXQDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABBQAAABR3aGl0ZTFMaXN0QXNzZXRFbnRyeQQAAAAWd2hpdGUxTGlzdE92ZXJhbGxFbnRyeQkABBoAAAACCQEAAAAHZXh0cmFjdAAAAAEFAAAAEHdoaXRlbGlzdEFkZHJlc3MFAAAAEXdoaXRlMUxpc3RPdmVyYWxsAwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAAWd2hpdGUxTGlzdE92ZXJhbGxFbnRyeQYEAAAAC2N1cjFCYWxhbmNlCQAD6wAAAAIIBQAAAAJ0eAAAAAZzZW5kZXIIBQAAAAJ0eAAAAAdhc3NldElkAwkAAGYAAAACCQEAAAAHZXh0cmFjdAAAAAEFAAAAFndoaXRlMUxpc3RPdmVyYWxsRW50cnkJAABlAAAAAgUAAAALY3VyMUJhbGFuY2UIBQAAAAJ0eAAAAAZhbW91bnQJAAACAAAAAQIAAAAjVW5hYmxlIHRvIHNlbmQgc3VjaCBhbW91bnQgKHR5cGU9MSkGBAAAAAtjdXIxQmFsYW5jZQkAA+sAAAACCAUAAAACdHgAAAAGc2VuZGVyCAUAAAACdHgAAAAHYXNzZXRJZAMJAABmAAAAAgkBAAAAB2V4dHJhY3QAAAABBQAAABR3aGl0ZTFMaXN0QXNzZXRFbnRyeQkAAGUAAAACBQAAAAtjdXIxQmFsYW5jZQgFAAAAAnR4AAAABmFtb3VudAkAAAIAAAABAgAAACNVbmFibGUgdG8gc2VuZCBzdWNoIGFtb3VudCAodHlwZT0yKQYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE0V4Y2hhbmdlVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwAwkBAAAAAiE9AAAAAggFAAAAAnR4AAAABnNlbmRlcgUAAAAObWF0Y2hlckFkZHJlc3MJAAACAAAAAQIAAAAZSW5jb3JyZWN0IG1hdGNoZXIgYWRkcmVzcwQAAAARb3V0Y29taW5nMUFjY291bnQICAUAAAACdHgAAAAIYnV5T3JkZXIAAAAGc2VuZGVyBAAAABFvdXRjb21pbmcyQWNjb3VudAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAGc2VuZGVyBAAAAAp3aGl0ZTFMaXN0CQACWAAAAAEIBQAAABFvdXRjb21pbmcxQWNjb3VudAAAAAVieXRlcwQAAAAKd2hpdGUyTGlzdAkAAlgAAAABCAUAAAARb3V0Y29taW5nMkFjY291bnQAAAAFYnl0ZXMEAAAAD3doaXRlMUxpc3RFbnRyeQkABBoAAAACCQEAAAAHZXh0cmFjdAAAAAEFAAAAEHdoaXRlbGlzdEFkZHJlc3MJAAJYAAAAAQgFAAAAEW91dGNvbWluZzFBY2NvdW50AAAABWJ5dGVzBAAAAA93aGl0ZTJMaXN0RW50cnkJAAQaAAAAAgkBAAAAB2V4dHJhY3QAAAABBQAAABB3aGl0ZWxpc3RBZGRyZXNzCQACWAAAAAEIBQAAABFvdXRjb21pbmcyQWNjb3VudAAAAAVieXRlcwMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEFAAAAD3doaXRlMUxpc3RFbnRyeQkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAFVXNlciAFAAAACndoaXRlMUxpc3QCAAAAEiBub3QgaW4gd2hpdGUgbGlzdAMJAQAAAAIhPQAAAAIFAAAAD3doaXRlMUxpc3RFbnRyeQUAAAAKdmFsaWRTdGF0ZQkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAFVXNlciAFAAAACndoaXRlMUxpc3QCAAAAEyBub3QgaW4gdmFsaWQgc3RhdGUDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABBQAAAA93aGl0ZTJMaXN0RW50cnkJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAABVVzZXIgBQAAAAp3aGl0ZTJMaXN0AgAAABIgbm90IGluIHdoaXRlIGxpc3QDCQEAAAACIT0AAAACBQAAAA93aGl0ZTJMaXN0RW50cnkFAAAACnZhbGlkU3RhdGUJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAABVVzZXIgBQAAAAp3aGl0ZTJMaXN0AgAAABMgbm90IGluIHZhbGlkIHN0YXRlBgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAZU2V0QXNzZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAACdHgFAAAAByRtYXRjaDAEAAAAC3BLZXkxU2lnbmVkAwkBAAAACWlzRGVmaW5lZAAAAAEJAAQaAAAAAgkBAAAAB2V4dHJhY3QAAAABBQAAAAlwQWRkcmVzczEJAAJYAAAAAQgFAAAAAnR4AAAAAmlkAAAAAAAAAAABAAAAAAAAAAAABAAAAAtwS2V5MlNpZ25lZAMJAQAAAAlpc0RlZmluZWQAAAABCQAEGgAAAAIJAQAAAAdleHRyYWN0AAAAAQUAAAAJcEFkZHJlc3MyCQACWAAAAAEIBQAAAAJ0eAAAAAJpZAAAAAAAAAAAAQAAAAAAAAAAAAQAAAALcEtleTNTaWduZWQDCQEAAAAJaXNEZWZpbmVkAAAAAQkABBoAAAACCQEAAAAHZXh0cmFjdAAAAAEFAAAACXBBZGRyZXNzMwkAAlgAAAABCAUAAAACdHgAAAACaWQAAAAAAAAAAAEAAAAAAAAAAAAEAAAAC3BLZXk0U2lnbmVkAwkBAAAACWlzRGVmaW5lZAAAAAEJAAQaAAAAAgkBAAAAB2V4dHJhY3QAAAABBQAAAAlwQWRkcmVzczQJAAJYAAAAAQgFAAAAAnR4AAAAAmlkAAAAAAAAAAABAAAAAAAAAAAABAAAAAtwS2V5NVNpZ25lZAMJAQAAAAlpc0RlZmluZWQAAAABCQAEGgAAAAIJAQAAAAdleHRyYWN0AAAAAQUAAAAJcEFkZHJlc3M1CQACWAAAAAEIBQAAAAJ0eAAAAAJpZAAAAAAAAAAAAQAAAAAAAAAAAAkAAGcAAAACCQAAZAAAAAIJAABkAAAAAgkAAGQAAAACCQAAZAAAAAIFAAAAC3BLZXkxU2lnbmVkBQAAAAtwS2V5MlNpZ25lZAUAAAALcEtleTNTaWduZWQFAAAAC3BLZXk0U2lnbmVkBQAAAAtwS2V5NVNpZ25lZAAAAAAAAAAAAwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAPQnVyblRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAkAAAAAAAACCAUAAAACdHgAAAAGc2VuZGVyBQAAAA5nYXRld2F5QWRkcmVzcwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAASUmVpc3N1ZVRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAkAAAAAAAACCAUAAAACdHgAAAAGc2VuZGVyBQAAAA5nYXRld2F5QWRkcmVzcwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAXSW52b2tlU2NyaXB0VHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBAAAAA1pc0RBcHBBbGxvd2VkBAAAAAckbWF0Y2gxCQAEGgAAAAIFAAAAFGRBcHBXaGl0ZWxpc3RBZGRyZXNzCQACWAAAAAEICQAEJAAAAAEIBQAAAAJ0eAAAAARkQXBwAAAABWJ5dGVzAwkAAAEAAAACBQAAAAckbWF0Y2gxAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDEFAAAAAWEA/////////wEDCQEAAAACIT0AAAACBQAAAA1pc0RBcHBBbGxvd2VkAP////////8BBAAAAAp3aGl0ZTFMaXN0CQACWAAAAAEICAUAAAACdHgAAAAGc2VuZGVyAAAABWJ5dGVzBAAAAA5pc1BheW1lbnRFeGlzdAQAAAAHJG1hdGNoMQgFAAAAAnR4AAAAB3BheW1lbnQDCQAAAQAAAAIFAAAAByRtYXRjaDECAAAAD0F0dGFjaGVkUGF5bWVudAQAAAABYQUAAAAHJG1hdGNoMQYHAwkAAAAAAAACBQAAAA5pc1BheW1lbnRFeGlzdAcGBAAAAAdwYXltZW50CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAJ0eAAAAAdwYXltZW50BAAAAAdhc3NldElkCQEAAAAHZXh0cmFjdAAAAAEIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQEAAAACGFzc2V0VHh0CQACWAAAAAEFAAAAB2Fzc2V0SWQEAAAAD3doaXRlMUxpc3RBc3NldAkAASwAAAACCQABLAAAAAIFAAAACndoaXRlMUxpc3QCAAAAAV8FAAAACGFzc2V0VHh0BAAAABF3aGl0ZTFMaXN0T3ZlcmFsbAkAASwAAAACAgAAAARyZXNfBQAAAAhhc3NldFR4dAQAAAAPd2hpdGUxTGlzdEVudHJ5CQAEGgAAAAIJAQAAAAdleHRyYWN0AAAAAQUAAAAQd2hpdGVsaXN0QWRkcmVzcwUAAAAKd2hpdGUxTGlzdAMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEFAAAAD3doaXRlMUxpc3RFbnRyeQkAAAIAAAABAgAAAC1UaGUgc2VuZGVyJ3MgYWRkcmVzcyBpcyBub3QgaW4gdGhlIHdoaXRlIGxpc3QDCQEAAAACIT0AAAACBQAAAA93aGl0ZTFMaXN0RW50cnkFAAAACnZhbGlkU3RhdGUJAAACAAAAAQIAAAAcU2VuZGVyIGlzIG5vdCBpbiB2YWxpZCBzdGF0ZQQAAAAUd2hpdGUxTGlzdEFzc2V0RW50cnkJAAQaAAAAAgkBAAAAB2V4dHJhY3QAAAABBQAAABB3aGl0ZWxpc3RBZGRyZXNzBQAAAA93aGl0ZTFMaXN0QXNzZXQDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABBQAAABR3aGl0ZTFMaXN0QXNzZXRFbnRyeQQAAAAWd2hpdGUxTGlzdE92ZXJhbGxFbnRyeQkABBoAAAACCQEAAAAHZXh0cmFjdAAAAAEFAAAAEHdoaXRlbGlzdEFkZHJlc3MFAAAAEXdoaXRlMUxpc3RPdmVyYWxsAwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAAWd2hpdGUxTGlzdE92ZXJhbGxFbnRyeQYEAAAAC2N1cjFCYWxhbmNlCQAD6wAAAAIIBQAAAAJ0eAAAAAZzZW5kZXIFAAAAB2Fzc2V0SWQDCQAAZgAAAAIJAQAAAAdleHRyYWN0AAAAAQUAAAAWd2hpdGUxTGlzdE92ZXJhbGxFbnRyeQkAAGUAAAACBQAAAAtjdXIxQmFsYW5jZQgFAAAAB3BheW1lbnQAAAAGYW1vdW50CQAAAgAAAAECAAAAI1VuYWJsZSB0byBzZW5kIHN1Y2ggYW1vdW50ICh0eXBlPTEpBgQAAAALY3VyMUJhbGFuY2UJAAPrAAAAAggFAAAAAnR4AAAABnNlbmRlcgUAAAAHYXNzZXRJZAMJAABmAAAAAgkBAAAAB2V4dHJhY3QAAAABBQAAABR3aGl0ZTFMaXN0QXNzZXRFbnRyeQkAAGUAAAACBQAAAAtjdXIxQmFsYW5jZQgFAAAAB3BheW1lbnQAAAAGYW1vdW50CQAAAgAAAAECAAAAI1VuYWJsZSB0byBzZW5kIHN1Y2ggYW1vdW50ICh0eXBlPTIpBgcHIAs6yA==",
    "chainId": 87,
    "height": 1691410,
    "spentComplexity": 0
}

View: original | compacted
Prev: Etr218PqnBP4PUmjSy2XbesKot7PyPAbpTi8hvbfK1Zr
Next: none

Diff: 
Old
New
Differences
1
-
{-# STDLIB_VERSION 2 #-}
1
+
{-# STDLIB_VERSION 3 #-}
2
2
 
{-# CONTENT_TYPE EXPRESSION #-}
3
3
 
let matcherAddress = addressFromString("3PJjwFREg8F9V6Cp9fnUuEwRts6HQQa5nfP")
4
+
let matcherPublicKey = base58'E3UwaHCQCySghK3zwNB8EDHoc3b8uhzGPFz3gHmWon4W'
4
5
 
let gatewayAddress = addressFromString("3P9Typ8Wnoxt719juABnCeErU5wAvfcXAU9")
5
-
let WhitelistAddr = addressFromString("3P87HeVEvJ8xWiQW6N3fpCBHMxwczeGqyqD")
6
+
let whitelistAddress = addressFromString("3P87HeVEvJ8xWiQW6N3fpCBHMxwczeGqyqD")
7
+
let dAppWhitelistAddress = Address(base58'3PLnxdrGeK8e3uw5GigpZhRvkjSnwnt7Sgz')
8
+
let gatewayControlAssetAddress = base58'J6spRevsYuwKEHgzyPfojvdBPq67C8yvErr6e9ny8Jom'
9
+
let pAddress1 = addressFromString("3PAxCJyfkGf2ZHiDKXwtGuJdcsF63577Eij")
10
+
let pAddress2 = addressFromString("3PEhJsyTQBumkG4BHHZihss4NT1bQ4iYwxB")
11
+
let pAddress3 = addressFromString("3PQnpFrCL3LSdRL7AYk5tZa5uYXYgVfw7Ao")
12
+
let pAddress4 = addressFromString("3PJq18MXiNuWXHUBeRoaip2sRZSV8yjKiU8")
13
+
let pAddress5 = addressFromString("3PCQhaLop9UeTMD94KLZJd947NBLKn3nGVK")
6
14
 
let validState = 1000
7
-
let Ver = "1.1.3"
15
+
let ver = "2.0.0-asset"
8
16
 
match tx {
9
17
 
    case tx: MassTransferTransaction => 
10
18
 
        false
11
19
 
    case tx: TransferTransaction => 
12
-
        if (if ((tx.sender != gatewayAddress))
13
-
            then (tx.recipient != gatewayAddress)
14
-
            else false)
15
-
            then throw("Only transactions with a gateway are allowed")
16
-
            else if ((tx.sender == gatewayAddress))
17
-
                then true
18
-
                else {
19
-
                    let white1List = toBase58String(tx.sender.bytes)
20
-
                    let assetTxt = toBase58String(extract(tx.assetId))
21
-
                    let white1ListAsset = ((white1List + "_") + assetTxt)
22
-
                    let white1ListOverall = ("res_" + assetTxt)
23
-
                    let white1ListEntry = getInteger(extract(WhitelistAddr), white1List)
24
-
                    if (!(isDefined(white1ListEntry)))
25
-
                        then throw("The sender's address is not in the white list")
26
-
                        else if ((white1ListEntry != validState))
27
-
                            then throw("Sender is not in valid state")
28
-
                            else {
29
-
                                let white1ListAssetEntry = getInteger(extract(WhitelistAddr), white1ListAsset)
30
-
                                if (!(isDefined(white1ListAssetEntry)))
31
-
                                    then {
32
-
                                        let white1ListOverallEntry = getInteger(extract(WhitelistAddr), white1ListOverall)
33
-
                                        if (!(isDefined(white1ListOverallEntry)))
34
-
                                            then true
35
-
                                            else {
36
-
                                                let cur1Balance = assetBalance(tx.sender, tx.assetId)
37
-
                                                if ((extract(white1ListOverallEntry) > (cur1Balance - tx.amount)))
38
-
                                                    then throw("Unable to send such amount (type=1)")
39
-
                                                    else true
40
-
                                                }
41
-
                                        }
42
-
                                    else {
43
-
                                        let cur1Balance = assetBalance(tx.sender, tx.assetId)
44
-
                                        if ((extract(white1ListAssetEntry) > (cur1Balance - tx.amount)))
45
-
                                            then throw("Unable to send such amount (type=2)")
46
-
                                            else true
47
-
                                        }
48
-
                                }
49
-
                    }
20
+
        let isDAppAllowed =         match getInteger(dAppWhitelistAddress, toBase58String(tx.sender.bytes)) {
21
+
            case a: Int => 
22
+
                a
23
+
            case _ => 
24
+
                -255
25
+
        }
26
+
        if ((isDAppAllowed != -255))
27
+
            then true
28
+
            else if (if ((tx.sender != gatewayAddress))
29
+
                then (tx.recipient != gatewayAddress)
30
+
                else false)
31
+
                then throw("Only transactions with a gateway are allowed")
32
+
                else if ((tx.sender == gatewayAddress))
33
+
                    then true
34
+
                    else {
35
+
                        let white1List = toBase58String(tx.sender.bytes)
36
+
                        let assetTxt = toBase58String(extract(tx.assetId))
37
+
                        let white1ListAsset = ((white1List + "_") + assetTxt)
38
+
                        let white1ListOverall = ("res_" + assetTxt)
39
+
                        let white1ListEntry = getInteger(extract(whitelistAddress), white1List)
40
+
                        if (!(isDefined(white1ListEntry)))
41
+
                            then throw("The sender's address is not in the white list")
42
+
                            else if ((white1ListEntry != validState))
43
+
                                then throw("Sender is not in valid state")
44
+
                                else {
45
+
                                    let white1ListAssetEntry = getInteger(extract(whitelistAddress), white1ListAsset)
46
+
                                    if (!(isDefined(white1ListAssetEntry)))
47
+
                                        then {
48
+
                                            let white1ListOverallEntry = getInteger(extract(whitelistAddress), white1ListOverall)
49
+
                                            if (!(isDefined(white1ListOverallEntry)))
50
+
                                                then true
51
+
                                                else {
52
+
                                                    let cur1Balance = assetBalance(tx.sender, tx.assetId)
53
+
                                                    if ((extract(white1ListOverallEntry) > (cur1Balance - tx.amount)))
54
+
                                                        then throw("Unable to send such amount (type=1)")
55
+
                                                        else true
56
+
                                                    }
57
+
                                            }
58
+
                                        else {
59
+
                                            let cur1Balance = assetBalance(tx.sender, tx.assetId)
60
+
                                            if ((extract(white1ListAssetEntry) > (cur1Balance - tx.amount)))
61
+
                                                then throw("Unable to send such amount (type=2)")
62
+
                                                else true
63
+
                                            }
64
+
                                    }
65
+
                        }
50
66
 
    case tx: ExchangeTransaction => 
51
67
 
        if ((tx.sender != matcherAddress))
52
68
 
            then throw("Incorrect matcher address")
55
71
 
                let outcoming2Account = tx.sellOrder.sender
56
72
 
                let white1List = toBase58String(outcoming1Account.bytes)
57
73
 
                let white2List = toBase58String(outcoming2Account.bytes)
58
-
                let white1ListEntry = getInteger(extract(WhitelistAddr), toBase58String(outcoming1Account.bytes))
59
-
                let white2ListEntry = getInteger(extract(WhitelistAddr), toBase58String(outcoming2Account.bytes))
74
+
                let white1ListEntry = getInteger(extract(whitelistAddress), toBase58String(outcoming1Account.bytes))
75
+
                let white2ListEntry = getInteger(extract(whitelistAddress), toBase58String(outcoming2Account.bytes))
60
76
 
                if (!(isDefined(white1ListEntry)))
61
77
 
                    then throw((("User " + white1List) + " not in white list"))
62
78
 
                    else if ((white1ListEntry != validState))
68
84
 
                                else true
69
85
 
                }
70
86
 
    case tx: SetAssetScriptTransaction => 
71
-
        let pAddress1 = addressFromString("3PAxCJyfkGf2ZHiDKXwtGuJdcsF63577Eij")
72
-
        let pAddress2 = addressFromString("3PEhJsyTQBumkG4BHHZihss4NT1bQ4iYwxB")
73
-
        let pAddress3 = addressFromString("3PQnpFrCL3LSdRL7AYk5tZa5uYXYgVfw7Ao")
74
-
        let pAddress4 = addressFromString("3PJq18MXiNuWXHUBeRoaip2sRZSV8yjKiU8")
75
-
        let pAddress5 = addressFromString("3PCQhaLop9UeTMD94KLZJd947NBLKn3nGVK")
76
87
 
        let pKey1Signed = if (isDefined(getInteger(extract(pAddress1), toBase58String(tx.id))))
77
88
 
            then 1
78
89
 
            else 0
93
104
 
        (tx.sender == gatewayAddress)
94
105
 
    case tx: ReissueTransaction => 
95
106
 
        (tx.sender == gatewayAddress)
107
+
    case tx: InvokeScriptTransaction => 
108
+
        let isDAppAllowed =         match getInteger(dAppWhitelistAddress, toBase58String(addressFromRecipient(tx.dApp).bytes)) {
109
+
            case a: Int => 
110
+
                a
111
+
            case _ => 
112
+
                -255
113
+
        }
114
+
        if ((isDAppAllowed != -255))
115
+
            then {
116
+
                let white1List = toBase58String(tx.sender.bytes)
117
+
                let isPaymentExist =                 match tx.payment {
118
+
                    case a: AttachedPayment => 
119
+
                        true
120
+
                    case _ => 
121
+
                        false
122
+
                }
123
+
                if ((isPaymentExist == false))
124
+
                    then true
125
+
                    else {
126
+
                        let payment = extract(tx.payment)
127
+
                        let assetId = extract(payment.assetId)
128
+
                        let assetTxt = toBase58String(assetId)
129
+
                        let white1ListAsset = ((white1List + "_") + assetTxt)
130
+
                        let white1ListOverall = ("res_" + assetTxt)
131
+
                        let white1ListEntry = getInteger(extract(whitelistAddress), white1List)
132
+
                        if (!(isDefined(white1ListEntry)))
133
+
                            then throw("The sender's address is not in the white list")
134
+
                            else if ((white1ListEntry != validState))
135
+
                                then throw("Sender is not in valid state")
136
+
                                else {
137
+
                                    let white1ListAssetEntry = getInteger(extract(whitelistAddress), white1ListAsset)
138
+
                                    if (!(isDefined(white1ListAssetEntry)))
139
+
                                        then {
140
+
                                            let white1ListOverallEntry = getInteger(extract(whitelistAddress), white1ListOverall)
141
+
                                            if (!(isDefined(white1ListOverallEntry)))
142
+
                                                then true
143
+
                                                else {
144
+
                                                    let cur1Balance = assetBalance(tx.sender, assetId)
145
+
                                                    if ((extract(white1ListOverallEntry) > (cur1Balance - payment.amount)))
146
+
                                                        then throw("Unable to send such amount (type=1)")
147
+
                                                        else true
148
+
                                                    }
149
+
                                            }
150
+
                                        else {
151
+
                                            let cur1Balance = assetBalance(tx.sender, assetId)
152
+
                                            if ((extract(white1ListAssetEntry) > (cur1Balance - payment.amount)))
153
+
                                                then throw("Unable to send such amount (type=2)")
154
+
                                                else true
155
+
                                            }
156
+
                                    }
157
+
                        }
158
+
                }
159
+
            else false
96
160
 
    case _ => 
97
161
 
        false
98
162
 
}
Full: 
Old
New
Differences
1
-
{-# STDLIB_VERSION 2 #-}
1
+
{-# STDLIB_VERSION 3 #-}
2
2
 
{-# CONTENT_TYPE EXPRESSION #-}
3
3
 
let matcherAddress = addressFromString("3PJjwFREg8F9V6Cp9fnUuEwRts6HQQa5nfP")
4
+
let matcherPublicKey = base58'E3UwaHCQCySghK3zwNB8EDHoc3b8uhzGPFz3gHmWon4W'
4
5
 
let gatewayAddress = addressFromString("3P9Typ8Wnoxt719juABnCeErU5wAvfcXAU9")
5
-
let WhitelistAddr = addressFromString("3P87HeVEvJ8xWiQW6N3fpCBHMxwczeGqyqD")
6
+
let whitelistAddress = addressFromString("3P87HeVEvJ8xWiQW6N3fpCBHMxwczeGqyqD")
7
+
let dAppWhitelistAddress = Address(base58'3PLnxdrGeK8e3uw5GigpZhRvkjSnwnt7Sgz')
8
+
let gatewayControlAssetAddress = base58'J6spRevsYuwKEHgzyPfojvdBPq67C8yvErr6e9ny8Jom'
9
+
let pAddress1 = addressFromString("3PAxCJyfkGf2ZHiDKXwtGuJdcsF63577Eij")
10
+
let pAddress2 = addressFromString("3PEhJsyTQBumkG4BHHZihss4NT1bQ4iYwxB")
11
+
let pAddress3 = addressFromString("3PQnpFrCL3LSdRL7AYk5tZa5uYXYgVfw7Ao")
12
+
let pAddress4 = addressFromString("3PJq18MXiNuWXHUBeRoaip2sRZSV8yjKiU8")
13
+
let pAddress5 = addressFromString("3PCQhaLop9UeTMD94KLZJd947NBLKn3nGVK")
6
14
 
let validState = 1000
7
-
let Ver = "1.1.3"
15
+
let ver = "2.0.0-asset"
8
16
 
match tx {
9
17
 
    case tx: MassTransferTransaction => 
10
18
 
        false
11
19
 
    case tx: TransferTransaction => 
12
-
        if (if ((tx.sender != gatewayAddress))
13
-
            then (tx.recipient != gatewayAddress)
14
-
            else false)
15
-
            then throw("Only transactions with a gateway are allowed")
16
-
            else if ((tx.sender == gatewayAddress))
17
-
                then true
18
-
                else {
19
-
                    let white1List = toBase58String(tx.sender.bytes)
20
-
                    let assetTxt = toBase58String(extract(tx.assetId))
21
-
                    let white1ListAsset = ((white1List + "_") + assetTxt)
22
-
                    let white1ListOverall = ("res_" + assetTxt)
23
-
                    let white1ListEntry = getInteger(extract(WhitelistAddr), white1List)
24
-
                    if (!(isDefined(white1ListEntry)))
25
-
                        then throw("The sender's address is not in the white list")
26
-
                        else if ((white1ListEntry != validState))
27
-
                            then throw("Sender is not in valid state")
28
-
                            else {
29
-
                                let white1ListAssetEntry = getInteger(extract(WhitelistAddr), white1ListAsset)
30
-
                                if (!(isDefined(white1ListAssetEntry)))
31
-
                                    then {
32
-
                                        let white1ListOverallEntry = getInteger(extract(WhitelistAddr), white1ListOverall)
33
-
                                        if (!(isDefined(white1ListOverallEntry)))
34
-
                                            then true
35
-
                                            else {
36
-
                                                let cur1Balance = assetBalance(tx.sender, tx.assetId)
37
-
                                                if ((extract(white1ListOverallEntry) > (cur1Balance - tx.amount)))
38
-
                                                    then throw("Unable to send such amount (type=1)")
39
-
                                                    else true
40
-
                                                }
41
-
                                        }
42
-
                                    else {
43
-
                                        let cur1Balance = assetBalance(tx.sender, tx.assetId)
44
-
                                        if ((extract(white1ListAssetEntry) > (cur1Balance - tx.amount)))
45
-
                                            then throw("Unable to send such amount (type=2)")
46
-
                                            else true
47
-
                                        }
48
-
                                }
49
-
                    }
20
+
        let isDAppAllowed =         match getInteger(dAppWhitelistAddress, toBase58String(tx.sender.bytes)) {
21
+
            case a: Int => 
22
+
                a
23
+
            case _ => 
24
+
                -255
25
+
        }
26
+
        if ((isDAppAllowed != -255))
27
+
            then true
28
+
            else if (if ((tx.sender != gatewayAddress))
29
+
                then (tx.recipient != gatewayAddress)
30
+
                else false)
31
+
                then throw("Only transactions with a gateway are allowed")
32
+
                else if ((tx.sender == gatewayAddress))
33
+
                    then true
34
+
                    else {
35
+
                        let white1List = toBase58String(tx.sender.bytes)
36
+
                        let assetTxt = toBase58String(extract(tx.assetId))
37
+
                        let white1ListAsset = ((white1List + "_") + assetTxt)
38
+
                        let white1ListOverall = ("res_" + assetTxt)
39
+
                        let white1ListEntry = getInteger(extract(whitelistAddress), white1List)
40
+
                        if (!(isDefined(white1ListEntry)))
41
+
                            then throw("The sender's address is not in the white list")
42
+
                            else if ((white1ListEntry != validState))
43
+
                                then throw("Sender is not in valid state")
44
+
                                else {
45
+
                                    let white1ListAssetEntry = getInteger(extract(whitelistAddress), white1ListAsset)
46
+
                                    if (!(isDefined(white1ListAssetEntry)))
47
+
                                        then {
48
+
                                            let white1ListOverallEntry = getInteger(extract(whitelistAddress), white1ListOverall)
49
+
                                            if (!(isDefined(white1ListOverallEntry)))
50
+
                                                then true
51
+
                                                else {
52
+
                                                    let cur1Balance = assetBalance(tx.sender, tx.assetId)
53
+
                                                    if ((extract(white1ListOverallEntry) > (cur1Balance - tx.amount)))
54
+
                                                        then throw("Unable to send such amount (type=1)")
55
+
                                                        else true
56
+
                                                    }
57
+
                                            }
58
+
                                        else {
59
+
                                            let cur1Balance = assetBalance(tx.sender, tx.assetId)
60
+
                                            if ((extract(white1ListAssetEntry) > (cur1Balance - tx.amount)))
61
+
                                                then throw("Unable to send such amount (type=2)")
62
+
                                                else true
63
+
                                            }
64
+
                                    }
65
+
                        }
50
66
 
    case tx: ExchangeTransaction => 
51
67
 
        if ((tx.sender != matcherAddress))
52
68
 
            then throw("Incorrect matcher address")
53
69
 
            else {
54
70
 
                let outcoming1Account = tx.buyOrder.sender
55
71
 
                let outcoming2Account = tx.sellOrder.sender
56
72
 
                let white1List = toBase58String(outcoming1Account.bytes)
57
73
 
                let white2List = toBase58String(outcoming2Account.bytes)
58
-
                let white1ListEntry = getInteger(extract(WhitelistAddr), toBase58String(outcoming1Account.bytes))
59
-
                let white2ListEntry = getInteger(extract(WhitelistAddr), toBase58String(outcoming2Account.bytes))
74
+
                let white1ListEntry = getInteger(extract(whitelistAddress), toBase58String(outcoming1Account.bytes))
75
+
                let white2ListEntry = getInteger(extract(whitelistAddress), toBase58String(outcoming2Account.bytes))
60
76
 
                if (!(isDefined(white1ListEntry)))
61
77
 
                    then throw((("User " + white1List) + " not in white list"))
62
78
 
                    else if ((white1ListEntry != validState))
63
79
 
                        then throw((("User " + white1List) + " not in valid state"))
64
80
 
                        else if (!(isDefined(white2ListEntry)))
65
81
 
                            then throw((("User " + white2List) + " not in white list"))
66
82
 
                            else if ((white2ListEntry != validState))
67
83
 
                                then throw((("User " + white2List) + " not in valid state"))
68
84
 
                                else true
69
85
 
                }
70
86
 
    case tx: SetAssetScriptTransaction => 
71
-
        let pAddress1 = addressFromString("3PAxCJyfkGf2ZHiDKXwtGuJdcsF63577Eij")
72
-
        let pAddress2 = addressFromString("3PEhJsyTQBumkG4BHHZihss4NT1bQ4iYwxB")
73
-
        let pAddress3 = addressFromString("3PQnpFrCL3LSdRL7AYk5tZa5uYXYgVfw7Ao")
74
-
        let pAddress4 = addressFromString("3PJq18MXiNuWXHUBeRoaip2sRZSV8yjKiU8")
75
-
        let pAddress5 = addressFromString("3PCQhaLop9UeTMD94KLZJd947NBLKn3nGVK")
76
87
 
        let pKey1Signed = if (isDefined(getInteger(extract(pAddress1), toBase58String(tx.id))))
77
88
 
            then 1
78
89
 
            else 0
79
90
 
        let pKey2Signed = if (isDefined(getInteger(extract(pAddress2), toBase58String(tx.id))))
80
91
 
            then 1
81
92
 
            else 0
82
93
 
        let pKey3Signed = if (isDefined(getInteger(extract(pAddress3), toBase58String(tx.id))))
83
94
 
            then 1
84
95
 
            else 0
85
96
 
        let pKey4Signed = if (isDefined(getInteger(extract(pAddress4), toBase58String(tx.id))))
86
97
 
            then 1
87
98
 
            else 0
88
99
 
        let pKey5Signed = if (isDefined(getInteger(extract(pAddress5), toBase58String(tx.id))))
89
100
 
            then 1
90
101
 
            else 0
91
102
 
        (((((pKey1Signed + pKey2Signed) + pKey3Signed) + pKey4Signed) + pKey5Signed) >= 3)
92
103
 
    case tx: BurnTransaction => 
93
104
 
        (tx.sender == gatewayAddress)
94
105
 
    case tx: ReissueTransaction => 
95
106
 
        (tx.sender == gatewayAddress)
107
+
    case tx: InvokeScriptTransaction => 
108
+
        let isDAppAllowed =         match getInteger(dAppWhitelistAddress, toBase58String(addressFromRecipient(tx.dApp).bytes)) {
109
+
            case a: Int => 
110
+
                a
111
+
            case _ => 
112
+
                -255
113
+
        }
114
+
        if ((isDAppAllowed != -255))
115
+
            then {
116
+
                let white1List = toBase58String(tx.sender.bytes)
117
+
                let isPaymentExist =                 match tx.payment {
118
+
                    case a: AttachedPayment => 
119
+
                        true
120
+
                    case _ => 
121
+
                        false
122
+
                }
123
+
                if ((isPaymentExist == false))
124
+
                    then true
125
+
                    else {
126
+
                        let payment = extract(tx.payment)
127
+
                        let assetId = extract(payment.assetId)
128
+
                        let assetTxt = toBase58String(assetId)
129
+
                        let white1ListAsset = ((white1List + "_") + assetTxt)
130
+
                        let white1ListOverall = ("res_" + assetTxt)
131
+
                        let white1ListEntry = getInteger(extract(whitelistAddress), white1List)
132
+
                        if (!(isDefined(white1ListEntry)))
133
+
                            then throw("The sender's address is not in the white list")
134
+
                            else if ((white1ListEntry != validState))
135
+
                                then throw("Sender is not in valid state")
136
+
                                else {
137
+
                                    let white1ListAssetEntry = getInteger(extract(whitelistAddress), white1ListAsset)
138
+
                                    if (!(isDefined(white1ListAssetEntry)))
139
+
                                        then {
140
+
                                            let white1ListOverallEntry = getInteger(extract(whitelistAddress), white1ListOverall)
141
+
                                            if (!(isDefined(white1ListOverallEntry)))
142
+
                                                then true
143
+
                                                else {
144
+
                                                    let cur1Balance = assetBalance(tx.sender, assetId)
145
+
                                                    if ((extract(white1ListOverallEntry) > (cur1Balance - payment.amount)))
146
+
                                                        then throw("Unable to send such amount (type=1)")
147
+
                                                        else true
148
+
                                                    }
149
+
                                            }
150
+
                                        else {
151
+
                                            let cur1Balance = assetBalance(tx.sender, assetId)
152
+
                                            if ((extract(white1ListAssetEntry) > (cur1Balance - payment.amount)))
153
+
                                                then throw("Unable to send such amount (type=2)")
154
+
                                                else true
155
+
                                            }
156
+
                                    }
157
+
                        }
158
+
                }
159
+
            else false
96
160
 
    case _ => 
97
161
 
        false
98
162
 
}

github/deemru/w8io/3ef1775 
92.94 ms ◑