tx · HTJ3HgBmFsnQYV2RYceizJivKZewYYtousKdAFE9DABR

3MvGMtmdY1eSW4iY922zj5bx8hBfyP1qgHo:  -0.04000000 Waves

2021.09.05 01:23 [1688895] smart account 3MvGMtmdY1eSW4iY922zj5bx8hBfyP1qgHo > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HTJ3HgBmFsnQYV2RYceizJivKZewYYtousKdAFE9DABR",
    "fee": 4000000,
    "feeAssetId": null,
    "timestamp": 1630794272264,
    "version": 2,
    "chainId": 84,
    "sender": "3MvGMtmdY1eSW4iY922zj5bx8hBfyP1qgHo",
    "senderPublicKey": "CD4N2SBeZVBUwmtsqwfmQ3ZKnBP3AxpZCvJ5QkHytUed",
    "proofs": [
        "44JXbZXqEAumzGSSCAuZ6NY6HHrfMCQjnFukq5kjrkFz8fng4AeoJWohLMksShwQqPsqZDtr7VougXDQ8CXgXRqf"
    ],
    "script": "base64:AAIFAAAAAAAAACkIAhIECgIIGBIDCgEIEgMKAQgSBAoCCAQSAwoBCBIDCgEIEgUKAwgIAQAAAAwAAAAABmNvbmZpZwkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwIAAAAGY29uZmlnAgAAAAAAAAAABWFkbWluCQEAAAALdmFsdWVPckVsc2UAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAZjb25maWcCAAAABWFkbWluAgAAAAAAAAAABXBvb2xzCQEAAAALdmFsdWVPckVsc2UAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzAgAAAAVwb29scwIAAAAAAQAAAAdpc0FkbWluAAAAAQAAAA1jYWxsZXJBZGRyZXNzAwkAAAAAAAACBQAAAA1jYWxsZXJBZGRyZXNzCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAVhZG1pbgYHAQAAAAljaGVja1Bvb2wAAAABAAAAB3Bvb2xBZGQDCQEAAAAIY29udGFpbnMAAAACBQAAAAVwb29scwUAAAAHcG9vbEFkZAYHAQAAAAt3cml0ZVN0cmluZwAAAAIAAAADa2V5AAAAC3N0cmluZ1ZhbHVlCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAANrZXkFAAAAC3N0cmluZ1ZhbHVlAQAAAAx3cml0ZUludGVnZXIAAAACAAAAA2tleQAAAAxpbnRlZ2VyVmFsdWUJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAANrZXkFAAAADGludGVnZXJWYWx1ZQEAAAASY2hlY2tQb29sTGlxdWlkaXR5AAAAAgAAAAtwb29sQWRkcmVzcwAAAAZhbW91bnQEAAAAC3RvdGFsU3VwcGx5CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAtwb29sQWRkcmVzcwIAAAALdG90YWxTdXBwbHkEAAAAC3RvdGFsQm9ycm93CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAtwb29sQWRkcmVzcwIAAAALdG90YWxCb3Jyb3cEAAAAEmF2YWlsYWJsZUxpcXVpZGl0eQkAAGUAAAACBQAAAAt0b3RhbFN1cHBseQUAAAALdG90YWxCb3Jyb3cDCQAAZwAAAAIFAAAAEmF2YWlsYWJsZUxpcXVpZGl0eQUAAAAGYW1vdW50BgcBAAAAEmdldEhlYWx0aFBhcmFtZXRlcgAAAAYAAAAEdXNlcgAAAAtwb29sQWRkcmVzcwAAAA1uZXdEZWJ0QW1vdW50AAAACW5ld0RlYnRJZAAAABBjb2xsYXRlcmFsQW1vdW50AAAADGNvbGxhdGVyYWxJZAQAAAAGcmVzdWx0CQAFFAAAAAIAAAAAAAAAAAEAAAAAAAAAAAEEAAAAByRtYXRjaDAFAAAABnJlc3VsdAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAKKEludCwgSW50KQQAAAABdAUAAAAHJG1hdGNoMAUAAAABdAkAAAIAAAABAgAAAA5Xcm9uZyBEYXRhdHlwIQEAAAAQY2FsY0hlYWx0aEZhY3RvcgAAAAIAAAAOYm9ycm93Q2FwYWNpdHkAAAASYm9ycm93Q2FwYWNpdHlVc2VkCQAAawAAAAMJAABlAAAAAgUAAAAOYm9ycm93Q2FwYWNpdHkFAAAAEmJvcnJvd0NhcGFjaXR5VXNlZAAAAAAAAAAD6AUAAAAOYm9ycm93Q2FwYWNpdHkBAAAAE2NhbGNCb3Jyb3dDQm9ycm93Q1UAAAAFAAAABHVzZXIAAAANbmV3RGVidEFtb3VudAAAAAluZXdEZWJ0SWQAAAAQY29sbGF0ZXJhbEFtb3VudAAAAAxjb2xsYXRlcmFsSWQEAAAACHBvb2xMaXN0CQAEtQAAAAIFAAAABXBvb2xzAgAAAAE7BAAAAAhsaXN0U2l6ZQkAAZAAAAABBQAAAAhwb29sTGlzdAoBAAAACWZvbGRQb29scwAAAAIAAAAFYWNjdW0AAAAEbmV4dAQAAAAMaGVhbHRoUGFyYW1zCQEAAAASZ2V0SGVhbHRoUGFyYW1ldGVyAAAABgUAAAAEdXNlcgUAAAAEbmV4dAUAAAANbmV3RGVidEFtb3VudAUAAAAJbmV3RGVidElkBQAAABBjb2xsYXRlcmFsQW1vdW50BQAAAAxjb2xsYXRlcmFsSWQEAAAAByRtYXRjaDAFAAAADGhlYWx0aFBhcmFtcwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAKKEludCwgSW50KQQAAAABdAUAAAAHJG1hdGNoMAkABRQAAAACCQAAZAAAAAIIBQAAAAVhY2N1bQAAAAJfMQgFAAAADGhlYWx0aFBhcmFtcwAAAAJfMQkAAGQAAAACCAUAAAAFYWNjdW0AAAACXzIIBQAAAAxoZWFsdGhQYXJhbXMAAAACXzEEAAAAAWUFAAAAByRtYXRjaDAJAAACAAAAAQIAAAAEVGVzdAQAAAANJGxpc3QyMzEwMjM0NAUAAAAIcG9vbExpc3QEAAAADSRzaXplMjMxMDIzNDQJAAGQAAAAAQUAAAANJGxpc3QyMzEwMjM0NAQAAAANJGFjYzAyMzEwMjM0NAkABRQAAAACAAAAAAAAAAAAAAAAAAAAAAAAAwkAAAAAAAACBQAAAA0kc2l6ZTIzMTAyMzQ0AAAAAAAAAAAABQAAAA0kYWNjMDIzMTAyMzQ0BAAAAA0kYWNjMTIzMTAyMzQ0CQEAAAAJZm9sZFBvb2xzAAAAAgUAAAANJGFjYzAyMzEwMjM0NAkAAZEAAAACBQAAAA0kbGlzdDIzMTAyMzQ0AAAAAAAAAAAAAwkAAAAAAAACBQAAAA0kc2l6ZTIzMTAyMzQ0AAAAAAAAAAABBQAAAA0kYWNjMTIzMTAyMzQ0BAAAAA0kYWNjMjIzMTAyMzQ0CQEAAAAJZm9sZFBvb2xzAAAAAgUAAAANJGFjYzEyMzEwMjM0NAkAAZEAAAACBQAAAA0kbGlzdDIzMTAyMzQ0AAAAAAAAAAABAwkAAAAAAAACBQAAAA0kc2l6ZTIzMTAyMzQ0AAAAAAAAAAACBQAAAA0kYWNjMjIzMTAyMzQ0BAAAAA0kYWNjMzIzMTAyMzQ0CQEAAAAJZm9sZFBvb2xzAAAAAgUAAAANJGFjYzIyMzEwMjM0NAkAAZEAAAACBQAAAA0kbGlzdDIzMTAyMzQ0AAAAAAAAAAACCQAAAgAAAAECAAAAEkxpc3Qgc2l6ZSBleGNlZWQgMgEAAAAPY2hlY2tVc2VySGVhbHRoAAAABQAAAAR1c2VyAAAADW5ld0RlYnRBbW91bnQAAAAJbmV3RGVidElkAAAAEGNvbGxhdGVyYWxBbW91bnQAAAAMY29sbGF0ZXJhbElkBAAAAAViY0JjdQkBAAAAE2NhbGNCb3Jyb3dDQm9ycm93Q1UAAAAFBQAAAAR1c2VyBQAAAA1uZXdEZWJ0QW1vdW50BQAAAAluZXdEZWJ0SWQFAAAAEGNvbGxhdGVyYWxBbW91bnQFAAAADGNvbGxhdGVyYWxJZAQAAAAKdXNlckhlYWx0aAkBAAAAEGNhbGNIZWFsdGhGYWN0b3IAAAACCAUAAAAFYmNCY3UAAAACXzEIBQAAAAViY0JjdQAAAAJfMgMJAABnAAAAAgUAAAAKdXNlckhlYWx0aAAAAAAAAAAAAAYHAAAABwAAAAFpAQAAAAVzZXR1cAAAAAIAAAANY29uZmlnQWRkcmVzcwAAAAVwb29scwMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABHRoaXMCAAAABmNvbmZpZwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAR0aGlzAgAAAAVwb29scwcJAARMAAAAAgkBAAAAC3dyaXRlU3RyaW5nAAAAAgIAAAAGY29uZmlnBQAAAA1jb25maWdBZGRyZXNzCQAETAAAAAIJAQAAAAt3cml0ZVN0cmluZwAAAAICAAAABXBvb2xzCQAEuQAAAAIFAAAABXBvb2xzAgAAAAE7BQAAAANuaWwJAAACAAAAAQIAAAAqQWRtaW4gYW5kIGNvbmZpZyBhZGRyZXNzIGFscmVhZHkgZGVmaW5pZWQhAAAAAWkBAAAAB2FkZFBvb2wAAAABAAAAC3Bvb2xBZGRyZXNzAwkBAAAAB2lzQWRtaW4AAAABCAUAAAABaQAAAAZjYWxsZXIEAAAACHBvb2xMaXN0CQAEtQAAAAIFAAAABXBvb2xzAgAAAAE7AwkAAAAAAAACCQEAAAAPY29udGFpbnNFbGVtZW50AAAAAgUAAAAIcG9vbExpc3QFAAAAC3Bvb2xBZGRyZXNzBwQAAAAIbmV3UG9vbHMJAARNAAAAAgUAAAAIcG9vbExpc3QFAAAAC3Bvb2xBZGRyZXNzCQAETAAAAAIJAQAAAAt3cml0ZVN0cmluZwAAAAICAAAABXBvb2xzCQAEuQAAAAIFAAAACG5ld1Bvb2xzAgAAAAE7BQAAAANuaWwJAAACAAAAAQIAAAAUUG9vbCBhbHJlYWR5IGV4aXN0cyEJAAACAAAAAQIAAAAqQWRkcmVzcyBkb2VzIG5vdCBtYXRjaCB3aXRoIGFkbWluIGFkZHJlc3MhAAAAAWkBAAAADHVwZGF0ZUNvbmZpZwAAAAEAAAANY29uZmlnQWRkcmVzcwMJAQAAAAdpc0FkbWluAAAAAQgFAAAAAWkAAAAGY2FsbGVyCQAETAAAAAIJAQAAAAt3cml0ZVN0cmluZwAAAAICAAAABmNvbmZpZwUAAAANY29uZmlnQWRkcmVzcwUAAAADbmlsCQAAAgAAAAECAAAAKkFkZHJlc3MgZG9lcyBub3QgbWF0Y2ggd2l0aCBhZG1pbiBhZGRyZXNzIQAAAAFpAQAAAAlkZXBvc2l0QXQAAAACAAAAC3Bvb2xBZGRyZXNzAAAADGlzQ29sbGF0ZXJhbAMJAQAAAAljaGVja1Bvb2wAAAABBQAAAAtwb29sQWRkcmVzcwMJAABmAAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAQAAAAEdXNlcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAt0b2tlbkFtb3VudAkAA/wAAAAECQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAtwb29sQWRkcmVzcwIAAAAHZGVwb3NpdAkABEwAAAACBQAAAAR1c2VyCQAETAAAAAIFAAAADGlzQ29sbGF0ZXJhbAUAAAADbmlsCAUAAAABaQAAAAhwYXltZW50cwMJAAAAAAAAAgUAAAALdG9rZW5BbW91bnQFAAAAC3Rva2VuQW1vdW50BAAAAAd0b2tlbklkCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAtwb29sQWRkcmVzcwIAAAAIZFRva2VuSWQEAAAAByRtYXRjaDAFAAAAC3Rva2VuQW1vdW50AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAXQFAAAAByRtYXRjaDAJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAF0CQACWQAAAAEFAAAAB3Rva2VuSWQFAAAAA25pbAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAF0BQAAAAckbWF0Y2gwBQAAAANuaWwJAAACAAAAAQIAAAAYSW5jb3JyZWN0IGludm9rZSByZXN1bHQhCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAABRObyBwYXltZW50IGF0dGFjaGVkIQkAAAIAAAABAgAAABdQb29sIGFkZHJlc3Mgbm90IGZvdW5kIQAAAAFpAQAAAAx3aXRoZHJhd0Zyb20AAAABAAAAC3Bvb2xBZGRyZXNzAwkBAAAACWNoZWNrUG9vbAAAAAEFAAAAC3Bvb2xBZGRyZXNzBAAAAAhkVG9rZW5JZAkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAALcG9vbEFkZHJlc3MCAAAACGRUb2tlbklkAwkAAAAAAAACCQACWQAAAAEFAAAACGRUb2tlbklkCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAdhc3NldElkAwkAAGYAAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAAR1c2VyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAC3Rva2VuQW1vdW50CQAD/AAAAAQJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAC3Bvb2xBZGRyZXNzAgAAAAh3aXRoZHJhdwkABEwAAAACBQAAAAR1c2VyBQAAAANuaWwIBQAAAAFpAAAACHBheW1lbnRzAwkAAAAAAAACBQAAAAt0b2tlbkFtb3VudAUAAAALdG9rZW5BbW91bnQEAAAAB3Rva2VuSWQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAC3Bvb2xBZGRyZXNzAgAAAAdhc3NldElkBAAAAAckbWF0Y2gwBQAAAAt0b2tlbkFtb3VudAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAF0BQAAAAckbWF0Y2gwAwkAAAAAAAACBQAAAAd0b2tlbklkAgAAAAVXQVZFUwkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAAXQFAAAABHVuaXQFAAAAA25pbAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAAXQJAAJZAAAAAQUAAAAHdG9rZW5JZAUAAAADbmlsAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAXQFAAAAByRtYXRjaDAFAAAAA25pbAkAAAIAAAABAgAAABhJbmNvcnJlY3QgaW52b2tlIHJlc3VsdCEJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAFE5vIHBheW1lbnQgYXR0YWNoZWQhCQAAAgAAAAECAAAAF0Fzc2V0SWRzIGRvZXMgbm90IG1hdGNoCQAAAgAAAAECAAAAF1Bvb2wgYWRkcmVzcyBub3QgZm91bmQhAAAAAWkBAAAAEmxvY2tBc0NvbGxhdGVyYWxBdAAAAAEAAAALcG9vbEFkZHJlc3MDCQEAAAAJY2hlY2tQb29sAAAAAQUAAAALcG9vbEFkZHJlc3MEAAAACGRUb2tlbklkCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAtwb29sQWRkcmVzcwIAAAAIZFRva2VuSWQDCQAAAAAAAAIJAAJZAAAAAQUAAAAIZFRva2VuSWQICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQDCQAAZgAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAABHVzZXIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAADbXNnCQAD/AAAAAQJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAC3Bvb2xBZGRyZXNzAgAAABBsb2NrQXNDb2xsYXRlcmFsCQAETAAAAAIFAAAABHVzZXIFAAAAA25pbAgFAAAAAWkAAAAIcGF5bWVudHMDCQAAAAAAAAIFAAAAA21zZwUAAAADbXNnBAAAAAckbWF0Y2gwBQAAAANtc2cDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABdAUAAAAHJG1hdGNoMAUAAAADbmlsCQAAAgAAAAECAAAAGEluY29ycmVjdCBpbnZva2UgcmVzdWx0IQkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAUTm8gcGF5bWVudCBhdHRhY2hlZCEJAAACAAAAAQIAAAAXQXNzZXRJZHMgZG9lcyBub3QgbWF0Y2gJAAACAAAAAQIAAAAXUG9vbCBhZGRyZXNzIG5vdCBmb3VuZCEAAAABaQEAAAAKYm9ycm93RnJvbQAAAAMAAAALcG9vbEFkZHJlc3MAAAAHYXNzZXRJZAAAAAZhbW91bnQDCQEAAAAJY2hlY2tQb29sAAAAAQUAAAALcG9vbEFkZHJlc3MEAAAACXBvb2xBc3NldAkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAALcG9vbEFkZHJlc3MCAAAAB2Fzc2V0SWQDCQAAAAAAAAIFAAAACXBvb2xBc3NldAUAAAAHYXNzZXRJZAMJAQAAABJjaGVja1Bvb2xMaXF1aWRpdHkAAAACBQAAAAtwb29sQWRkcmVzcwUAAAAGYW1vdW50BAAAAAR1c2VyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMDCQEAAAAPY2hlY2tVc2VySGVhbHRoAAAABQUAAAAEdXNlcgUAAAAGYW1vdW50BQAAAAdhc3NldElkAAAAAAAAAAAAAgAAAAAFAAAAA25pbAkAAAIAAAABAgAAABtCb3Jyb3cgZXhjZWVkcyB1c2VyIGhlYWx0aCEJAAACAAAAAQIAAAAhUG9vbCBsaXF1aWRpdHkgaXMgbm90IHN1ZmZpY2llbnQhCQAAAgAAAAECAAAAF0Fzc2V0SWRzIGRvZXMgbm90IG1hdGNoCQAAAgAAAAECAAAAF1Bvb2wgYWRkcmVzcyBub3QgZm91bmQhAAAAAIYo+t0=",
    "height": 1688895,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: J65DvWsrD6ZHhSEaU2wehVvbVMZTGLFfGctRKSHUz8DN
