w8 · tx · J65···8DN

tx · J65DvWsrD6ZHhSEaU2wehVvbVMZTGLFfGctRKSHUz8DN

3MvGMtmdY1eSW4iY922zj5bx8hBfyP1qgHo:  -0.04000000 Waves

2021.09.05 01:17 [1688889] smart account 3MvGMtmdY1eSW4iY922zj5bx8hBfyP1qgHo > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "J65DvWsrD6ZHhSEaU2wehVvbVMZTGLFfGctRKSHUz8DN",
    "fee": 4000000,
    "feeAssetId": null,
    "timestamp": 1630793881499,
    "version": 2,
    "chainId": 84,
    "sender": "3MvGMtmdY1eSW4iY922zj5bx8hBfyP1qgHo",
    "senderPublicKey": "CD4N2SBeZVBUwmtsqwfmQ3ZKnBP3AxpZCvJ5QkHytUed",
    "proofs": [
        "uUe8H5Nk8HNrKqh5Ch2owEeTHPGkfPi4SfZFYyq8RsN3DX9SQELdYvCKWGpgfFcUhiqXQao2ZT6AJza8nF6VpMv"
    ],
    "script": "base64:AAIFAAAAAAAAACkIAhIECgIIGBIDCgEIEgMKAQgSBAoCCAQSAwoBCBIDCgEIEgUKAwgIAQAAAAwAAAAABmNvbmZpZwkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwIAAAAGY29uZmlnAgAAAAAAAAAABWFkbWluCQEAAAALdmFsdWVPckVsc2UAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAZjb25maWcCAAAABWFkbWluAgAAAAAAAAAABXBvb2xzCQEAAAALdmFsdWVPckVsc2UAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzAgAAAAVwb29scwIAAAAAAQAAAAdpc0FkbWluAAAAAQAAAA1jYWxsZXJBZGRyZXNzAwkAAAAAAAACBQAAAA1jYWxsZXJBZGRyZXNzCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAVhZG1pbgYHAQAAAAljaGVja1Bvb2wAAAABAAAAB3Bvb2xBZGQDCQEAAAAIY29udGFpbnMAAAACBQAAAAVwb29scwUAAAAHcG9vbEFkZAYHAQAAAAt3cml0ZVN0cmluZwAAAAIAAAADa2V5AAAAC3N0cmluZ1ZhbHVlCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAANrZXkFAAAAC3N0cmluZ1ZhbHVlAQAAAAx3cml0ZUludGVnZXIAAAACAAAAA2tleQAAAAxpbnRlZ2VyVmFsdWUJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAANrZXkFAAAADGludGVnZXJWYWx1ZQEAAAASY2hlY2tQb29sTGlxdWlkaXR5AAAAAgAAAAtwb29sQWRkcmVzcwAAAAZhbW91bnQEAAAAC3RvdGFsU3VwcGx5CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAtwb29sQWRkcmVzcwIAAAALdG90YWxTdXBwbHkEAAAAC3RvdGFsQm9ycm93CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAtwb29sQWRkcmVzcwIAAAALdG90YWxCb3Jyb3cEAAAAEmF2YWlsYWJsZUxpcXVpZGl0eQkAAGUAAAACBQAAAAt0b3RhbFN1cHBseQUAAAALdG90YWxCb3Jyb3cDCQAAZwAAAAIFAAAAEmF2YWlsYWJsZUxpcXVpZGl0eQUAAAAGYW1vdW50BgcBAAAAEmdldEhlYWx0aFBhcmFtZXRlcgAAAAYAAAAEdXNlcgAAAAtwb29sQWRkcmVzcwAAAA1uZXdEZWJ0QW1vdW50AAAACW5ld0RlYnRJZAAAABBjb2xsYXRlcmFsQW1vdW50AAAADGNvbGxhdGVyYWxJZAQAAAAGcmVzdWx0CQAD/AAAAAQJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAC3Bvb2xBZGRyZXNzAgAAABZnZXRVc2VySGVhbHRoUGFyYW1ldGVyCQAETAAAAAIFAAAABHVzZXIJAARMAAAAAgUAAAAQY29sbGF0ZXJhbEFtb3VudAkABEwAAAACBQAAAAxjb2xsYXRlcmFsSWQJAARMAAAAAgUAAAANbmV3RGVidEFtb3VudAkABEwAAAACBQAAAAluZXdEZWJ0SWQFAAAAA25pbAUAAAADbmlsBAAAAAckbWF0Y2gwBQAAAAZyZXN1bHQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACihJbnQsIEludCkEAAAAAXQFAAAAByRtYXRjaDAFAAAAAXQJAAACAAAAAQIAAAAOV3JvbmcgRGF0YXR5cCEBAAAAEGNhbGNIZWFsdGhGYWN0b3IAAAACAAAADmJvcnJvd0NhcGFjaXR5AAAAEmJvcnJvd0NhcGFjaXR5VXNlZAkAAGsAAAADCQAAZQAAAAIFAAAADmJvcnJvd0NhcGFjaXR5BQAAABJib3Jyb3dDYXBhY2l0eVVzZWQAAAAAAAAAA+gFAAAADmJvcnJvd0NhcGFjaXR5AQAAABNjYWxjQm9ycm93Q0JvcnJvd0NVAAAABQAAAAR1c2VyAAAADW5ld0RlYnRBbW91bnQAAAAJbmV3RGVidElkAAAAEGNvbGxhdGVyYWxBbW91bnQAAAAMY29sbGF0ZXJhbElkBAAAAAhwb29sTGlzdAkABLUAAAACBQAAAAVwb29scwIAAAABOwQAAAAIbGlzdFNpemUJAAGQAAAAAQUAAAAIcG9vbExpc3QKAQAAAAlmb2xkUG9vbHMAAAACAAAABWFjY3VtAAAABG5leHQEAAAADGhlYWx0aFBhcmFtcwkBAAAAEmdldEhlYWx0aFBhcmFtZXRlcgAAAAYFAAAABHVzZXIFAAAABG5leHQFAAAADW5ld0RlYnRBbW91bnQFAAAACW5ld0RlYnRJZAUAAAAQY29sbGF0ZXJhbEFtb3VudAUAAAAMY29sbGF0ZXJhbElkBAAAAAckbWF0Y2gwBQAAAAxoZWFsdGhQYXJhbXMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACihJbnQsIEludCkEAAAAAXQFAAAAByRtYXRjaDAJAAUUAAAAAgkAAGQAAAACCAUAAAAFYWNjdW0AAAACXzEIBQAAAAxoZWFsdGhQYXJhbXMAAAACXzEJAABkAAAAAggFAAAABWFjY3VtAAAAAl8yCAUAAAAMaGVhbHRoUGFyYW1zAAAAAl8xBAAAAAFlBQAAAAckbWF0Y2gwCQAAAgAAAAECAAAABFRlc3QEAAAADSRsaXN0MjI4NzIzMjEFAAAACHBvb2xMaXN0BAAAAA0kc2l6ZTIyODcyMzIxCQABkAAAAAEFAAAADSRsaXN0MjI4NzIzMjEEAAAADSRhY2MwMjI4NzIzMjEJAAUUAAAAAgAAAAAAAAAAAAAAAAAAAAAAAAMJAAAAAAAAAgUAAAANJHNpemUyMjg3MjMyMQAAAAAAAAAAAAUAAAANJGFjYzAyMjg3MjMyMQQAAAANJGFjYzEyMjg3MjMyMQkBAAAACWZvbGRQb29scwAAAAIFAAAADSRhY2MwMjI4NzIzMjEJAAGRAAAAAgUAAAANJGxpc3QyMjg3MjMyMQAAAAAAAAAAAAMJAAAAAAAAAgUAAAANJHNpemUyMjg3MjMyMQAAAAAAAAAAAQUAAAANJGFjYzEyMjg3MjMyMQQAAAANJGFjYzIyMjg3MjMyMQkBAAAACWZvbGRQb29scwAAAAIFAAAADSRhY2MxMjI4NzIzMjEJAAGRAAAAAgUAAAANJGxpc3QyMjg3MjMyMQAAAAAAAAAAAQMJAAAAAAAAAgUAAAANJHNpemUyMjg3MjMyMQAAAAAAAAAAAgUAAAANJGFjYzIyMjg3MjMyMQQAAAANJGFjYzMyMjg3MjMyMQkBAAAACWZvbGRQb29scwAAAAIFAAAADSRhY2MyMjI4NzIzMjEJAAGRAAAAAgUAAAANJGxpc3QyMjg3MjMyMQAAAAAAAAAAAgkAAAIAAAABAgAAABJMaXN0IHNpemUgZXhjZWVkIDIBAAAAD2NoZWNrVXNlckhlYWx0aAAAAAUAAAAEdXNlcgAAAA1uZXdEZWJ0QW1vdW50AAAACW5ld0RlYnRJZAAAABBjb2xsYXRlcmFsQW1vdW50AAAADGNvbGxhdGVyYWxJZAQAAAAFYmNCY3UJAQAAABNjYWxjQm9ycm93Q0JvcnJvd0NVAAAABQUAAAAEdXNlcgUAAAANbmV3RGVidEFtb3VudAUAAAAJbmV3RGVidElkBQAAABBjb2xsYXRlcmFsQW1vdW50BQAAAAxjb2xsYXRlcmFsSWQEAAAACnVzZXJIZWFsdGgJAQAAABBjYWxjSGVhbHRoRmFjdG9yAAAAAggFAAAABWJjQmN1AAAAAl8xCAUAAAAFYmNCY3UAAAACXzIDCQAAZwAAAAIFAAAACnVzZXJIZWFsdGgAAAAAAAAAAAAGBwAAAAcAAAABaQEAAAAFc2V0dXAAAAACAAAADWNvbmZpZ0FkZHJlc3MAAAAFcG9vbHMDAwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAR0aGlzAgAAAAZjb25maWcJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAAEdGhpcwIAAAAFcG9vbHMHCQAETAAAAAIJAQAAAAt3cml0ZVN0cmluZwAAAAICAAAABmNvbmZpZwUAAAANY29uZmlnQWRkcmVzcwkABEwAAAACCQEAAAALd3JpdGVTdHJpbmcAAAACAgAAAAVwb29scwkABLkAAAACBQAAAAVwb29scwIAAAABOwUAAAADbmlsCQAAAgAAAAECAAAAKkFkbWluIGFuZCBjb25maWcgYWRkcmVzcyBhbHJlYWR5IGRlZmluaWVkIQAAAAFpAQAAAAdhZGRQb29sAAAAAQAAAAtwb29sQWRkcmVzcwMJAQAAAAdpc0FkbWluAAAAAQgFAAAAAWkAAAAGY2FsbGVyBAAAAAhwb29sTGlzdAkABLUAAAACBQAAAAVwb29scwIAAAABOwMJAAAAAAAAAgkBAAAAD2NvbnRhaW5zRWxlbWVudAAAAAIFAAAACHBvb2xMaXN0BQAAAAtwb29sQWRkcmVzcwcEAAAACG5ld1Bvb2xzCQAETQAAAAIFAAAACHBvb2xMaXN0BQAAAAtwb29sQWRkcmVzcwkABEwAAAACCQEAAAALd3JpdGVTdHJpbmcAAAACAgAAAAVwb29scwkABLkAAAACBQAAAAhuZXdQb29scwIAAAABOwUAAAADbmlsCQAAAgAAAAECAAAAFFBvb2wgYWxyZWFkeSBleGlzdHMhCQAAAgAAAAECAAAAKkFkZHJlc3MgZG9lcyBub3QgbWF0Y2ggd2l0aCBhZG1pbiBhZGRyZXNzIQAAAAFpAQAAAAx1cGRhdGVDb25maWcAAAABAAAADWNvbmZpZ0FkZHJlc3MDCQEAAAAHaXNBZG1pbgAAAAEIBQAAAAFpAAAABmNhbGxlcgkABEwAAAACCQEAAAALd3JpdGVTdHJpbmcAAAACAgAAAAZjb25maWcFAAAADWNvbmZpZ0FkZHJlc3MFAAAAA25pbAkAAAIAAAABAgAAACpBZGRyZXNzIGRvZXMgbm90IG1hdGNoIHdpdGggYWRtaW4gYWRkcmVzcyEAAAABaQEAAAAJZGVwb3NpdEF0AAAAAgAAAAtwb29sQWRkcmVzcwAAAAxpc0NvbGxhdGVyYWwDCQEAAAAJY2hlY2tQb29sAAAAAQUAAAALcG9vbEFkZHJlc3MDCQAAZgAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAABHVzZXIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAALdG9rZW5BbW91bnQJAAP8AAAABAkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAALcG9vbEFkZHJlc3MCAAAAB2RlcG9zaXQJAARMAAAAAgUAAAAEdXNlcgkABEwAAAACBQAAAAxpc0NvbGxhdGVyYWwFAAAAA25pbAgFAAAAAWkAAAAIcGF5bWVudHMDCQAAAAAAAAIFAAAAC3Rva2VuQW1vdW50BQAAAAt0b2tlbkFtb3VudAQAAAAHdG9rZW5JZAkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAALcG9vbEFkZHJlc3MCAAAACGRUb2tlbklkBAAAAAckbWF0Y2gwBQAAAAt0b2tlbkFtb3VudAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAF0BQAAAAckbWF0Y2gwCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAABdAkAAlkAAAABBQAAAAd0b2tlbklkBQAAAANuaWwDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABdAUAAAAHJG1hdGNoMAUAAAADbmlsCQAAAgAAAAECAAAAGEluY29ycmVjdCBpbnZva2UgcmVzdWx0IQkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAUTm8gcGF5bWVudCBhdHRhY2hlZCEJAAACAAAAAQIAAAAXUG9vbCBhZGRyZXNzIG5vdCBmb3VuZCEAAAABaQEAAAAMd2l0aGRyYXdGcm9tAAAAAQAAAAtwb29sQWRkcmVzcwMJAQAAAAljaGVja1Bvb2wAAAABBQAAAAtwb29sQWRkcmVzcwQAAAAIZFRva2VuSWQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAC3Bvb2xBZGRyZXNzAgAAAAhkVG9rZW5JZAMJAAAAAAAAAgkAAlkAAAABBQAAAAhkVG9rZW5JZAgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAHYXNzZXRJZAMJAABmAAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAQAAAAEdXNlcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAt0b2tlbkFtb3VudAkAA/wAAAAECQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAtwb29sQWRkcmVzcwIAAAAId2l0aGRyYXcJAARMAAAAAgUAAAAEdXNlcgUAAAADbmlsCAUAAAABaQAAAAhwYXltZW50cwMJAAAAAAAAAgUAAAALdG9rZW5BbW91bnQFAAAAC3Rva2VuQW1vdW50BAAAAAd0b2tlbklkCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAtwb29sQWRkcmVzcwIAAAAHYXNzZXRJZAQAAAAHJG1hdGNoMAUAAAALdG9rZW5BbW91bnQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABdAUAAAAHJG1hdGNoMAMJAAAAAAAAAgUAAAAHdG9rZW5JZAIAAAAFV0FWRVMJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAF0BQAAAAR1bml0BQAAAANuaWwJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAF0CQACWQAAAAEFAAAAB3Rva2VuSWQFAAAAA25pbAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAF0BQAAAAckbWF0Y2gwBQAAAANuaWwJAAACAAAAAQIAAAAYSW5jb3JyZWN0IGludm9rZSByZXN1bHQhCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAABRObyBwYXltZW50IGF0dGFjaGVkIQkAAAIAAAABAgAAABdBc3NldElkcyBkb2VzIG5vdCBtYXRjaAkAAAIAAAABAgAAABdQb29sIGFkZHJlc3Mgbm90IGZvdW5kIQAAAAFpAQAAABJsb2NrQXNDb2xsYXRlcmFsQXQAAAABAAAAC3Bvb2xBZGRyZXNzAwkBAAAACWNoZWNrUG9vbAAAAAEFAAAAC3Bvb2xBZGRyZXNzBAAAAAhkVG9rZW5JZAkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAALcG9vbEFkZHJlc3MCAAAACGRUb2tlbklkAwkAAAAAAAACCQACWQAAAAEFAAAACGRUb2tlbklkCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAdhc3NldElkAwkAAGYAAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAAR1c2VyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAA21zZwkAA/wAAAAECQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAtwb29sQWRkcmVzcwIAAAAQbG9ja0FzQ29sbGF0ZXJhbAkABEwAAAACBQAAAAR1c2VyBQAAAANuaWwIBQAAAAFpAAAACHBheW1lbnRzAwkAAAAAAAACBQAAAANtc2cFAAAAA21zZwQAAAAHJG1hdGNoMAUAAAADbXNnAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAXQFAAAAByRtYXRjaDAFAAAAA25pbAkAAAIAAAABAgAAABhJbmNvcnJlY3QgaW52b2tlIHJlc3VsdCEJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAFE5vIHBheW1lbnQgYXR0YWNoZWQhCQAAAgAAAAECAAAAF0Fzc2V0SWRzIGRvZXMgbm90IG1hdGNoCQAAAgAAAAECAAAAF1Bvb2wgYWRkcmVzcyBub3QgZm91bmQhAAAAAWkBAAAACmJvcnJvd0Zyb20AAAADAAAAC3Bvb2xBZGRyZXNzAAAAB2Fzc2V0SWQAAAAGYW1vdW50AwkBAAAACWNoZWNrUG9vbAAAAAEFAAAAC3Bvb2xBZGRyZXNzBAAAAAlwb29sQXNzZXQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAC3Bvb2xBZGRyZXNzAgAAAAdhc3NldElkAwkAAAAAAAACBQAAAAlwb29sQXNzZXQFAAAAB2Fzc2V0SWQDCQEAAAASY2hlY2tQb29sTGlxdWlkaXR5AAAAAgUAAAALcG9vbEFkZHJlc3MFAAAABmFtb3VudAQAAAAEdXNlcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBQAAAANuaWwJAAACAAAAAQIAAAAhUG9vbCBsaXF1aWRpdHkgaXMgbm90IHN1ZmZpY2llbnQhCQAAAgAAAAECAAAAF0Fzc2V0SWRzIGRvZXMgbm90IG1hdGNoCQAAAgAAAAECAAAAF1Bvb2wgYWRkcmVzcyBub3QgZm91bmQhAAAAAJJmncU=",
    "height": 1688889,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: kQh498785yCrqktLLhR6ngKrer8N3qtn2rexdG1LbVH
