w8 · tx · Gjo···E83

tx · GjoAa61M4wMsoaaCAQmkJrPFH7jnphpWm2td6uGXJE83

3N6LHjfGb6Fgcy7YsVcNxGyPTj49XbQAijq:  -0.01300000 Waves

2023.02.09 11:44 [2441872] smart account 3N6LHjfGb6Fgcy7YsVcNxGyPTj49XbQAijq > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "GjoAa61M4wMsoaaCAQmkJrPFH7jnphpWm2td6uGXJE83",
    "fee": 1300000,
    "feeAssetId": null,
    "timestamp": 1675932277024,
    "version": 1,
    "sender": "3N6LHjfGb6Fgcy7YsVcNxGyPTj49XbQAijq",
    "senderPublicKey": "2u2wYYcVBQv43Cc71zkhHPPitkqgg6dqTZ3nUMvYJ1uq",
    "proofs": [
        "3Pe6qACdT1vMKgZNQ2q36TVhbSUjVvhr417d8kvEDhEJ5udCdYxdnChL5VAsqaihAB2qZ9C4j69SC6q7Ay52E7Tz"
    ],
    "script": "base64:BgIXCAISBQoDAQgIEgUKAwEICBIDCgEIEgAUAANTRVACAl9fAAhmZWVTY2FsZQkAtgIBAKCNBgEPZ2V0U3RyaW5nT3JGYWlsAQNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQNrZXkJAKwCAgIVTm8gZGF0YSBmb3IgdGhpcy5rZXk9BQNrZXkADHBvb2xEaXNhYmxlZAkAAgECDVBvb2wgZGlzYWJsZWQADHBvb2xOb3RFeGlzdAkAAgECEVBvb2wgaXMgbm90IGV4aXN0AA5zbGlwcGFnZVRvb0JpZwkAAgECE1NsaXBwYWdlIGlzIHRvbyBiaWcBE2tleU1hbmFnZXJQdWJsaWNLZXkAAhQlc19fbWFuYWdlclB1YmxpY0tleQEaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkAAhslc19fcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkBAmZjAAITJXNfX2ZhY3RvcnlDb250cmFjdAAPZmFjdG9yeUNvbnRyYWN0CQERQGV4dHJOYXRpdmUoMTA2MikBCQEPZ2V0U3RyaW5nT3JGYWlsAQkBAmZjAAEaZmVlUHJvdG9jb2xDb250cmFjdEFkZHJlc3MACQC5CQIJAMwIAgICJXMJAMwIAgIaZmVlUHJvdG9jb2xDb250cmFjdEFkZHJlc3MFA25pbAUDU0VQAAtmZWVDb250cmFjdAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBD2dldFN0cmluZ09yRmFpbAEJARpmZWVQcm90b2NvbENvbnRyYWN0QWRkcmVzcwABC3Byb3RvY29sRmVlAAkAuQkCCQDMCAICAiVzCQDMCAICC3Byb3RvY29sRmVlBQNuaWwFA1NFUAEFYXNJbnQBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACA0ludAQGdmFsSW50BQckbWF0Y2gwBQZ2YWxJbnQJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBFWRhdGFNYXBwaW5nUG9vbEFzc2V0cwIWaW50ZXJuYWxBbW91bnRBc3NldFN0chVpbnRlcm5hbFByaWNlQXNzZXRTdHIJALkJAgkAzAgCAgQlZCVkCQDMCAIJAKQDAQUWaW50ZXJuYWxBbW91bnRBc3NldFN0cgkAzAgCCQCkAwEFFWludGVybmFsUHJpY2VBc3NldFN0cgUDbmlsBQNTRVABFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQABAckbWF0Y2gwCQCiCAEJARNrZXlNYW5hZ2VyUHVibGljS2V5AAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJANkEAQUBcwMJAAECBQckbWF0Y2gwAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IBHXBlbmRpbmdNYW5hZ2VyUHVibGljS2V5T3JVbml0AAQHJG1hdGNoMAkAoggBCQEaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkA2QQBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgEJaXNNYW5hZ2VyAQFpBAckbWF0Y2gwCQEWbWFuYWdlclB1YmxpY0tleU9yVW5pdAADCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCcGsFByRtYXRjaDAJAAACCAUBaQ9jYWxsZXJQdWJsaWNLZXkFAnBrAwkAAQIFByRtYXRjaDACBFVuaXQJAAACCAUBaQZjYWxsZXIFBHRoaXMJAAIBAgtNYXRjaCBlcnJvcgELbXVzdE1hbmFnZXIBAWkDCQEJaXNNYW5hZ2VyAQUBaQYJAAIBAhFwZXJtaXNzaW9uIGRlbmllZAENZ2V0QWNjQmFsYW5jZQEHYXNzZXRJZAMJAAACBQdhc3NldElkAgVXQVZFUwgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAPAHAgUEdGhpcwkA2QQBBQdhc3NldElkBAFpARVzd2FwQ2FsY3VsYXRlUkVBRE9OTFkDCGFtb3VudEluB2Fzc2V0SW4IYXNzZXRPdXQEBXByRmVlCQEFdmFsdWUBCQCfCAEJAQtwcm90b2NvbEZlZQAEEWZlZVByb3RvY29sQW1vdW50CQC8AgMJALYCAQUIYW1vdW50SW4JALYCAQUFcHJGZWUFCGZlZVNjYWxlBA1jbGVhbkFtb3VudEluAwkAAAIJAKADAQURZmVlUHJvdG9jb2xBbW91bnQAAAkAtgIBAAEJALgCAgkAtgIBBQhhbW91bnRJbgURZmVlUHJvdG9jb2xBbW91bnQEDWxwTm9uUmV2ZXJlc2UJAPwHBAUPZmFjdG9yeUNvbnRyYWN0AiBnZXRMcEFzc2V0RnJvbVBvb2xBc3NldHNSRUFET05MWQkAzAgCBQdhc3NldEluCQDMCAIFCGFzc2V0T3V0BQNuaWwFA25pbAQJbHBSZXZlcnNlCQD8BwQFD2ZhY3RvcnlDb250cmFjdAIgZ2V0THBBc3NldEZyb21Qb29sQXNzZXRzUkVBRE9OTFkJAMwIAgUIYXNzZXRPdXQJAMwIAgUHYXNzZXRJbgUDbmlsBQNuaWwECyR0MDI1NjEzMDY2AwkBAiE9AgUNbHBOb25SZXZlcmVzZQUEdW5pdAQJaXNSZXZlcnNlBwQEcG9vbAoAAUAJAPwHBAUPZmFjdG9yeUNvbnRyYWN0AiFnZXRQb29sQWRkcmVzc0Zyb21McEFzc2V0UkVBRE9OTFkJAMwIAgUNbHBOb25SZXZlcmVzZQUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nCQCUCgIFCWlzUmV2ZXJzZQUEcG9vbAMJAQIhPQIFCWxwUmV2ZXJzZQUEdW5pdAQJaXNSZXZlcnNlBgQEcG9vbAoAAUAJAPwHBAUPZmFjdG9yeUNvbnRyYWN0AiFnZXRQb29sQWRkcmVzc0Zyb21McEFzc2V0UkVBRE9OTFkJAMwIAgUJbHBSZXZlcnNlBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcJAJQKAgUJaXNSZXZlcnNlBQRwb29sBQxwb29sTm90RXhpc3QECWlzUmV2ZXJzZQgFCyR0MDI1NjEzMDY2Al8xBARwb29sCAULJHQwMjU2MTMwNjYCXzIECnBvb2xTdGF0dXMKAAFACQD8BwQFD2ZhY3RvcnlDb250cmFjdAIVZ2V0UG9vbFN0YXR1c1JFQURPTkxZCQDMCAIFBHBvb2wFA25pbAUDbmlsAwkAAQIFAUACA0ludAUBQAkAAgEJAKwCAgkAAwEFAUACGCBjb3VsZG4ndCBiZSBjYXN0IHRvIEludAQFY2hlY2sDCQAAAgUKcG9vbFN0YXR1cwABBgUMcG9vbERpc2FibGVkAwkAAAIFBWNoZWNrBQVjaGVjawQHcG9vbEFkcgkBEUBleHRyTmF0aXZlKDEwNjIpAQkBC3ZhbHVlT3JFbHNlAgUEcG9vbAIABANyZXMKAAFACQD8BwQFB3Bvb2xBZHICIWNhbGN1bGF0ZUFtb3VudE91dEZvclN3YXBSRUFET05MWQkAzAgCCQCgAwEFDWNsZWFuQW1vdW50SW4JAMwIAgUJaXNSZXZlcnNlBQNuaWwFA25pbAMJAAECBQFAAgNJbnQFAUAJAAIBCQCsAgIJAAMBBQFAAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQJAJQKAgUDbmlsBQNyZXMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEEc3dhcAMMYW1vdW50T3V0TWluCGFzc2V0T3V0CWFkZHJlc3NUbwQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAEB2Fzc2V0SW4DCQAAAggFA3BtdAdhc3NldElkBQR1bml0CQCbAwECBVdBVkVTCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQECGFtb3VudEluCQEFdmFsdWUBCAUDcG10BmFtb3VudAQFcHJGZWUJAQV2YWx1ZQEJAJ8IAQkBC3Byb3RvY29sRmVlAAQRZmVlUHJvdG9jb2xBbW91bnQJALwCAwkAtgIBBQhhbW91bnRJbgkAtgIBBQVwckZlZQUIZmVlU2NhbGUEDWNsZWFuQW1vdW50SW4JALgCAgkAtgIBBQhhbW91bnRJbgURZmVlUHJvdG9jb2xBbW91bnQEBmNoZWNrcwkAzAgCAwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQYJAAIBAh5leGFjdGx5IDEgcGF5bWVudCBhcmUgZXhwZWN0ZWQFA25pbAMJAAACBQZjaGVja3MFBmNoZWNrcwQNbHBOb25SZXZlcmVzZQkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCIGdldExwQXNzZXRGcm9tUG9vbEFzc2V0c1JFQURPTkxZCQDMCAIJANgEAQUHYXNzZXRJbgkAzAgCBQhhc3NldE91dAUDbmlsBQNuaWwECWxwUmV2ZXJzZQkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCIGdldExwQXNzZXRGcm9tUG9vbEFzc2V0c1JFQURPTkxZCQDMCAIFCGFzc2V0T3V0CQDMCAIJANgEAQUHYXNzZXRJbgUDbmlsBQNuaWwECyR0MDQyODE0Nzg2AwkBAiE9AgUNbHBOb25SZXZlcmVzZQUEdW5pdAQJaXNSZXZlcnNlBwQEcG9vbAoAAUAJAPwHBAUPZmFjdG9yeUNvbnRyYWN0AiFnZXRQb29sQWRkcmVzc0Zyb21McEFzc2V0UkVBRE9OTFkJAMwIAgUNbHBOb25SZXZlcmVzZQUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nCQCUCgIFCWlzUmV2ZXJzZQUEcG9vbAMJAQIhPQIFCWxwUmV2ZXJzZQUEdW5pdAQJaXNSZXZlcnNlBgQEcG9vbAoAAUAJAPwHBAUPZmFjdG9yeUNvbnRyYWN0AiFnZXRQb29sQWRkcmVzc0Zyb21McEFzc2V0UkVBRE9OTFkJAMwIAgUJbHBSZXZlcnNlBQNuaWwFA25pbAMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcJAJQKAgUJaXNSZXZlcnNlBQRwb29sBQxwb29sTm90RXhpc3QECWlzUmV2ZXJzZQgFCyR0MDQyODE0Nzg2Al8xBARwb29sCAULJHQwNDI4MTQ3ODYCXzIEIGlzUG9vbE9uZVRva2VuT3BlcmF0aW9uc0Rpc2FibGVkCgABQAkA/AcEBQ9mYWN0b3J5Q29udHJhY3QCKGlzUG9vbE9uZVRva2VuT3BlcmF0aW9uc0Rpc2FibGVkUkVBRE9OTFkJAMwIAgUEcG9vbAUDbmlsBQNuaWwDCQABAgUBQAIHQm9vbGVhbgUBQAkAAgEJAKwCAgkAAwEFAUACHCBjb3VsZG4ndCBiZSBjYXN0IHRvIEJvb2xlYW4EBWNoZWNrAwUgaXNQb29sT25lVG9rZW5PcGVyYXRpb25zRGlzYWJsZWQGBQxwb29sRGlzYWJsZWQDCQAAAgUFY2hlY2sFBWNoZWNrBAdwb29sQWRyCQERQGV4dHJOYXRpdmUoMTA2MikBBQRwb29sBANyZXMKAAFACQD8BwQFB3Bvb2xBZHICJmNhbGN1bGF0ZUFtb3VudE91dEZvclN3YXBBbmRTZW5kVG9rZW5zCQDMCAIJAKADAQUNY2xlYW5BbW91bnRJbgkAzAgCBQlpc1JldmVyc2UJAMwIAgUMYW1vdW50T3V0TWluCQDMCAIFCWFkZHJlc3NUbwUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQdhc3NldEluCQCgAwEFDWNsZWFuQW1vdW50SW4FA25pbAMJAAECBQFAAgdCb29sZWFuBQFACQACAQkArAICCQADAQUBQAIcIGNvdWxkbid0IGJlIGNhc3QgdG8gQm9vbGVhbgkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC2ZlZUNvbnRyYWN0CQCgAwEFEWZlZVByb3RvY29sQW1vdW50BQdhc3NldEluBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQpzZXRNYW5hZ2VyARdwZW5kaW5nTWFuYWdlclB1YmxpY0tleQQLY2hlY2tDYWxsZXIJAQttdXN0TWFuYWdlcgEFAWkDCQAAAgULY2hlY2tDYWxsZXIFC2NoZWNrQ2FsbGVyBBVjaGVja01hbmFnZXJQdWJsaWNLZXkJANkEAQUXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkDCQAAAgUVY2hlY2tNYW5hZ2VyUHVibGljS2V5BRVjaGVja01hbmFnZXJQdWJsaWNLZXkJAMwIAgkBC1N0cmluZ0VudHJ5AgkBGmtleVBlbmRpbmdNYW5hZ2VyUHVibGljS2V5AAUXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ5jb25maXJtTWFuYWdlcgAEAnBtCQEdcGVuZGluZ01hbmFnZXJQdWJsaWNLZXlPclVuaXQABAVoYXNQTQMJAQlpc0RlZmluZWQBBQJwbQYJAAIBAhJubyBwZW5kaW5nIG1hbmFnZXIDCQAAAgUFaGFzUE0FBWhhc1BNBAdjaGVja1BNAwkAAAIIBQFpD2NhbGxlclB1YmxpY0tleQkBBXZhbHVlAQUCcG0GCQACAQIbeW91IGFyZSBub3QgcGVuZGluZyBtYW5hZ2VyAwkAAAIFB2NoZWNrUE0FB2NoZWNrUE0JAMwIAgkBC1N0cmluZ0VudHJ5AgkBE2tleU1hbmFnZXJQdWJsaWNLZXkACQDYBAEJAQV2YWx1ZQEFAnBtCQDMCAIJAQtEZWxldGVFbnRyeQEJARprZXlQZW5kaW5nTWFuYWdlclB1YmxpY0tleQAFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAED3RhcmdldFB1YmxpY0tleQQHJG1hdGNoMAkBFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQAAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAnBrBQckbWF0Y2gwBQJwawMJAAECBQckbWF0Y2gwAgRVbml0CAUCdHgPc2VuZGVyUHVibGljS2V5CQACAQILTWF0Y2ggZXJyb3IJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFD3RhcmdldFB1YmxpY0tledMpAAY=",
    "chainId": 84,
    "height": 2441872,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: E58Gnr3i9jcErWRPsZ1hvFzySqDYrn4d9qQ2Ekva4xqd
Next: DqUYMbqMi7EP2SrhxKQHm8GASJtcNP2DRTLDQjHd2Jtw

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

Old	New		Differences
196	196		else poolDisabled
197	197		if ((check == check))
198	198		then {
199		-	let poolAdr = addressFromStringValue(~~valueOrElse(~~pool~~, ""~~))
	199	+	let poolAdr = addressFromStringValue(pool)
200	200		let res = {
201	201		let @ = invoke(poolAdr, "calculateAmountOutForSwapAndSendTokens", [toInt(cleanAmountIn), isReverse, amountOutMin, addressTo], [AttachedPayment(assetIn, toInt(cleanAmountIn))])
202	202		if ($isInstanceOf(@, "Boolean"))

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

github/deemru/w8io/3ef1775 
62.11 ms ◑