tx · ALnuBBV9sSqPtwwqrSwPmNEpknEHcjw3jb5QgSmSnuE8

3N6LHjfGb6Fgcy7YsVcNxGyPTj49XbQAijq:  -0.01300000 Waves

2023.02.13 14:32 [2447784] smart account 3N6LHjfGb6Fgcy7YsVcNxGyPTj49XbQAijq > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "ALnuBBV9sSqPtwwqrSwPmNEpknEHcjw3jb5QgSmSnuE8",
    "fee": 1300000,
    "feeAssetId": null,
    "timestamp": 1676287945708,
    "version": 2,
    "chainId": 84,
    "sender": "3N6LHjfGb6Fgcy7YsVcNxGyPTj49XbQAijq",
    "senderPublicKey": "2u2wYYcVBQv43Cc71zkhHPPitkqgg6dqTZ3nUMvYJ1uq",
    "proofs": [
        "4o4akywfE3eRTQQsXZrkuYYXXthG8UXU8A3oPrQK2nWBtVc3Gm6UxFJqmyTVjE3pf4KMtC4NiwACCSsBmkGebyib"
    ],
    "script": "base64:BgIXCAISBQoDAQgIEgUKAwEICBIDCgEIEgAXAANTRVACAl9fAAhmZWVTY2FsZQkAtgIBAIDC1y8BD2dldFN0cmluZ09yRmFpbAEDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwUDa2V5CQCsAgICFU5vIGRhdGEgZm9yIHRoaXMua2V5PQUDa2V5AAxwb29sRGlzYWJsZWQJAAIBAg1Qb29sIGRpc2FibGVkAAxwb29sTm90RXhpc3QJAAIBAhFQb29sIGlzIG5vdCBleGlzdAAOc2xpcHBhZ2VUb29CaWcJAAIBAhNTbGlwcGFnZSBpcyB0b28gYmlnARNrZXlNYW5hZ2VyUHVibGljS2V5AAIUJXNfX21hbmFnZXJQdWJsaWNLZXkBGmtleVBlbmRpbmdNYW5hZ2VyUHVibGljS2V5AAIbJXNfX3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5AQJmYwACEyVzX19mYWN0b3J5Q29udHJhY3QAD2ZhY3RvcnlDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBD2dldFN0cmluZ09yRmFpbAEJAQJmYwABC3Byb3RvY29sRmVlAAkAuQkCCQDMCAICAiVzCQDMCAICC3Byb3RvY29sRmVlBQNuaWwFA1NFUAEHcG9vbEZlZQAJALkJAgkAzAgCAgIlcwkAzAgCAgdwb29sRmVlBQNuaWwFA1NFUAEaZ2V0U3RyaW5nT3JGYWlsRnJvbUFkZHJlc3MCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAAWa2V5RmVlQ29sbGVjdG9yQWRkcmVzcwIXJXNfX2ZlZUNvbGxlY3RvckFkZHJlc3MAE2ZlZUNvbGxlY3RvckFkZHJlc3MJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARpnZXRTdHJpbmdPckZhaWxGcm9tQWRkcmVzcwIFD2ZhY3RvcnlDb250cmFjdAUWa2V5RmVlQ29sbGVjdG9yQWRkcmVzcwEFYXNJbnQBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACA0ludAQGdmFsSW50BQckbWF0Y2gwBQZ2YWxJbnQJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBFWRhdGFNYXBwaW5nUG9vbEFzc2V0cwIWaW50ZXJuYWxBbW91bnRBc3NldFN0chVpbnRlcm5hbFByaWNlQXNzZXRTdHIJALkJAgkAzAgCAgQlZCVkCQDMCAIJAKQDAQUWaW50ZXJuYWxBbW91bnRBc3NldFN0cgkAzAgCCQCkAwEFFWludGVybmFsUHJpY2VBc3NldFN0cgUDbmlsBQNTRVABFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQABAckbWF0Y2gwCQCiCAEJARNrZXlNYW5hZ2VyUHVibGljS2V5AAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJANkEAQUBcwMJAAECBQckbWF0Y2gwAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IBHXBlbmRpbmdNYW5hZ2VyUHVibGljS2V5T3JVbml0AAQHJG1hdGNoMAkAoggBCQEaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkA2QQBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgEJaXNNYW5hZ2VyAQFpBAckbWF0Y2gwCQEWbWFuYWdlclB1YmxpY0tleU9yVW5pdAADCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCcGsFByRtYXRjaDAJAAACCAUBaQ9jYWxsZXJQdWJsaWNLZXkFAnBrAwkAAQIFByRtYXRjaDACBFVuaXQJAAACCAUBaQZjYWxsZXIFBHRoaXMJAAIBAgtNYXRjaCBlcnJvcgELbXVzdE1hbmFnZXIBAWkDCQEJaXNNYW5hZ2VyAQUBaQYJAAIBAhFwZXJtaXNzaW9uIGRlbmllZAENZ2V0QWNjQmFsYW5jZQEHYXNzZXRJZAMJAAACBQdhc3NldElkAgVXQVZFUwgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAPAHAgUEdGhpcwkA2QQBBQdhc3NldElkASBnZXRQb29sQWRkcmVzc0FuZENoZWNrUG9vbFN0YXR1cwIHYXNzZXRJbghhc3NldE91dAQMbHBOb25SZXZlcnNlCgABQAkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCIGdldExwQXNzZXRGcm9tUG9vbEFzc2V0c1JFQURPTkxZCQDMCAIFB2Fzc2V0SW4JAMwIAgUIYXNzZXRPdXQFA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAUEdW5pdAQJbHBSZXZlcnNlCgABQAkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCIGdldExwQXNzZXRGcm9tUG9vbEFzc2V0c1JFQURPTkxZCQDMCAIFCGFzc2V0T3V0CQDMCAIFB2Fzc2V0SW4FA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAUEdW5pdAQLJHQwMjUzMzI5OTIDCQECIT0CBQxscE5vblJldmVyc2UFBHVuaXQEBHBvb2wKAAFACQD8BwQFD2ZhY3RvcnlDb250cmFjdAIhZ2V0UG9vbEFkZHJlc3NGcm9tTHBBc3NldFJFQURPTkxZCQDMCAIJAQV2YWx1ZQEFDGxwTm9uUmV2ZXJzZQUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nCQCUCgIHBQRwb29sAwkBAiE9AgUJbHBSZXZlcnNlBQR1bml0BARwb29sCgABQAkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCIWdldFBvb2xBZGRyZXNzRnJvbUxwQXNzZXRSRUFET05MWQkAzAgCCQEFdmFsdWUBBQlscFJldmVyc2UFA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAkAAgEJAKwCAgkAAwEFAUACGyBjb3VsZG4ndCBiZSBjYXN0IHRvIFN0cmluZwkAlAoCBgUEcG9vbAUMcG9vbE5vdEV4aXN0BAlpc1JldmVyc2UIBQskdDAyNTMzMjk5MgJfMQQEcG9vbAgFCyR0MDI1MzMyOTkyAl8yBApwb29sU3RhdHVzCgABQAkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCFWdldFBvb2xTdGF0dXNSRUFET05MWQkAzAgCBQRwb29sBQNuaWwFA25pbAMJAAECBQFAAgNJbnQFAUAJAAIBCQCsAgIJAAMBBQFAAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQEBWNoZWNrAwkAAAIFCnBvb2xTdGF0dXMAAQYFDHBvb2xEaXNhYmxlZAMJAAACBQVjaGVjawUFY2hlY2sEB3Bvb2xBZHIJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIFBHBvb2wCAAkAlAoCBQdwb29sQWRyBQlpc1JldmVyc2UJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4EAWkBFXN3YXBDYWxjdWxhdGVSRUFET05MWQMIYW1vdW50SW4HYXNzZXRJbghhc3NldE91dAQFcHJGZWUJAQV2YWx1ZQEJAJ8IAQkBC3Byb3RvY29sRmVlAAQVZmVlUHJvdG9jb2xBbW91bnRDYWxjCQC8AgMJALYCAQUIYW1vdW50SW4JALYCAQUFcHJGZWUFCGZlZVNjYWxlBAVwbEZlZQkBBXZhbHVlAQkAnwgBCQEHcG9vbEZlZQAEEWZlZVBvb2xBbW91bnRDYWxjCQC8AgMJALYCAQUIYW1vdW50SW4JALYCAQUFcGxGZWUFCGZlZVNjYWxlBBFmZWVQcm90b2NvbEFtb3VudAMJAAACCQCgAwEFFWZlZVByb3RvY29sQW1vdW50Q2FsYwAACQC2AgEAAQUVZmVlUHJvdG9jb2xBbW91bnRDYWxjBA1mZWVQb29sQW1vdW50AwkAAAIJAKADAQURZmVlUG9vbEFtb3VudENhbGMAAAkAtgIBAAEFEWZlZVBvb2xBbW91bnRDYWxjBA1jbGVhbkFtb3VudEluCQC4AgIJALgCAgkAtgIBBQhhbW91bnRJbgURZmVlUHJvdG9jb2xBbW91bnQFDWZlZVBvb2xBbW91bnQECyR0MDM5Nzk0MDU3CQEgZ2V0UG9vbEFkZHJlc3NBbmRDaGVja1Bvb2xTdGF0dXMCBQdhc3NldEluBQhhc3NldE91dAQHcG9vbEFkcggFCyR0MDM5Nzk0MDU3Al8xBAlpc1JldmVyc2UIBQskdDAzOTc5NDA1NwJfMgQDcmVzCgABQAkA/AcEBQdwb29sQWRyAiFjYWxjdWxhdGVBbW91bnRPdXRGb3JTd2FwUkVBRE9OTFkJAMwIAgkAoAMBBQ1jbGVhbkFtb3VudEluCQDMCAIFCWlzUmV2ZXJzZQUDbmlsBQNuaWwDCQABAgUBQAIDSW50BQFACQACAQkArAICCQADAQUBQAIYIGNvdWxkbid0IGJlIGNhc3QgdG8gSW50CQCUCgIFA25pbAUDcmVzAWkBBHN3YXADDGFtb3VudE91dE1pbghhc3NldE91dAlhZGRyZXNzVG8EA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABAdhc3NldEluAwkAAAIIBQNwbXQHYXNzZXRJZAUEdW5pdAIFV0FWRVMJANgEAQkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAhhbW91bnRJbgkBBXZhbHVlAQgFA3BtdAZhbW91bnQEBXByRmVlCQEFdmFsdWUBCQCfCAEJAQtwcm90b2NvbEZlZQAEFWZlZVByb3RvY29sQW1vdW50Q2FsYwkAvAIDCQC2AgEFCGFtb3VudEluCQC2AgEFBXByRmVlBQhmZWVTY2FsZQQFcGxGZWUJAQV2YWx1ZQEJAJ8IAQkBB3Bvb2xGZWUABBFmZWVQb29sQW1vdW50Q2FsYwkAvAIDCQC2AgEFCGFtb3VudEluCQC2AgEFBXBsRmVlBQhmZWVTY2FsZQQRZmVlUHJvdG9jb2xBbW91bnQDCQAAAgkAoAMBBRVmZWVQcm90b2NvbEFtb3VudENhbGMAAAkAtgIBAAEFFWZlZVByb3RvY29sQW1vdW50Q2FsYwQNZmVlUG9vbEFtb3VudAMJAAACCQCgAwEFEWZlZVBvb2xBbW91bnRDYWxjAAAJALYCAQABBRFmZWVQb29sQW1vdW50Q2FsYwQNY2xlYW5BbW91bnRJbgkAuAICCQC4AgIJALYCAQUIYW1vdW50SW4FEWZlZVByb3RvY29sQW1vdW50BQ1mZWVQb29sQW1vdW50BAZjaGVja3MJAMwIAgMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEGCQACAQIeZXhhY3RseSAxIHBheW1lbnQgYXJlIGV4cGVjdGVkBQNuaWwDCQAAAgUGY2hlY2tzBQZjaGVja3MECyR0MDUxNjM1MjQxCQEgZ2V0UG9vbEFkZHJlc3NBbmRDaGVja1Bvb2xTdGF0dXMCBQdhc3NldEluBQhhc3NldE91dAQHcG9vbEFkcggFCyR0MDUxNjM1MjQxAl8xBAlpc1JldmVyc2UIBQskdDA1MTYzNTI0MQJfMgQWYXNzZXRJbkF0dGFjaGVkUGF5bWVudAMJAAACBQdhc3NldEluAgVXQVZFUwUEdW5pdAkA2QQBBQdhc3NldEluBAt0b3RhbEdldFJhdwoAAUAJAPwHBAUHcG9vbEFkcgImY2FsY3VsYXRlQW1vdW50T3V0Rm9yU3dhcEFuZFNlbmRUb2tlbnMJAMwIAgkAoAMBBQ1jbGVhbkFtb3VudEluCQDMCAIFCWlzUmV2ZXJzZQkAzAgCBQxhbW91bnRPdXRNaW4JAMwIAgUJYWRkcmVzc1RvBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFFmFzc2V0SW5BdHRhY2hlZFBheW1lbnQJAKADAQUNY2xlYW5BbW91bnRJbgUDbmlsAwkAAQIFAUACA0ludAUBQAkAAgEJAKwCAgkAAwEFAUACGCBjb3VsZG4ndCBiZSBjYXN0IHRvIEludAkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFE2ZlZUNvbGxlY3RvckFkZHJlc3MJAKADAQURZmVlUHJvdG9jb2xBbW91bnQFFmFzc2V0SW5BdHRhY2hlZFBheW1lbnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUHcG9vbEFkcgkAoAMBBQ1mZWVQb29sQW1vdW50BRZhc3NldEluQXR0YWNoZWRQYXltZW50BQNuaWwFC3RvdGFsR2V0UmF3CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCnNldE1hbmFnZXIBF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5BAtjaGVja0NhbGxlcgkBC211c3RNYW5hZ2VyAQUBaQMJAAACBQtjaGVja0NhbGxlcgULY2hlY2tDYWxsZXIEFWNoZWNrTWFuYWdlclB1YmxpY0tleQkA2QQBBRdwZW5kaW5nTWFuYWdlclB1YmxpY0tleQMJAAACBRVjaGVja01hbmFnZXJQdWJsaWNLZXkFFWNoZWNrTWFuYWdlclB1YmxpY0tleQkAzAgCCQELU3RyaW5nRW50cnkCCQEaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkABRdwZW5kaW5nTWFuYWdlclB1YmxpY0tleQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBDmNvbmZpcm1NYW5hZ2VyAAQCcG0JAR1wZW5kaW5nTWFuYWdlclB1YmxpY0tleU9yVW5pdAAEBWhhc1BNAwkBCWlzRGVmaW5lZAEFAnBtBgkAAgECEm5vIHBlbmRpbmcgbWFuYWdlcgMJAAACBQVoYXNQTQUFaGFzUE0EB2NoZWNrUE0DCQAAAggFAWkPY2FsbGVyUHVibGljS2V5CQEFdmFsdWUBBQJwbQYJAAIBAht5b3UgYXJlIG5vdCBwZW5kaW5nIG1hbmFnZXIDCQAAAgUHY2hlY2tQTQUHY2hlY2tQTQkAzAgCCQELU3RyaW5nRW50cnkCCQETa2V5TWFuYWdlclB1YmxpY0tleQAJANgEAQkBBXZhbHVlAQUCcG0JAMwIAgkBC0RlbGV0ZUVudHJ5AQkBGmtleVBlbmRpbmdNYW5hZ2VyUHVibGljS2V5AAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJ0eAEGdmVyaWZ5AAQPdGFyZ2V0UHVibGljS2V5BAckbWF0Y2gwCQEWbWFuYWdlclB1YmxpY0tleU9yVW5pdAADCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCcGsFByRtYXRjaDAFAnBrAwkAAQIFByRtYXRjaDACBFVuaXQIBQJ0eA9zZW5kZXJQdWJsaWNLZXkJAAIBAgtNYXRjaCBlcnJvcgkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUPdGFyZ2V0UHVibGljS2V5TcrZYA==",
    "height": 2447784,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3mrufDkoHKzzESv7NXcZSGk5zhWC6qoV8if8Etj8mGBi