Next: DCKGNAwRjGUSt2oyuhKPQrkAcemx85YkmidsrKxPvwPs

Diff: 

OldNewDifferences
3434 
3535 
3636 func getHealthParameter (user,poolAddress,newDebtAmount,newDebtId,collateralAmount,collateralId) = {
37-    let result = invoke(addressFromStringValue(poolAddress), "getUserHealthParameter", [user, collateralAmount, collateralId, newDebtAmount, newDebtId], nil)
37+    let result = $Tuple2(1, 1)
3838     match result {
3939         case t: (Int, Int) => 
4040             t
6060         }
6161         }
6262 
63-    let $list22872321 = poolList
64-    let $size22872321 = size($list22872321)
65-    let $acc022872321 = $Tuple2(0, 0)
66-    if (($size22872321 == 0))
67-        then $acc022872321
63+    let $list23102344 = poolList
64+    let $size23102344 = size($list23102344)
65+    let $acc023102344 = $Tuple2(0, 0)
66+    if (($size23102344 == 0))
67+        then $acc023102344
6868         else {
69-            let $acc122872321 = foldPools($acc022872321, $list22872321[0])
70-            if (($size22872321 == 1))
71-                then $acc122872321
69+            let $acc123102344 = foldPools($acc023102344, $list23102344[0])
70+            if (($size23102344 == 1))
71+                then $acc123102344
7272                 else {
73-                    let $acc222872321 = foldPools($acc122872321, $list22872321[1])
74-                    if (($size22872321 == 2))
75-                        then $acc222872321
73+                    let $acc223102344 = foldPools($acc123102344, $list23102344[1])
74+                    if (($size23102344 == 2))
75+                        then $acc223102344
7676                         else {
77-                            let $acc322872321 = foldPools($acc222872321, $list22872321[2])
77+                            let $acc323102344 = foldPools($acc223102344, $list23102344[2])
7878                             throw("List size exceed 2")
7979                             }
8080                     }
212212             then if (checkPoolLiquidity(poolAddress, amount))
213213                 then {
214214                     let user = toBase58String(i.caller.bytes)
215-                    nil
215+                    if (checkUserHealth(user, amount, assetId, 0, ""))
216+                        then nil
217+                        else throw("Borrow exceeds user health!")
216218                     }
217219                 else throw("Pool liquidity is not sufficient!")
218220             else throw("AssetIds does not match")

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let config = valueOrElse(getStringValue(this, "config"), "")
55 
66 let admin = valueOrElse(getStringValue(addressFromStringValue(config), "admin"), "")
77 
88 let pools = valueOrElse(getStringValue(this, "pools"), "")
99 
1010 func isAdmin (callerAddress) = if ((callerAddress == addressFromStringValue(admin)))
1111     then true
1212     else false
1313 
1414 
1515 func checkPool (poolAdd) = if (contains(pools, poolAdd))
1616     then true
1717     else false
1818 
1919 
2020 func writeString (key,stringValue) = StringEntry(key, stringValue)
2121 
2222 
2323 func writeInteger (key,integerValue) = IntegerEntry(key, integerValue)
2424 
2525 
2626 func checkPoolLiquidity (poolAddress,amount) = {
2727     let totalSupply = getIntegerValue(addressFromStringValue(poolAddress), "totalSupply")
2828     let totalBorrow = getIntegerValue(addressFromStringValue(poolAddress), "totalBorrow")
2929     let availableLiquidity = (totalSupply - totalBorrow)
3030     if ((availableLiquidity >= amount))
3131         then true
3232         else false
3333     }
3434 
3535 
3636 func getHealthParameter (user,poolAddress,newDebtAmount,newDebtId,collateralAmount,collateralId) = {
37-    let result = invoke(addressFromStringValue(poolAddress), "getUserHealthParameter", [user, collateralAmount, collateralId, newDebtAmount, newDebtId], nil)
37+    let result = $Tuple2(1, 1)
3838     match result {
3939         case t: (Int, Int) => 
4040             t
4141         case _ => 
4242             throw("Wrong Datatyp!")
4343     }
4444     }
4545 
4646 
4747 func calcHealthFactor (borrowCapacity,borrowCapacityUsed) = fraction((borrowCapacity - borrowCapacityUsed), 1000, borrowCapacity)
4848 
4949 
5050 func calcBorrowCBorrowCU (user,newDebtAmount,newDebtId,collateralAmount,collateralId) = {
5151     let poolList = split(pools, ";")
5252     let listSize = size(poolList)
5353     func foldPools (accum,next) =     {
5454         let healthParams = getHealthParameter(user, next, newDebtAmount, newDebtId, collateralAmount, collateralId)
5555         match healthParams {
5656             case t: (Int, Int) => 
5757                 $Tuple2((accum._1 + healthParams._1), (accum._2 + healthParams._1))
5858             case e => 
5959                 throw("Test")
6060         }
6161         }
6262 
63-    let $list22872321 = poolList
64-    let $size22872321 = size($list22872321)
65-    let $acc022872321 = $Tuple2(0, 0)
66-    if (($size22872321 == 0))
67-        then $acc022872321
63+    let $list23102344 = poolList
64+    let $size23102344 = size($list23102344)
65+    let $acc023102344 = $Tuple2(0, 0)
66+    if (($size23102344 == 0))
67+        then $acc023102344
6868         else {
69-            let $acc122872321 = foldPools($acc022872321, $list22872321[0])
70-            if (($size22872321 == 1))
71-                then $acc122872321
69+            let $acc123102344 = foldPools($acc023102344, $list23102344[0])
70+            if (($size23102344 == 1))
71+                then $acc123102344
7272                 else {
73-                    let $acc222872321 = foldPools($acc122872321, $list22872321[1])
74-                    if (($size22872321 == 2))
75-                        then $acc222872321
73+                    let $acc223102344 = foldPools($acc123102344, $list23102344[1])
74+                    if (($size23102344 == 2))
75+                        then $acc223102344
7676                         else {
77-                            let $acc322872321 = foldPools($acc222872321, $list22872321[2])
77+                            let $acc323102344 = foldPools($acc223102344, $list23102344[2])
7878                             throw("List size exceed 2")
7979                             }
8080                     }
8181             }
8282     }
8383 
8484 
8585 func checkUserHealth (user,newDebtAmount,newDebtId,collateralAmount,collateralId) = {
8686     let bcBcu = calcBorrowCBorrowCU(user, newDebtAmount, newDebtId, collateralAmount, collateralId)
8787     let userHealth = calcHealthFactor(bcBcu._1, bcBcu._2)
8888     if ((userHealth >= 0))
8989         then true
9090         else false
9191     }
9292 
9393 
9494 @Callable(i)
9595 func setup (configAddress,pools) = if (if (!(isDefined(getString(this, "config"))))
9696     then !(isDefined(getString(this, "pools")))
9797     else false)
9898     then [writeString("config", configAddress), writeString("pools", makeString(pools, ";"))]
9999     else throw("Admin and config address already definied!")
100100 
101101 
102102 
103103 @Callable(i)
104104 func addPool (poolAddress) = if (isAdmin(i.caller))
105105     then {
106106         let poolList = split(pools, ";")
107107         if ((containsElement(poolList, poolAddress) == false))
108108             then {
109109                 let newPools = (poolList :+ poolAddress)
110110 [writeString("pools", makeString(newPools, ";"))]
111111                 }
112112             else throw("Pool already exists!")
113113         }
114114     else throw("Address does not match with admin address!")
115115 
116116 
117117 
118118 @Callable(i)
119119 func updateConfig (configAddress) = if (isAdmin(i.caller))
120120     then [writeString("config", configAddress)]
121121     else throw("Address does not match with admin address!")
122122 
123123 
124124 
125125 @Callable(i)
126126 func depositAt (poolAddress,isCollateral) = if (checkPool(poolAddress))
127127     then if ((size(i.payments) > 0))
128128         then {
129129             let user = toBase58String(i.caller.bytes)
130130             let tokenAmount = invoke(addressFromStringValue(poolAddress), "deposit", [user, isCollateral], i.payments)
131131             if ((tokenAmount == tokenAmount))
132132                 then {
133133                     let tokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
134134                     match tokenAmount {
135135                         case t: Int => 
136136 [ScriptTransfer(i.caller, t, fromBase58String(tokenId))]
137137                         case t: String => 
138138                             nil
139139                         case _ => 
140140                             throw("Incorrect invoke result!")
141141                     }
142142                     }
143143                 else throw("Strict value is not equal to itself.")
144144             }
145145         else throw("No payment attached!")
146146     else throw("Pool address not found!")
147147 
148148 
149149 
150150 @Callable(i)
151151 func withdrawFrom (poolAddress) = if (checkPool(poolAddress))
152152     then {
153153         let dTokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
154154         if ((fromBase58String(dTokenId) == i.payments[0].assetId))
155155             then if ((size(i.payments) > 0))
156156                 then {
157157                     let user = toBase58String(i.caller.bytes)
158158                     let tokenAmount = invoke(addressFromStringValue(poolAddress), "withdraw", [user], i.payments)
159159                     if ((tokenAmount == tokenAmount))
160160                         then {
161161                             let tokenId = getStringValue(addressFromStringValue(poolAddress), "assetId")
162162                             match tokenAmount {
163163                                 case t: Int => 
164164                                     if ((tokenId == "WAVES"))
165165                                         then [ScriptTransfer(i.caller, t, unit)]
166166                                         else [ScriptTransfer(i.caller, t, fromBase58String(tokenId))]
167167                                 case t: String => 
168168                                     nil
169169                                 case _ => 
170170                                     throw("Incorrect invoke result!")
171171                             }
172172                             }
173173                         else throw("Strict value is not equal to itself.")
174174                     }
175175                 else throw("No payment attached!")
176176             else throw("AssetIds does not match")
177177         }
178178     else throw("Pool address not found!")
179179 
180180 
181181 
182182 @Callable(i)
183183 func lockAsCollateralAt (poolAddress) = if (checkPool(poolAddress))
184184     then {
185185         let dTokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
186186         if ((fromBase58String(dTokenId) == i.payments[0].assetId))
187187             then if ((size(i.payments) > 0))
188188                 then {
189189                     let user = toBase58String(i.caller.bytes)
190190                     let msg = invoke(addressFromStringValue(poolAddress), "lockAsCollateral", [user], i.payments)
191191                     if ((msg == msg))
192192                         then                         match msg {
193193                             case t: String => 
194194                                 nil
195195                             case _ => 
196196                                 throw("Incorrect invoke result!")
197197                         }
198198                         else throw("Strict value is not equal to itself.")
199199                     }
200200                 else throw("No payment attached!")
201201             else throw("AssetIds does not match")
202202         }
203203     else throw("Pool address not found!")
204204 
205205 
206206 
207207 @Callable(i)
208208 func borrowFrom (poolAddress,assetId,amount) = if (checkPool(poolAddress))
209209     then {
210210         let poolAsset = getStringValue(addressFromStringValue(poolAddress), "assetId")
211211         if ((poolAsset == assetId))
212212             then if (checkPoolLiquidity(poolAddress, amount))
213213                 then {
214214                     let user = toBase58String(i.caller.bytes)
215-                    nil
215+                    if (checkUserHealth(user, amount, assetId, 0, ""))
216+                        then nil
217+                        else throw("Borrow exceeds user health!")
216218                     }
217219                 else throw("Pool liquidity is not sufficient!")
218220             else throw("AssetIds does not match")
219221         }
220222     else throw("Pool address not found!")
221223 
222224 
github/deemru/w8io/026f985 
52.88 ms ◑