w8 · tx · 4Jh···Cgh

tx · 4JhgPwyEvx6n7f3oCQbR6iwJRTvsZfQUTkwGz7s42Cgh

3NCfCg6Hkd9a1pQJcVSXwycRaPcpN7G7tjh:  -0.03700000 Waves

2023.05.27 19:08 [2596590] smart account 3NCfCg6Hkd9a1pQJcVSXwycRaPcpN7G7tjh > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "4JhgPwyEvx6n7f3oCQbR6iwJRTvsZfQUTkwGz7s42Cgh",
    "fee": 3700000,
    "feeAssetId": null,
    "timestamp": 1685203689952,
    "version": 2,
    "chainId": 84,
    "sender": "3NCfCg6Hkd9a1pQJcVSXwycRaPcpN7G7tjh",
    "senderPublicKey": "BcbHB2RhxkboDVLqQDri6xqSzD2EneYAdnx7HQzZJvML",
    "proofs": [
        "3Jg9ph5KJDdWP634vN7j2J4bPemjGr75dg72ArTkdksy6dqzrixsHejCqW73Ax8Qh96N6mDWQLKvmXTi9rCpfWie"
    ],
    "script": "base64:BgIaCAISBAoCCAgSBAoCCAESABIDCgEIEgMKAQgVAAdrX2Z1bmRzAgdrX2Z1bmRzAA9rX3NXYXZlc0FkZHJlc3MCD2tfc1dhdmVzQWRkcmVzcwANa19zV2F2ZXNBc3NldAINa19zV2F2ZXNBc3NldAAUa19jb29yZGluYXRvckFkZHJlc3MCFGtfY29vcmRpbmF0b3JBZGRyZXNzABFrX21hbmFnZXJfYWRkcmVzcwIRa19tYW5hZ2VyX2FkZHJlc3MAD2tfYWRtaW5fYWRkcmVzcwIPa19hZG1pbl9hZGRyZXNzAA1rX2luaXRpYWxpemVkAg1rX2luaXRpYWxpemVkAQ50b0NvbXBvc2l0ZUtleQIEX2tleQhfYWRkcmVzcwkArAICCQCsAgIFBF9rZXkCAV8FCF9hZGRyZXNzAQliYWxhbmNlT2YBCF9hc3NldElkCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAQ50b0NvbXBvc2l0ZUtleQIFB2tfZnVuZHMFCF9hc3NldElkAAABC2Nvb3JkaW5hdG9yAAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMFFGtfY29vcmRpbmF0b3JBZGRyZXNzAihDb29yZGluYXRvciBub3Qgc2V0IFNpbXBsZSBBc3NldCBNYW5hZ2VyAQ5tYW5hZ2VyQWRkcmVzcwAJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgkBC2Nvb3JkaW5hdG9yAAURa19tYW5hZ2VyX2FkZHJlc3MCD01hbmFnZXIgbm90IHNldAIPTWFuYWdlciBub3Qgc2V0AQtpbml0aWFsaXplZAAJAQt2YWx1ZU9yRWxzZQIJAJsIAgUEdGhpcwUNa19pbml0aWFsaXplZAcBDGFkbWluQWRkcmVzcwAJAKYIAQkBEUBleHRyTmF0aXZlKDEwNTMpAgkBC2Nvb3JkaW5hdG9yAAUPa19hZG1pbl9hZGRyZXNzAQ1zV2F2ZXNBZGRyZXNzAAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBEUBleHRyTmF0aXZlKDEwNTMpAgUEdGhpcwUPa19zV2F2ZXNBZGRyZXNzAQtzV2F2ZXNBc3NldAAJANkEAQkBEUBleHRyTmF0aXZlKDEwNTMpAgUEdGhpcwUNa19zV2F2ZXNBc3NldAARU19XQVZFU19QUkVDSVNJT04JAKcDAQINMTAwMDAwMDAwMDAwMAELaXNXaGl0ZWxpc3QBCF9hZGRyZXNzCQAAAgUIX2FkZHJlc3MJAKUIAQkBDm1hbmFnZXJBZGRyZXNzAAELdXBkYXRlRnVuZHMCCF9hc3NldElkBl92YWx1ZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDnRvQ29tcG9zaXRlS2V5AgUHa19mdW5kcwUIX2Fzc2V0SWQFBl92YWx1ZQUDbmlsAQpzdHJBc3NldElkAQZfYXNzZXQDCQEJaXNEZWZpbmVkAQUGX2Fzc2V0CQDYBAEJAQV2YWx1ZQEFBl9hc3NldAIFV0FWRVMBDXdhdmVzVG9TV2F2ZXMBBl93YXZlcwQFcmF0ZVIJAPwHBAkBDXNXYXZlc0FkZHJlc3MAAgdnZXRSYXRlBQNuaWwFA25pbAMJAAACBQVyYXRlUgUFcmF0ZVIEBHJhdGUEByRtYXRjaDAFBXJhdGVSAwkAAQIFByRtYXRjaDACBlN0cmluZwQBeAUHJG1hdGNoMAkApwMBBQF4CQACAQIWSW52YWxpZCBnZXRSYXRlIHJlc3VsdAMJAAACBQRyYXRlBQRyYXRlCQCgAwEJAL0CBAkAtgIBBQZfd2F2ZXMFEVNfV0FWRVNfUFJFQ0lTSU9OBQRyYXRlBQdDRUlMSU5HCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQ1leHRyYWN0UHJvZml0AAQMc1dhdmVzQW1vdW50CQDwBwIFBHRoaXMJAQtzV2F2ZXNBc3NldAADCQAAAgUMc1dhdmVzQW1vdW50BQxzV2F2ZXNBbW91bnQECmRvV2l0aGRyYXcJAPwHBAkBDXNXYXZlc0FkZHJlc3MAAgh3aXRoZHJhdwUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQELc1dhdmVzQXNzZXQABQxzV2F2ZXNBbW91bnQFA25pbAMJAAACBQpkb1dpdGhkcmF3BQpkb1dpdGhkcmF3BBJ3YXZlc0FjdHVhbEJhbGFuY2UICQDvBwEFBHRoaXMHcmVndWxhcgMJAAACBRJ3YXZlc0FjdHVhbEJhbGFuY2UFEndhdmVzQWN0dWFsQmFsYW5jZQQRYWNjb3VudGluZ0JhbGFuY2UJAQliYWxhbmNlT2YBAgVXQVZFUwMJAAACBRFhY2NvdW50aW5nQmFsYW5jZQURYWNjb3VudGluZ0JhbGFuY2UED2RvVmVyaWZ5QmFsYW5jZQMJAGYCBRFhY2NvdW50aW5nQmFsYW5jZQUSd2F2ZXNBY3R1YWxCYWxhbmNlCQACAQI1SW52YWxpZCBzdGF0ZTogd2F2ZXNBY3R1YWxCYWxhbmNlIDwgYWNjb3VudGluZ0JhbGFuY2UFBHVuaXQDCQAAAgUPZG9WZXJpZnlCYWxhbmNlBQ9kb1ZlcmlmeUJhbGFuY2UEBnByb2ZpdAkAZQIFEndhdmVzQWN0dWFsQmFsYW5jZQURYWNjb3VudGluZ0JhbGFuY2UDCQAAAgUGcHJvZml0BQZwcm9maXQECWRvRGVwb3NpdAkA/AcECQENc1dhdmVzQWRkcmVzcwACB2RlcG9zaXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUEdW5pdAURYWNjb3VudGluZ0JhbGFuY2UFA25pbAMJAAACBQlkb0RlcG9zaXQFCWRvRGVwb3NpdAUGcHJvZml0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBQFpAQppbml0aWFsaXplAgxfY29vcmRpbmF0b3IOX3NXYXZlc0FkZHJlc3MDAwkBC2luaXRpYWxpemVkAAYJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECFFVuYWJsZSB0byBpbml0aWFsaXplBAZzV2F2ZXMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFDl9zV2F2ZXNBZGRyZXNzBBBzV2F2ZXNBc3NldFZhbHVlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUGc1dhdmVzAgVBU1NFVAIPTm8gc1dhdmVzIEFzc2V0CQDMCAIJAQtTdHJpbmdFbnRyeQIFFGtfY29vcmRpbmF0b3JBZGRyZXNzCQClCAEJARFAZXh0ck5hdGl2ZSgxMDYyKQEFDF9jb29yZGluYXRvcgkAzAgCCQELU3RyaW5nRW50cnkCBQ9rX3NXYXZlc0FkZHJlc3MJAKUIAQUGc1dhdmVzCQDMCAIJAQtTdHJpbmdFbnRyeQIFDWtfc1dhdmVzQXNzZXQFEHNXYXZlc0Fzc2V0VmFsdWUJAMwIAgkBDEJvb2xlYW5FbnRyeQIFDWtfaW5pdGlhbGl6ZWQGBQNuaWwBaQEId2l0aGRyYXcCCF9hc3NldElkB19hbW91bnQDAwMJAQEhAQkBC2lzV2hpdGVsaXN0AQkApQgBCAUBaQZjYWxsZXIGCQEBIQEJAQtpbml0aWFsaXplZAAGCQBmAgUHX2Ftb3VudAkBCWJhbGFuY2VPZgEFCF9hc3NldElkCQACAQkArAICCQCsAgIJAKwCAgIvSW52YWxpZCB3aXRoZHJhdyBwYXJhbXMgKHNpbXBsZSBhc3NldCBtYW5hZ2VyKSAJAKQDAQUHX2Ftb3VudAIDID4gCQCkAwEJAQliYWxhbmNlT2YBBQhfYXNzZXRJZAQTY3VycmVudEFzc2V0QmFsYW5jZQkAZQIJAQliYWxhbmNlT2YBBQhfYXNzZXRJZAUHX2Ftb3VudAQMc1dhdmVzQW1vdW50CQENd2F2ZXNUb1NXYXZlcwEFB19hbW91bnQDCQAAAgUMc1dhdmVzQW1vdW50BQxzV2F2ZXNBbW91bnQECmRvV2l0aGRyYXcJAPwHBAkBDXNXYXZlc0FkZHJlc3MAAgh3aXRoZHJhdwUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQELc1dhdmVzQXNzZXQABQxzV2F2ZXNBbW91bnQFA25pbAMJAAACBQpkb1dpdGhkcmF3BQpkb1dpdGhkcmF3CQDOCAIJAQt1cGRhdGVGdW5kcwIFCF9hc3NldElkBRNjdXJyZW50QXNzZXRCYWxhbmNlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUHX2Ftb3VudAMJAAACBQhfYXNzZXRJZAIFV0FWRVMFBHVuaXQJANkEAQUIX2Fzc2V0SWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQdkZXBvc2l0AAQHX2Ftb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQECF9hc3NldElkCQEKc3RyQXNzZXRJZAEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAMDCQEBIQEJAQtpbml0aWFsaXplZAAGAwkBASEBCQELaXNXaGl0ZWxpc3QBCQClCAEIBQFpBmNhbGxlcgkBAiE9AggFAWkGY2FsbGVyCQEMYWRtaW5BZGRyZXNzAAcJAAIBAi1JbnZhbGlkIGRlcG9zaXQgcGFyYW1zIChzaW1wbGUgYXNzZXQgbWFuYWdlcikECWRvRGVwb3NpdAkA/AcECQENc1dhdmVzQWRkcmVzcwACB2RlcG9zaXQFA25pbAkAzAgCCQCRAwIIBQFpCHBheW1lbnRzAAAFA25pbAMJAAACBQlkb0RlcG9zaXQFCWRvRGVwb3NpdAQTY3VycmVudEFzc2V0QmFsYW5jZQkAZAIJAQliYWxhbmNlT2YBBQhfYXNzZXRJZAUHX2Ftb3VudAkBC3VwZGF0ZUZ1bmRzAgUIX2Fzc2V0SWQFE2N1cnJlbnRBc3NldEJhbGFuY2UJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQELY2xhaW1Qcm9maXQBCF9hc3NldElkAwMJAQEhAQkBC2luaXRpYWxpemVkAAYJAQIhPQIIBQFpBmNhbGxlcgkBDm1hbmFnZXJBZGRyZXNzAAkAAgECMUludmFsaWQgY2xhaW1Qcm9maXQgcGFyYW1zIChzV2F2ZXMgYXNzZXQgbWFuYWdlcikEBnByb2ZpdAkBDWV4dHJhY3RQcm9maXQAAwkAAAIFBnByb2ZpdAUGcHJvZml0CQCUCgIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQZwcm9maXQDCQAAAgUIX2Fzc2V0SWQCBVdBVkVTBQR1bml0CQDZBAEFCF9hc3NldElkBQNuaWwFBnByb2ZpdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARB2aWV3X2NsYWltUHJvZml0AQhfYXNzZXRJZAMJAQEhAQkBC2luaXRpYWxpemVkAAkAAgECNkludmFsaWQgdmlld19jbGFpbVByb2ZpdCBwYXJhbXMgKHNXYXZlcyBhc3NldCBtYW5hZ2VyKQQGcHJvZml0CQENZXh0cmFjdFByb2ZpdAADCQAAAgUGcHJvZml0BQZwcm9maXQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKQDAQkBCWJhbGFuY2VPZgEFCF9hc3NldElkAgEsCQCkAwEJAQliYWxhbmNlT2YBBQhfYXNzZXRJZAIBLAkApAMBBQZwcm9maXQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAnR4AQZ2ZXJpZnkABA5jb29yZGluYXRvclN0cgkAnQgCBQR0aGlzBRRrX2Nvb3JkaW5hdG9yQWRkcmVzcwMJAQlpc0RlZmluZWQBBQ5jb29yZGluYXRvclN0cgQFYWRtaW4JAJ0IAgkBEUBleHRyTmF0aXZlKDEwNjIpAQkBBXZhbHVlAQUOY29vcmRpbmF0b3JTdHIFD2tfYWRtaW5fYWRkcmVzcwMJAQlpc0RlZmluZWQBBQVhZG1pbgkBC3ZhbHVlT3JFbHNlAgkAmwgCCQERQGV4dHJOYXRpdmUoMTA2MikBCQEFdmFsdWUBBQVhZG1pbgkArAICCQCsAgIJAKwCAgIHc3RhdHVzXwkApQgBBQR0aGlzAgFfCQDYBAEIBQJ0eAJpZAcJAAIBAi51bmFibGUgdG8gdmVyaWZ5OiBhZG1pbiBub3Qgc2V0IGluIGNvb3JkaW5hdG9yCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V54EL2NQ==",
    "height": 2596590,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4RdLzAdARsth5jy6GewHnvv1AjysM9QNE9thwmAyPoEJ