Next: C2AVK4JaqwYa5J7AQcJEqiSF6j1r6CQK6Rha1JZpu33v

Diff: 
Old
New
Differences
89
89
 
    else assetBalance(this, fromBase58String(assetId))
90
90
 
91
91
 
92
+
func getPoolAddressAndCheckPoolStatus (assetIn,assetOut) = {
93
+
    let lpNonReverse = {
94
+
        let @ = invoke(factoryContract, "getLpAssetFromPoolAssetsREADONLY", [assetIn, assetOut], nil)
95
+
        if ($isInstanceOf(@, "String"))
96
+
            then @
97
+
            else unit
98
+
        }
99
+
    let lpReverse = {
100
+
        let @ = invoke(factoryContract, "getLpAssetFromPoolAssetsREADONLY", [assetOut, assetIn], nil)
101
+
        if ($isInstanceOf(@, "String"))
102
+
            then @
103
+
            else unit
104
+
        }
105
+
    let $t025332992 = if ((lpNonReverse != unit))
106
+
        then {
107
+
            let pool = {
108
+
                let @ = invoke(factoryContract, "getPoolAddressFromLpAssetREADONLY", [value(lpNonReverse)], nil)
109
+
                if ($isInstanceOf(@, "String"))
110
+
                    then @
111
+
                    else throw(($getType(@) + " couldn't be cast to String"))
112
+
                }
113
+
            $Tuple2(false, pool)
114
+
            }
115
+
        else if ((lpReverse != unit))
116
+
            then {
117
+
                let pool = {
118
+
                    let @ = invoke(factoryContract, "getPoolAddressFromLpAssetREADONLY", [value(lpReverse)], nil)
119
+
                    if ($isInstanceOf(@, "String"))
120
+
                        then @
121
+
                        else throw(($getType(@) + " couldn't be cast to String"))
122
+
                    }
123
+
                $Tuple2(true, pool)
124
+
                }
125
+
            else poolNotExist
126
+
    let isReverse = $t025332992._1
127
+
    let pool = $t025332992._2
128
+
    let poolStatus = {
129
+
        let @ = invoke(factoryContract, "getPoolStatusREADONLY", [pool], nil)
130
+
        if ($isInstanceOf(@, "Int"))
131
+
            then @
132
+
            else throw(($getType(@) + " couldn't be cast to Int"))
133
+
        }
134
+
    let check = if ((poolStatus == 1))
135
+
        then true
136
+
        else poolDisabled
137
+
    if ((check == check))
138
+
        then {
139
+
            let poolAdr = addressFromStringValue(valueOrElse(pool, ""))
140
+
            $Tuple2(poolAdr, isReverse)
141
+
            }
142
+
        else throw("Strict value is not equal to itself.")
143
+
    }
