tx · 8JtBbGpfiAo9bQDbY7MQKHJx7cwCgyVbqfHu11LSD8Zc

3NBbSp7yXAeyAmM8uuoenTt3XFfCGQZsHon:  -0.01300000 Waves

2023.03.16 17:06 [2492672] smart account 3NBbSp7yXAeyAmM8uuoenTt3XFfCGQZsHon > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "8JtBbGpfiAo9bQDbY7MQKHJx7cwCgyVbqfHu11LSD8Zc",
    "fee": 1300000,
    "feeAssetId": null,
    "timestamp": 1678975622069,
    "version": 2,
    "chainId": 84,
    "sender": "3NBbSp7yXAeyAmM8uuoenTt3XFfCGQZsHon",
    "senderPublicKey": "EdMvX1KG6dSSSsAqgamTtbKQho4ZLojCVgcBU4CDSeix",
    "proofs": [
        "3cUKhqjUDq1z9d7KNfSfqwbAp3wr9KvAxFbqtFMyF8rmRAKnKtXkajbFwfZHx5P71kLM1P6DUgeVcToV4ATuaDBo"
    ],
    "script": "base64:BgIXCAISBQoDAQgIEgUKAwEICBIDCgEIEgAXAANTRVACAl9fAAhmZWVTY2FsZQkAtgIBAIDC1y8BD2dldFN0cmluZ09yRmFpbAEDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwUDa2V5CQCsAgICFU5vIGRhdGEgZm9yIHRoaXMua2V5PQUDa2V5AAxwb29sRGlzYWJsZWQJAAIBAg1Qb29sIGRpc2FibGVkAAxwb29sTm90RXhpc3QJAAIBAhFQb29sIGlzIG5vdCBleGlzdAAOc2xpcHBhZ2VUb29CaWcJAAIBAhNTbGlwcGFnZSBpcyB0b28gYmlnARNrZXlNYW5hZ2VyUHVibGljS2V5AAIUJXNfX21hbmFnZXJQdWJsaWNLZXkBGmtleVBlbmRpbmdNYW5hZ2VyUHVibGljS2V5AAIbJXNfX3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5AQJmYwACEyVzX19mYWN0b3J5Q29udHJhY3QAD2ZhY3RvcnlDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBD2dldFN0cmluZ09yRmFpbAEJAQJmYwABC3Byb3RvY29sRmVlAAkAuQkCCQDMCAICAiVzCQDMCAICC3Byb3RvY29sRmVlBQNuaWwFA1NFUAEHcG9vbEZlZQAJALkJAgkAzAgCAgIlcwkAzAgCAgdwb29sRmVlBQNuaWwFA1NFUAEaZ2V0U3RyaW5nT3JGYWlsRnJvbUFkZHJlc3MCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAAWa2V5RmVlQ29sbGVjdG9yQWRkcmVzcwIXJXNfX2ZlZUNvbGxlY3RvckFkZHJlc3MAE2ZlZUNvbGxlY3RvckFkZHJlc3MJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARpnZXRTdHJpbmdPckZhaWxGcm9tQWRkcmVzcwIFD2ZhY3RvcnlDb250cmFjdAUWa2V5RmVlQ29sbGVjdG9yQWRkcmVzcwEFYXNJbnQBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACA0ludAQGdmFsSW50BQckbWF0Y2gwBQZ2YWxJbnQJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBFWRhdGFNYXBwaW5nUG9vbEFzc2V0cwIWaW50ZXJuYWxBbW91bnRBc3NldFN0chVpbnRlcm5hbFByaWNlQXNzZXRTdHIJALkJAgkAzAgCAgQlZCVkCQDMCAIJAKQDAQUWaW50ZXJuYWxBbW91bnRBc3NldFN0cgkAzAgCCQCkAwEFFWludGVybmFsUHJpY2VBc3NldFN0cgUDbmlsBQNTRVABFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQABAckbWF0Y2gwCQCiCAEJARNrZXlNYW5hZ2VyUHVibGljS2V5AAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJANkEAQUBcwMJAAECBQckbWF0Y2gwAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IBHXBlbmRpbmdNYW5hZ2VyUHVibGljS2V5T3JVbml0AAQHJG1hdGNoMAkAoggBCQEaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkA2QQBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgEJaXNNYW5hZ2VyAQFpBAckbWF0Y2gwCQEWbWFuYWdlclB1YmxpY0tleU9yVW5pdAADCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCcGsFByRtYXRjaDAJAAACCAUBaQ9jYWxsZXJQdWJsaWNLZXkFAnBrAwkAAQIFByRtYXRjaDACBFVuaXQJAAACCAUBaQZjYWxsZXIFBHRoaXMJAAIBAgtNYXRjaCBlcnJvcgELbXVzdE1hbmFnZXIBAWkDCQEJaXNNYW5hZ2VyAQUBaQYJAAIBAhFwZXJtaXNzaW9uIGRlbmllZAENZ2V0QWNjQmFsYW5jZQEHYXNzZXRJZAMJAAACBQdhc3NldElkAgVXQVZFUwgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAPAHAgUEdGhpcwkA2QQBBQdhc3NldElkASBnZXRQb29sQWRkcmVzc0FuZENoZWNrUG9vbFN0YXR1cwIHYXNzZXRJbghhc3NldE91dAQMbHBOb25SZXZlcnNlCgABQAkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCIGdldExwQXNzZXRGcm9tUG9vbEFzc2V0c1JFQURPTkxZCQDMCAIFB2Fzc2V0SW4JAMwIAgUIYXNzZXRPdXQFA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAUEdW5pdAQJbHBSZXZlcnNlCgABQAkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCIGdldExwQXNzZXRGcm9tUG9vbEFzc2V0c1JFQURPTkxZCQDMCAIFCGFzc2V0T3V0CQDMCAIFB2Fzc2V0SW4FA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAUEdW5pdAQLJHQwMjUzMzI5OTIDCQECIT0CBQxscE5vblJldmVyc2UFBHVuaXQEBHBvb2wKAAFACQD8BwQFD2ZhY3RvcnlDb250cmFjdAIhZ2V0UG9vbEFkZHJlc3NGcm9tTHBBc3NldFJFQURPTkxZCQDMCAIJAQV2YWx1ZQEFDGxwTm9uUmV2ZXJzZQUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nCQCUCgIHBQRwb29sAwkBAiE9AgUJbHBSZXZlcnNlBQR1bml0BARwb29sCgABQAkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCIWdldFBvb2xBZGRyZXNzRnJvbUxwQXNzZXRSRUFET05MWQkAzAgCCQEFdmFsdWUBBQlscFJldmVyc2UFA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAkAAgEJAKwCAgkAAwEFAUACGyBjb3VsZG4ndCBiZSBjYXN0IHRvIFN0cmluZwkAlAoCBgUEcG9vbAUMcG9vbE5vdEV4aXN0BAlpc1JldmVyc2UIBQskdDAyNTMzMjk5MgJfMQQEcG9vbAgFCyR0MDI1MzMyOTkyAl8yBApwb29sU3RhdHVzCgABQAkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCFWdldFBvb2xTdGF0dXNSRUFET05MWQkAzAgCBQRwb29sBQNuaWwFA25pbAMJAAECBQFAAgNJbnQFAUAJAAIBCQCsAgIJAAMBBQFAAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQEBWNoZWNrAwkAAAIFCnBvb2xTdGF0dXMAAQYFDHBvb2xEaXNhYmxlZAMJAAACBQVjaGVjawUFY2hlY2sEB3Bvb2xBZHIJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIFBHBvb2wCAAkAlAoCBQdwb29sQWRyBQlpc1JldmVyc2UJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4EAWkBFXN3YXBDYWxjdWxhdGVSRUFET05MWQMIYW1vdW50SW4HYXNzZXRJbghhc3NldE91dAQFcHJGZWUJAQV2YWx1ZQEJAJ8IAQkBC3Byb3RvY29sRmVlAAQVZmVlUHJvdG9jb2xBbW91bnRDYWxjCQC8AgMJALYCAQUIYW1vdW50SW4JALYCAQUFcHJGZWUFCGZlZVNjYWxlBAVwbEZlZQkBBXZhbHVlAQkAnwgBCQEHcG9vbEZlZQAEEWZlZVBvb2xBbW91bnRDYWxjCQC8AgMJALYCAQUIYW1vdW50SW4JALYCAQUFcGxGZWUFCGZlZVNjYWxlBBFmZWVQcm90b2NvbEFtb3VudAMJAAACCQCgAwEFFWZlZVByb3RvY29sQW1vdW50Q2FsYwAACQC2AgEAAQUVZmVlUHJvdG9jb2xBbW91bnRDYWxjBA1mZWVQb29sQW1vdW50AwkAAAIJAKADAQURZmVlUG9vbEFtb3VudENhbGMAAAkAtgIBAAEFEWZlZVBvb2xBbW91bnRDYWxjBA1jbGVhbkFtb3VudEluCQC4AgIJALgCAgkAtgIBBQhhbW91bnRJbgURZmVlUHJvdG9jb2xBbW91bnQFDWZlZVBvb2xBbW91bnQECyR0MDM5ODA0MDU4CQEgZ2V0UG9vbEFkZHJlc3NBbmRDaGVja1Bvb2xTdGF0dXMCBQdhc3NldEluBQhhc3NldE91dAQHcG9vbEFkcggFCyR0MDM5ODA0MDU4Al8xBAlpc1JldmVyc2UIBQskdDAzOTgwNDA1OAJfMgQDcmVzCgABQAkA/AcEBQdwb29sQWRyAiFjYWxjdWxhdGVBbW91bnRPdXRGb3JTd2FwUkVBRE9OTFkJAMwIAgkAoAMBBQ1jbGVhbkFtb3VudEluCQDMCAIFCWlzUmV2ZXJzZQkAzAgCCQCgAwEFDWZlZVBvb2xBbW91bnQFA25pbAUDbmlsAwkAAQIFAUACA0ludAUBQAkAAgEJAKwCAgkAAwEFAUACGCBjb3VsZG4ndCBiZSBjYXN0IHRvIEludAkAlAoCBQNuaWwFA3JlcwFpAQRzd2FwAwxhbW91bnRPdXRNaW4LYXNzZXRPdXRSYXcJYWRkcmVzc1RvBAhhc3NldE91dAMJAAACBQthc3NldE91dFJhdwIAAgVXQVZFUwULYXNzZXRPdXRSYXcEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABAdhc3NldEluAwkAAAIIBQNwbXQHYXNzZXRJZAUEdW5pdAIFV0FWRVMJANgEAQkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAhhbW91bnRJbgkBBXZhbHVlAQgFA3BtdAZhbW91bnQEBXByRmVlCQEFdmFsdWUBCQCfCAEJAQtwcm90b2NvbEZlZQAEFWZlZVByb3RvY29sQW1vdW50Q2FsYwkAvAIDCQC2AgEFCGFtb3VudEluCQC2AgEFBXByRmVlBQhmZWVTY2FsZQQFcGxGZWUJAQV2YWx1ZQEJAJ8IAQkBB3Bvb2xGZWUABBFmZWVQb29sQW1vdW50Q2FsYwkAvAIDCQC2AgEFCGFtb3VudEluCQC2AgEFBXBsRmVlBQhmZWVTY2FsZQQRZmVlUHJvdG9jb2xBbW91bnQDCQAAAgkAoAMBBRVmZWVQcm90b2NvbEFtb3VudENhbGMAAAkAtgIBAAEFFWZlZVByb3RvY29sQW1vdW50Q2FsYwQNZmVlUG9vbEFtb3VudAMJAAACCQCgAwEFEWZlZVBvb2xBbW91bnRDYWxjAAAJALYCAQABBRFmZWVQb29sQW1vdW50Q2FsYwQNY2xlYW5BbW91bnRJbgkAuAICCQC4AgIJALYCAQUIYW1vdW50SW4FEWZlZVByb3RvY29sQW1vdW50BQ1mZWVQb29sQW1vdW50BAZjaGVja3MJAMwIAgMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEGCQACAQIeZXhhY3RseSAxIHBheW1lbnQgYXJlIGV4cGVjdGVkBQNuaWwDCQAAAgUGY2hlY2tzBQZjaGVja3MECyR0MDUyNjA1MzM4CQEgZ2V0UG9vbEFkZHJlc3NBbmRDaGVja1Bvb2xTdGF0dXMCBQdhc3NldEluBQhhc3NldE91dAQHcG9vbEFkcggFCyR0MDUyNjA1MzM4Al8xBAlpc1JldmVyc2UIBQskdDA1MjYwNTMzOAJfMgQWYXNzZXRJbkF0dGFjaGVkUGF5bWVudAMJAAACBQdhc3NldEluAgVXQVZFUwUEdW5pdAkA2QQBBQdhc3NldEluBAt0b3RhbEdldFJhdwoAAUAJAPwHBAUHcG9vbEFkcgImY2FsY3VsYXRlQW1vdW50T3V0Rm9yU3dhcEFuZFNlbmRUb2tlbnMJAMwIAgkAoAMBBQ1jbGVhbkFtb3VudEluCQDMCAIFCWlzUmV2ZXJzZQkAzAgCBQxhbW91bnRPdXRNaW4JAMwIAgUJYWRkcmVzc1RvCQDMCAIJAKADAQUNZmVlUG9vbEFtb3VudAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBRZhc3NldEluQXR0YWNoZWRQYXltZW50CQCgAwEFDWNsZWFuQW1vdW50SW4FA25pbAMJAAECBQFAAgNJbnQFAUAJAAIBCQCsAgIJAAMBBQFAAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQJAJQKAgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBRNmZWVDb2xsZWN0b3JBZGRyZXNzCQCgAwEFEWZlZVByb3RvY29sQW1vdW50BRZhc3NldEluQXR0YWNoZWRQYXltZW50CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFB3Bvb2xBZHIJAKADAQUNZmVlUG9vbEFtb3VudAUWYXNzZXRJbkF0dGFjaGVkUGF5bWVudAUDbmlsBQt0b3RhbEdldFJhdwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQpzZXRNYW5hZ2VyARdwZW5kaW5nTWFuYWdlclB1YmxpY0tleQQLY2hlY2tDYWxsZXIJAQttdXN0TWFuYWdlcgEFAWkDCQAAAgULY2hlY2tDYWxsZXIFC2NoZWNrQ2FsbGVyBBVjaGVja01hbmFnZXJQdWJsaWNLZXkJANkEAQUXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkDCQAAAgUVY2hlY2tNYW5hZ2VyUHVibGljS2V5BRVjaGVja01hbmFnZXJQdWJsaWNLZXkJAMwIAgkBC1N0cmluZ0VudHJ5AgkBGmtleVBlbmRpbmdNYW5hZ2VyUHVibGljS2V5AAUXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ5jb25maXJtTWFuYWdlcgAEAnBtCQEdcGVuZGluZ01hbmFnZXJQdWJsaWNLZXlPclVuaXQABAVoYXNQTQMJAQlpc0RlZmluZWQBBQJwbQYJAAIBAhJubyBwZW5kaW5nIG1hbmFnZXIDCQAAAgUFaGFzUE0FBWhhc1BNBAdjaGVja1BNAwkAAAIIBQFpD2NhbGxlclB1YmxpY0tleQkBBXZhbHVlAQUCcG0GCQACAQIbeW91IGFyZSBub3QgcGVuZGluZyBtYW5hZ2VyAwkAAAIFB2NoZWNrUE0FB2NoZWNrUE0JAMwIAgkBC1N0cmluZ0VudHJ5AgkBE2tleU1hbmFnZXJQdWJsaWNLZXkACQDYBAEJAQV2YWx1ZQEFAnBtCQDMCAIJAQtEZWxldGVFbnRyeQEJARprZXlQZW5kaW5nTWFuYWdlclB1YmxpY0tleQAFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAED3RhcmdldFB1YmxpY0tleQQHJG1hdGNoMAkBFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQAAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAnBrBQckbWF0Y2gwBQJwawMJAAECBQckbWF0Y2gwAgRVbml0CAUCdHgPc2VuZGVyUHVibGljS2V5CQACAQILTWF0Y2ggZXJyb3IJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFD3RhcmdldFB1YmxpY0tleVf/3mw=",
    "height": 2492672,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: GM9X9b6XVd4QXWzch2bDB1GBgue7ScY9iAwbKoGW6eFN