Next: none

Diff: 
Old New Differences
39 39  func sWavesAsset () = fromBase58String(getStringValue(this, k_sWavesAsset))
40 40  
41 41  
42 - let WAVES_TO_S_WAVES_PRECISION = parseBigIntValue("10000")
43 - 
44 42  let S_WAVES_PRECISION = parseBigIntValue("1000000000000")
45 43  
46 44  func isWhitelist (_address) = (_address == toString(managerAddress()))
65 63                      throw("Invalid getRate result")
66 64              }
67 65              if ((rate == rate))
68 -                 then {
69 -                     let desiredWaves = (toBigInt(_waves) * WAVES_TO_S_WAVES_PRECISION)
70 -                     let sWavesAmount = (toInt((fraction(desiredWaves, S_WAVES_PRECISION, rate, CEILING) / WAVES_TO_S_WAVES_PRECISION)) + 1)
71 -                     sWavesAmount
72 -                     }
66 +                 then toInt(fraction(toBigInt(_waves), S_WAVES_PRECISION, rate, CEILING))
73 67                  else throw("Strict value is not equal to itself.")
74 68              }
75 69          else throw("Strict value is not equal to itself.")
186 180          if ((profit == profit))
187 181              then $Tuple2([ScriptTransfer(i.caller, profit, if ((_assetId == "WAVES"))
188 182                  then unit
189 -                 else fromBase58String(_assetId))], 0)
183 +                 else fromBase58String(_assetId))], profit)
190 184              else throw("Strict value is not equal to itself.")
191 185          }
192 186  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let k_funds = "k_funds"
5 5  
6 6  let k_sWavesAddress = "k_sWavesAddress"
7 7  
8 8  let k_sWavesAsset = "k_sWavesAsset"
9 9  
10 10  let k_coordinatorAddress = "k_coordinatorAddress"
11 11  
12 12  let k_manager_address = "k_manager_address"
13 13  
14 14  let k_admin_address = "k_admin_address"
15 15  
16 16  let k_initialized = "k_initialized"
17 17  
18 18  func toCompositeKey (_key,_address) = ((_key + "_") + _address)
19 19  
20 20  
21 21  func balanceOf (_assetId) = valueOrElse(getInteger(this, toCompositeKey(k_funds, _assetId)), 0)
22 22  
23 23  
24 24  func coordinator () = valueOrErrorMessage(addressFromString(getStringValue(this, k_coordinatorAddress)), "Coordinator not set Simple Asset Manager")
25 25  
26 26  
27 27  func managerAddress () = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(coordinator(), k_manager_address), "Manager not set")), "Manager not set")
28 28  
29 29  
30 30  func initialized () = valueOrElse(getBoolean(this, k_initialized), false)
31 31  
32 32  
33 33  func adminAddress () = addressFromString(getStringValue(coordinator(), k_admin_address))
34 34  
35 35  
36 36  func sWavesAddress () = addressFromStringValue(getStringValue(this, k_sWavesAddress))
37 37  
38 38  
39 39  func sWavesAsset () = fromBase58String(getStringValue(this, k_sWavesAsset))
40 40  
41 41  
42 - let WAVES_TO_S_WAVES_PRECISION = parseBigIntValue("10000")
43 - 
44 42  let S_WAVES_PRECISION = parseBigIntValue("1000000000000")
45 43  
46 44  func isWhitelist (_address) = (_address == toString(managerAddress()))
47 45  
48 46  
49 47  func updateFunds (_assetId,_value) = [IntegerEntry(toCompositeKey(k_funds, _assetId), _value)]
50 48  
51 49  
52 50  func strAssetId (_asset) = if (isDefined(_asset))
53 51      then toBase58String(value(_asset))
54 52      else "WAVES"
55 53  
56 54  
57 55  func wavesToSWaves (_waves) = {
58 56      let rateR = invoke(sWavesAddress(), "getRate", nil, nil)
59 57      if ((rateR == rateR))
60 58          then {
61 59              let rate =             match rateR {
62 60                  case x: String => 
63 61                      parseBigIntValue(x)
64 62                  case _ => 
65 63                      throw("Invalid getRate result")
66 64              }
67 65              if ((rate == rate))
68 -                 then {
69 -                     let desiredWaves = (toBigInt(_waves) * WAVES_TO_S_WAVES_PRECISION)
70 -                     let sWavesAmount = (toInt((fraction(desiredWaves, S_WAVES_PRECISION, rate, CEILING) / WAVES_TO_S_WAVES_PRECISION)) + 1)
71 -                     sWavesAmount
72 -                     }
66 +                 then toInt(fraction(toBigInt(_waves), S_WAVES_PRECISION, rate, CEILING))
73 67                  else throw("Strict value is not equal to itself.")
74 68              }
75 69          else throw("Strict value is not equal to itself.")
76 70      }
77 71  
78 72  
79 73  func extractProfit () = {
80 74      let sWavesAmount = assetBalance(this, sWavesAsset())
81 75      if ((sWavesAmount == sWavesAmount))
82 76          then {
83 77              let doWithdraw = invoke(sWavesAddress(), "withdraw", nil, [AttachedPayment(sWavesAsset(), sWavesAmount)])
84 78              if ((doWithdraw == doWithdraw))
85 79                  then {
86 80                      let wavesActualBalance = wavesBalance(this).regular
87 81                      if ((wavesActualBalance == wavesActualBalance))
88 82                          then {
89 83                              let accountingBalance = balanceOf("WAVES")
90 84                              if ((accountingBalance == accountingBalance))
91 85                                  then {
92 86                                      let doVerifyBalance = if ((accountingBalance > wavesActualBalance))
93 87                                          then throw("Invalid state: wavesActualBalance < accountingBalance")
94 88                                          else unit
95 89                                      if ((doVerifyBalance == doVerifyBalance))
96 90                                          then {
97 91                                              let profit = (wavesActualBalance - accountingBalance)
98 92                                              if ((profit == profit))
99 93                                                  then {
100 94                                                      let doDeposit = invoke(sWavesAddress(), "deposit", nil, [AttachedPayment(unit, accountingBalance)])
101 95                                                      if ((doDeposit == doDeposit))
102 96                                                          then profit
103 97                                                          else throw("Strict value is not equal to itself.")
104 98                                                      }
105 99                                                  else throw("Strict value is not equal to itself.")
106 100                                              }
107 101                                          else throw("Strict value is not equal to itself.")
108 102                                      }
109 103                                  else throw("Strict value is not equal to itself.")
110 104                              }
111 105                          else throw("Strict value is not equal to itself.")
112 106                      }
113 107                  else throw("Strict value is not equal to itself.")
114 108              }
115 109          else throw("Strict value is not equal to itself.")
116 110      }
117 111  
118 112  
119 113  @Callable(i)
120 114  func initialize (_coordinator,_sWavesAddress) = if (if (initialized())
121 115      then true
122 116      else (i.caller != this))
123 117      then throw("Unable to initialize")
124 118      else {
125 119          let sWaves = addressFromStringValue(_sWavesAddress)
126 120          let sWavesAssetValue = valueOrErrorMessage(getString(sWaves, "ASSET"), "No sWaves Asset")
127 121  [StringEntry(k_coordinatorAddress, toString(addressFromStringValue(_coordinator))), StringEntry(k_sWavesAddress, toString(sWaves)), StringEntry(k_sWavesAsset, sWavesAssetValue), BooleanEntry(k_initialized, true)]
128 122          }
129 123  
130 124  
131 125  
132 126  @Callable(i)
133 127  func withdraw (_assetId,_amount) = if (if (if (!(isWhitelist(toString(i.caller))))
134 128      then true
135 129      else !(initialized()))
136 130      then true
137 131      else (_amount > balanceOf(_assetId)))
138 132      then throw(((("Invalid withdraw params (simple asset manager) " + toString(_amount)) + " > ") + toString(balanceOf(_assetId))))
139 133      else {
140 134          let currentAssetBalance = (balanceOf(_assetId) - _amount)
141 135          let sWavesAmount = wavesToSWaves(_amount)
142 136          if ((sWavesAmount == sWavesAmount))
143 137              then {
144 138                  let doWithdraw = invoke(sWavesAddress(), "withdraw", nil, [AttachedPayment(sWavesAsset(), sWavesAmount)])
145 139                  if ((doWithdraw == doWithdraw))
146 140                      then (updateFunds(_assetId, currentAssetBalance) ++ [ScriptTransfer(i.caller, _amount, if ((_assetId == "WAVES"))
147 141                          then unit
148 142                          else fromBase58String(_assetId))])
149 143                      else throw("Strict value is not equal to itself.")
150 144                  }
151 145              else throw("Strict value is not equal to itself.")
152 146          }
153 147  
154 148  
155 149  
156 150  @Callable(i)
157 151  func deposit () = {
158 152      let _amount = i.payments[0].amount
159 153      let _assetId = strAssetId(i.payments[0].assetId)
160 154      if (if (!(initialized()))
161 155          then true
162 156          else if (!(isWhitelist(toString(i.caller))))
163 157              then (i.caller != adminAddress())
164 158              else false)
165 159          then throw("Invalid deposit params (simple asset manager)")
166 160          else {
167 161              let doDeposit = invoke(sWavesAddress(), "deposit", nil, [i.payments[0]])
168 162              if ((doDeposit == doDeposit))
169 163                  then {
170 164                      let currentAssetBalance = (balanceOf(_assetId) + _amount)
171 165                      updateFunds(_assetId, currentAssetBalance)
172 166                      }
173 167                  else throw("Strict value is not equal to itself.")
174 168              }
175 169      }
176 170  
177 171  
178 172  
179 173  @Callable(i)
180 174  func claimProfit (_assetId) = if (if (!(initialized()))
181 175      then true
182 176      else (i.caller != managerAddress()))
183 177      then throw("Invalid claimProfit params (sWaves asset manager)")
184 178      else {
185 179          let profit = extractProfit()
186 180          if ((profit == profit))
187 181              then $Tuple2([ScriptTransfer(i.caller, profit, if ((_assetId == "WAVES"))
188 182                  then unit
189 -                 else fromBase58String(_assetId))], 0)
183 +                 else fromBase58String(_assetId))], profit)
190 184              else throw("Strict value is not equal to itself.")
191 185          }
192 186  
193 187  
194 188  
195 189  @Callable(i)
196 190  func view_claimProfit (_assetId) = if (!(initialized()))
197 191      then throw("Invalid view_claimProfit params (sWaves asset manager)")
198 192      else {
199 193          let profit = extractProfit()
200 194          if ((profit == profit))
201 195              then throw(((((toString(balanceOf(_assetId)) + ",") + toString(balanceOf(_assetId))) + ",") + toString(profit)))
202 196              else throw("Strict value is not equal to itself.")
203 197          }
204 198  
205 199  
206 200  @Verifier(tx)
207 201  func verify () = {
208 202      let coordinatorStr = getString(this, k_coordinatorAddress)
209 203      if (isDefined(coordinatorStr))
210 204          then {
211 205              let admin = getString(addressFromStringValue(value(coordinatorStr)), k_admin_address)
212 206              if (isDefined(admin))
213 207                  then valueOrElse(getBoolean(addressFromStringValue(value(admin)), ((("status_" + toString(this)) + "_") + toBase58String(tx.id))), false)
214 208                  else throw("unable to verify: admin not set in coordinator")
215 209              }
216 210          else sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
217 211      }
218 212