144
+
145
+
92
146
 
@Callable(i)
93
147
 
func swapCalculateREADONLY (amountIn,assetIn,assetOut) = {
94
148
 
    let prFee = value(getInteger(protocolFee()))
102
156
 
        then toBigInt(1)
103
157
 
        else feePoolAmountCalc
104
158
 
    let cleanAmountIn = ((toBigInt(amountIn) - feeProtocolAmount) - feePoolAmount)
105
-
    let lpNonReverse = invoke(factoryContract, "getLpAssetFromPoolAssetsREADONLY", [assetIn, assetOut], nil)
106
-
    let lpReverse = invoke(factoryContract, "getLpAssetFromPoolAssetsREADONLY", [assetOut, assetIn], nil)
107
-
    let $t031223625 = if ((lpNonReverse != unit))
108
-
        then {
109
-
            let isReverse = false
110
-
            let pool = {
111
-
                let @ = invoke(factoryContract, "getPoolAddressFromLpAssetREADONLY", [lpNonReverse], nil)
112
-
                if ($isInstanceOf(@, "String"))
113
-
                    then @
114
-
                    else throw(($getType(@) + " couldn't be cast to String"))
115
-
                }
116
-
            $Tuple2(isReverse, pool)
117
-
            }
118
-
        else if ((lpReverse != unit))
119
-
            then {
120
-
                let isReverse = true
121
-
                let pool = {
122
-
                    let @ = invoke(factoryContract, "getPoolAddressFromLpAssetREADONLY", [lpReverse], nil)
123
-
                    if ($isInstanceOf(@, "String"))
124
-
                        then @
125
-
                        else throw(($getType(@) + " couldn't be cast to String"))
126
-
                    }
127
-
                $Tuple2(isReverse, pool)
128
-
                }
129
-
            else poolNotExist
130
-
    let isReverse = $t031223625._1
131
-
    let pool = $t031223625._2
132
-
    let poolStatus = {
133
-
        let @ = invoke(factoryContract, "getPoolStatusREADONLY", [pool], nil)
159
+
    let $t039794057 = getPoolAddressAndCheckPoolStatus(assetIn, assetOut)
160
+
    let poolAdr = $t039794057._1
161
+
    let isReverse = $t039794057._2
162
+
    let res = {
163
+
        let @ = invoke(poolAdr, "calculateAmountOutForSwapREADONLY", [toInt(cleanAmountIn), isReverse], nil)
134
164
 
        if ($isInstanceOf(@, "Int"))
135
165
 
            then @
136
166
 
            else throw(($getType(@) + " couldn't be cast to Int"))
137
167
 
        }
138
-
    let check = if ((poolStatus == 1))
139
-
        then true
140
-
        else poolDisabled
141
-
    if ((check == check))
142
-
        then {
143
-
            let poolAdr = addressFromStringValue(valueOrElse(pool, ""))
144
-
            let res = {
145
-
                let @ = invoke(poolAdr, "calculateAmountOutForSwapREADONLY", [toInt(cleanAmountIn), isReverse], nil)
146
-
                if ($isInstanceOf(@, "Int"))
147
-
                    then @
148
-
                    else throw(($getType(@) + " couldn't be cast to Int"))
149
-
                }
150
-
            $Tuple2(nil, res)
151
-
            }
152
-
        else throw("Strict value is not equal to itself.")
168
+
    $Tuple2(nil, res)
153
169
 
    }
154
170
 
155
171
 
177
193
 
        else throw("exactly 1 payment are expected")]