Next: HTJ3HgBmFsnQYV2RYceizJivKZewYYtousKdAFE9DABR

Diff: 
Old New Differences
212 212              then if (checkPoolLiquidity(poolAddress, amount))
213 213                  then {
214 214                      let user = toBase58String(i.caller.bytes)
215 -                     if (checkUserHealth(user, amount, assetId, 0, ""))
216 -                         then [writeString("borrowTEST", "Success")]
217 -                         else throw("Borrow exceeds user health!")
215 +                     nil
218 216                      }
219 217                  else throw("Pool liquidity is not sufficient!")
220 218              else throw("AssetIds does not match")
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let config = valueOrElse(getStringValue(this, "config"), "")
5 5  
6 6  let admin = valueOrElse(getStringValue(addressFromStringValue(config), "admin"), "")
7 7  
8 8  let pools = valueOrElse(getStringValue(this, "pools"), "")
9 9  
10 10  func isAdmin (callerAddress) = if ((callerAddress == addressFromStringValue(admin)))
11 11      then true
12 12      else false
13 13  
14 14  
15 15  func checkPool (poolAdd) = if (contains(pools, poolAdd))
16 16      then true
17 17      else false
18 18  
19 19  
20 20  func writeString (key,stringValue) = StringEntry(key, stringValue)
21 21  
22 22  
23 23  func writeInteger (key,integerValue) = IntegerEntry(key, integerValue)
24 24  
25 25  
26 26  func checkPoolLiquidity (poolAddress,amount) = {
27 27      let totalSupply = getIntegerValue(addressFromStringValue(poolAddress), "totalSupply")
28 28      let totalBorrow = getIntegerValue(addressFromStringValue(poolAddress), "totalBorrow")
29 29      let availableLiquidity = (totalSupply - totalBorrow)
30 30      if ((availableLiquidity >= amount))
31 31          then true
32 32          else false
33 33      }
34 34  
35 35  
36 36  func getHealthParameter (user,poolAddress,newDebtAmount,newDebtId,collateralAmount,collateralId) = {
37 37      let result = invoke(addressFromStringValue(poolAddress), "getUserHealthParameter", [user, collateralAmount, collateralId, newDebtAmount, newDebtId], nil)
38 38      match result {
39 39          case t: (Int, Int) => 
40 40              t
41 41          case _ => 
42 42              throw("Wrong Datatyp!")
43 43      }
44 44      }
45 45  
46 46  
47 47  func calcHealthFactor (borrowCapacity,borrowCapacityUsed) = fraction((borrowCapacity - borrowCapacityUsed), 1000, borrowCapacity)
48 48  
49 49  
50 50  func calcBorrowCBorrowCU (user,newDebtAmount,newDebtId,collateralAmount,collateralId) = {
51 51      let poolList = split(pools, ";")
52 52      let listSize = size(poolList)
53 53      func foldPools (accum,next) =     {
54 54          let healthParams = getHealthParameter(user, next, newDebtAmount, newDebtId, collateralAmount, collateralId)
55 55          match healthParams {
56 56              case t: (Int, Int) => 
57 57                  $Tuple2((accum._1 + healthParams._1), (accum._2 + healthParams._1))
58 58              case e => 
59 59                  throw("Test")
60 60          }
61 61          }
62 62  
63 63      let $list22872321 = poolList
64 64      let $size22872321 = size($list22872321)
65 65      let $acc022872321 = $Tuple2(0, 0)
66 66      if (($size22872321 == 0))
67 67          then $acc022872321
68 68          else {
69 69              let $acc122872321 = foldPools($acc022872321, $list22872321[0])
70 70              if (($size22872321 == 1))
71 71                  then $acc122872321
72 72                  else {
73 73                      let $acc222872321 = foldPools($acc122872321, $list22872321[1])
74 74                      if (($size22872321 == 2))
75 75                          then $acc222872321
76 76                          else {
77 77                              let $acc322872321 = foldPools($acc222872321, $list22872321[2])
78 78                              throw("List size exceed 2")
79 79                              }
80 80                      }
81 81              }
82 82      }
83 83  
84 84  
85 85  func checkUserHealth (user,newDebtAmount,newDebtId,collateralAmount,collateralId) = {
86 86      let bcBcu = calcBorrowCBorrowCU(user, newDebtAmount, newDebtId, collateralAmount, collateralId)
87 87      let userHealth = calcHealthFactor(bcBcu._1, bcBcu._2)
88 88      if ((userHealth >= 0))
89 89          then true
90 90          else false
91 91      }
92 92  
93 93  
94 94  @Callable(i)
95 95  func setup (configAddress,pools) = if (if (!(isDefined(getString(this, "config"))))
96 96      then !(isDefined(getString(this, "pools")))
97 97      else false)
98 98      then [writeString("config", configAddress), writeString("pools", makeString(pools, ";"))]
99 99      else throw("Admin and config address already definied!")
100 100  
101 101  
102 102  
103 103  @Callable(i)
104 104  func addPool (poolAddress) = if (isAdmin(i.caller))
105 105      then {
106 106          let poolList = split(pools, ";")
107 107          if ((containsElement(poolList, poolAddress) == false))
108 108              then {
109 109                  let newPools = (poolList :+ poolAddress)
110 110  [writeString("pools", makeString(newPools, ";"))]
111 111                  }
112 112              else throw("Pool already exists!")
113 113          }
114 114      else throw("Address does not match with admin address!")
115 115  
116 116  
117 117  
118 118  @Callable(i)
119 119  func updateConfig (configAddress) = if (isAdmin(i.caller))
120 120      then [writeString("config", configAddress)]
121 121      else throw("Address does not match with admin address!")
122 122  
123 123  
124 124  
125 125  @Callable(i)
126 126  func depositAt (poolAddress,isCollateral) = if (checkPool(poolAddress))
127 127      then if ((size(i.payments) > 0))
128 128          then {
129 129              let user = toBase58String(i.caller.bytes)
130 130              let tokenAmount = invoke(addressFromStringValue(poolAddress), "deposit", [user, isCollateral], i.payments)
131 131              if ((tokenAmount == tokenAmount))
132 132                  then {
133 133                      let tokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
134 134                      match tokenAmount {
135 135                          case t: Int => 
136 136  [ScriptTransfer(i.caller, t, fromBase58String(tokenId))]
137 137                          case t: String => 
138 138                              nil
139 139                          case _ => 
140 140                              throw("Incorrect invoke result!")
141 141                      }
142 142                      }
143 143                  else throw("Strict value is not equal to itself.")
144 144              }
145 145          else throw("No payment attached!")
146 146      else throw("Pool address not found!")
147 147  
148 148  
149 149  
150 150  @Callable(i)
151 151  func withdrawFrom (poolAddress) = if (checkPool(poolAddress))
152 152      then {
153 153          let dTokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
154 154          if ((fromBase58String(dTokenId) == i.payments[0].assetId))
155 155              then if ((size(i.payments) > 0))
156 156                  then {
157 157                      let user = toBase58String(i.caller.bytes)
158 158                      let tokenAmount = invoke(addressFromStringValue(poolAddress), "withdraw", [user], i.payments)
159 159                      if ((tokenAmount == tokenAmount))
160 160                          then {
161 161                              let tokenId = getStringValue(addressFromStringValue(poolAddress), "assetId")
162 162                              match tokenAmount {
163 163                                  case t: Int => 
164 164                                      if ((tokenId == "WAVES"))
165 165                                          then [ScriptTransfer(i.caller, t, unit)]
166 166                                          else [ScriptTransfer(i.caller, t, fromBase58String(tokenId))]
167 167                                  case t: String => 
168 168                                      nil
169 169                                  case _ => 
170 170                                      throw("Incorrect invoke result!")
171 171                              }
172 172                              }
173 173                          else throw("Strict value is not equal to itself.")
174 174                      }
175 175                  else throw("No payment attached!")
176 176              else throw("AssetIds does not match")
177 177          }
178 178      else throw("Pool address not found!")
179 179  
180 180  
181 181  
182 182  @Callable(i)
183 183  func lockAsCollateralAt (poolAddress) = if (checkPool(poolAddress))
184 184      then {
185 185          let dTokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
186 186          if ((fromBase58String(dTokenId) == i.payments[0].assetId))
187 187              then if ((size(i.payments) > 0))
188 188                  then {
189 189                      let user = toBase58String(i.caller.bytes)
190 190                      let msg = invoke(addressFromStringValue(poolAddress), "lockAsCollateral", [user], i.payments)
191 191                      if ((msg == msg))
192 192                          then                         match msg {
193 193                              case t: String => 
194 194                                  nil
195 195                              case _ => 
196 196                                  throw("Incorrect invoke result!")
197 197                          }
198 198                          else throw("Strict value is not equal to itself.")
199 199                      }
200 200                  else throw("No payment attached!")
201 201              else throw("AssetIds does not match")
202 202          }
203 203      else throw("Pool address not found!")
204 204  
205 205  
206 206  
207 207  @Callable(i)
208 208  func borrowFrom (poolAddress,assetId,amount) = if (checkPool(poolAddress))
209 209      then {
210 210          let poolAsset = getStringValue(addressFromStringValue(poolAddress), "assetId")
211 211          if ((poolAsset == assetId))
212 212              then if (checkPoolLiquidity(poolAddress, amount))
213 213                  then {
214 214                      let user = toBase58String(i.caller.bytes)
215 -                     if (checkUserHealth(user, amount, assetId, 0, ""))
216 -                         then [writeString("borrowTEST", "Success")]
217 -                         else throw("Borrow exceeds user health!")
215 +                     nil
218 216                      }
219 217                  else throw("Pool liquidity is not sufficient!")
220 218              else throw("AssetIds does not match")
221 219          }
222 220      else throw("Pool address not found!")
223 221  
224 222