Old	New		Differences
39	39		func sWavesAsset () = fromBase58String(getStringValue(this, k_sWavesAsset))
40	40
41	41
42		-	let WAVES_TO_S_WAVES_PRECISION = parseBigIntValue("10000")
43		-
44	42		let S_WAVES_PRECISION = parseBigIntValue("1000000000000")
45	43
46	44		func isWhitelist (_address) = (_address == toString(managerAddress()))

65	63		throw("Invalid getRate result")
66	64		}
67	65		if ((rate == rate))
68		-	then {
69		-	let desiredWaves = (toBigInt(_waves) * WAVES_TO_S_WAVES_PRECISION)
70		-	let sWavesAmount = (toInt((fraction(desiredWaves, S_WAVES_PRECISION, rate, CEILING) / WAVES_TO_S_WAVES_PRECISION)) + 1)
71		-	sWavesAmount
72		-	}
	66	+	then toInt(fraction(toBigInt(_waves), S_WAVES_PRECISION, rate, CEILING))
73	67		else throw("Strict value is not equal to itself.")
74	68		}
75	69		else throw("Strict value is not equal to itself.")

186	180		if ((profit == profit))
187	181		then $Tuple2([ScriptTransfer(i.caller, profit, if ((_assetId == "WAVES"))
188	182		then unit
189		-	else fromBase58String(_assetId))], 0)
	183	+	else fromBase58String(_assetId))], profit)