178
194
 
    if ((checks == checks))
179
195
 
        then {
180
-
            let lpNonReverse = {
181
-
                let @ = invoke(factoryContract, "getLpAssetFromPoolAssetsREADONLY", [assetIn, assetOut], nil)
182
-
                if ($isInstanceOf(@, "String"))
183
-
                    then @
184
-
                    else unit
185
-
                }
186
-
            let lpReverse = {
187
-
                let @ = invoke(factoryContract, "getLpAssetFromPoolAssetsREADONLY", [assetOut, assetIn], nil)
188
-
                if ($isInstanceOf(@, "String"))
189
-
                    then @
190
-
                    else unit
191
-
                }
192
-
            let $t052305832 = if ((lpNonReverse != unit))
193
-
                then {
194
-
                    let isReverse = false
195
-
                    let pool = {
196
-
                        let @ = invoke(factoryContract, "getPoolAddressFromLpAssetREADONLY", [value(lpNonReverse)], nil)
197
-
                        if ($isInstanceOf(@, "String"))
198
-
                            then @
199
-
                            else throw(($getType(@) + " couldn't be cast to String"))
200
-
                        }
201
-
                    $Tuple2(isReverse, pool)
202
-
                    }
203
-
                else if ((lpReverse != unit))
204
-
                    then {
205
-
                        let isReverse = true
206
-
                        let pool = {
207
-
                            let @ = invoke(factoryContract, "getPoolAddressFromLpAssetREADONLY", [value(lpReverse)], nil)
208
-
                            if ($isInstanceOf(@, "String"))
209
-
                                then @
210
-
                                else throw(($getType(@) + " couldn't be cast to String"))
211
-
                            }
212
-
                        $Tuple2(isReverse, pool)
213
-
                        }
214
-
                    else throw(((("pool is not exist: assetIn=" + assetIn) + " assetOut=") + assetOut))
215
-
            let isReverse = $t052305832._1
216
-
            let pool = $t052305832._2
217
-
            let poolStatus = {
218
-
                let @ = invoke(factoryContract, "getPoolStatusREADONLY", [pool], nil)
196
+
            let $t051635241 = getPoolAddressAndCheckPoolStatus(assetIn, assetOut)
197
+
            let poolAdr = $t051635241._1
198
+
            let isReverse = $t051635241._2
199
+
            let assetInAttachedPayment = if ((assetIn == "WAVES"))
200
+
                then unit
201
+
                else fromBase58String(assetIn)
202
+
            let totalGetRaw = {
203
+
                let @ = invoke(poolAdr, "calculateAmountOutForSwapAndSendTokens", [toInt(cleanAmountIn), isReverse, amountOutMin, addressTo], [AttachedPayment(assetInAttachedPayment, toInt(cleanAmountIn))])
219
204
 
                if ($isInstanceOf(@, "Int"))
220
205
 
                    then @
221
206
 
                    else throw(($getType(@) + " couldn't be cast to Int"))
222
207
 
                }
223
-
            let check = if ((poolStatus == 1))
224
-
                then true
225
-
                else poolDisabled
226
-
            if ((check == check))
227
-
                then {
228
-
                    let poolAdr = addressFromStringValue(pool)
229
-
                    let assetInAttachedPayment = if ((assetIn == "WAVES"))
230
-
                        then unit
231
-
                        else fromBase58String(assetIn)
232
-
                    let totalGetRaw = {
233
-
                        let @ = invoke(poolAdr, "calculateAmountOutForSwapAndSendTokens", [toInt(cleanAmountIn), isReverse, amountOutMin, addressTo], [AttachedPayment(assetInAttachedPayment, toInt(cleanAmountIn))])
234
-
                        if ($isInstanceOf(@, "Int"))
235
-
                            then @
236
-
                            else throw(($getType(@) + " couldn't be cast to Int"))
237
-
                        }
238
-
                    $Tuple2([ScriptTransfer(feeCollectorAddress, toInt(feeProtocolAmount), assetInAttachedPayment), ScriptTransfer(poolAdr, toInt(feePoolAmount), assetInAttachedPayment)], totalGetRaw)
239
-
                    }
240
-
                else throw("Strict value is not equal to itself.")
208
+
            $Tuple2([ScriptTransfer(feeCollectorAddress, toInt(feeProtocolAmount), assetInAttachedPayment), ScriptTransfer(poolAdr, toInt(feePoolAmount), assetInAttachedPayment)], totalGetRaw)
241
209
 
            }
242
210
 
        else throw("Strict value is not equal to itself.")
243
211
 
    }
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let SEP = "__"
5
5
 
