tx · Aqa2PjQNBQtuAGrfk4HVzGNDgTSJhossQtug3jbYkwL1

3N6LHjfGb6Fgcy7YsVcNxGyPTj49XbQAijq:  -0.01100000 Waves

2024.07.15 10:03 [3194820] smart account 3N6LHjfGb6Fgcy7YsVcNxGyPTj49XbQAijq > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Aqa2PjQNBQtuAGrfk4HVzGNDgTSJhossQtug3jbYkwL1",
    "fee": 1100000,
    "feeAssetId": null,
    "timestamp": 1721027040519,
    "version": 1,
    "sender": "3N6LHjfGb6Fgcy7YsVcNxGyPTj49XbQAijq",
    "senderPublicKey": "2u2wYYcVBQv43Cc71zkhHPPitkqgg6dqTZ3nUMvYJ1uq",
    "proofs": [
        "4MrWKUq1G2zN14zvuaedcZ8a82fD3x6zjqYW7giCtskvLgF9UndKMBBsvjV58my642vZaUUqaYLWLA7UzQHmRrwj"
    ],
    "script": "base64:BgIQCAISBQoDAQgIEgUKAwEICBkAA1NFUAICX18ACGZlZVNjYWxlCQC2AgEAgMLXLwEPZ2V0U3RyaW5nT3JGYWlsAQNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQNrZXkJAKwCAgIVTm8gZGF0YSBmb3IgdGhpcy5rZXk9BQNrZXkADHBvb2xEaXNhYmxlZAkAAgECDVBvb2wgZGlzYWJsZWQADHBvb2xOb3RFeGlzdAkAAgECEVBvb2wgaXMgbm90IGV4aXN0AA5zbGlwcGFnZVRvb0JpZwkAAgECE1NsaXBwYWdlIGlzIHRvbyBiaWcBE2tleU1hbmFnZXJQdWJsaWNLZXkAAhQlc19fbWFuYWdlclB1YmxpY0tleQEWa2V5TWFuYWdlclZhdWx0QWRkcmVzcwACFyVzX19tYW5hZ2VyVmF1bHRBZGRyZXNzAQJmYwACEyVzX19mYWN0b3J5Q29udHJhY3QAD2ZhY3RvcnlDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBD2dldFN0cmluZ09yRmFpbAEJAQJmYwABC3Byb3RvY29sRmVlAAkAuQkCCQDMCAICAiVzCQDMCAICC3Byb3RvY29sRmVlBQNuaWwFA1NFUAEHcG9vbEZlZQAJALkJAgkAzAgCAgIlcwkAzAgCAgdwb29sRmVlBQNuaWwFA1NFUAEaZ2V0U3RyaW5nT3JGYWlsRnJvbUFkZHJlc3MCB2FkZHJlc3MDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUHYWRkcmVzcwUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFB2FkZHJlc3MJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIPIGlzIG5vdCBkZWZpbmVkBQNuaWwCAAAWa2V5RmVlQ29sbGVjdG9yQWRkcmVzcwIXJXNfX2ZlZUNvbGxlY3RvckFkZHJlc3MAE2ZlZUNvbGxlY3RvckFkZHJlc3MJARFAZXh0ck5hdGl2ZSgxMDYyKQEJARpnZXRTdHJpbmdPckZhaWxGcm9tQWRkcmVzcwIFD2ZhY3RvcnlDb250cmFjdAUWa2V5RmVlQ29sbGVjdG9yQWRkcmVzcwEcZ2V0TWFuYWdlclZhdWx0QWRkcmVzc09yVGhpcwAEByRtYXRjaDAJAKIIAQkBFmtleU1hbmFnZXJWYXVsdEFkZHJlc3MAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNjIpAQUBcwUEdGhpcwEFYXNJbnQBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACA0ludAQGdmFsSW50BQckbWF0Y2gwBQZ2YWxJbnQJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBFWRhdGFNYXBwaW5nUG9vbEFzc2V0cwIWaW50ZXJuYWxBbW91bnRBc3NldFN0chVpbnRlcm5hbFByaWNlQXNzZXRTdHIJALkJAgkAzAgCAgQlZCVkCQDMCAIJAKQDAQUWaW50ZXJuYWxBbW91bnRBc3NldFN0cgkAzAgCCQCkAwEFFWludGVybmFsUHJpY2VBc3NldFN0cgUDbmlsBQNTRVABFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQABBNtYW5hZ2VyVmF1bHRBZGRyZXNzCQEcZ2V0TWFuYWdlclZhdWx0QWRkcmVzc09yVGhpcwAEByRtYXRjaDAJAJ0IAgUTbWFuYWdlclZhdWx0QWRkcmVzcwkBE2tleU1hbmFnZXJQdWJsaWNLZXkAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkA2QQBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgEJaXNNYW5hZ2VyAQFpBAckbWF0Y2gwCQEWbWFuYWdlclB1YmxpY0tleU9yVW5pdAADCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCcGsFByRtYXRjaDAJAAACCAUBaQ9jYWxsZXJQdWJsaWNLZXkFAnBrAwkAAQIFByRtYXRjaDACBFVuaXQJAAACCAUBaQZjYWxsZXIFBHRoaXMJAAIBAgtNYXRjaCBlcnJvcgELbXVzdE1hbmFnZXIBAWkDCQEJaXNNYW5hZ2VyAQUBaQYJAAIBAhFwZXJtaXNzaW9uIGRlbmllZAENZ2V0QWNjQmFsYW5jZQEHYXNzZXRJZAMJAAACBQdhc3NldElkAgVXQVZFUwgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAPAHAgUEdGhpcwkA2QQBBQdhc3NldElkAQ9zdHJpbmdUb0Fzc2V0SWQBDWFzc2V0SWRTdHJpbmcDCQAAAgUNYXNzZXRJZFN0cmluZwIFV0FWRVMFBHVuaXQJANkEAQUNYXNzZXRJZFN0cmluZwELZ2V0U3dhcEZlZXMBDnBvb2xBZGRyZXNzU3RyBA5wb29sRmVlRGVmYXVsdAkBBXZhbHVlAQkAmggCBQR0aGlzCQEHcG9vbEZlZQAEEnByb3RvY29sRmVlRGVmYXVsdAkBBXZhbHVlAQkAmggCBQR0aGlzCQELcHJvdG9jb2xGZWUABAckbWF0Y2gwCQD8BwQFD2ZhY3RvcnlDb250cmFjdAISZ2V0U3dhcEZlZVJFQURPTkxZCQDMCAIFDnBvb2xBZGRyZXNzU3RyBQNuaWwFA25pbAMJAAECBQckbWF0Y2gwAgooSW50LCBJbnQpBARmZWVzBQckbWF0Y2gwCQCUCgIIBQRmZWVzAl8xCAUEZmVlcwJfMgkAlAoCBQ5wb29sRmVlRGVmYXVsdAUScHJvdG9jb2xGZWVEZWZhdWx0ASBnZXRQb29sQWRkcmVzc0FuZENoZWNrUG9vbFN0YXR1cwIHYXNzZXRJbghhc3NldE91dAQMbHBOb25SZXZlcnNlCgABQAkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCIGdldExwQXNzZXRGcm9tUG9vbEFzc2V0c1JFQURPTkxZCQDMCAIFB2Fzc2V0SW4JAMwIAgUIYXNzZXRPdXQFA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAUEdW5pdAQJbHBSZXZlcnNlCgABQAkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCIGdldExwQXNzZXRGcm9tUG9vbEFzc2V0c1JFQURPTkxZCQDMCAIFCGFzc2V0T3V0CQDMCAIFB2Fzc2V0SW4FA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAUEdW5pdAQLJHQwMzEyODM1ODcDCQECIT0CBQxscE5vblJldmVyc2UFBHVuaXQEBHBvb2wKAAFACQD8BwQFD2ZhY3RvcnlDb250cmFjdAIhZ2V0UG9vbEFkZHJlc3NGcm9tTHBBc3NldFJFQURPTkxZCQDMCAIJAQV2YWx1ZQEFDGxwTm9uUmV2ZXJzZQUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nCQCUCgIHBQRwb29sAwkBAiE9AgUJbHBSZXZlcnNlBQR1bml0BARwb29sCgABQAkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCIWdldFBvb2xBZGRyZXNzRnJvbUxwQXNzZXRSRUFET05MWQkAzAgCCQEFdmFsdWUBBQlscFJldmVyc2UFA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAkAAgEJAKwCAgkAAwEFAUACGyBjb3VsZG4ndCBiZSBjYXN0IHRvIFN0cmluZwkAlAoCBgUEcG9vbAUMcG9vbE5vdEV4aXN0BAlpc1JldmVyc2UIBQskdDAzMTI4MzU4NwJfMQQEcG9vbAgFCyR0MDMxMjgzNTg3Al8yBApwb29sU3RhdHVzCgABQAkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCFWdldFBvb2xTdGF0dXNSRUFET05MWQkAzAgCBQRwb29sBQNuaWwFA25pbAMJAAECBQFAAgNJbnQFAUAJAAIBCQCsAgIJAAMBBQFAAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQEBWNoZWNrAwkAAAIFCnBvb2xTdGF0dXMAAQYFDHBvb2xEaXNhYmxlZAMJAAACBQVjaGVjawUFY2hlY2sEB3Bvb2xBZHIJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQt2YWx1ZU9yRWxzZQIFBHBvb2wCAAkAlAoCBQdwb29sQWRyBQlpc1JldmVyc2UJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CAWkBFXN3YXBDYWxjdWxhdGVSRUFET05MWQMIYW1vdW50SW4HYXNzZXRJbghhc3NldE91dAQLJHQwMzk4MzQwNjEJASBnZXRQb29sQWRkcmVzc0FuZENoZWNrUG9vbFN0YXR1cwIFB2Fzc2V0SW4FCGFzc2V0T3V0BAdwb29sQWRyCAULJHQwMzk4MzQwNjECXzEECWlzUmV2ZXJzZQgFCyR0MDM5ODM0MDYxAl8yBAskdDA0MDY1NDExNwkBC2dldFN3YXBGZWVzAQkApQgBBQdwb29sQWRyBAVwbEZlZQgFCyR0MDQwNjU0MTE3Al8xBAVwckZlZQgFCyR0MDQwNjU0MTE3Al8yBBVmZWVQcm90b2NvbEFtb3VudENhbGMJALwCAwkAtgIBBQhhbW91bnRJbgkAtgIBBQVwckZlZQUIZmVlU2NhbGUEEWZlZVBvb2xBbW91bnRDYWxjCQC8AgMJALYCAQUIYW1vdW50SW4JALYCAQUFcGxGZWUFCGZlZVNjYWxlBBFmZWVQcm90b2NvbEFtb3VudAMJAAACCQCgAwEFFWZlZVByb3RvY29sQW1vdW50Q2FsYwAACQC2AgEAAQUVZmVlUHJvdG9jb2xBbW91bnRDYWxjBA1mZWVQb29sQW1vdW50AwkAAAIJAKADAQURZmVlUG9vbEFtb3VudENhbGMAAAkAtgIBAAEFEWZlZVBvb2xBbW91bnRDYWxjBA1jbGVhbkFtb3VudEluCQC4AgIJALgCAgkAtgIBBQhhbW91bnRJbgURZmVlUHJvdG9jb2xBbW91bnQFDWZlZVBvb2xBbW91bnQEA3JlcwoAAUAJAPwHBAUHcG9vbEFkcgIhY2FsY3VsYXRlQW1vdW50T3V0Rm9yU3dhcFJFQURPTkxZCQDMCAIJAKADAQUNY2xlYW5BbW91bnRJbgkAzAgCBQlpc1JldmVyc2UJAMwIAgkAoAMBBQ1mZWVQb29sQW1vdW50BQNuaWwFA25pbAMJAAECBQFAAgNJbnQFAUAJAAIBCQCsAgIJAAMBBQFAAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQJAJQKAgUDbmlsBQNyZXMBaQEEc3dhcAMMYW1vdW50T3V0TWluC2Fzc2V0T3V0UmF3CWFkZHJlc3NUbwQIYXNzZXRPdXQDCQAAAgULYXNzZXRPdXRSYXcCAAIFV0FWRVMFC2Fzc2V0T3V0UmF3BANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQHYXNzZXRJbgMJAAACCAUDcG10B2Fzc2V0SWQFBHVuaXQCBVdBVkVTCQDYBAEJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAQIYW1vdW50SW4JAQV2YWx1ZQEIBQNwbXQGYW1vdW50BAskdDA1MTMwNTIwOAkBIGdldFBvb2xBZGRyZXNzQW5kQ2hlY2tQb29sU3RhdHVzAgUHYXNzZXRJbgUIYXNzZXRPdXQEB3Bvb2xBZHIIBQskdDA1MTMwNTIwOAJfMQQJaXNSZXZlcnNlCAULJHQwNTEzMDUyMDgCXzIECyR0MDUyMTE1MjYzCQELZ2V0U3dhcEZlZXMBCQClCAEFB3Bvb2xBZHIEBXBsRmVlCAULJHQwNTIxMTUyNjMCXzEEBXByRmVlCAULJHQwNTIxMTUyNjMCXzIEFWZlZVByb3RvY29sQW1vdW50Q2FsYwkAvAIDCQC2AgEFCGFtb3VudEluCQC2AgEFBXByRmVlBQhmZWVTY2FsZQQRZmVlUG9vbEFtb3VudENhbGMJALwCAwkAtgIBBQhhbW91bnRJbgkAtgIBBQVwbEZlZQUIZmVlU2NhbGUEC2FkZHJlc3NUb19hCQERQGV4dHJOYXRpdmUoMTA2MikBBQlhZGRyZXNzVG8EEWZlZVByb3RvY29sQW1vdW50AwkAAAIJAKADAQUVZmVlUHJvdG9jb2xBbW91bnRDYWxjAAAJALYCAQABBRVmZWVQcm90b2NvbEFtb3VudENhbGMEDWZlZVBvb2xBbW91bnQDCQAAAgkAoAMBBRFmZWVQb29sQW1vdW50Q2FsYwAACQC2AgEAAQURZmVlUG9vbEFtb3VudENhbGMEDWNsZWFuQW1vdW50SW4DCQAAAgUJaXNSZXZlcnNlBgkAuAICCQC4AgIJALYCAQUIYW1vdW50SW4FEWZlZVByb3RvY29sQW1vdW50BQ1mZWVQb29sQW1vdW50CQC4AgIJALYCAQUIYW1vdW50SW4FDWZlZVBvb2xBbW91bnQEBmNoZWNrcwkAzAgCAwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQYJAAIBAh5leGFjdGx5IDEgcGF5bWVudCBhcmUgZXhwZWN0ZWQFA25pbAMJAAACBQZjaGVja3MFBmNoZWNrcwQWYXNzZXRJbkF0dGFjaGVkUGF5bWVudAkBD3N0cmluZ1RvQXNzZXRJZAEFB2Fzc2V0SW4EC3RvdGFsR2V0UmF3CgABQAkA/AcEBQdwb29sQWRyAiZjYWxjdWxhdGVBbW91bnRPdXRGb3JTd2FwQW5kU2VuZFRva2VucwkAzAgCCQCgAwEFDWNsZWFuQW1vdW50SW4JAMwIAgUJaXNSZXZlcnNlCQDMCAIFDGFtb3VudE91dE1pbgkAzAgCBQR0aGlzCQDMCAIJAKADAQUNZmVlUG9vbEFtb3VudAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBRZhc3NldEluQXR0YWNoZWRQYXltZW50CQCgAwEFDWNsZWFuQW1vdW50SW4FA25pbAMJAAECBQFAAgNJbnQFAUAJAAIBCQCsAgIJAAMBBQFAAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQECyR0MDY1MDY3MTAwAwkAAAIFCWlzUmV2ZXJzZQYJAJQKAgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBRNmZWVDb2xsZWN0b3JBZGRyZXNzCQCgAwEFEWZlZVByb3RvY29sQW1vdW50BRZhc3NldEluQXR0YWNoZWRQYXltZW50BQNuaWwFC3RvdGFsR2V0UmF3BBZmZWVQcm90b2NvbEZyb21HZXRDYWxjCQC8AgMJALYCAQULdG90YWxHZXRSYXcJALYCAQUFcHJGZWUFCGZlZVNjYWxlBBhmZWVQcm90b2NvbEFtb3VudEZyb21HZXQDCQAAAgkAoAMBBRZmZWVQcm90b2NvbEZyb21HZXRDYWxjAAAJAKADAQkAtgIBAAEJAKADAQUWZmVlUHJvdG9jb2xGcm9tR2V0Q2FsYwkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFE2ZlZUNvbGxlY3RvckFkZHJlc3MFGGZlZVByb3RvY29sQW1vdW50RnJvbUdldAkBD3N0cmluZ1RvQXNzZXRJZAEFCGFzc2V0T3V0BQNuaWwJAGUCBQt0b3RhbEdldFJhdwUYZmVlUHJvdG9jb2xBbW91bnRGcm9tR2V0BBJwcm90b2NvbEZlZUFjdGlvbnMIBQskdDA2NTA2NzEwMAJfMQQLbmV3VG90YWxHZXQIBQskdDA2NTA2NzEwMAJfMgkAlAoCCQDOCAIFEnByb3RvY29sRmVlQWN0aW9ucwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQdwb29sQWRyCQCgAwEFDWZlZVBvb2xBbW91bnQFFmFzc2V0SW5BdHRhY2hlZFBheW1lbnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwULYWRkcmVzc1RvX2EFC25ld1RvdGFsR2V0CQEPc3RyaW5nVG9Bc3NldElkAQUIYXNzZXRPdXQFA25pbAULbmV3VG90YWxHZXQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAnR4AQZ2ZXJpZnkABA90YXJnZXRQdWJsaWNLZXkEByRtYXRjaDAJARZtYW5hZ2VyUHVibGljS2V5T3JVbml0AAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJwawUHJG1hdGNoMAUCcGsDCQABAgUHJG1hdGNoMAIEVW5pdAgFAnR4D3NlbmRlclB1YmxpY0tleQkAAgECC01hdGNoIGVycm9yCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAABQ90YXJnZXRQdWJsaWNLZXnz+huy",
    "chainId": 84,
    "height": 3194820,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: iagmBQd5s4ACoPgKuu5dDpiEWRo7oDUQSJ43x9jpEQA
Next: EtVYfFaBUbs2evGPSU4RvB9nEUHYpAzej2tNzNm6ijmM

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

github/deemru/w8io/169f3d6 
37.76 ms ◑