Old	New		Differences
212	212		then if (checkPoolLiquidity(poolAddress, amount))
213	213		then {
214	214		let user = toBase58String(i.caller.bytes)
215		-	if (checkUserHealth(user, amount, assetId, 0, ""))
216		-	then [writeString("borrowTEST", "Success")]
217		-	else throw("Borrow exceeds user health!")
	215	+	nil
218	216		}
219	217		else throw("Pool liquidity is not sufficient!")
220	218		else throw("AssetIds does not match")

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let config = valueOrElse(getStringValue(this, "config"), "")
5	5
6	6		let admin = valueOrElse(getStringValue(addressFromStringValue(config), "admin"), "")
7	7
8	8		let pools = valueOrElse(getStringValue(this, "pools"), "")
9	9
10	10		func isAdmin (callerAddress) = if ((callerAddress == addressFromStringValue(admin)))
11	11		then true
12	12		else false
13	13
14	14
15	15		func checkPool (poolAdd) = if (contains(pools, poolAdd))
16	16		then true
17	17		else false
18	18
19	19
20	20		func writeString (key,stringValue) = StringEntry(key, stringValue)
21	21
22	22
23	23		func writeInteger (key,integerValue) = IntegerEntry(key, integerValue)
24	24
25	25
26	26		func checkPoolLiquidity (poolAddress,amount) = {
27	27		let totalSupply = getIntegerValue(addressFromStringValue(poolAddress), "totalSupply")
28	28		let totalBorrow = getIntegerValue(addressFromStringValue(poolAddress), "totalBorrow")
29	29		let availableLiquidity = (totalSupply - totalBorrow)
30	30		if ((availableLiquidity >= amount))
31	31		then true
32	32		else false
33	33		}
34	34
35	35
36	36		func getHealthParameter (user,poolAddress,newDebtAmount,newDebtId,collateralAmount,collateralId) = {
37	37		let result = invoke(addressFromStringValue(poolAddress), "getUserHealthParameter", [user, collateralAmount, collateralId, newDebtAmount, newDebtId], nil)
38	38		match result {
39	39		case t: (Int, Int) =>
40	40		t
41	41		case _ =>
42	42		throw("Wrong Datatyp!")
43	43		}
44	44		}
45	45
46	46
47	47		func calcHealthFactor (borrowCapacity,borrowCapacityUsed) = fraction((borrowCapacity - borrowCapacityUsed), 1000, borrowCapacity)
48	48
49	49
50	50		func calcBorrowCBorrowCU (user,newDebtAmount,newDebtId,collateralAmount,collateralId) = {
51	51		let poolList = split(pools, ";")
52	52		let listSize = size(poolList)
53	53		func foldPools (accum,next) = {
54	54		let healthParams = getHealthParameter(user, next, newDebtAmount, newDebtId, collateralAmount, collateralId)
55	55		match healthParams {
56	56		case t: (Int, Int) =>
57	57		$Tuple2((accum._1 + healthParams._1), (accum._2 + healthParams._1))
58	58		case e =>
59	59		throw("Test")
60	60		}
61	61		}
62	62
63	63		let $list22872321 = poolList
64	64		let $size22872321 = size($list22872321)
65	65		let $acc022872321 = $Tuple2(0, 0)
66	66		if (($size22872321 == 0))
67	67		then $acc022872321
68	68		else {
69	69		let $acc122872321 = foldPools($acc022872321, $list22872321[0])
70	70		if (($size22872321 == 1))
71	71		then $acc122872321
72	72		else {
73	73		let $acc222872321 = foldPools($acc122872321, $list22872321[1])
74	74		if (($size22872321 == 2))
75	75		then $acc222872321
76	76		else {
77	77		let $acc322872321 = foldPools($acc222872321, $list22872321[2])
78	78		throw("List size exceed 2")
79	79		}
80	80		}
81	81		}
82	82		}
83	83
84	84
85	85		func checkUserHealth (user,newDebtAmount,newDebtId,collateralAmount,collateralId) = {
86	86		let bcBcu = calcBorrowCBorrowCU(user, newDebtAmount, newDebtId, collateralAmount, collateralId)
87	87		let userHealth = calcHealthFactor(bcBcu._1, bcBcu._2)
88	88		if ((userHealth >= 0))
89	89		then true
90	90		else false
91	91		}
92	92
93	93
94	94		@Callable(i)
95	95		func setup (configAddress,pools) = if (if (!(isDefined(getString(this, "config"))))
96	96		then !(isDefined(getString(this, "pools")))
97	97		else false)
98	98		then [writeString("config", configAddress), writeString("pools", makeString(pools, ";"))]
99	99		else throw("Admin and config address already definied!")
100	100
101	101
102	102
103	103		@Callable(i)
104	104		func addPool (poolAddress) = if (isAdmin(i.caller))
105	105		then {
106	106		let poolList = split(pools, ";")
107	107		if ((containsElement(poolList, poolAddress) == false))
108	108		then {
109	109		let newPools = (poolList :+ poolAddress)
110	110		[writeString("pools", makeString(newPools, ";"))]
111	111		}
112	112		else throw("Pool already exists!")
113	113		}
114	114		else throw("Address does not match with admin address!")
115	115
116	116
117	117
118	118		@Callable(i)
119	119		func updateConfig (configAddress) = if (isAdmin(i.caller))
120	120		then [writeString("config", configAddress)]
121	121		else throw("Address does not match with admin address!")
122	122
123	123
124	124
125	125		@Callable(i)
126	126		func depositAt (poolAddress,isCollateral) = if (checkPool(poolAddress))
127	127		then if ((size(i.payments) > 0))
128	128		then {
129	129		let user = toBase58String(i.caller.bytes)
130	130		let tokenAmount = invoke(addressFromStringValue(poolAddress), "deposit", [user, isCollateral], i.payments)
131	131		if ((tokenAmount == tokenAmount))
132	132		then {
133	133		let tokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
134	134		match tokenAmount {
135	135		case t: Int =>
136	136		[ScriptTransfer(i.caller, t, fromBase58String(tokenId))]
137	137		case t: String =>
138	138		nil
139	139		case _ =>
140	140		throw("Incorrect invoke result!")
141	141		}
142	142		}
143	143		else throw("Strict value is not equal to itself.")
144	144		}
145	145		else throw("No payment attached!")
146	146		else throw("Pool address not found!")
147	147
148	148
149	149
150	150		@Callable(i)
151	151		func withdrawFrom (poolAddress) = if (checkPool(poolAddress))
152	152		then {
153	153		let dTokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
154	154		if ((fromBase58String(dTokenId) == i.payments[0].assetId))
155	155		then if ((size(i.payments) > 0))
156	156		then {
157	157		let user = toBase58String(i.caller.bytes)
158	158		let tokenAmount = invoke(addressFromStringValue(poolAddress), "withdraw", [user], i.payments)
159	159		if ((tokenAmount == tokenAmount))
160	160		then {
161	161		let tokenId = getStringValue(addressFromStringValue(poolAddress), "assetId")
162	162		match tokenAmount {
163	163		case t: Int =>
164	164		if ((tokenId == "WAVES"))
165	165		then [ScriptTransfer(i.caller, t, unit)]
166	166		else [ScriptTransfer(i.caller, t, fromBase58String(tokenId))]
167	167		case t: String =>
168	168		nil
169	169		case _ =>
170	170		throw("Incorrect invoke result!")
171	171		}
172	172		}
173	173		else throw("Strict value is not equal to itself.")
174	174		}
175	175		else throw("No payment attached!")
176	176		else throw("AssetIds does not match")
177	177		}
178	178		else throw("Pool address not found!")
179	179
180	180
181	181
182	182		@Callable(i)
183	183		func lockAsCollateralAt (poolAddress) = if (checkPool(poolAddress))
184	184		then {
185	185		let dTokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
186	186		if ((fromBase58String(dTokenId) == i.payments[0].assetId))
187	187		then if ((size(i.payments) > 0))
188	188		then {
189	189		let user = toBase58String(i.caller.bytes)
190	190		let msg = invoke(addressFromStringValue(poolAddress), "lockAsCollateral", [user], i.payments)
191	191		if ((msg == msg))
192	192		then match msg {
193	193		case t: String =>
194	194		nil
195	195		case _ =>
196	196		throw("Incorrect invoke result!")
197	197		}
198	198		else throw("Strict value is not equal to itself.")
199	199		}
200	200		else throw("No payment attached!")
201	201		else throw("AssetIds does not match")
202	202		}
203	203		else throw("Pool address not found!")
204	204
205	205
206	206
207	207		@Callable(i)
208	208		func borrowFrom (poolAddress,assetId,amount) = if (checkPool(poolAddress))
209	209		then {
210	210		let poolAsset = getStringValue(addressFromStringValue(poolAddress), "assetId")
211	211		if ((poolAsset == assetId))
212	212		then if (checkPoolLiquidity(poolAddress, amount))
213	213		then {
214	214		let user = toBase58String(i.caller.bytes)
215		-	if (checkUserHealth(user, amount, assetId, 0, ""))
216		-	then [writeString("borrowTEST", "Success")]
217		-	else throw("Borrow exceeds user health!")
	215	+	nil
218	216		}
219	217		else throw("Pool liquidity is not sufficient!")
220	218		else throw("AssetIds does not match")
221	219		}
222	220		else throw("Pool address not found!")
223	221
224	222

github/deemru/w8io/169f3d6 
35.98 ms ◑