6
6
 
let feeScale = toBigInt(100000000)
7
7
 
8
8
 
func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), ("No data for this.key=" + key))
9
9
 
10
10
 
11
11
 
let poolDisabled = throw("Pool disabled")
12
12
 
13
13
 
let poolNotExist = throw("Pool is not exist")
14
14
 
15
15
 
let slippageTooBig = throw("Slippage is too big")
16
16
 
17
17
 
func keyManagerPublicKey () = "%s__managerPublicKey"
18
18
 
19
19
 
20
20
 
func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
21
21
 
22
22
 
23
23
 
func fc () = "%s__factoryContract"
24
24
 
25
25
 
26
26
 
let factoryContract = addressFromStringValue(getStringOrFail(fc()))
27
27
 
28
28
 
func protocolFee () = makeString(["%s", "protocolFee"], SEP)
29
29
 
30
30
 
31
31
 
func poolFee () = makeString(["%s", "poolFee"], SEP)
32
32
 
33
33
 
34
34
 
func getStringOrFailFromAddress (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
35
35
 
36
36
 
37
37
 
let keyFeeCollectorAddress = "%s__feeCollectorAddress"
38
38
 
39
39
 
let feeCollectorAddress = addressFromStringValue(getStringOrFailFromAddress(factoryContract, keyFeeCollectorAddress))
40
40
 
41
41
 
func asInt (val) = match val {
42
42
 
    case valInt: Int => 
43
43
 
        valInt
44
44
 
    case _ => 
45
45
 
        throw("fail to cast into Int")
46
46
 
}
47
47
 
48
48
 
49
49
 
func dataMappingPoolAssets (internalAmountAssetStr,internalPriceAssetStr) = makeString(["%d%d", toString(internalAmountAssetStr), toString(internalPriceAssetStr)], SEP)
50
50
 
51
51
 
52
52
 
func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
53
53
 
    case s: String => 
54
54
 
        fromBase58String(s)
55
55
 
    case _: Unit => 
56
56
 
        unit
57
57
 
    case _ => 
58
58
 
        throw("Match error")
59
59
 
}
60
60
 