190	184		else throw("Strict value is not equal to itself.")
191	185		}
192	186

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let k_funds = "k_funds"
5	5
6	6		let k_sWavesAddress = "k_sWavesAddress"
7	7
8	8		let k_sWavesAsset = "k_sWavesAsset"
9	9
10	10		let k_coordinatorAddress = "k_coordinatorAddress"
11	11
12	12		let k_manager_address = "k_manager_address"
13	13
14	14		let k_admin_address = "k_admin_address"
15	15
16	16		let k_initialized = "k_initialized"
17	17
18	18		func toCompositeKey (_key,_address) = ((_key + "_") + _address)
19	19
20	20
21	21		func balanceOf (_assetId) = valueOrElse(getInteger(this, toCompositeKey(k_funds, _assetId)), 0)
22	22
23	23
24	24		func coordinator () = valueOrErrorMessage(addressFromString(getStringValue(this, k_coordinatorAddress)), "Coordinator not set Simple Asset Manager")
25	25
26	26
27	27		func managerAddress () = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(coordinator(), k_manager_address), "Manager not set")), "Manager not set")
28	28
29	29
30	30		func initialized () = valueOrElse(getBoolean(this, k_initialized), false)
31	31
32	32
33	33		func adminAddress () = addressFromString(getStringValue(coordinator(), k_admin_address))
34	34
35	35
36	36		func sWavesAddress () = addressFromStringValue(getStringValue(this, k_sWavesAddress))
37	37
38	38
39	39		func sWavesAsset () = fromBase58String(getStringValue(this, k_sWavesAsset))
40	40
41	41
42		-	let WAVES_TO_S_WAVES_PRECISION = parseBigIntValue("10000")
43		-
44	42		let S_WAVES_PRECISION = parseBigIntValue("1000000000000")
45	43
46	44		func isWhitelist (_address) = (_address == toString(managerAddress()))
47	45
48	46
49	47		func updateFunds (_assetId,_value) = [IntegerEntry(toCompositeKey(k_funds, _assetId), _value)]
50	48
51	49
52	50		func strAssetId (_asset) = if (isDefined(_asset))
53	51		then toBase58String(value(_asset))
54	52		else "WAVES"
55	53
56	54
57	55		func wavesToSWaves (_waves) = {
58	56		let rateR = invoke(sWavesAddress(), "getRate", nil, nil)
59	57		if ((rateR == rateR))
60	58		then {
61	59		let rate = match rateR {
62	60		case x: String =>
63	61		parseBigIntValue(x)
64	62		case _ =>
65	63		throw("Invalid getRate result")
66	64		}
67	65		if ((rate == rate))
68		-	then {
69		-	let desiredWaves = (toBigInt(_waves) * WAVES_TO_S_WAVES_PRECISION)
70		-	let sWavesAmount = (toInt((fraction(desiredWaves, S_WAVES_PRECISION, rate, CEILING) / WAVES_TO_S_WAVES_PRECISION)) + 1)
71		-	sWavesAmount
72		-	}
	66	+	then toInt(fraction(toBigInt(_waves), S_WAVES_PRECISION, rate, CEILING))
73	67		else throw("Strict value is not equal to itself.")
74	68		}
75	69		else throw("Strict value is not equal to itself.")
76	70		}
77	71
78	72
79	73		func extractProfit () = {
80	74		let sWavesAmount = assetBalance(this, sWavesAsset())
81	75		if ((sWavesAmount == sWavesAmount))
82	76		then {
83	77		let doWithdraw = invoke(sWavesAddress(), "withdraw", nil, [AttachedPayment(sWavesAsset(), sWavesAmount)])
84	78		if ((doWithdraw == doWithdraw))
85	79		then {
86	80		let wavesActualBalance = wavesBalance(this).regular
87	81		if ((wavesActualBalance == wavesActualBalance))
88	82		then {
89	83		let accountingBalance = balanceOf("WAVES")
90	84		if ((accountingBalance == accountingBalance))
91	85		then {
92	86		let doVerifyBalance = if ((accountingBalance > wavesActualBalance))
93	87		then throw("Invalid state: wavesActualBalance < accountingBalance")
94	88		else unit
95	89		if ((doVerifyBalance == doVerifyBalance))
96	90		then {
97	91		let profit = (wavesActualBalance - accountingBalance)
98	92		if ((profit == profit))
99	93		then {
100	94		let doDeposit = invoke(sWavesAddress(), "deposit", nil, [AttachedPayment(unit, accountingBalance)])
101	95		if ((doDeposit == doDeposit))
102	96		then profit
103	97		else throw("Strict value is not equal to itself.")
104	98		}
105	99		else throw("Strict value is not equal to itself.")
106	100		}
107	101		else throw("Strict value is not equal to itself.")
108	102		}
109	103		else throw("Strict value is not equal to itself.")
110	104		}
111	105		else throw("Strict value is not equal to itself.")
112	106		}
113	107		else throw("Strict value is not equal to itself.")
114	108		}
115	109		else throw("Strict value is not equal to itself.")
116	110		}
117	111
118	112
119	113		@Callable(i)
120	114		func initialize (_coordinator,_sWavesAddress) = if (if (initialized())
121	115		then true
122	116		else (i.caller != this))
123	117		then throw("Unable to initialize")
124	118		else {
125	119		let sWaves = addressFromStringValue(_sWavesAddress)
126	120		let sWavesAssetValue = valueOrErrorMessage(getString(sWaves, "ASSET"), "No sWaves Asset")
127	121		[StringEntry(k_coordinatorAddress, toString(addressFromStringValue(_coordinator))), StringEntry(k_sWavesAddress, toString(sWaves)), StringEntry(k_sWavesAsset, sWavesAssetValue), BooleanEntry(k_initialized, true)]
128	122		}
129	123
130	124
131	125
132	126		@Callable(i)
133	127		func withdraw (_assetId,_amount) = if (if (if (!(isWhitelist(toString(i.caller))))
134	128		then true
135	129		else !(initialized()))
136	130		then true
137	131		else (_amount > balanceOf(_assetId)))
138	132		then throw(((("Invalid withdraw params (simple asset manager) " + toString(_amount)) + " > ") + toString(balanceOf(_assetId))))
139	133		else {
140	134		let currentAssetBalance = (balanceOf(_assetId) - _amount)
141	135		let sWavesAmount = wavesToSWaves(_amount)
142	136		if ((sWavesAmount == sWavesAmount))
143	137		then {
144	138		let doWithdraw = invoke(sWavesAddress(), "withdraw", nil, [AttachedPayment(sWavesAsset(), sWavesAmount)])
145	139		if ((doWithdraw == doWithdraw))
146	140		then (updateFunds(_assetId, currentAssetBalance) ++ [ScriptTransfer(i.caller, _amount, if ((_assetId == "WAVES"))
147	141		then unit
148	142		else fromBase58String(_assetId))])
149	143		else throw("Strict value is not equal to itself.")
150	144		}
151	145		else throw("Strict value is not equal to itself.")
152	146		}
153	147
154	148
155	149
156	150		@Callable(i)
157	151		func deposit () = {
158	152		let _amount = i.payments[0].amount
159	153		let _assetId = strAssetId(i.payments[0].assetId)
160	154		if (if (!(initialized()))
161	155		then true
162	156		else if (!(isWhitelist(toString(i.caller))))
163	157		then (i.caller != adminAddress())
164	158		else false)
165	159		then throw("Invalid deposit params (simple asset manager)")
166	160		else {
167	161		let doDeposit = invoke(sWavesAddress(), "deposit", nil, [i.payments[0]])
168	162		if ((doDeposit == doDeposit))
169	163		then {
170	164		let currentAssetBalance = (balanceOf(_assetId) + _amount)
171	165		updateFunds(_assetId, currentAssetBalance)
172	166		}
173	167		else throw("Strict value is not equal to itself.")
174	168		}
175	169		}
176	170
177	171
178	172
179	173		@Callable(i)
180	174		func claimProfit (_assetId) = if (if (!(initialized()))
181	175		then true
182	176		else (i.caller != managerAddress()))
183	177		then throw("Invalid claimProfit params (sWaves asset manager)")
184	178		else {
185	179		let profit = extractProfit()
186	180		if ((profit == profit))
187	181		then $Tuple2([ScriptTransfer(i.caller, profit, if ((_assetId == "WAVES"))
188	182		then unit
189		-	else fromBase58String(_assetId))], 0)
	183	+	else fromBase58String(_assetId))], profit)