Next: J3xLZsKykoorj8hY2fMpGxY96db7LU9Zdkj2yBDbCcFn

Diff: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let separator = "__"
4+let SEP = "__"
55 
6-let shareAssetDecimals = 8
6+let feeScale = toBigInt(100000000)
77 
8-let wavesString = "WAVES"
9-
10-let scale18 = 1000000000000000000
11-
12-let scale18BigInt = toBigInt(scale18)
13-
14-func wrapErr (msg) = makeString(["lp_staking_pools.ride:", msg], " ")
8+func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), ("No data for this.key=" + key))
159 
1610 
17-func throwErr (msg) = throw(wrapErr(msg))
11+let poolDisabled = throw("Pool disabled")
1812 
13+let poolNotExist = throw("Pool is not exist")
1914 
20-func errKeyIsNotDefined (address,key) = wrapErr(makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
21-
22-
23-func getStrOrFail (address,key) = valueOrErrorMessage(getString(address, key), errKeyIsNotDefined(address, key))
24-
25-
26-func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), errKeyIsNotDefined(address, key))
27-
28-
29-func parseAssetId (input) = if ((input == wavesString))
30-    then unit
31-    else fromBase58String(input)
32-
33-
34-func assetIdToString (input) = if ((input == unit))
35-    then wavesString
36-    else toBase58String(value(input))
37-
38-
39-func ensurePositive (v) = if ((v >= 0))
40-    then v
41-    else throwErr("value should be positive")
42-
43-
44-func keyFactoryContract () = makeString(["%s", "factoryContract"], separator)
45-
46-
47-func keyLpStakingContract () = makeString(["%s", "lpStakingContract"], separator)
48-
49-
50-func keyStakingContract () = makeString(["%s", "stakingContract"], separator)
51-
52-
53-func keyBoostingContract () = makeString(["%s", "boostingContract"], separator)
54-
55-
56-func keySwapContract () = makeString(["%s", "swapContract"], separator)
57-
58-
59-func keyAssetsStoreContract () = makeString(["%s", "assetsStoreContract"], separator)
60-
61-
62-func keyUsdtAssetId () = makeString(["%s", "usdtAssetId"], separator)
63-
64-
65-func keyWxAssetId () = makeString(["%s", "wxAssetId"], separator)
66-
67-
68-func keyShutdown () = makeString(["%s", "shutdown"], separator)
69-
70-
71-func keyMinDelay () = makeString(["%s", "minDelay"], separator)
72-
73-
74-func keyLockFraction () = makeString(["%s", "lockFraction"], separator)
75-
76-
77-func keyShareAssetId (baseAssetId) = makeString(["%s%s", assetIdToString(baseAssetId), "shareAssetId"], separator)
78-
79-
80-func keyBaseAssetId (shareAssetId) = makeString(["%s%s", assetIdToString(shareAssetId), "baseAssetId"], separator)
81-
82-
83-func keyPeriod (baseAssetId) = makeString(["%s%s", assetIdToString(baseAssetId), "period"], separator)
84-
85-
86-func keyPeriodStartHeight (baseAssetId,period) = makeString(["%s%s%d", assetIdToString(baseAssetId), "periodStartHeight", toString(period)], separator)
87-
88-
89-func keyBaseAssetAmountToConvert (baseAssetId) = makeString(["%s%s", assetIdToString(baseAssetId), "baseAssetAmountToConvert"], separator)
90-
91-
92-func keyShareAssetAmountToConvert (baseAssetId) = makeString(["%s%s", assetIdToString(baseAssetId), "shareAssetAmountToConvert"], separator)
93-
94-
95-func keyUserBaseAssetAmountToConvert (baseAssetId,userAddress) = makeString(["%s%s%s", assetIdToString(baseAssetId), toString(userAddress), "baseAssetAmountToConvert"], separator)
96-
97-
98-func keyUserBaseAssetAmountToConvertPeriod (baseAssetId,userAddress) = makeString(["%s%s%s%s", assetIdToString(baseAssetId), toString(userAddress), "baseAssetAmountToConvert", "period"], separator)
99-
100-
101-func keyUserShareAssetAmountToConvert (baseAssetId,userAddress) = makeString(["%s%s%s", assetIdToString(baseAssetId), toString(userAddress), "shareAssetAmountToConvert"], separator)
102-
103-
104-func keyUserShareAssetAmountToConvertPeriod (baseAssetId,userAddress) = makeString(["%s%s%s%s", assetIdToString(baseAssetId), toString(userAddress), "shareAssetAmountToConvert", "period"], separator)
105-
106-
107-func keyPricePeriod (baseAssetId,period) = makeString(["%s%s%d", assetIdToString(baseAssetId), "price", toString(period)], separator)
108-
109-
110-func keyPriceHistory (baseAssetId) = makeString(["%s%s%s%d%d", assetIdToString(baseAssetId), "price", "history", toString(lastBlock.height), toString(lastBlock.timestamp)], separator)
111-
112-
113-func keyPricePeriodPut (baseAssetId,period) = makeString(["%s%s%d%s", assetIdToString(baseAssetId), "price", toString(period), "put"], separator)
114-
115-
116-func keyPricePutHistory (baseAssetId) = makeString(["%s%s%s%s%d%d", assetIdToString(baseAssetId), "price", "history", "put", toString(lastBlock.height), toString(lastBlock.timestamp)], separator)
117-
118-
119-func keyPricePeriodGet (baseAssetId,period) = makeString(["%s%s%d%s", assetIdToString(baseAssetId), "price", toString(period), "get"], separator)
120-
121-
122-func keyPriceGetHistory (baseAssetId) = makeString(["%s%s%s%s%d%d", assetIdToString(baseAssetId), "price", "history", "get", toString(lastBlock.height), toString(lastBlock.timestamp)], separator)
123-
124-
125-func keyHistoryEntry (baseAssetId,operation,period,userAddress,txId) = makeString(["%s%s%s%s", "history", operation, toString(userAddress), toBase58String(txId), toString(height)], separator)
126-
15+let slippageTooBig = throw("Slippage is too big")
12716 
12817 func keyManagerPublicKey () = "%s__managerPublicKey"
12918 
13019 
13120 func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
21+
22+
23+func fc () = "%s__factoryContract"
24+
25+
26+let factoryContract = addressFromStringValue(getStringOrFail(fc()))
27+
28+func protocolFee () = makeString(["%s", "protocolFee"], SEP)
29+
30+
31+func poolFee () = makeString(["%s", "poolFee"], SEP)
32+
33+
34+func getStringOrFailFromAddress (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
35+
36+
37+let keyFeeCollectorAddress = "%s__feeCollectorAddress"
38+
39+let feeCollectorAddress = addressFromStringValue(getStringOrFailFromAddress(factoryContract, keyFeeCollectorAddress))
40+
41+func asInt (val) = match val {
42+    case valInt: Int => 
43+        valInt
44+    case _ => 
45+        throw("fail to cast into Int")
46+}
47+
48+
49+func dataMappingPoolAssets (internalAmountAssetStr,internalPriceAssetStr) = makeString(["%d%d", toString(internalAmountAssetStr), toString(internalPriceAssetStr)], SEP)
13250 
13351 
13452 func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
15169 }
15270 
15371 
154-let permissionDeniedError = throw("Permission denied")
155-
156-func mustThis (i) = if ((i.caller == this))
157-    then true
158-    else permissionDeniedError
159-
160-
161-func mustManager (i) = match managerPublicKeyOrUnit() {
72+func isManager (i) = match managerPublicKeyOrUnit() {
16273     case pk: ByteVector => 
163-        if ((i.callerPublicKey == pk))
164-            then true
165-            else permissionDeniedError
74+        (i.callerPublicKey == pk)
16675     case _: Unit => 
167-        mustThis(i)
76+        (i.caller == this)
16877     case _ => 
16978         throw("Match error")
17079 }
17180 
17281 
173-let shutdown = valueOrElse(getBoolean(keyShutdown()), false)
174-
175-func shutdownCheck (i) = if (if (!(shutdown))
82+func mustManager (i) = if (isManager(i))
17683     then true
177-    else mustManager(i))
178-    then true
179-    else throw("operation is disabled")
84+    else throw("permission denied")
18085 
18186 
182-let factoryContract = addressFromStringValue(getStrOrFail(this, keyFactoryContract()))
87+func getAccBalance (assetId) = if ((assetId == "WAVES"))
88+    then wavesBalance(this).available
89+    else assetBalance(this, fromBase58String(assetId))
18390 
184-let lpStakingContract = addressFromStringValue(getStrOrFail(this, keyLpStakingContract()))
18591 
186-let stakingContract = addressFromStringValue(getStrOrFail(this, keyStakingContract()))
187-
188-let boostingContract = addressFromStringValue(getStrOrFail(this, keyBoostingContract()))
189-
190-let swapContract = addressFromStringValue(getStrOrFail(this, keySwapContract()))
191-
192-let assetsStoreContract = addressFromStringValue(getStrOrFail(this, keyAssetsStoreContract()))
193-
194-let usdtAssetId = parseAssetId(getStrOrFail(this, keyUsdtAssetId()))
195-
196-let wxAssetId = parseAssetId(getStrOrFail(this, keyWxAssetId()))
197-
198-let minDelayDefault = 1440
199-
200-let minDelay = valueOrElse(getInteger(this, keyMinDelay()), minDelayDefault)
201-
202-let lockFractionMultiplier = 100000000
203-
204-let lockFractionDefault = fraction(1, lockFractionMultiplier, 2)
205-
206-let lockFraction = valueOrElse(getInteger(this, keyLockFraction()), lockFractionDefault)
207-
208-func getPoolInfo (amountAssetId) = {
209-    let amountAssetIdStr = assetIdToString(amountAssetId)
210-    let priceAssetIdStr = assetIdToString(usdtAssetId)
211-    let poolInfoOption = {
212-        let @ = invoke(factoryContract, "poolInfoREADONLY", [amountAssetIdStr, priceAssetIdStr], nil)
213-        if ($isInstanceOf(@, "(Address, ByteVector)"))
92+func getPoolAddressAndCheckPoolStatus (assetIn,assetOut) = {
93+    let lpNonReverse = {
94+        let @ = invoke(factoryContract, "getLpAssetFromPoolAssetsREADONLY", [assetIn, assetOut], nil)
95+        if ($isInstanceOf(@, "String"))
21496             then @
21597             else unit
21698         }
217-    poolInfoOption
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.")
218143     }
219144 
220145 
221-func calcPrice (lpAssetId,shareAssetId) = {
222-    let shareAssetInfo = valueOrErrorMessage(assetInfo(shareAssetId), "failed to get share asset info")
223-    let shareAssetEmission = shareAssetInfo.quantity
224-    let stakedAmount = ensurePositive(valueOrErrorMessage({
225-        let @ = invoke(stakingContract, "stakedByUserREADONLY", [assetIdToString(lpAssetId), toString(this)], nil)
146+@Callable(i)
147+func swapCalculateREADONLY (amountIn,assetIn,assetOut) = {
148+    let prFee = value(getInteger(protocolFee()))
149+    let feeProtocolAmountCalc = fraction(toBigInt(amountIn), toBigInt(prFee), feeScale)
150+    let plFee = value(getInteger(poolFee()))
151+    let feePoolAmountCalc = fraction(toBigInt(amountIn), toBigInt(plFee), feeScale)
152+    let feeProtocolAmount = if ((toInt(feeProtocolAmountCalc) == 0))
153+        then toBigInt(1)
154+        else feeProtocolAmountCalc
155+    let feePoolAmount = if ((toInt(feePoolAmountCalc) == 0))
156+        then toBigInt(1)
157+        else feePoolAmountCalc
158+    let cleanAmountIn = ((toBigInt(amountIn) - feeProtocolAmount) - feePoolAmount)
159+    let $t039804058 = getPoolAddressAndCheckPoolStatus(assetIn, assetOut)
160+    let poolAdr = $t039804058._1
161+    let isReverse = $t039804058._2
162+    let res = {
163+        let @ = invoke(poolAdr, "calculateAmountOutForSwapREADONLY", [toInt(cleanAmountIn), isReverse, toInt(feePoolAmount)], nil)
226164         if ($isInstanceOf(@, "Int"))
227165             then @
228-            else unit
229-        }, wrapErr("invalid stakedByUserREADONLY result")))
230-    let price = if ((shareAssetEmission == 0))
231-        then scale18BigInt
232-        else fraction(toBigInt(stakedAmount), scale18BigInt, toBigInt(shareAssetEmission), FLOOR)
233-    price
166+            else throw(($getType(@) + " couldn't be cast to Int"))
167+        }
168+    $Tuple2(nil, res)
234169     }
170+
171+
172+
173+@Callable(i)
174+func swap (amountOutMin,assetOutRaw,addressTo) = {
175+    let assetOut = if ((assetOutRaw == ""))
176+        then "WAVES"
177+        else assetOutRaw
178+    let pmt = value(i.payments[0])
179+    let assetIn = if ((pmt.assetId == unit))
180+        then "WAVES"
181+        else toBase58String(value(pmt.assetId))
182+    let amountIn = value(pmt.amount)
183+    let prFee = value(getInteger(protocolFee()))
184+    let feeProtocolAmountCalc = fraction(toBigInt(amountIn), toBigInt(prFee), feeScale)
185+    let plFee = value(getInteger(poolFee()))
186+    let feePoolAmountCalc = fraction(toBigInt(amountIn), toBigInt(plFee), feeScale)
187+    let feeProtocolAmount = if ((toInt(feeProtocolAmountCalc) == 0))
188+        then toBigInt(1)
189+        else feeProtocolAmountCalc
190+    let feePoolAmount = if ((toInt(feePoolAmountCalc) == 0))
191+        then toBigInt(1)
192+        else feePoolAmountCalc
193+    let cleanAmountIn = ((toBigInt(amountIn) - feeProtocolAmount) - feePoolAmount)
194+    let checks = [if ((size(i.payments) == 1))
195+        then true
196+        else throw("exactly 1 payment are expected")]
197+    if ((checks == checks))
198+        then {
199+            let $t052605338 = getPoolAddressAndCheckPoolStatus(assetIn, assetOut)
200+            let poolAdr = $t052605338._1
201+            let isReverse = $t052605338._2
202+            let assetInAttachedPayment = if ((assetIn == "WAVES"))
203+                then unit
204+                else fromBase58String(assetIn)
205+            let totalGetRaw = {
206+                let @ = invoke(poolAdr, "calculateAmountOutForSwapAndSendTokens", [toInt(cleanAmountIn), isReverse, amountOutMin, addressTo, toInt(feePoolAmount)], [AttachedPayment(assetInAttachedPayment, toInt(cleanAmountIn))])
207+                if ($isInstanceOf(@, "Int"))
208+                    then @
209+                    else throw(($getType(@) + " couldn't be cast to Int"))
210+                }
211+            $Tuple2([ScriptTransfer(feeCollectorAddress, toInt(feeProtocolAmount), assetInAttachedPayment), ScriptTransfer(poolAdr, toInt(feePoolAmount), assetInAttachedPayment)], totalGetRaw)
212+            }
213+        else throw("Strict value is not equal to itself.")
214+    }
215+
235216 
236217 
237218 @Callable(i)
254235     let pm = pendingManagerPublicKeyOrUnit()
255236     let hasPM = if (isDefined(pm))
256237         then true
257-        else throwErr("no pending manager")
238+        else throw("no pending manager")
258239     if ((hasPM == hasPM))
259240         then {
260241             let checkPM = if ((i.callerPublicKey == value(pm)))
261242                 then true
262-                else throwErr("you are not pending manager")
243+                else throw("you are not pending manager")
263244             if ((checkPM == checkPM))
264245                 then [StringEntry(keyManagerPublicKey(), toBase58String(value(pm))), DeleteEntry(keyPendingManagerPublicKey())]
265-                else throw("Strict value is not equal to itself.")
266-            }
267-        else throw("Strict value is not equal to itself.")
268-    }
269-
270-
271-
272-@Callable(i)
273-func emit (assetId,amount) = {
274-    let checkCaller = mustThis(i)
275-    if ((checkCaller == checkCaller))
276-        then {
277-            let isReissuable = true
278-            $Tuple2([Reissue(assetId, amount, isReissuable)], amount)
279-            }
280-        else throw("Strict value is not equal to itself.")
281-    }
282-
283-
284-
285-@Callable(i)
286-func burn (assetId,amount) = {
287-    let checkCaller = mustThis(i)
288-    if ((checkCaller == checkCaller))
289-        then $Tuple2([Burn(assetId, amount)], amount)
290-        else throw("Strict value is not equal to itself.")
291-    }
292-
293-
294-
295-@Callable(i)
296-func create (baseAssetIdStr,shareAssetIdStr,shareAssetName,shareAssetDescription,shareAssetLogo) = {
297-    let shareAssetLabel = "STAKING_LP"
298-    let baseAssetId = parseAssetId(baseAssetIdStr)
299-    let checks = [mustManager(i), if (isDefined(getPoolInfo(baseAssetId)))
300-        then true
301-        else throwErr("invalid base asset")]
302-    if ((checks == checks))
303-        then {
304-            let commonState = [IntegerEntry(keyPeriod(baseAssetId), 0)]
305-            if ((shareAssetIdStr == ""))
306-                then {
307-                    let shareAssetIssueAmount = 1
308-                    let shareAssetIssueAction = Issue(shareAssetName, shareAssetDescription, shareAssetIssueAmount, shareAssetDecimals, true)
309-                    let calculatedShareAssetId = calculateAssetId(shareAssetIssueAction)
310-                    let shareAssetBurnAction = Burn(calculatedShareAssetId, shareAssetIssueAmount)
311-                    let calculatedShareAssetIdStr = toBase58String(calculatedShareAssetId)
312-                    let createOrUpdate = invoke(assetsStoreContract, "createOrUpdate", [calculatedShareAssetIdStr, shareAssetLogo, false], nil)
313-                    if ((createOrUpdate == createOrUpdate))
314-                        then {
315-                            let addLabel = invoke(assetsStoreContract, "addLabel", [calculatedShareAssetIdStr, shareAssetLabel], nil)
316-                            if ((addLabel == addLabel))
317-                                then $Tuple2((commonState ++ [shareAssetIssueAction, shareAssetBurnAction, StringEntry(keyShareAssetId(baseAssetId), calculatedShareAssetIdStr), StringEntry(keyBaseAssetId(calculatedShareAssetId), baseAssetIdStr)]), calculatedShareAssetIdStr)
318-                                else throw("Strict value is not equal to itself.")
319-                            }
320-                        else throw("Strict value is not equal to itself.")
321-                    }
322-                else {
323-                    let shareAssetId = fromBase58String(shareAssetIdStr)
324-                    let shareAssetInfo = valueOrErrorMessage(assetInfo(shareAssetId), wrapErr("invalid share asset id"))
325-                    let checkIssuer = if ((shareAssetInfo.issuer == lpStakingContract))
326-                        then true
327-                        else throwErr("invalid share asset id issuer")
328-                    if ((checkIssuer == checkIssuer))
329-                        then $Tuple2((commonState ++ [StringEntry(keyShareAssetId(baseAssetId), shareAssetIdStr), StringEntry(keyBaseAssetId(shareAssetId), baseAssetIdStr)]), shareAssetIdStr)
330-                        else throw("Strict value is not equal to itself.")
331-                    }
332-            }
333-        else throw("Strict value is not equal to itself.")
334-    }
335-
336-
337-
338-@Callable(i)
339-func put () = {
340-    let pmt = if ((size(i.payments) == 1))
341-        then i.payments[0]
342-        else throwErr("exactly 1 payment is expected")
343-    let baseAssetId = pmt.assetId
344-    let userAddress = i.caller
345-    let checks = [shutdownCheck(i), if (isDefined(getString(keyShareAssetId(baseAssetId))))
346-        then true
347-        else throwErr("invalid asset")]
348-    if ((checks == checks))
349-        then {
350-            let $t01164011743 = valueOrErrorMessage(getPoolInfo(baseAssetId), wrapErr("invalid asset"))
351-            let poolAddress = $t01164011743._1
352-            let lpAssetId = $t01164011743._2
353-            let period = value(getInteger(keyPeriod(baseAssetId)))
354-            let userBaseAssetAmountToConvertPeriodOption = getInteger(keyUserBaseAssetAmountToConvertPeriod(baseAssetId, userAddress))
355-            let claimShareAssetInvocation = if ((userBaseAssetAmountToConvertPeriodOption == unit))
356-                then unit
357-                else {
358-                    let userBaseAssetAmountToConvertPeriod = value(userBaseAssetAmountToConvertPeriodOption)
359-                    if ((userBaseAssetAmountToConvertPeriod == period))
360-                        then unit
361-                        else invoke(this, "claimShareAsset", [assetIdToString(baseAssetId), toString(userAddress)], nil)
362-                    }
363-            if ((claimShareAssetInvocation == claimShareAssetInvocation))
364-                then {
365-                    let baseAssetAmountToConvert = valueOrElse(getInteger(keyBaseAssetAmountToConvert(baseAssetId)), 0)
366-                    let userBaseAssetAmountToConvert = valueOrElse(getInteger(keyUserBaseAssetAmountToConvert(baseAssetId, userAddress)), 0)
367-                    $Tuple2([IntegerEntry(keyBaseAssetAmountToConvert(baseAssetId), (baseAssetAmountToConvert + pmt.amount)), IntegerEntry(keyUserBaseAssetAmountToConvert(baseAssetId, userAddress), (userBaseAssetAmountToConvert + pmt.amount)), IntegerEntry(keyUserBaseAssetAmountToConvertPeriod(baseAssetId, userAddress), period), IntegerEntry(keyHistoryEntry(baseAssetId, "put", period, userAddress, i.transactionId), pmt.amount)], unit)
368-                    }
369-                else throw("Strict value is not equal to itself.")
370-            }
371-        else throw("Strict value is not equal to itself.")
372-    }
373-
374-
375-
376-@Callable(i)
377-func claimShareAsset (baseAssetIdStr,userAddressStr) = {
378-    let checks = [shutdownCheck(i)]
379-    if ((checks == checks))
380-        then {
381-            let userAddress = if ((userAddressStr == ""))
382-                then i.caller
383-                else {
384-                    let checkCaller = mustThis(i)
385-                    if ((checkCaller == checkCaller))
386-                        then valueOrErrorMessage(addressFromString(userAddressStr), wrapErr("invalid user address"))
387-                        else throw("Strict value is not equal to itself.")
388-                    }
389-            if ((userAddress == userAddress))
390-                then {
391-                    let baseAssetId = parseAssetId(baseAssetIdStr)
392-                    let shareAssetId = value(parseAssetId(valueOrErrorMessage(getString(keyShareAssetId(baseAssetId)), wrapErr("invalid base asset id"))))
393-                    if ((shareAssetId == shareAssetId))
394-                        then {
395-                            let period = valueOrErrorMessage(getInteger(keyPeriod(baseAssetId)), wrapErr("invalid period"))
396-                            if ((period == period))
397-                                then {
398-                                    let userBaseAssetAmountToConvert = valueOrElse(getInteger(keyUserBaseAssetAmountToConvert(baseAssetId, userAddress)), 0)
399-                                    let checkAmountToConvert = if ((userBaseAssetAmountToConvert > 0))
400-                                        then true
401-                                        else throwErr("nothing to claim")
402-                                    if ((checkAmountToConvert == checkAmountToConvert))
403-                                        then {
404-                                            let userBaseAssetAmountToConvertPeriod = valueOrErrorMessage(getInteger(keyUserBaseAssetAmountToConvertPeriod(baseAssetId, userAddress)), wrapErr("failed to get period"))
405-                                            let checkPeriod = if ((period > userBaseAssetAmountToConvertPeriod))
406-                                                then true
407-                                                else throwErr("invalid period")
408-                                            if ((checkPeriod == checkPeriod))
409-                                                then {
410-                                                    let price = toBigInt(valueOrErrorMessage(getBinary(keyPricePeriodPut(baseAssetId, userBaseAssetAmountToConvertPeriod)), wrapErr("failed to get price")))
411-                                                    let shareAssetAmount = toInt(fraction(toBigInt(userBaseAssetAmountToConvert), scale18BigInt, price))
412-                                                    $Tuple2([IntegerEntry(keyUserBaseAssetAmountToConvert(baseAssetId, userAddress), 0), DeleteEntry(keyUserBaseAssetAmountToConvertPeriod(baseAssetId, userAddress)), ScriptTransfer(userAddress, shareAssetAmount, shareAssetId), IntegerEntry(keyHistoryEntry(baseAssetId, "claimShareAsset", period, userAddress, i.transactionId), shareAssetAmount)], unit)
413-                                                    }
414-                                                else throw("Strict value is not equal to itself.")
415-                                            }
416-                                        else throw("Strict value is not equal to itself.")
417-                                    }
418-                                else throw("Strict value is not equal to itself.")
419-                            }
420-                        else throw("Strict value is not equal to itself.")
421-                    }
422-                else throw("Strict value is not equal to itself.")
423-            }
424-        else throw("Strict value is not equal to itself.")
425-    }
426-
427-
428-
429-@Callable(i)
430-func get () = {
431-    let checks = [shutdownCheck(i)]
432-    if ((checks == checks))
433-        then {
434-            let pmt = if ((size(i.payments) == 1))
435-                then i.payments[0]
436-                else throwErr("exactly 1 payment is expected")
437-            let shareAssetId = pmt.assetId
438-            let baseAssetId = value(parseAssetId(valueOrErrorMessage(getString(keyBaseAssetId(shareAssetId)), wrapErr("invalid share asset id"))))
439-            if ((baseAssetId == baseAssetId))
440-                then {
441-                    let userAddress = i.caller
442-                    let $t01547615579 = valueOrErrorMessage(getPoolInfo(baseAssetId), wrapErr("invalid asset"))
443-                    let poolAddress = $t01547615579._1
444-                    let lpAssetId = $t01547615579._2
445-                    let period = value(getInteger(keyPeriod(baseAssetId)))
446-                    let userShareAssetAmountToConvertPeriodOption = getInteger(keyUserShareAssetAmountToConvertPeriod(baseAssetId, userAddress))
447-                    let claimBaseAssetInvocation = if ((userShareAssetAmountToConvertPeriodOption == unit))
448-                        then unit
449-                        else {
450-                            let userShareAssetAmountToConvertPeriod = value(userShareAssetAmountToConvertPeriodOption)
451-                            if ((userShareAssetAmountToConvertPeriod == period))
452-                                then unit
453-                                else invoke(this, "claimBaseAsset", [assetIdToString(baseAssetId), toString(userAddress)], nil)
454-                            }
455-                    if ((claimBaseAssetInvocation == claimBaseAssetInvocation))
456-                        then {
457-                            let shareAssetAmountToConvert = valueOrElse(getInteger(keyShareAssetAmountToConvert(baseAssetId)), 0)
458-                            let userShareAssetAmountToConvert = valueOrElse(getInteger(keyUserShareAssetAmountToConvert(baseAssetId, userAddress)), 0)
459-                            $Tuple2([IntegerEntry(keyShareAssetAmountToConvert(baseAssetId), (shareAssetAmountToConvert + pmt.amount)), IntegerEntry(keyUserShareAssetAmountToConvert(baseAssetId, userAddress), (userShareAssetAmountToConvert + pmt.amount)), IntegerEntry(keyUserShareAssetAmountToConvertPeriod(baseAssetId, userAddress), period), IntegerEntry(keyHistoryEntry(baseAssetId, "get", period, userAddress, i.transactionId), pmt.amount)], unit)
460-                            }
461-                        else throw("Strict value is not equal to itself.")
462-                    }
463-                else throw("Strict value is not equal to itself.")
464-            }
465-        else throw("Strict value is not equal to itself.")
466-    }
467-
468-
469-
470-@Callable(i)
471-func claimBaseAsset (baseAssetIdStr,userAddressStr) = {
472-    let checks = [shutdownCheck(i)]
473-    if ((checks == checks))
474-        then {
475-            let userAddress = if ((userAddressStr == ""))
476-                then i.caller
477-                else {
478-                    let checkCaller = mustThis(i)
479-                    if ((checkCaller == checkCaller))
480-                        then valueOrErrorMessage(addressFromString(userAddressStr), wrapErr("invalid user address"))
481-                        else throw("Strict value is not equal to itself.")
482-                    }
483-            if ((userAddress == userAddress))
484-                then {
485-                    let baseAssetId = parseAssetId(baseAssetIdStr)
486-                    let shareAssetId = value(parseAssetId(valueOrErrorMessage(getString(keyShareAssetId(baseAssetId)), wrapErr("invalid base asset id"))))
487-                    if ((shareAssetId == shareAssetId))
488-                        then {
489-                            let period = valueOrErrorMessage(getInteger(keyPeriod(baseAssetId)), wrapErr("invalid period"))
490-                            if ((period == period))
491-                                then {
492-                                    let userShareAssetAmountToConvert = valueOrElse(getInteger(keyUserShareAssetAmountToConvert(baseAssetId, userAddress)), 0)
493-                                    let checkAmountToConvert = if ((userShareAssetAmountToConvert > 0))
494-                                        then true
495-                                        else throwErr("nothing to claim")
496-                                    if ((checkAmountToConvert == checkAmountToConvert))
497-                                        then {
498-                                            let userShareAssetAmountToConvertPeriod = valueOrErrorMessage(getInteger(keyUserShareAssetAmountToConvertPeriod(baseAssetId, userAddress)), wrapErr("failed to get period"))
499-                                            let checkPeriod = if ((period > userShareAssetAmountToConvertPeriod))
500-                                                then true
501-                                                else throwErr("invalid period")
502-                                            if ((checkPeriod == checkPeriod))
503-                                                then {
504-                                                    let price = toBigInt(valueOrErrorMessage(getBinary(keyPricePeriodGet(baseAssetId, userShareAssetAmountToConvertPeriod)), wrapErr("failed to get price")))
505-                                                    let baseAssetAmount = toInt(fraction(toBigInt(userShareAssetAmountToConvert), price, scale18BigInt))
506-                                                    $Tuple2([IntegerEntry(keyUserShareAssetAmountToConvert(baseAssetId, userAddress), 0), DeleteEntry(keyUserShareAssetAmountToConvertPeriod(baseAssetId, userAddress)), ScriptTransfer(userAddress, baseAssetAmount, baseAssetId), IntegerEntry(keyHistoryEntry(baseAssetId, "claimBaseAsset", period, userAddress, i.transactionId), baseAssetAmount)], unit)
507-                                                    }
508-                                                else throw("Strict value is not equal to itself.")
509-                                            }
510-                                        else throw("Strict value is not equal to itself.")
511-                                    }
512-                                else throw("Strict value is not equal to itself.")
513-                            }
514-                        else throw("Strict value is not equal to itself.")
515-                    }
516-                else throw("Strict value is not equal to itself.")
517-            }
518-        else throw("Strict value is not equal to itself.")
519-    }
520-
521-
522-
523-@Callable(i)
524-func finalize (baseAssetIdStr) = {
525-    let checks = [shutdownCheck(i)]
526-    if ((checks == checks))
527-        then {
528-            let baseAssetId = parseAssetId(baseAssetIdStr)
529-            let shareAssetId = value(parseAssetId(valueOrErrorMessage(getString(keyShareAssetId(baseAssetId)), wrapErr("invalid base asset id"))))
530-            if ((shareAssetId == shareAssetId))
531-                then {
532-                    let shareAssetInfo = valueOrErrorMessage(assetInfo(shareAssetId), wrapErr("invalid share asset id"))
533-                    let period = valueOrErrorMessage(getInteger(keyPeriod(baseAssetId)), wrapErr("invalid period"))
534-                    if ((period == period))
535-                        then {
536-                            let periodStartHeightOption = getInteger(keyPeriodStartHeight(baseAssetId, period))
537-                            let checkDelay = if ((periodStartHeightOption == unit))
538-                                then unit
539-                                else {
540-                                    let delay = (height - value(periodStartHeightOption))
541-                                    let blocksToWait = max([0, (minDelay - delay)])
542-                                    if ((blocksToWait == 0))
543-                                        then unit
544-                                        else throwErr(makeString(["finalization will be possible in ", toString(blocksToWait), " blocks"], ""))
545-                                    }
546-                            if ((checkDelay == checkDelay))
547-                                then {
548-                                    let $t01966019841 = valueOrErrorMessage(getPoolInfo(baseAssetId), wrapErr("invalid asset"))
549-                                    let poolAddress = $t01966019841._1
550-                                    let lpAssetId = $t01966019841._2
551-                                    let stakingReward = valueOrErrorMessage({
552-                                        let @ = invoke(stakingContract, "claimWxDoNotThrow", [assetIdToString(lpAssetId)], nil)
553-                                        if ($isInstanceOf(@, "Int"))
554-                                            then @
555-                                            else unit
556-                                        }, wrapErr("invalid claimWx result"))
557-                                    if ((stakingReward == stakingReward))
558-                                        then {
559-                                            let baseAssetAmountToConvert = valueOrElse(getInteger(keyBaseAssetAmountToConvert(baseAssetId)), 0)
560-                                            let shareAssetAmountToConvert = valueOrElse(getInteger(keyShareAssetAmountToConvert(baseAssetId)), 0)
561-                                            let checkFinalizationIsRequired = {
562-                                                let isFinalizationRequired = if (if ((stakingReward > 0))
563-                                                    then true
564-                                                    else (baseAssetAmountToConvert > 0))
565-                                                    then true
566-                                                    else (shareAssetAmountToConvert > 0)
567-                                                if (isFinalizationRequired)
568-                                                    then true
569-                                                    else throwErr("nothing to finalize")
570-                                                }
571-                                            if ((checkFinalizationIsRequired == checkFinalizationIsRequired))
572-                                                then {
573-                                                    let useStakingReward = if ((stakingReward > 0))
574-                                                        then {
575-                                                            let lockPart = fraction(stakingReward, lockFraction, lockFractionMultiplier)
576-                                                            let convertPart = (stakingReward - lockPart)
577-                                                            let r = invoke(boostingContract, "userMaxDurationREADONLY", [toString(this)], nil)
578-                                                            let lock = if ((lockPart > 0))
579-                                                                then                                                                 match r {
580-                                                                    case _ => 
581-                                                                        if (if (if ($isInstanceOf($match0._1, "String"))
582-                                                                            then $isInstanceOf($match0._2, "Int")
583-                                                                            else false)
584-                                                                            then $isInstanceOf($match0, "(String, Int)")
585-                                                                            else false)
586-                                                                            then {
587-                                                                                let function = $match0._1
588-                                                                                let duration = $match0._2
589-                                                                                if ((lockPart > 0))
590-                                                                                    then invoke(boostingContract, function, [duration], [AttachedPayment(wxAssetId, lockPart)])
591-                                                                                    else unit
592-                                                                                }
593-                                                                            else throwErr("invalid lock params")
594-                                                                }
595-                                                                else unit
596-                                                            if ((lock == lock))
597-                                                                then {
598-                                                                    let convertedAmount = if ((convertPart > 0))
599-                                                                        then {
600-                                                                            let inAssetId = wxAssetId
601-                                                                            let minimumToReceive = 0
602-                                                                            let outAssetIdStr = assetIdToString(usdtAssetId)
603-                                                                            let targetAddress = toString(this)
604-                                                                            valueOrErrorMessage({
605-                                                                                let @ = invoke(swapContract, "swap", [minimumToReceive, outAssetIdStr, targetAddress], [AttachedPayment(inAssetId, convertPart)])
606-                                                                                if ($isInstanceOf(@, "Int"))
607-                                                                                    then @
608-                                                                                    else unit
609-                                                                                }, wrapErr("invalid swap result"))
610-                                                                            }
611-                                                                        else 0
612-                                                                    if ((convertedAmount == convertedAmount))
613-                                                                        then {
614-                                                                            let lpAssetAmount = if ((convertedAmount > 0))
615-                                                                                then {
616-                                                                                    let minOutAmount = 0
617-                                                                                    let autoStake = true
618-                                                                                    valueOrErrorMessage({
619-                                                                                        let @ = invoke(poolAddress, "putOneTknV2", [minOutAmount, autoStake], [AttachedPayment(usdtAssetId, convertedAmount)])
620-                                                                                        if ($isInstanceOf(@, "Int"))
621-                                                                                            then @
622-                                                                                            else unit
623-                                                                                        }, wrapErr("invalid putOneTknV2 result"))
624-                                                                                    }
625-                                                                                else 0
626-                                                                            if ((lpAssetAmount == lpAssetAmount))
627-                                                                                then lpAssetAmount
628-                                                                                else throw("Strict value is not equal to itself.")
629-                                                                            }
630-                                                                        else throw("Strict value is not equal to itself.")
631-                                                                    }
632-                                                                else throw("Strict value is not equal to itself.")
633-                                                            }
634-                                                        else unit
635-                                                    if ((useStakingReward == useStakingReward))
636-                                                        then {
637-                                                            let getActions = if ((shareAssetAmountToConvert > 0))
638-                                                                then {
639-                                                                    let price = calcPrice(lpAssetId, shareAssetId)
640-                                                                    if ((price == price))
641-                                                                        then {
642-                                                                            let unstakeAmount = toInt(fraction(toBigInt(shareAssetAmountToConvert), price, scale18BigInt, FLOOR))
643-                                                                            let baseAssetAmount = {
644-                                                                                let outAssetId = baseAssetId
645-                                                                                let minOutAmount = 0
646-                                                                                valueOrErrorMessage({
647-                                                                                    let @ = invoke(poolAddress, "unstakeAndGetOneTknV2", [unstakeAmount, assetIdToString(outAssetId), minOutAmount], nil)
648-                                                                                    if ($isInstanceOf(@, "Int"))
649-                                                                                        then @
650-                                                                                        else unit
651-                                                                                    }, wrapErr("invalid unstakeAndGetOneTknV2 result"))
652-                                                                                }
653-                                                                            if ((baseAssetAmount == baseAssetAmount))
654-                                                                                then {
655-                                                                                    let shareAssetBurn = if ((shareAssetInfo.issuer == this))
656-                                                                                        then invoke(this, "burn", [shareAssetId, shareAssetAmountToConvert], nil)
657-                                                                                        else throwErr("invalid share asset issuer")
658-                                                                                    if ((shareAssetBurn == shareAssetBurn))
659-                                                                                        then {
660-                                                                                            let priceGet = fraction(toBigInt(baseAssetAmount), scale18BigInt, toBigInt(shareAssetAmountToConvert), FLOOR)
661-                                                                                            let priceGetUpdateActions = [BinaryEntry(keyPricePeriodGet(baseAssetId, period), toBytes(priceGet)), StringEntry(keyPriceGetHistory(baseAssetId), toString(priceGet))]
662-                                                                                            priceGetUpdateActions
663-                                                                                            }
664-                                                                                        else throw("Strict value is not equal to itself.")
665-                                                                                    }
666-                                                                                else throw("Strict value is not equal to itself.")
667-                                                                            }
668-                                                                        else throw("Strict value is not equal to itself.")
669-                                                                    }
670-                                                                else nil
671-                                                            if ((getActions == getActions))
672-                                                                then {
673-                                                                    let putActions = if ((baseAssetAmountToConvert > 0))
674-                                                                        then {
675-                                                                            let lpAssetAmount = {
676-                                                                                let minOutAmount = 0
677-                                                                                let autoStake = true
678-                                                                                valueOrErrorMessage({
679-                                                                                    let @ = invoke(poolAddress, "putOneTknV2", [minOutAmount, autoStake], [AttachedPayment(baseAssetId, baseAssetAmountToConvert)])
680-                                                                                    if ($isInstanceOf(@, "Int"))
681-                                                                                        then @
682-                                                                                        else unit
683-                                                                                    }, wrapErr("invalid putOneTknV2 result"))
684-                                                                                }
685-                                                                            if ((lpAssetAmount == lpAssetAmount))
686-                                                                                then {
687-                                                                                    let price = calcPrice(lpAssetId, shareAssetId)
688-                                                                                    if ((price == price))
689-                                                                                        then {
690-                                                                                            let shareAssetAmount = toInt(fraction(toBigInt(lpAssetAmount), scale18BigInt, price, FLOOR))
691-                                                                                            let shareAssetReissue = if ((shareAssetInfo.issuer == this))
692-                                                                                                then invoke(this, "emit", [shareAssetId, shareAssetAmount], nil)
693-                                                                                                else throwErr("invalid share asset issuer")
694-                                                                                            if ((shareAssetReissue == shareAssetReissue))
695-                                                                                                then {
696-                                                                                                    let pricePut = fraction(toBigInt(baseAssetAmountToConvert), scale18BigInt, toBigInt(shareAssetAmount))
697-                                                                                                    let pricePutUpdateActions = [BinaryEntry(keyPricePeriodPut(baseAssetId, period), toBytes(pricePut)), StringEntry(keyPricePutHistory(baseAssetId), toString(pricePut))]
698-                                                                                                    pricePutUpdateActions
699-                                                                                                    }
700-                                                                                                else throw("Strict value is not equal to itself.")
701-                                                                                            }
702-                                                                                        else throw("Strict value is not equal to itself.")
703-                                                                                    }
704-                                                                                else throw("Strict value is not equal to itself.")
705-                                                                            }
706-                                                                        else nil
707-                                                                    if ((putActions == putActions))
708-                                                                        then {
709-                                                                            let newPeriod = (period + 1)
710-                                                                            let lastPrice = calcPrice(lpAssetId, shareAssetId)
711-                                                                            let actions = (([IntegerEntry(keyPeriod(baseAssetId), newPeriod), IntegerEntry(keyPeriodStartHeight(baseAssetId, newPeriod), height), IntegerEntry(keyShareAssetAmountToConvert(baseAssetId), 0), IntegerEntry(keyBaseAssetAmountToConvert(baseAssetId), 0), BinaryEntry(keyPricePeriod(baseAssetId, period), toBytes(lastPrice)), StringEntry(keyPriceHistory(baseAssetId), toString(lastPrice))] ++ putActions) ++ getActions)
712-                                                                            $Tuple2(actions, toBytes(lastPrice))
713-                                                                            }
714-                                                                        else throw("Strict value is not equal to itself.")
715-                                                                    }
716-                                                                else throw("Strict value is not equal to itself.")
717-                                                            }
718-                                                        else throw("Strict value is not equal to itself.")
719-                                                    }
720-                                                else throw("Strict value is not equal to itself.")
721-                                            }
722-                                        else throw("Strict value is not equal to itself.")
723-                                    }
724-                                else throw("Strict value is not equal to itself.")
725-                            }
726-                        else throw("Strict value is not equal to itself.")
727-                    }
728246                 else throw("Strict value is not equal to itself.")
729247             }
730248         else throw("Strict value is not equal to itself.")

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let separator = "__"
4+let SEP = "__"
55 
6-let shareAssetDecimals = 8
6+let feeScale = toBigInt(100000000)
77 
8-let wavesString = "WAVES"
9-
10-let scale18 = 1000000000000000000
11-
12-let scale18BigInt = toBigInt(scale18)
13-
14-func wrapErr (msg) = makeString(["lp_staking_pools.ride:", msg], " ")
8+func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), ("No data for this.key=" + key))
159 
1610 
17-func throwErr (msg) = throw(wrapErr(msg))
11+let poolDisabled = throw("Pool disabled")
1812 
13+let poolNotExist = throw("Pool is not exist")
1914 
20-func errKeyIsNotDefined (address,key) = wrapErr(makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
21-
22-
23-func getStrOrFail (address,key) = valueOrErrorMessage(getString(address, key), errKeyIsNotDefined(address, key))
24-
25-
26-func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), errKeyIsNotDefined(address, key))
27-
28-
29-func parseAssetId (input) = if ((input == wavesString))
30-    then unit
31-    else fromBase58String(input)
32-
33-
34-func assetIdToString (input) = if ((input == unit))
35-    then wavesString
36-    else toBase58String(value(input))
37-
38-
39-func ensurePositive (v) = if ((v >= 0))
40-    then v
41-    else throwErr("value should be positive")
42-
43-
44-func keyFactoryContract () = makeString(["%s", "factoryContract"], separator)
45-
46-
47-func keyLpStakingContract () = makeString(["%s", "lpStakingContract"], separator)
48-
49-
50-func keyStakingContract () = makeString(["%s", "stakingContract"], separator)
51-
52-
53-func keyBoostingContract () = makeString(["%s", "boostingContract"], separator)
54-
55-
56-func keySwapContract () = makeString(["%s", "swapContract"], separator)
57-
58-
59-func keyAssetsStoreContract () = makeString(["%s", "assetsStoreContract"], separator)
60-
61-
62-func keyUsdtAssetId () = makeString(["%s", "usdtAssetId"], separator)
63-
64-
65-func keyWxAssetId () = makeString(["%s", "wxAssetId"], separator)
66-
67-
68-func keyShutdown () = makeString(["%s", "shutdown"], separator)
69-
70-
71-func keyMinDelay () = makeString(["%s", "minDelay"], separator)
72-
73-
74-func keyLockFraction () = makeString(["%s", "lockFraction"], separator)
75-
76-
77-func keyShareAssetId (baseAssetId) = makeString(["%s%s", assetIdToString(baseAssetId), "shareAssetId"], separator)
78-
79-
80-func keyBaseAssetId (shareAssetId) = makeString(["%s%s", assetIdToString(shareAssetId), "baseAssetId"], separator)
81-
82-
83-func keyPeriod (baseAssetId) = makeString(["%s%s", assetIdToString(baseAssetId), "period"], separator)
84-
85-
86-func keyPeriodStartHeight (baseAssetId,period) = makeString(["%s%s%d", assetIdToString(baseAssetId), "periodStartHeight", toString(period)], separator)
87-
88-
89-func keyBaseAssetAmountToConvert (baseAssetId) = makeString(["%s%s", assetIdToString(baseAssetId), "baseAssetAmountToConvert"], separator)
90-
91-
92-func keyShareAssetAmountToConvert (baseAssetId) = makeString(["%s%s", assetIdToString(baseAssetId), "shareAssetAmountToConvert"], separator)
93-
94-
95-func keyUserBaseAssetAmountToConvert (baseAssetId,userAddress) = makeString(["%s%s%s", assetIdToString(baseAssetId), toString(userAddress), "baseAssetAmountToConvert"], separator)
96-
97-
98-func keyUserBaseAssetAmountToConvertPeriod (baseAssetId,userAddress) = makeString(["%s%s%s%s", assetIdToString(baseAssetId), toString(userAddress), "baseAssetAmountToConvert", "period"], separator)
99-
100-
101-func keyUserShareAssetAmountToConvert (baseAssetId,userAddress) = makeString(["%s%s%s", assetIdToString(baseAssetId), toString(userAddress), "shareAssetAmountToConvert"], separator)
102-
103-
104-func keyUserShareAssetAmountToConvertPeriod (baseAssetId,userAddress) = makeString(["%s%s%s%s", assetIdToString(baseAssetId), toString(userAddress), "shareAssetAmountToConvert", "period"], separator)
105-
106-
107-func keyPricePeriod (baseAssetId,period) = makeString(["%s%s%d", assetIdToString(baseAssetId), "price", toString(period)], separator)
108-
109-
110-func keyPriceHistory (baseAssetId) = makeString(["%s%s%s%d%d", assetIdToString(baseAssetId), "price", "history", toString(lastBlock.height), toString(lastBlock.timestamp)], separator)
111-
112-
113-func keyPricePeriodPut (baseAssetId,period) = makeString(["%s%s%d%s", assetIdToString(baseAssetId), "price", toString(period), "put"], separator)
114-
115-
116-func keyPricePutHistory (baseAssetId) = makeString(["%s%s%s%s%d%d", assetIdToString(baseAssetId), "price", "history", "put", toString(lastBlock.height), toString(lastBlock.timestamp)], separator)
117-
118-
119-func keyPricePeriodGet (baseAssetId,period) = makeString(["%s%s%d%s", assetIdToString(baseAssetId), "price", toString(period), "get"], separator)
120-
121-
122-func keyPriceGetHistory (baseAssetId) = makeString(["%s%s%s%s%d%d", assetIdToString(baseAssetId), "price", "history", "get", toString(lastBlock.height), toString(lastBlock.timestamp)], separator)
123-
124-
125-func keyHistoryEntry (baseAssetId,operation,period,userAddress,txId) = makeString(["%s%s%s%s", "history", operation, toString(userAddress), toBase58String(txId), toString(height)], separator)
126-
15+let slippageTooBig = throw("Slippage is too big")
12716 
12817 func keyManagerPublicKey () = "%s__managerPublicKey"
12918 
13019 
13120 func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
21+
22+
23+func fc () = "%s__factoryContract"
24+
25+
26+let factoryContract = addressFromStringValue(getStringOrFail(fc()))
27+
28+func protocolFee () = makeString(["%s", "protocolFee"], SEP)
29+
30+
31+func poolFee () = makeString(["%s", "poolFee"], SEP)
32+
33+
34+func getStringOrFailFromAddress (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
35+
36+
37+let keyFeeCollectorAddress = "%s__feeCollectorAddress"
38+
39+let feeCollectorAddress = addressFromStringValue(getStringOrFailFromAddress(factoryContract, keyFeeCollectorAddress))
40+
41+func asInt (val) = match val {
42+    case valInt: Int => 
43+        valInt
44+    case _ => 
45+        throw("fail to cast into Int")
46+}
47+
48+
49+func dataMappingPoolAssets (internalAmountAssetStr,internalPriceAssetStr) = makeString(["%d%d", toString(internalAmountAssetStr), toString(internalPriceAssetStr)], SEP)
13250 
13351 
13452 func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
13553     case s: String => 
13654         fromBase58String(s)
13755     case _: Unit => 
13856         unit
13957     case _ => 
14058         throw("Match error")
14159 }
14260 
14361 
14462 func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
14563     case s: String => 
14664         fromBase58String(s)
14765     case _: Unit => 
14866         unit
14967     case _ => 
15068         throw("Match error")
15169 }
15270 
15371 
154-let permissionDeniedError = throw("Permission denied")
155-
156-func mustThis (i) = if ((i.caller == this))
157-    then true
158-    else permissionDeniedError
159-
160-
161-func mustManager (i) = match managerPublicKeyOrUnit() {
72+func isManager (i) = match managerPublicKeyOrUnit() {
16273     case pk: ByteVector => 
163-        if ((i.callerPublicKey == pk))
164-            then true
165-            else permissionDeniedError
74+        (i.callerPublicKey == pk)
16675     case _: Unit => 
167-        mustThis(i)
76+        (i.caller == this)
16877     case _ => 
16978         throw("Match error")
17079 }
17180 
17281 
173-let shutdown = valueOrElse(getBoolean(keyShutdown()), false)
174-
175-func shutdownCheck (i) = if (if (!(shutdown))
82+func mustManager (i) = if (isManager(i))
17683     then true
177-    else mustManager(i))
178-    then true
179-    else throw("operation is disabled")
84+    else throw("permission denied")
18085 
18186 
182-let factoryContract = addressFromStringValue(getStrOrFail(this, keyFactoryContract()))
87+func getAccBalance (assetId) = if ((assetId == "WAVES"))
88+    then wavesBalance(this).available
89+    else assetBalance(this, fromBase58String(assetId))
18390 
184-let lpStakingContract = addressFromStringValue(getStrOrFail(this, keyLpStakingContract()))
18591 
186-let stakingContract = addressFromStringValue(getStrOrFail(this, keyStakingContract()))
187-
188-let boostingContract = addressFromStringValue(getStrOrFail(this, keyBoostingContract()))
189-
190-let swapContract = addressFromStringValue(getStrOrFail(this, keySwapContract()))
191-
192-let assetsStoreContract = addressFromStringValue(getStrOrFail(this, keyAssetsStoreContract()))
193-
194-let usdtAssetId = parseAssetId(getStrOrFail(this, keyUsdtAssetId()))
195-
196-let wxAssetId = parseAssetId(getStrOrFail(this, keyWxAssetId()))
197-
198-let minDelayDefault = 1440
199-
200-let minDelay = valueOrElse(getInteger(this, keyMinDelay()), minDelayDefault)
201-
202-let lockFractionMultiplier = 100000000
203-
204-let lockFractionDefault = fraction(1, lockFractionMultiplier, 2)
205-
206-let lockFraction = valueOrElse(getInteger(this, keyLockFraction()), lockFractionDefault)
207-
208-func getPoolInfo (amountAssetId) = {
209-    let amountAssetIdStr = assetIdToString(amountAssetId)
210-    let priceAssetIdStr = assetIdToString(usdtAssetId)
211-    let poolInfoOption = {
212-        let @ = invoke(factoryContract, "poolInfoREADONLY", [amountAssetIdStr, priceAssetIdStr], nil)
213-        if ($isInstanceOf(@, "(Address, ByteVector)"))
92+func getPoolAddressAndCheckPoolStatus (assetIn,assetOut) = {
93+    let lpNonReverse = {
94+        let @ = invoke(factoryContract, "getLpAssetFromPoolAssetsREADONLY", [assetIn, assetOut], nil)
95+        if ($isInstanceOf(@, "String"))
21496             then @
21597             else unit
21698         }
217-    poolInfoOption
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.")
218143     }
219144 
220145 
221-func calcPrice (lpAssetId,shareAssetId) = {
222-    let shareAssetInfo = valueOrErrorMessage(assetInfo(shareAssetId), "failed to get share asset info")
223-    let shareAssetEmission = shareAssetInfo.quantity
224-    let stakedAmount = ensurePositive(valueOrErrorMessage({
225-        let @ = invoke(stakingContract, "stakedByUserREADONLY", [assetIdToString(lpAssetId), toString(this)], nil)
146+@Callable(i)
147+func swapCalculateREADONLY (amountIn,assetIn,assetOut) = {
148+    let prFee = value(getInteger(protocolFee()))
149+    let feeProtocolAmountCalc = fraction(toBigInt(amountIn), toBigInt(prFee), feeScale)
150+    let plFee = value(getInteger(poolFee()))
151+    let feePoolAmountCalc = fraction(toBigInt(amountIn), toBigInt(plFee), feeScale)
152+    let feeProtocolAmount = if ((toInt(feeProtocolAmountCalc) == 0))
153+        then toBigInt(1)
154+        else feeProtocolAmountCalc
155+    let feePoolAmount = if ((toInt(feePoolAmountCalc) == 0))
156+        then toBigInt(1)
157+        else feePoolAmountCalc
158+    let cleanAmountIn = ((toBigInt(amountIn) - feeProtocolAmount) - feePoolAmount)
159+    let $t039804058 = getPoolAddressAndCheckPoolStatus(assetIn, assetOut)
160+    let poolAdr = $t039804058._1
161+    let isReverse = $t039804058._2
162+    let res = {
163+        let @ = invoke(poolAdr, "calculateAmountOutForSwapREADONLY", [toInt(cleanAmountIn), isReverse, toInt(feePoolAmount)], nil)
226164         if ($isInstanceOf(@, "Int"))
227165             then @
228-            else unit
229-        }, wrapErr("invalid stakedByUserREADONLY result")))
230-    let price = if ((shareAssetEmission == 0))
231-        then scale18BigInt
232-        else fraction(toBigInt(stakedAmount), scale18BigInt, toBigInt(shareAssetEmission), FLOOR)
233-    price
166+            else throw(($getType(@) + " couldn't be cast to Int"))
167+        }
168+    $Tuple2(nil, res)
234169     }
170+
171+
172+
173+@Callable(i)
174+func swap (amountOutMin,assetOutRaw,addressTo) = {
175+    let assetOut = if ((assetOutRaw == ""))
176+        then "WAVES"
177+        else assetOutRaw
178+    let pmt = value(i.payments[0])
179+    let assetIn = if ((pmt.assetId == unit))
180+        then "WAVES"
181+        else toBase58String(value(pmt.assetId))
182+    let amountIn = value(pmt.amount)
183+    let prFee = value(getInteger(protocolFee()))
184+    let feeProtocolAmountCalc = fraction(toBigInt(amountIn), toBigInt(prFee), feeScale)
185+    let plFee = value(getInteger(poolFee()))
186+    let feePoolAmountCalc = fraction(toBigInt(amountIn), toBigInt(plFee), feeScale)
187+    let feeProtocolAmount = if ((toInt(feeProtocolAmountCalc) == 0))
188+        then toBigInt(1)
189+        else feeProtocolAmountCalc
190+    let feePoolAmount = if ((toInt(feePoolAmountCalc) == 0))
191+        then toBigInt(1)
192+        else feePoolAmountCalc
193+    let cleanAmountIn = ((toBigInt(amountIn) - feeProtocolAmount) - feePoolAmount)
194+    let checks = [if ((size(i.payments) == 1))
195+        then true
196+        else throw("exactly 1 payment are expected")]
197+    if ((checks == checks))
198+        then {
199+            let $t052605338 = getPoolAddressAndCheckPoolStatus(assetIn, assetOut)
200+            let poolAdr = $t052605338._1
201+            let isReverse = $t052605338._2
202+            let assetInAttachedPayment = if ((assetIn == "WAVES"))
203+                then unit
204+                else fromBase58String(assetIn)
205+            let totalGetRaw = {
206+                let @ = invoke(poolAdr, "calculateAmountOutForSwapAndSendTokens", [toInt(cleanAmountIn), isReverse, amountOutMin, addressTo, toInt(feePoolAmount)], [AttachedPayment(assetInAttachedPayment, toInt(cleanAmountIn))])
207+                if ($isInstanceOf(@, "Int"))
208+                    then @
209+                    else throw(($getType(@) + " couldn't be cast to Int"))
210+                }
211+            $Tuple2([ScriptTransfer(feeCollectorAddress, toInt(feeProtocolAmount), assetInAttachedPayment), ScriptTransfer(poolAdr, toInt(feePoolAmount), assetInAttachedPayment)], totalGetRaw)
212+            }
213+        else throw("Strict value is not equal to itself.")
214+    }
215+
235216 
236217 
237218 @Callable(i)
238219 func setManager (pendingManagerPublicKey) = {
239220     let checkCaller = mustManager(i)
240221     if ((checkCaller == checkCaller))
241222         then {
242223             let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
243224             if ((checkManagerPublicKey == checkManagerPublicKey))
244225                 then [StringEntry(keyPendingManagerPublicKey(), pendingManagerPublicKey)]
245226                 else throw("Strict value is not equal to itself.")
246227             }
247228         else throw("Strict value is not equal to itself.")
248229     }
249230 
250231 
251232 
252233 @Callable(i)
253234 func confirmManager () = {
254235     let pm = pendingManagerPublicKeyOrUnit()
255236     let hasPM = if (isDefined(pm))
256237         then true
257-        else throwErr("no pending manager")
238+        else throw("no pending manager")
258239     if ((hasPM == hasPM))
259240         then {
260241             let checkPM = if ((i.callerPublicKey == value(pm)))
261242                 then true
262-                else throwErr("you are not pending manager")
243+                else throw("you are not pending manager")
263244             if ((checkPM == checkPM))
264245                 then [StringEntry(keyManagerPublicKey(), toBase58String(value(pm))), DeleteEntry(keyPendingManagerPublicKey())]
265-                else throw("Strict value is not equal to itself.")
266-            }
267-        else throw("Strict value is not equal to itself.")
268-    }
269-
270-
271-
272-@Callable(i)
273-func emit (assetId,amount) = {
274-    let checkCaller = mustThis(i)
275-    if ((checkCaller == checkCaller))
276-        then {
277-            let isReissuable = true
278-            $Tuple2([Reissue(assetId, amount, isReissuable)], amount)
279-            }
280-        else throw("Strict value is not equal to itself.")
281-    }
282-
283-
284-
285-@Callable(i)
286-func burn (assetId,amount) = {
287-    let checkCaller = mustThis(i)
288-    if ((checkCaller == checkCaller))
289-        then $Tuple2([Burn(assetId, amount)], amount)
290-        else throw("Strict value is not equal to itself.")
291-    }
292-
293-
294-
295-@Callable(i)
296-func create (baseAssetIdStr,shareAssetIdStr,shareAssetName,shareAssetDescription,shareAssetLogo) = {
297-    let shareAssetLabel = "STAKING_LP"
298-    let baseAssetId = parseAssetId(baseAssetIdStr)
299-    let checks = [mustManager(i), if (isDefined(getPoolInfo(baseAssetId)))
300-        then true
301-        else throwErr("invalid base asset")]
302-    if ((checks == checks))
303-        then {
304-            let commonState = [IntegerEntry(keyPeriod(baseAssetId), 0)]
305-            if ((shareAssetIdStr == ""))
306-                then {
307-                    let shareAssetIssueAmount = 1
308-                    let shareAssetIssueAction = Issue(shareAssetName, shareAssetDescription, shareAssetIssueAmount, shareAssetDecimals, true)
309-                    let calculatedShareAssetId = calculateAssetId(shareAssetIssueAction)
310-                    let shareAssetBurnAction = Burn(calculatedShareAssetId, shareAssetIssueAmount)
311-                    let calculatedShareAssetIdStr = toBase58String(calculatedShareAssetId)
312-                    let createOrUpdate = invoke(assetsStoreContract, "createOrUpdate", [calculatedShareAssetIdStr, shareAssetLogo, false], nil)
313-                    if ((createOrUpdate == createOrUpdate))
314-                        then {
315-                            let addLabel = invoke(assetsStoreContract, "addLabel", [calculatedShareAssetIdStr, shareAssetLabel], nil)
316-                            if ((addLabel == addLabel))
317-                                then $Tuple2((commonState ++ [shareAssetIssueAction, shareAssetBurnAction, StringEntry(keyShareAssetId(baseAssetId), calculatedShareAssetIdStr), StringEntry(keyBaseAssetId(calculatedShareAssetId), baseAssetIdStr)]), calculatedShareAssetIdStr)
318-                                else throw("Strict value is not equal to itself.")
319-                            }
320-                        else throw("Strict value is not equal to itself.")
321-                    }
322-                else {
323-                    let shareAssetId = fromBase58String(shareAssetIdStr)
324-                    let shareAssetInfo = valueOrErrorMessage(assetInfo(shareAssetId), wrapErr("invalid share asset id"))
325-                    let checkIssuer = if ((shareAssetInfo.issuer == lpStakingContract))
326-                        then true
327-                        else throwErr("invalid share asset id issuer")
328-                    if ((checkIssuer == checkIssuer))
329-                        then $Tuple2((commonState ++ [StringEntry(keyShareAssetId(baseAssetId), shareAssetIdStr), StringEntry(keyBaseAssetId(shareAssetId), baseAssetIdStr)]), shareAssetIdStr)
330-                        else throw("Strict value is not equal to itself.")
331-                    }
332-            }
333-        else throw("Strict value is not equal to itself.")
334-    }
335-
336-
337-
338-@Callable(i)
339-func put () = {
340-    let pmt = if ((size(i.payments) == 1))
341-        then i.payments[0]
342-        else throwErr("exactly 1 payment is expected")
343-    let baseAssetId = pmt.assetId
344-    let userAddress = i.caller
345-    let checks = [shutdownCheck(i), if (isDefined(getString(keyShareAssetId(baseAssetId))))
346-        then true
347-        else throwErr("invalid asset")]
348-    if ((checks == checks))
349-        then {
350-            let $t01164011743 = valueOrErrorMessage(getPoolInfo(baseAssetId), wrapErr("invalid asset"))
351-            let poolAddress = $t01164011743._1
352-            let lpAssetId = $t01164011743._2
353-            let period = value(getInteger(keyPeriod(baseAssetId)))
354-            let userBaseAssetAmountToConvertPeriodOption = getInteger(keyUserBaseAssetAmountToConvertPeriod(baseAssetId, userAddress))
355-            let claimShareAssetInvocation = if ((userBaseAssetAmountToConvertPeriodOption == unit))
356-                then unit
357-                else {
358-                    let userBaseAssetAmountToConvertPeriod = value(userBaseAssetAmountToConvertPeriodOption)
359-                    if ((userBaseAssetAmountToConvertPeriod == period))
360-                        then unit
361-                        else invoke(this, "claimShareAsset", [assetIdToString(baseAssetId), toString(userAddress)], nil)
362-                    }
363-            if ((claimShareAssetInvocation == claimShareAssetInvocation))
364-                then {
365-                    let baseAssetAmountToConvert = valueOrElse(getInteger(keyBaseAssetAmountToConvert(baseAssetId)), 0)
366-                    let userBaseAssetAmountToConvert = valueOrElse(getInteger(keyUserBaseAssetAmountToConvert(baseAssetId, userAddress)), 0)
367-                    $Tuple2([IntegerEntry(keyBaseAssetAmountToConvert(baseAssetId), (baseAssetAmountToConvert + pmt.amount)), IntegerEntry(keyUserBaseAssetAmountToConvert(baseAssetId, userAddress), (userBaseAssetAmountToConvert + pmt.amount)), IntegerEntry(keyUserBaseAssetAmountToConvertPeriod(baseAssetId, userAddress), period), IntegerEntry(keyHistoryEntry(baseAssetId, "put", period, userAddress, i.transactionId), pmt.amount)], unit)
368-                    }
369-                else throw("Strict value is not equal to itself.")
370-            }
371-        else throw("Strict value is not equal to itself.")
372-    }
373-
374-
375-
376-@Callable(i)
377-func claimShareAsset (baseAssetIdStr,userAddressStr) = {
378-    let checks = [shutdownCheck(i)]
379-    if ((checks == checks))
380-        then {
381-            let userAddress = if ((userAddressStr == ""))
382-                then i.caller
383-                else {
384-                    let checkCaller = mustThis(i)
385-                    if ((checkCaller == checkCaller))
386-                        then valueOrErrorMessage(addressFromString(userAddressStr), wrapErr("invalid user address"))
387-                        else throw("Strict value is not equal to itself.")
388-                    }
389-            if ((userAddress == userAddress))
390-                then {
391-                    let baseAssetId = parseAssetId(baseAssetIdStr)
392-                    let shareAssetId = value(parseAssetId(valueOrErrorMessage(getString(keyShareAssetId(baseAssetId)), wrapErr("invalid base asset id"))))
393-                    if ((shareAssetId == shareAssetId))
394-                        then {
395-                            let period = valueOrErrorMessage(getInteger(keyPeriod(baseAssetId)), wrapErr("invalid period"))
396-                            if ((period == period))
397-                                then {
398-                                    let userBaseAssetAmountToConvert = valueOrElse(getInteger(keyUserBaseAssetAmountToConvert(baseAssetId, userAddress)), 0)
399-                                    let checkAmountToConvert = if ((userBaseAssetAmountToConvert > 0))
400-                                        then true
401-                                        else throwErr("nothing to claim")
402-                                    if ((checkAmountToConvert == checkAmountToConvert))
403-                                        then {
404-                                            let userBaseAssetAmountToConvertPeriod = valueOrErrorMessage(getInteger(keyUserBaseAssetAmountToConvertPeriod(baseAssetId, userAddress)), wrapErr("failed to get period"))
405-                                            let checkPeriod = if ((period > userBaseAssetAmountToConvertPeriod))
406-                                                then true
407-                                                else throwErr("invalid period")
408-                                            if ((checkPeriod == checkPeriod))
409-                                                then {
410-                                                    let price = toBigInt(valueOrErrorMessage(getBinary(keyPricePeriodPut(baseAssetId, userBaseAssetAmountToConvertPeriod)), wrapErr("failed to get price")))
411-                                                    let shareAssetAmount = toInt(fraction(toBigInt(userBaseAssetAmountToConvert), scale18BigInt, price))
412-                                                    $Tuple2([IntegerEntry(keyUserBaseAssetAmountToConvert(baseAssetId, userAddress), 0), DeleteEntry(keyUserBaseAssetAmountToConvertPeriod(baseAssetId, userAddress)), ScriptTransfer(userAddress, shareAssetAmount, shareAssetId), IntegerEntry(keyHistoryEntry(baseAssetId, "claimShareAsset", period, userAddress, i.transactionId), shareAssetAmount)], unit)
413-                                                    }
414-                                                else throw("Strict value is not equal to itself.")
415-                                            }
416-                                        else throw("Strict value is not equal to itself.")
417-                                    }
418-                                else throw("Strict value is not equal to itself.")
419-                            }
420-                        else throw("Strict value is not equal to itself.")
421-                    }
422-                else throw("Strict value is not equal to itself.")
423-            }
424-        else throw("Strict value is not equal to itself.")
425-    }
426-
427-
428-
429-@Callable(i)
430-func get () = {
431-    let checks = [shutdownCheck(i)]
432-    if ((checks == checks))
433-        then {
434-            let pmt = if ((size(i.payments) == 1))
435-                then i.payments[0]
436-                else throwErr("exactly 1 payment is expected")
437-            let shareAssetId = pmt.assetId
438-            let baseAssetId = value(parseAssetId(valueOrErrorMessage(getString(keyBaseAssetId(shareAssetId)), wrapErr("invalid share asset id"))))
439-            if ((baseAssetId == baseAssetId))
440-                then {
441-                    let userAddress = i.caller
442-                    let $t01547615579 = valueOrErrorMessage(getPoolInfo(baseAssetId), wrapErr("invalid asset"))
443-                    let poolAddress = $t01547615579._1
444-                    let lpAssetId = $t01547615579._2
445-                    let period = value(getInteger(keyPeriod(baseAssetId)))
446-                    let userShareAssetAmountToConvertPeriodOption = getInteger(keyUserShareAssetAmountToConvertPeriod(baseAssetId, userAddress))
447-                    let claimBaseAssetInvocation = if ((userShareAssetAmountToConvertPeriodOption == unit))
448-                        then unit
449-                        else {
450-                            let userShareAssetAmountToConvertPeriod = value(userShareAssetAmountToConvertPeriodOption)
451-                            if ((userShareAssetAmountToConvertPeriod == period))
452-                                then unit
453-                                else invoke(this, "claimBaseAsset", [assetIdToString(baseAssetId), toString(userAddress)], nil)
454-                            }
455-                    if ((claimBaseAssetInvocation == claimBaseAssetInvocation))
456-                        then {
457-                            let shareAssetAmountToConvert = valueOrElse(getInteger(keyShareAssetAmountToConvert(baseAssetId)), 0)
458-                            let userShareAssetAmountToConvert = valueOrElse(getInteger(keyUserShareAssetAmountToConvert(baseAssetId, userAddress)), 0)
459-                            $Tuple2([IntegerEntry(keyShareAssetAmountToConvert(baseAssetId), (shareAssetAmountToConvert + pmt.amount)), IntegerEntry(keyUserShareAssetAmountToConvert(baseAssetId, userAddress), (userShareAssetAmountToConvert + pmt.amount)), IntegerEntry(keyUserShareAssetAmountToConvertPeriod(baseAssetId, userAddress), period), IntegerEntry(keyHistoryEntry(baseAssetId, "get", period, userAddress, i.transactionId), pmt.amount)], unit)
460-                            }
461-                        else throw("Strict value is not equal to itself.")
462-                    }
463-                else throw("Strict value is not equal to itself.")
464-            }
465-        else throw("Strict value is not equal to itself.")
466-    }
467-
468-
469-
470-@Callable(i)
471-func claimBaseAsset (baseAssetIdStr,userAddressStr) = {
472-    let checks = [shutdownCheck(i)]
473-    if ((checks == checks))
474-        then {
475-            let userAddress = if ((userAddressStr == ""))
476-                then i.caller
477-                else {
478-                    let checkCaller = mustThis(i)
479-                    if ((checkCaller == checkCaller))
480-                        then valueOrErrorMessage(addressFromString(userAddressStr), wrapErr("invalid user address"))
481-                        else throw("Strict value is not equal to itself.")
482-                    }
483-            if ((userAddress == userAddress))
484-                then {
485-                    let baseAssetId = parseAssetId(baseAssetIdStr)
486-                    let shareAssetId = value(parseAssetId(valueOrErrorMessage(getString(keyShareAssetId(baseAssetId)), wrapErr("invalid base asset id"))))
487-                    if ((shareAssetId == shareAssetId))
488-                        then {
489-                            let period = valueOrErrorMessage(getInteger(keyPeriod(baseAssetId)), wrapErr("invalid period"))
490-                            if ((period == period))
491-                                then {
492-                                    let userShareAssetAmountToConvert = valueOrElse(getInteger(keyUserShareAssetAmountToConvert(baseAssetId, userAddress)), 0)
493-                                    let checkAmountToConvert = if ((userShareAssetAmountToConvert > 0))
494-                                        then true
495-                                        else throwErr("nothing to claim")
496-                                    if ((checkAmountToConvert == checkAmountToConvert))
497-                                        then {
498-                                            let userShareAssetAmountToConvertPeriod = valueOrErrorMessage(getInteger(keyUserShareAssetAmountToConvertPeriod(baseAssetId, userAddress)), wrapErr("failed to get period"))
499-                                            let checkPeriod = if ((period > userShareAssetAmountToConvertPeriod))
500-                                                then true
501-                                                else throwErr("invalid period")
502-                                            if ((checkPeriod == checkPeriod))
503-                                                then {
504-                                                    let price = toBigInt(valueOrErrorMessage(getBinary(keyPricePeriodGet(baseAssetId, userShareAssetAmountToConvertPeriod)), wrapErr("failed to get price")))
505-                                                    let baseAssetAmount = toInt(fraction(toBigInt(userShareAssetAmountToConvert), price, scale18BigInt))
506-                                                    $Tuple2([IntegerEntry(keyUserShareAssetAmountToConvert(baseAssetId, userAddress), 0), DeleteEntry(keyUserShareAssetAmountToConvertPeriod(baseAssetId, userAddress)), ScriptTransfer(userAddress, baseAssetAmount, baseAssetId), IntegerEntry(keyHistoryEntry(baseAssetId, "claimBaseAsset", period, userAddress, i.transactionId), baseAssetAmount)], unit)
507-                                                    }
508-                                                else throw("Strict value is not equal to itself.")
509-                                            }
510-                                        else throw("Strict value is not equal to itself.")
511-                                    }
512-                                else throw("Strict value is not equal to itself.")
513-                            }
514-                        else throw("Strict value is not equal to itself.")
515-                    }
516-                else throw("Strict value is not equal to itself.")
517-            }
518-        else throw("Strict value is not equal to itself.")
519-    }
520-
521-
522-
523-@Callable(i)
524-func finalize (baseAssetIdStr) = {
525-    let checks = [shutdownCheck(i)]
526-    if ((checks == checks))
527-        then {
528-            let baseAssetId = parseAssetId(baseAssetIdStr)
529-            let shareAssetId = value(parseAssetId(valueOrErrorMessage(getString(keyShareAssetId(baseAssetId)), wrapErr("invalid base asset id"))))
530-            if ((shareAssetId == shareAssetId))
531-                then {
532-                    let shareAssetInfo = valueOrErrorMessage(assetInfo(shareAssetId), wrapErr("invalid share asset id"))
533-                    let period = valueOrErrorMessage(getInteger(keyPeriod(baseAssetId)), wrapErr("invalid period"))
534-                    if ((period == period))
535-                        then {
536-                            let periodStartHeightOption = getInteger(keyPeriodStartHeight(baseAssetId, period))
537-                            let checkDelay = if ((periodStartHeightOption == unit))
538-                                then unit
539-                                else {
540-                                    let delay = (height - value(periodStartHeightOption))
541-                                    let blocksToWait = max([0, (minDelay - delay)])
542-                                    if ((blocksToWait == 0))
543-                                        then unit
544-                                        else throwErr(makeString(["finalization will be possible in ", toString(blocksToWait), " blocks"], ""))
545-                                    }
546-                            if ((checkDelay == checkDelay))
547-                                then {
548-                                    let $t01966019841 = valueOrErrorMessage(getPoolInfo(baseAssetId), wrapErr("invalid asset"))
549-                                    let poolAddress = $t01966019841._1
550-                                    let lpAssetId = $t01966019841._2
551-                                    let stakingReward = valueOrErrorMessage({
552-                                        let @ = invoke(stakingContract, "claimWxDoNotThrow", [assetIdToString(lpAssetId)], nil)
553-                                        if ($isInstanceOf(@, "Int"))
554-                                            then @
555-                                            else unit
556-                                        }, wrapErr("invalid claimWx result"))
557-                                    if ((stakingReward == stakingReward))
558-                                        then {
559-                                            let baseAssetAmountToConvert = valueOrElse(getInteger(keyBaseAssetAmountToConvert(baseAssetId)), 0)
560-                                            let shareAssetAmountToConvert = valueOrElse(getInteger(keyShareAssetAmountToConvert(baseAssetId)), 0)
561-                                            let checkFinalizationIsRequired = {
562-                                                let isFinalizationRequired = if (if ((stakingReward > 0))
563-                                                    then true
564-                                                    else (baseAssetAmountToConvert > 0))
565-                                                    then true
566-                                                    else (shareAssetAmountToConvert > 0)
567-                                                if (isFinalizationRequired)
568-                                                    then true
569-                                                    else throwErr("nothing to finalize")
570-                                                }
571-                                            if ((checkFinalizationIsRequired == checkFinalizationIsRequired))
572-                                                then {
573-                                                    let useStakingReward = if ((stakingReward > 0))
574-                                                        then {
575-                                                            let lockPart = fraction(stakingReward, lockFraction, lockFractionMultiplier)
576-                                                            let convertPart = (stakingReward - lockPart)
577-                                                            let r = invoke(boostingContract, "userMaxDurationREADONLY", [toString(this)], nil)
578-                                                            let lock = if ((lockPart > 0))
579-                                                                then                                                                 match r {
580-                                                                    case _ => 
581-                                                                        if (if (if ($isInstanceOf($match0._1, "String"))
582-                                                                            then $isInstanceOf($match0._2, "Int")
583-                                                                            else false)
584-                                                                            then $isInstanceOf($match0, "(String, Int)")
585-                                                                            else false)
586-                                                                            then {
587-                                                                                let function = $match0._1
588-                                                                                let duration = $match0._2
589-                                                                                if ((lockPart > 0))
590-                                                                                    then invoke(boostingContract, function, [duration], [AttachedPayment(wxAssetId, lockPart)])
591-                                                                                    else unit
592-                                                                                }
593-                                                                            else throwErr("invalid lock params")
594-                                                                }
595-                                                                else unit
596-                                                            if ((lock == lock))
597-                                                                then {
598-                                                                    let convertedAmount = if ((convertPart > 0))
599-                                                                        then {
600-                                                                            let inAssetId = wxAssetId
601-                                                                            let minimumToReceive = 0
602-                                                                            let outAssetIdStr = assetIdToString(usdtAssetId)
603-                                                                            let targetAddress = toString(this)
604-                                                                            valueOrErrorMessage({
605-                                                                                let @ = invoke(swapContract, "swap", [minimumToReceive, outAssetIdStr, targetAddress], [AttachedPayment(inAssetId, convertPart)])
606-                                                                                if ($isInstanceOf(@, "Int"))
607-                                                                                    then @
608-                                                                                    else unit
609-                                                                                }, wrapErr("invalid swap result"))
610-                                                                            }
611-                                                                        else 0
612-                                                                    if ((convertedAmount == convertedAmount))
613-                                                                        then {
614-                                                                            let lpAssetAmount = if ((convertedAmount > 0))
615-                                                                                then {
616-                                                                                    let minOutAmount = 0
617-                                                                                    let autoStake = true
618-                                                                                    valueOrErrorMessage({
619-                                                                                        let @ = invoke(poolAddress, "putOneTknV2", [minOutAmount, autoStake], [AttachedPayment(usdtAssetId, convertedAmount)])
620-                                                                                        if ($isInstanceOf(@, "Int"))
621-                                                                                            then @
622-                                                                                            else unit
623-                                                                                        }, wrapErr("invalid putOneTknV2 result"))
624-                                                                                    }
625-                                                                                else 0
626-                                                                            if ((lpAssetAmount == lpAssetAmount))
627-                                                                                then lpAssetAmount
628-                                                                                else throw("Strict value is not equal to itself.")
629-                                                                            }
630-                                                                        else throw("Strict value is not equal to itself.")
631-                                                                    }
632-                                                                else throw("Strict value is not equal to itself.")
633-                                                            }
634-                                                        else unit
635-                                                    if ((useStakingReward == useStakingReward))
636-                                                        then {
637-                                                            let getActions = if ((shareAssetAmountToConvert > 0))
638-                                                                then {
639-                                                                    let price = calcPrice(lpAssetId, shareAssetId)
640-                                                                    if ((price == price))
641-                                                                        then {
642-                                                                            let unstakeAmount = toInt(fraction(toBigInt(shareAssetAmountToConvert), price, scale18BigInt, FLOOR))
643-                                                                            let baseAssetAmount = {
644-                                                                                let outAssetId = baseAssetId
645-                                                                                let minOutAmount = 0
646-                                                                                valueOrErrorMessage({
647-                                                                                    let @ = invoke(poolAddress, "unstakeAndGetOneTknV2", [unstakeAmount, assetIdToString(outAssetId), minOutAmount], nil)
648-                                                                                    if ($isInstanceOf(@, "Int"))
649-                                                                                        then @
650-                                                                                        else unit
651-                                                                                    }, wrapErr("invalid unstakeAndGetOneTknV2 result"))
652-                                                                                }
653-                                                                            if ((baseAssetAmount == baseAssetAmount))
654-                                                                                then {
655-                                                                                    let shareAssetBurn = if ((shareAssetInfo.issuer == this))
656-                                                                                        then invoke(this, "burn", [shareAssetId, shareAssetAmountToConvert], nil)
657-                                                                                        else throwErr("invalid share asset issuer")
658-                                                                                    if ((shareAssetBurn == shareAssetBurn))
659-                                                                                        then {
660-                                                                                            let priceGet = fraction(toBigInt(baseAssetAmount), scale18BigInt, toBigInt(shareAssetAmountToConvert), FLOOR)
661-                                                                                            let priceGetUpdateActions = [BinaryEntry(keyPricePeriodGet(baseAssetId, period), toBytes(priceGet)), StringEntry(keyPriceGetHistory(baseAssetId), toString(priceGet))]
662-                                                                                            priceGetUpdateActions
663-                                                                                            }
664-                                                                                        else throw("Strict value is not equal to itself.")
665-                                                                                    }
666-                                                                                else throw("Strict value is not equal to itself.")
667-                                                                            }
668-                                                                        else throw("Strict value is not equal to itself.")
669-                                                                    }
670-                                                                else nil
671-                                                            if ((getActions == getActions))
672-                                                                then {
673-                                                                    let putActions = if ((baseAssetAmountToConvert > 0))
674-                                                                        then {
675-                                                                            let lpAssetAmount = {
676-                                                                                let minOutAmount = 0
677-                                                                                let autoStake = true
678-                                                                                valueOrErrorMessage({
679-                                                                                    let @ = invoke(poolAddress, "putOneTknV2", [minOutAmount, autoStake], [AttachedPayment(baseAssetId, baseAssetAmountToConvert)])
680-                                                                                    if ($isInstanceOf(@, "Int"))
681-                                                                                        then @
682-                                                                                        else unit
683-                                                                                    }, wrapErr("invalid putOneTknV2 result"))
684-                                                                                }
685-                                                                            if ((lpAssetAmount == lpAssetAmount))
686-                                                                                then {
687-                                                                                    let price = calcPrice(lpAssetId, shareAssetId)
688-                                                                                    if ((price == price))
689-                                                                                        then {
690-                                                                                            let shareAssetAmount = toInt(fraction(toBigInt(lpAssetAmount), scale18BigInt, price, FLOOR))
691-                                                                                            let shareAssetReissue = if ((shareAssetInfo.issuer == this))
692-                                                                                                then invoke(this, "emit", [shareAssetId, shareAssetAmount], nil)
693-                                                                                                else throwErr("invalid share asset issuer")
694-                                                                                            if ((shareAssetReissue == shareAssetReissue))
695-                                                                                                then {
696-                                                                                                    let pricePut = fraction(toBigInt(baseAssetAmountToConvert), scale18BigInt, toBigInt(shareAssetAmount))
697-                                                                                                    let pricePutUpdateActions = [BinaryEntry(keyPricePeriodPut(baseAssetId, period), toBytes(pricePut)), StringEntry(keyPricePutHistory(baseAssetId), toString(pricePut))]
698-                                                                                                    pricePutUpdateActions
699-                                                                                                    }
700-                                                                                                else throw("Strict value is not equal to itself.")
701-                                                                                            }
702-                                                                                        else throw("Strict value is not equal to itself.")
703-                                                                                    }
704-                                                                                else throw("Strict value is not equal to itself.")
705-                                                                            }
706-                                                                        else nil
707-                                                                    if ((putActions == putActions))
708-                                                                        then {
709-                                                                            let newPeriod = (period + 1)
710-                                                                            let lastPrice = calcPrice(lpAssetId, shareAssetId)
711-                                                                            let actions = (([IntegerEntry(keyPeriod(baseAssetId), newPeriod), IntegerEntry(keyPeriodStartHeight(baseAssetId, newPeriod), height), IntegerEntry(keyShareAssetAmountToConvert(baseAssetId), 0), IntegerEntry(keyBaseAssetAmountToConvert(baseAssetId), 0), BinaryEntry(keyPricePeriod(baseAssetId, period), toBytes(lastPrice)), StringEntry(keyPriceHistory(baseAssetId), toString(lastPrice))] ++ putActions) ++ getActions)
712-                                                                            $Tuple2(actions, toBytes(lastPrice))
713-                                                                            }
714-                                                                        else throw("Strict value is not equal to itself.")
715-                                                                    }
716-                                                                else throw("Strict value is not equal to itself.")
717-                                                            }
718-                                                        else throw("Strict value is not equal to itself.")
719-                                                    }
720-                                                else throw("Strict value is not equal to itself.")
721-                                            }
722-                                        else throw("Strict value is not equal to itself.")
723-                                    }
724-                                else throw("Strict value is not equal to itself.")
725-                            }
726-                        else throw("Strict value is not equal to itself.")
727-                    }
728246                 else throw("Strict value is not equal to itself.")
729247             }
730248         else throw("Strict value is not equal to itself.")
731249     }
732250 
733251 
734252 @Verifier(tx)
735253 func verify () = {
736254     let targetPublicKey =     match managerPublicKeyOrUnit() {
737255         case pk: ByteVector => 
738256             pk
739257         case _: Unit => 
740258             tx.senderPublicKey
741259         case _ => 
742260             throw("Match error")
743261     }
744262     sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
745263     }
746264 
github/deemru/w8io/026f985 
55.15 ms ◑