61
61
 
62
62
 
func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
63
63
 
    case s: String => 
64
64
 
        fromBase58String(s)
65
65
 
    case _: Unit => 
66
66
 
        unit
67
67
 
    case _ => 
68
68
 
        throw("Match error")
69
69
 
}
70
70
 
71
71
 
72
72
 
func isManager (i) = match managerPublicKeyOrUnit() {
73
73
 
    case pk: ByteVector => 
74
74
 
        (i.callerPublicKey == pk)
75
75
 
    case _: Unit => 
76
76
 
        (i.caller == this)
77
77
 
    case _ => 
78
78
 
        throw("Match error")
79
79
 
}
80
80
 
81
81
 
82
82
 
func mustManager (i) = if (isManager(i))
83
83
 
    then true
84
84
 
    else throw("permission denied")
85
85
 
86
86
 
87
87
 
func getAccBalance (assetId) = if ((assetId == "WAVES"))
88
88
 
    then wavesBalance(this).available
89
89
 
    else assetBalance(this, fromBase58String(assetId))
90
90
 
91
91
 
92
+
func getPoolAddressAndCheckPoolStatus (assetIn,assetOut) = {
93
+
    let lpNonReverse = {
94
+
        let @ = invoke(factoryContract, "getLpAssetFromPoolAssetsREADONLY", [assetIn, assetOut], nil)
95
+
        if ($isInstanceOf(@, "String"))
96
+
            then @
97
+
            else unit
98
+
        }
99
+
    let lpReverse = {
100
+
        let @ = invoke(factoryContract, "getLpAssetFromPoolAssetsREADONLY", [assetOut, assetIn], nil)
101
+
        if ($isInstanceOf(@, "String"))
102
+
            then @
103
+
            else unit
104
+
        }
105
+
    let $t025332992 = if ((lpNonReverse != unit))
106
+
        then {
107
+
            let pool = {
108
+
                let @ = invoke(factoryContract, "getPoolAddressFromLpAssetREADONLY", [value(lpNonReverse)], nil)
109
+
                if ($isInstanceOf(@, "String"))
110
+
                    then @
111
+
                    else throw(($getType(@) + " couldn't be cast to String"))
112
+
                }
113
+
            $Tuple2(false, pool)
114
+
            }
115
+
        else if ((lpReverse != unit))
116
+
            then {
117
+
                let pool = {
118
+
                    let @ = invoke(factoryContract, "getPoolAddressFromLpAssetREADONLY", [value(lpReverse)], nil)
119
+
                    if ($isInstanceOf(@, "String"))
120
+
                        then @
121
+
                        else throw(($getType(@) + " couldn't be cast to String"))
122
+
                    }
123
+
                $Tuple2(true, pool)
124
+
                }
125
+
            else poolNotExist
126
+
    let isReverse = $t025332992._1
127
+
    let pool = $t025332992._2
128
+
    let poolStatus = {
129
+
        let @ = invoke(factoryContract, "getPoolStatusREADONLY", [pool], nil)
130
+
        if ($isInstanceOf(@, "Int"))
131
+
            then @
132
+
            else throw(($getType(@) + " couldn't be cast to Int"))
133
+
        }
134
+
    let check = if ((poolStatus == 1))
135
+
        then true
136
+
        else poolDisabled
137
+
    if ((check == check))
138
+
        then {
139
+
            let poolAdr = addressFromStringValue(valueOrElse(pool, ""))
140
+
            $Tuple2(poolAdr, isReverse)
141
+
            }
142
+
        else throw("Strict value is not equal to itself.")
143
+
    }
144
+
145
+
92
146
 
@Callable(i)
93
147
 