190	184		else throw("Strict value is not equal to itself.")
191	185		}
192	186
193	187
194	188
195	189		@Callable(i)
196	190		func view_claimProfit (_assetId) = if (!(initialized()))
197	191		then throw("Invalid view_claimProfit params (sWaves asset manager)")
198	192		else {
199	193		let profit = extractProfit()
200	194		if ((profit == profit))
201	195		then throw(((((toString(balanceOf(_assetId)) + ",") + toString(balanceOf(_assetId))) + ",") + toString(profit)))
202	196		else throw("Strict value is not equal to itself.")
203	197		}
204	198
205	199
206	200		@Verifier(tx)
207	201		func verify () = {
208	202		let coordinatorStr = getString(this, k_coordinatorAddress)
209	203		if (isDefined(coordinatorStr))
210	204		then {
211	205		let admin = getString(addressFromStringValue(value(coordinatorStr)), k_admin_address)
212	206		if (isDefined(admin))
213	207		then valueOrElse(getBoolean(addressFromStringValue(value(admin)), ((("status_" + toString(this)) + "_") + toBase58String(tx.id))), false)
214	208		else throw("unable to verify: admin not set in coordinator")
215	209		}
216	210		else sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
217	211		}
218	212

github/deemru/w8io/873ac7e 
32.82 ms ◑