func swapCalculateREADONLY (amountIn,assetIn,assetOut) = {
94
148
 
    let prFee = value(getInteger(protocolFee()))
95
149
 
    let feeProtocolAmountCalc = fraction(toBigInt(amountIn), toBigInt(prFee), feeScale)
96
150
 
    let plFee = value(getInteger(poolFee()))
97
151
 
    let feePoolAmountCalc = fraction(toBigInt(amountIn), toBigInt(plFee), feeScale)
98
152
 
    let feeProtocolAmount = if ((toInt(feeProtocolAmountCalc) == 0))
99
153
 
        then toBigInt(1)
100
154
 
        else feeProtocolAmountCalc
101
155
 
    let feePoolAmount = if ((toInt(feePoolAmountCalc) == 0))
102
156
 
        then toBigInt(1)
103
157
 
        else feePoolAmountCalc
104
158
 
    let cleanAmountIn = ((toBigInt(amountIn) - feeProtocolAmount) - feePoolAmount)
105
-
    let lpNonReverse = invoke(factoryContract, "getLpAssetFromPoolAssetsREADONLY", [assetIn, assetOut], nil)
106
-
    let lpReverse = invoke(factoryContract, "getLpAssetFromPoolAssetsREADONLY", [assetOut, assetIn], nil)
107
-
    let $t031223625 = if ((lpNonReverse != unit))
108
-
        then {
109
-
            let isReverse = false
110
-
            let pool = {
111
-
                let @ = invoke(factoryContract, "getPoolAddressFromLpAssetREADONLY", [lpNonReverse], nil)
112
-
                if ($isInstanceOf(@, "String"))
113
-
                    then @
114
-
                    else throw(($getType(@) + " couldn't be cast to String"))
115
-
                }
116
-
            $Tuple2(isReverse, pool)
117
-
            }
118
-
        else if ((lpReverse != unit))
119
-
            then {
120
-
                let isReverse = true
121
-
                let pool = {
122
-
                    let @ = invoke(factoryContract, "getPoolAddressFromLpAssetREADONLY", [lpReverse], nil)
123
-
                    if ($isInstanceOf(@, "String"))
124
-
                        then @
125
-
                        else throw(($getType(@) + " couldn't be cast to String"))
126
-
                    }
127
-
                $Tuple2(isReverse, pool)
128
-
                }
129
-
            else poolNotExist
130
-
    let isReverse = $t031223625._1
131
-
    let pool = $t031223625._2
132
-
    let poolStatus = {
133
-
        let @ = invoke(factoryContract, "getPoolStatusREADONLY", [pool], nil)
159
+
    let $t039794057 = getPoolAddressAndCheckPoolStatus(assetIn, assetOut)
160
+
    let poolAdr = $t039794057._1
161
+
    let isReverse = $t039794057._2
162
+
    let res = {
163
+
        let @ = invoke(poolAdr, "calculateAmountOutForSwapREADONLY", [toInt(cleanAmountIn), isReverse], nil)
134
164
 
        if ($isInstanceOf(@, "Int"))
135
165
 
            then @
136
166
 
            else throw(($getType(@) + " couldn't be cast to Int"))
137
167
 
        }
138
-
    let check = if ((poolStatus == 1))
139
-
        then true
140
-
        else poolDisabled
141
-
    if ((check == check))
142
-
        then {
143
-
            let poolAdr = addressFromStringValue(valueOrElse(pool, ""))
144
-
            let res = {
145
-
                let @ = invoke(poolAdr, "calculateAmountOutForSwapREADONLY", [toInt(cleanAmountIn), isReverse], nil)
146
-
                if ($isInstanceOf(@, "Int"))
147
-
                    then @
148
-
                    else throw(($getType(@) + " couldn't be cast to Int"))
149
-
                }
150
-
            $Tuple2(nil, res)
151
-
            }
152
-
        else throw("Strict value is not equal to itself.")
168
+
    $Tuple2(nil, res)
153
169
 
    }
154
170
 
155
171
 
156
172
 
157
173
 
@Callable(i)
158
174
 
func swap (amountOutMin,assetOut,addressTo) = {
159
175
 
    let pmt = value(i.payments[0])
160
176
 
    let assetIn = if ((pmt.assetId == unit))
161
177
 
        then "WAVES"
162
178
 
        else toBase58String(value(pmt.assetId))
163
179
 
    let amountIn = value(pmt.amount)
164
180
 
    let prFee = value(getInteger(protocolFee()))
165
181
 
    let feeProtocolAmountCalc = fraction(toBigInt(amountIn), toBigInt(prFee), feeScale)
166
182
 
    let plFee = value(getInteger(poolFee()))
167
183
 
    let feePoolAmountCalc = fraction(toBigInt(amountIn), toBigInt(plFee), feeScale)
168
184
 
    let feeProtocolAmount = if ((toInt(feeProtocolAmountCalc) == 0))
169
185
 
        then toBigInt(1)
170
186
 
        else feeProtocolAmountCalc
171
187
 
    let feePoolAmount = if ((toInt(feePoolAmountCalc) == 0))
172
188
 
        then toBigInt(1)
173
189
 
        else feePoolAmountCalc
174
190
 
    let cleanAmountIn = ((toBigInt(amountIn) - feeProtocolAmount) - feePoolAmount)
175
191
 
    let checks = [if ((size(i.payments) == 1))
176
192
 
        then true
177
193
 
        else throw("exactly 1 payment are expected")]
178
194
 
    if ((checks == checks))
179
195
 
        then {
180
-
            let lpNonReverse = {
181
-
                let @ = invoke(factoryContract, "getLpAssetFromPoolAssetsREADONLY", [assetIn, assetOut], nil)
182
-
                if ($isInstanceOf(@, "String"))
183
-
                    then @
184
-
                    else unit
185
-
                }
186
-
            let lpReverse = {
187
-
                let @ = invoke(factoryContract, "getLpAssetFromPoolAssetsREADONLY", [assetOut, assetIn], nil)
188
-
                if ($isInstanceOf(@, "String"))
189
-
                    then @
190
-
                    else unit
191
-
                }
192
-
            let $t052305832 = if ((lpNonReverse != unit))
193
-
                then {
194
-
                    let isReverse = false
195
-
                    let pool = {
196
-
                        let @ = invoke(factoryContract, "getPoolAddressFromLpAssetREADONLY", [value(lpNonReverse)], nil)
197
-
                        if ($isInstanceOf(@, "String"))
198
-
                            then @
199
-
                            else throw(($getType(@) + " couldn't be cast to String"))
200
-
                        }
201
-
                    $Tuple2(isReverse, pool)
202
-
                    }
203
-
                else if ((lpReverse != unit))
204
-
                    then {
205
-
                        let isReverse = true
206
-
                        let pool = {
207
-
                            let @ = invoke(factoryContract, "getPoolAddressFromLpAssetREADONLY", [value(lpReverse)], nil)
208
-
                            if ($isInstanceOf(@, "String"))
209
-
                                then @
210
-
                                else throw(($getType(@) + " couldn't be cast to String"))
211
-
                            }
212
-
                        $Tuple2(isReverse, pool)
213
-
                        }
214
-
                    else throw(((("pool is not exist: assetIn=" + assetIn) + " assetOut=") + assetOut))
215
-
            let isReverse = $t052305832._1
216
-
            let pool = $t052305832._2
217
-
            let poolStatus = {
218
-
                let @ = invoke(factoryContract, "getPoolStatusREADONLY", [pool], nil)
196
+
            let $t051635241 = getPoolAddressAndCheckPoolStatus(assetIn, assetOut)
197
+
            let poolAdr = $t051635241._1
198
+
            let isReverse = $t051635241._2
199
+
            let assetInAttachedPayment = if ((assetIn == "WAVES"))
200
+
                then unit
201
+
                else fromBase58String(assetIn)
202
+
            let totalGetRaw = {
203
+
                let @ = invoke(poolAdr, "calculateAmountOutForSwapAndSendTokens", [toInt(cleanAmountIn), isReverse, amountOutMin, addressTo], [AttachedPayment(assetInAttachedPayment, toInt(cleanAmountIn))])
219
204
 
                if ($isInstanceOf(@, "Int"))
220
205
 
                    then @
221
206
 
                    else throw(($getType(@) + " couldn't be cast to Int"))
222
207
 
                }
223
-
            let check = if ((poolStatus == 1))
224
-
                then true
225
-
                else poolDisabled
226
-
            if ((check == check))
227
-
                then {
228
-
                    let poolAdr = addressFromStringValue(pool)
229
-
                    let assetInAttachedPayment = if ((assetIn == "WAVES"))
230
-
                        then unit
231
-
                        else fromBase58String(assetIn)
232
-
                    let totalGetRaw = {
233
-
                        let @ = invoke(poolAdr, "calculateAmountOutForSwapAndSendTokens", [toInt(cleanAmountIn), isReverse, amountOutMin, addressTo], [AttachedPayment(assetInAttachedPayment, toInt(cleanAmountIn))])
234
-
                        if ($isInstanceOf(@, "Int"))
235
-
                            then @
236
-
                            else throw(($getType(@) + " couldn't be cast to Int"))
237
-
                        }
238
-
                    $Tuple2([ScriptTransfer(feeCollectorAddress, toInt(feeProtocolAmount), assetInAttachedPayment), ScriptTransfer(poolAdr, toInt(feePoolAmount), assetInAttachedPayment)], totalGetRaw)
239
-
                    }
240
-
                else throw("Strict value is not equal to itself.")
208
+
            $Tuple2([ScriptTransfer(feeCollectorAddress, toInt(feeProtocolAmount), assetInAttachedPayment), ScriptTransfer(poolAdr, toInt(feePoolAmount), assetInAttachedPayment)], totalGetRaw)
241
209
 
            }
242
210
 
        else throw("Strict value is not equal to itself.")
243
211
 
    }
244
212
 
245
213
 
246
214
 
247
215
 
@Callable(i)
248
216
 
func setManager (pendingManagerPublicKey) = {
249
217
 
    let checkCaller = mustManager(i)
250
218
 
    if ((checkCaller == checkCaller))
251
219
 
        then {
252
220
 
            let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
253
221
 
            if ((checkManagerPublicKey == checkManagerPublicKey))
254
222
 
                then [StringEntry(keyPendingManagerPublicKey(), pendingManagerPublicKey)]
255
223
 
                else throw("Strict value is not equal to itself.")
256
224
 
            }
257
225
 
        else throw("Strict value is not equal to itself.")
258
226
 
    }
259
227
 
260
228
 
261
229
 
262
230
 
@Callable(i)
263
231
 
func confirmManager () = {
264
232
 
    let pm = pendingManagerPublicKeyOrUnit()
265
233
 
    let hasPM = if (isDefined(pm))
266
234
 
        then true
267
235
 
        else throw("no pending manager")
268
236
 
    if ((hasPM == hasPM))
269
237
 
        then {
270
238
 
            let checkPM = if ((i.callerPublicKey == value(pm)))
271
239
 
                then true
272
240
 
                else throw("you are not pending manager")
273
241
 
            if ((checkPM == checkPM))
274
242
 
                then [StringEntry(keyManagerPublicKey(), toBase58String(value(pm))), DeleteEntry(keyPendingManagerPublicKey())]
275
243
 
                else throw("Strict value is not equal to itself.")
276
244
 
            }
277
245
 
        else throw("Strict value is not equal to itself.")
278
246
 
    }
279
247
 
280
248
 
281
249
 
@Verifier(tx)
282
250
 
func verify () = {
283
251
 
    let targetPublicKey =     match managerPublicKeyOrUnit() {
284
252
 
        case pk: ByteVector => 
285
253
 
            pk
286
254
 
        case _: Unit => 
287
255
 
            tx.senderPublicKey
288
256
 
        case _ => 
289
257
 
            throw("Match error")
290
258
 
    }
291
259
 
    sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
292
260
 
    }
293
261
 

github/deemru/w8io/3ef1775 
50.92 ms ◑