w8 · tx · 3j4···PcN

tx · 3j4sC8PjvcAqGKV9Znf6DEYrnNUiqTKC1sHnkfizoPcN

3MvGMtmdY1eSW4iY922zj5bx8hBfyP1qgHo:  -0.04000000 Waves

2021.09.05 20:25 [1690054] smart account 3MvGMtmdY1eSW4iY922zj5bx8hBfyP1qgHo > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3j4sC8PjvcAqGKV9Znf6DEYrnNUiqTKC1sHnkfizoPcN",
    "fee": 4000000,
    "feeAssetId": null,
    "timestamp": 1630862763766,
    "version": 2,
    "chainId": 84,
    "sender": "3MvGMtmdY1eSW4iY922zj5bx8hBfyP1qgHo",
    "senderPublicKey": "CD4N2SBeZVBUwmtsqwfmQ3ZKnBP3AxpZCvJ5QkHytUed",
    "proofs": [
        "2AfXQBGTa2FdfZcoSwNFTrHVAQESk4oKzqtZMSFT6VCD44S3dW8J5r6NoDHTSCgvxhWGu4FaZPotzTk7XhBD6Xso"
    ],
    "script": "base64:AAIFAAAAAAAAADMIAhIDCgEIEgUKAwgIARIECgIIGBIDCgEIEgMKAQgSBAoCCAQSAwoBCBIDCgEIEgMKAQgAAAAMAAAAAAZjb25maWcJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMCAAAABmNvbmZpZwIAAAAAAAAAAAVhZG1pbgkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAGY29uZmlnAgAAAAVhZG1pbgIAAAAAAAAAAAVwb29scwkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwIAAAAFcG9vbHMCAAAAAAEAAAAHaXNBZG1pbgAAAAEAAAANY2FsbGVyQWRkcmVzcwMJAAAAAAAAAgUAAAANY2FsbGVyQWRkcmVzcwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAFYWRtaW4GBwEAAAAJY2hlY2tQb29sAAAAAQAAAAdwb29sQWRkAwkBAAAACGNvbnRhaW5zAAAAAgUAAAAFcG9vbHMFAAAAB3Bvb2xBZGQGBwEAAAALd3JpdGVTdHJpbmcAAAACAAAAA2tleQAAAAtzdHJpbmdWYWx1ZQkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAADa2V5BQAAAAtzdHJpbmdWYWx1ZQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgAAAANrZXkAAAAMaW50ZWdlclZhbHVlCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAADa2V5BQAAAAxpbnRlZ2VyVmFsdWUBAAAAEmNoZWNrUG9vbExpcXVpZGl0eQAAAAIAAAALcG9vbEFkZHJlc3MAAAAGYW1vdW50BAAAAAt0b3RhbFN1cHBseQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAALcG9vbEFkZHJlc3MCAAAAC3RvdGFsU3VwcGx5BAAAAAt0b3RhbEJvcnJvdwkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAALcG9vbEFkZHJlc3MCAAAAC3RvdGFsQm9ycm93BAAAABJhdmFpbGFibGVMaXF1aWRpdHkJAABlAAAAAgUAAAALdG90YWxTdXBwbHkFAAAAC3RvdGFsQm9ycm93AwkAAGcAAAACBQAAABJhdmFpbGFibGVMaXF1aWRpdHkFAAAABmFtb3VudAYHAQAAABJnZXRIZWFsdGhQYXJhbWV0ZXIAAAAGAAAABHVzZXIAAAALcG9vbEFkZHJlc3MAAAANbmV3RGVidEFtb3VudAAAAAluZXdEZWJ0SWQAAAAQY29sbGF0ZXJhbEFtb3VudAAAAAxjb2xsYXRlcmFsSWQEAAAABnJlc3VsdAkAA/wAAAAECQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAtwb29sQWRkcmVzcwIAAAAWZ2V0VXNlckhlYWx0aFBhcmFtZXRlcgkABEwAAAACBQAAAAR1c2VyCQAETAAAAAIFAAAAEGNvbGxhdGVyYWxBbW91bnQJAARMAAAAAgUAAAAMY29sbGF0ZXJhbElkCQAETAAAAAIFAAAADW5ld0RlYnRBbW91bnQJAARMAAAAAgUAAAAJbmV3RGVidElkBQAAAANuaWwFAAAAA25pbAQAAAAHJG1hdGNoMAUAAAAGcmVzdWx0AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAooSW50LCBJbnQpBAAAAAF0BQAAAAckbWF0Y2gwBQAAAAF0CQAAAgAAAAECAAAAJFJldHVybiB2YWx1ZSBoYXMgdGhlIHdyb25nIGRhdGEgdHlwZQEAAAAQY2FsY0hlYWx0aEZhY3RvcgAAAAIAAAAOYm9ycm93Q2FwYWNpdHkAAAASYm9ycm93Q2FwYWNpdHlVc2VkCQAAawAAAAMJAABlAAAAAgUAAAAOYm9ycm93Q2FwYWNpdHkFAAAAEmJvcnJvd0NhcGFjaXR5VXNlZAAAAAAAAAAD6AUAAAAOYm9ycm93Q2FwYWNpdHkBAAAAE2NhbGNCb3Jyb3dDQm9ycm93Q1UAAAAFAAAABHVzZXIAAAANbmV3RGVidEFtb3VudAAAAAluZXdEZWJ0SWQAAAAQY29sbGF0ZXJhbEFtb3VudAAAAAxjb2xsYXRlcmFsSWQEAAAACHBvb2xMaXN0CQAEtQAAAAIFAAAABXBvb2xzAgAAAAE7BAAAAAhsaXN0U2l6ZQkAAZAAAAABBQAAAAhwb29sTGlzdAoBAAAACWZvbGRQb29scwAAAAIAAAAFYWNjdW0AAAAEbmV4dAQAAAAMaGVhbHRoUGFyYW1zCQEAAAASZ2V0SGVhbHRoUGFyYW1ldGVyAAAABgUAAAAEdXNlcgUAAAAEbmV4dAUAAAANbmV3RGVidEFtb3VudAUAAAAJbmV3RGVidElkBQAAABBjb2xsYXRlcmFsQW1vdW50BQAAAAxjb2xsYXRlcmFsSWQEAAAAByRtYXRjaDAFAAAADGhlYWx0aFBhcmFtcwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAKKEludCwgSW50KQQAAAABdAUAAAAHJG1hdGNoMAkABRQAAAACCQAAZAAAAAIIBQAAAAVhY2N1bQAAAAJfMQgFAAAADGhlYWx0aFBhcmFtcwAAAAJfMQkAAGQAAAACCAUAAAAFYWNjdW0AAAACXzIIBQAAAAxoZWFsdGhQYXJhbXMAAAACXzEEAAAAAWUFAAAAByRtYXRjaDAJAAACAAAAAQIAAAAEVGVzdAQAAAANJGxpc3QyMzEyMjM0NgUAAAAIcG9vbExpc3QEAAAADSRzaXplMjMxMjIzNDYJAAGQAAAAAQUAAAANJGxpc3QyMzEyMjM0NgQAAAANJGFjYzAyMzEyMjM0NgkABRQAAAACAAAAAAAAAAAAAAAAAAAAAAAAAwkAAAAAAAACBQAAAA0kc2l6ZTIzMTIyMzQ2AAAAAAAAAAAABQAAAA0kYWNjMDIzMTIyMzQ2BAAAAA0kYWNjMTIzMTIyMzQ2CQEAAAAJZm9sZFBvb2xzAAAAAgUAAAANJGFjYzAyMzEyMjM0NgkAAZEAAAACBQAAAA0kbGlzdDIzMTIyMzQ2AAAAAAAAAAAAAwkAAAAAAAACBQAAAA0kc2l6ZTIzMTIyMzQ2AAAAAAAAAAABBQAAAA0kYWNjMTIzMTIyMzQ2BAAAAA0kYWNjMjIzMTIyMzQ2CQEAAAAJZm9sZFBvb2xzAAAAAgUAAAANJGFjYzEyMzEyMjM0NgkAAZEAAAACBQAAAA0kbGlzdDIzMTIyMzQ2AAAAAAAAAAABAwkAAAAAAAACBQAAAA0kc2l6ZTIzMTIyMzQ2AAAAAAAAAAACBQAAAA0kYWNjMjIzMTIyMzQ2BAAAAA0kYWNjMzIzMTIyMzQ2CQEAAAAJZm9sZFBvb2xzAAAAAgUAAAANJGFjYzIyMzEyMjM0NgkAAZEAAAACBQAAAA0kbGlzdDIzMTIyMzQ2AAAAAAAAAAACCQAAAgAAAAECAAAAEkxpc3Qgc2l6ZSBleGNlZWQgMgEAAAAPY2hlY2tVc2VySGVhbHRoAAAABQAAAAR1c2VyAAAADW5ld0RlYnRBbW91bnQAAAAJbmV3RGVidElkAAAAEGNvbGxhdGVyYWxBbW91bnQAAAAMY29sbGF0ZXJhbElkBAAAAAViY0JjdQkBAAAAE2NhbGNCb3Jyb3dDQm9ycm93Q1UAAAAFBQAAAAR1c2VyBQAAAA1uZXdEZWJ0QW1vdW50BQAAAAluZXdEZWJ0SWQFAAAAEGNvbGxhdGVyYWxBbW91bnQFAAAADGNvbGxhdGVyYWxJZAQAAAAKdXNlckhlYWx0aAkBAAAAEGNhbGNIZWFsdGhGYWN0b3IAAAACCAUAAAAFYmNCY3UAAAACXzEIBQAAAAViY0JjdQAAAAJfMgMJAABnAAAAAgUAAAAKdXNlckhlYWx0aAAAAAAAAAAAAAYHAAAACQAAAAFpAQAAAAdyZXBheVRvAAAAAQAAAAtwb29sQWRkcmVzcwMJAQAAAAljaGVja1Bvb2wAAAABBQAAAAtwb29sQWRkcmVzcwQAAAAJcG9vbEFzc2V0CQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAtwb29sQWRkcmVzcwIAAAAHYXNzZXRJZAMJAAAAAAAAAgkAAlkAAAABBQAAAAlwb29sQXNzZXQICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQDCQAAZgAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAABHVzZXIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAGYW1vdW50CQAD/AAAAAQJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAC3Bvb2xBZGRyZXNzAgAAAAVyZXBheQkABEwAAAACBQAAAAR1c2VyBQAAAANuaWwIBQAAAAFpAAAACHBheW1lbnRzAwkAAAAAAAACBQAAAAZhbW91bnQFAAAABmFtb3VudAQAAAAHYXNzZXRJZAkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAALcG9vbEFkZHJlc3MCAAAAB2Fzc2V0SWQEAAAAByRtYXRjaDAFAAAABmFtb3VudAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAF0BQAAAAckbWF0Y2gwAwkAAAAAAAACBQAAAAdhc3NldElkAgAAAAVXQVZFUwkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAAXQFAAAABHVuaXQFAAAAA25pbAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAAXQJAAJZAAAAAQUAAAAHYXNzZXRJZAUAAAADbmlsAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAXQFAAAAByRtYXRjaDAFAAAAA25pbAkAAAIAAAABAgAAABhJbmNvcnJlY3QgaW52b2tlIHJlc3VsdCEJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAFE5vIHBheW1lbnQgYXR0YWNoZWQhCQAAAgAAAAECAAAAF0Fzc2V0SWRzIGRvZXMgbm90IG1hdGNoCQAAAgAAAAECAAAAF1Bvb2wgYWRkcmVzcyBub3QgZm91bmQhAAAAAWkBAAAACmJvcnJvd0Zyb20AAAADAAAAC3Bvb2xBZGRyZXNzAAAAB2Fzc2V0SWQAAAAGYW1vdW50AwkBAAAACWNoZWNrUG9vbAAAAAEFAAAAC3Bvb2xBZGRyZXNzBAAAAAlwb29sQXNzZXQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAC3Bvb2xBZGRyZXNzAgAAAAdhc3NldElkAwkAAAAAAAACBQAAAAlwb29sQXNzZXQFAAAAB2Fzc2V0SWQDCQEAAAASY2hlY2tQb29sTGlxdWlkaXR5AAAAAgUAAAALcG9vbEFkZHJlc3MFAAAABmFtb3VudAQAAAAEdXNlcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAwkBAAAAD2NoZWNrVXNlckhlYWx0aAAAAAUFAAAABHVzZXIFAAAABmFtb3VudAUAAAAHYXNzZXRJZAAAAAAAAAAAAAIAAAAABAAAAAt0b2tlbkFtb3VudAkAA/wAAAAECQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAtwb29sQWRkcmVzcwIAAAAGYm9ycm93CQAETAAAAAIFAAAABHVzZXIJAARMAAAAAgUAAAAGYW1vdW50BQAAAANuaWwFAAAAA25pbAMJAAAAAAAAAgUAAAALdG9rZW5BbW91bnQFAAAAC3Rva2VuQW1vdW50BAAAAAckbWF0Y2gwBQAAAAt0b2tlbkFtb3VudAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAF0BQAAAAckbWF0Y2gwAwkAAAAAAAACBQAAAAlwb29sQXNzZXQCAAAABVdBVkVTCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAABdAUAAAAEdW5pdAUAAAADbmlsCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAABdAkAAlkAAAABBQAAAAlwb29sQXNzZXQFAAAAA25pbAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAF0BQAAAAckbWF0Y2gwBQAAAANuaWwJAAACAAAAAQIAAAAYSW5jb3JyZWN0IGludm9rZSByZXN1bHQhCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAABtCb3Jyb3cgZXhjZWVkcyB1c2VyIGhlYWx0aCEJAAACAAAAAQIAAAAhUG9vbCBsaXF1aWRpdHkgaXMgbm90IHN1ZmZpY2llbnQhCQAAAgAAAAECAAAAF0Fzc2V0SWRzIGRvZXMgbm90IG1hdGNoCQAAAgAAAAECAAAAF1Bvb2wgYWRkcmVzcyBub3QgZm91bmQhAAAAAWkBAAAABXNldHVwAAAAAgAAAA1jb25maWdBZGRyZXNzAAAABXBvb2xzAwMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAAEdGhpcwIAAAAGY29uZmlnCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABHRoaXMCAAAABXBvb2xzBwkABEwAAAACCQEAAAALd3JpdGVTdHJpbmcAAAACAgAAAAZjb25maWcFAAAADWNvbmZpZ0FkZHJlc3MJAARMAAAAAgkBAAAAC3dyaXRlU3RyaW5nAAAAAgIAAAAFcG9vbHMJAAS5AAAAAgUAAAAFcG9vbHMCAAAAATsFAAAAA25pbAkAAAIAAAABAgAAACpBZG1pbiBhbmQgY29uZmlnIGFkZHJlc3MgYWxyZWFkeSBkZWZpbmllZCEAAAABaQEAAAAHYWRkUG9vbAAAAAEAAAALcG9vbEFkZHJlc3MDCQEAAAAHaXNBZG1pbgAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAAIcG9vbExpc3QJAAS1AAAAAgUAAAAFcG9vbHMCAAAAATsDCQAAAAAAAAIJAQAAAA9jb250YWluc0VsZW1lbnQAAAACBQAAAAhwb29sTGlzdAUAAAALcG9vbEFkZHJlc3MHBAAAAAhuZXdQb29scwkABE0AAAACBQAAAAhwb29sTGlzdAUAAAALcG9vbEFkZHJlc3MJAARMAAAAAgkBAAAAC3dyaXRlU3RyaW5nAAAAAgIAAAAFcG9vbHMJAAS5AAAAAgUAAAAIbmV3UG9vbHMCAAAAATsFAAAAA25pbAkAAAIAAAABAgAAABRQb29sIGFscmVhZHkgZXhpc3RzIQkAAAIAAAABAgAAACpBZGRyZXNzIGRvZXMgbm90IG1hdGNoIHdpdGggYWRtaW4gYWRkcmVzcyEAAAABaQEAAAAMdXBkYXRlQ29uZmlnAAAAAQAAAA1jb25maWdBZGRyZXNzAwkBAAAAB2lzQWRtaW4AAAABCAUAAAABaQAAAAZjYWxsZXIJAARMAAAAAgkBAAAAC3dyaXRlU3RyaW5nAAAAAgIAAAAGY29uZmlnBQAAAA1jb25maWdBZGRyZXNzBQAAAANuaWwJAAACAAAAAQIAAAAqQWRkcmVzcyBkb2VzIG5vdCBtYXRjaCB3aXRoIGFkbWluIGFkZHJlc3MhAAAAAWkBAAAACWRlcG9zaXRBdAAAAAIAAAALcG9vbEFkZHJlc3MAAAAMaXNDb2xsYXRlcmFsAwkBAAAACWNoZWNrUG9vbAAAAAEFAAAAC3Bvb2xBZGRyZXNzAwkAAGYAAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAAR1c2VyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAC3Rva2VuQW1vdW50CQAD/AAAAAQJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAC3Bvb2xBZGRyZXNzAgAAAAdkZXBvc2l0CQAETAAAAAIFAAAABHVzZXIJAARMAAAAAgUAAAAMaXNDb2xsYXRlcmFsBQAAAANuaWwIBQAAAAFpAAAACHBheW1lbnRzAwkAAAAAAAACBQAAAAt0b2tlbkFtb3VudAUAAAALdG9rZW5BbW91bnQEAAAAB3Rva2VuSWQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAC3Bvb2xBZGRyZXNzAgAAAAhkVG9rZW5JZAQAAAAHJG1hdGNoMAUAAAALdG9rZW5BbW91bnQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABdAUAAAAHJG1hdGNoMAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAAXQJAAJZAAAAAQUAAAAHdG9rZW5JZAUAAAADbmlsAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAXQFAAAAByRtYXRjaDAFAAAAA25pbAkAAAIAAAABAgAAABhJbmNvcnJlY3QgaW52b2tlIHJlc3VsdCEJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAFE5vIHBheW1lbnQgYXR0YWNoZWQhCQAAAgAAAAECAAAAF1Bvb2wgYWRkcmVzcyBub3QgZm91bmQhAAAAAWkBAAAADHdpdGhkcmF3RnJvbQAAAAEAAAALcG9vbEFkZHJlc3MDCQEAAAAJY2hlY2tQb29sAAAAAQUAAAALcG9vbEFkZHJlc3MEAAAACGRUb2tlbklkCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAtwb29sQWRkcmVzcwIAAAAIZFRva2VuSWQDCQAAAAAAAAIJAAJZAAAAAQUAAAAIZFRva2VuSWQICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQDCQAAZgAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAABHVzZXIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAALdG9rZW5BbW91bnQJAAP8AAAABAkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAALcG9vbEFkZHJlc3MCAAAACHdpdGhkcmF3CQAETAAAAAIFAAAABHVzZXIFAAAAA25pbAgFAAAAAWkAAAAIcGF5bWVudHMDCQAAAAAAAAIFAAAAC3Rva2VuQW1vdW50BQAAAAt0b2tlbkFtb3VudAQAAAAHdG9rZW5JZAkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAALcG9vbEFkZHJlc3MCAAAAB2Fzc2V0SWQEAAAAByRtYXRjaDAFAAAAC3Rva2VuQW1vdW50AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAXQFAAAAByRtYXRjaDADCQAAAAAAAAIFAAAAB3Rva2VuSWQCAAAABVdBVkVTCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAABdAUAAAAEdW5pdAUAAAADbmlsCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAABdAkAAlkAAAABBQAAAAd0b2tlbklkBQAAAANuaWwDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABdAUAAAAHJG1hdGNoMAUAAAADbmlsCQAAAgAAAAECAAAAGEluY29ycmVjdCBpbnZva2UgcmVzdWx0IQkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAUTm8gcGF5bWVudCBhdHRhY2hlZCEJAAACAAAAAQIAAAAXQXNzZXRJZHMgZG9lcyBub3QgbWF0Y2gJAAACAAAAAQIAAAAXUG9vbCBhZGRyZXNzIG5vdCBmb3VuZCEAAAABaQEAAAASbG9ja0FzQ29sbGF0ZXJhbEF0AAAAAQAAAAtwb29sQWRkcmVzcwMJAQAAAAljaGVja1Bvb2wAAAABBQAAAAtwb29sQWRkcmVzcwQAAAAIZFRva2VuSWQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAC3Bvb2xBZGRyZXNzAgAAAAhkVG9rZW5JZAMJAAAAAAAAAgkAAlkAAAABBQAAAAhkVG9rZW5JZAgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAHYXNzZXRJZAMJAABmAAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAQAAAAEdXNlcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAANtc2cJAAP8AAAABAkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAALcG9vbEFkZHJlc3MCAAAAEGxvY2tBc0NvbGxhdGVyYWwJAARMAAAAAgUAAAAEdXNlcgUAAAADbmlsCAUAAAABaQAAAAhwYXltZW50cwMJAAAAAAAAAgUAAAADbXNnBQAAAANtc2cEAAAAByRtYXRjaDAFAAAAA21zZwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAF0BQAAAAckbWF0Y2gwBQAAAANuaWwJAAACAAAAAQIAAAAYSW5jb3JyZWN0IGludm9rZSByZXN1bHQhCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAABRObyBwYXltZW50IGF0dGFjaGVkIQkAAAIAAAABAgAAABdBc3NldElkcyBkb2VzIG5vdCBtYXRjaAkAAAIAAAABAgAAABdQb29sIGFkZHJlc3Mgbm90IGZvdW5kIQAAAAFpAQAAAApkZWxldGVEYXRhAAAAAQAAAARuYW1lCQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEFAAAABG5hbWUFAAAAA25pbAAAAABvyFR7",
    "height": 1690054,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BRtswwF8yTWd1ggCvDoanT9mNh1mvGsNkJNK3fr6L1Wq
Next: BXe4xkbsyqYZcukriWez3gfhvtJdyY4iHxkDNMthG8fe

Diff: 
Old New Differences
99 99              then if ((size(i.payments) > 0))
100 100                  then {
101 101                      let user = toBase58String(i.caller.bytes)
102 -                     let msg = invoke(addressFromStringValue(poolAddress), "repay", [user], i.payments)
103 -                     if ((msg == msg))
104 -                         then                         match msg {
105 -                             case t: String => 
106 -                                 nil
107 -                             case _ => 
108 -                                 throw("Incorrect invoke result!")
109 -                         }
102 +                     let amount = invoke(addressFromStringValue(poolAddress), "repay", [user], i.payments)
103 +                     if ((amount == amount))
104 +                         then {
105 +                             let assetId = getStringValue(addressFromStringValue(poolAddress), "assetId")
106 +                             match amount {
107 +                                 case t: Int => 
108 +                                     if ((assetId == "WAVES"))
109 +                                         then [ScriptTransfer(i.caller, t, unit)]
110 +                                         else [ScriptTransfer(i.caller, t, fromBase58String(assetId))]
111 +                                 case t: String => 
112 +                                     nil
113 +                                 case _ => 
114 +                                     throw("Incorrect invoke result!")
115 +                             }
116 +                             }
110 117                          else throw("Strict value is not equal to itself.")
111 118                      }
112 119                  else throw("No payment attached!")
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("Return value has the wrong data type")
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 $list23122346 = poolList
64 64      let $size23122346 = size($list23122346)
65 65      let $acc023122346 = $Tuple2(0, 0)
66 66      if (($size23122346 == 0))
67 67          then $acc023122346
68 68          else {
69 69              let $acc123122346 = foldPools($acc023122346, $list23122346[0])
70 70              if (($size23122346 == 1))
71 71                  then $acc123122346
72 72                  else {
73 73                      let $acc223122346 = foldPools($acc123122346, $list23122346[1])
74 74                      if (($size23122346 == 2))
75 75                          then $acc223122346
76 76                          else {
77 77                              let $acc323122346 = foldPools($acc223122346, $list23122346[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 repayTo (poolAddress) = if (checkPool(poolAddress))
96 96      then {
97 97          let poolAsset = getStringValue(addressFromStringValue(poolAddress), "assetId")
98 98          if ((fromBase58String(poolAsset) == i.payments[0].assetId))
99 99              then if ((size(i.payments) > 0))
100 100                  then {
101 101                      let user = toBase58String(i.caller.bytes)
102 -                     let msg = invoke(addressFromStringValue(poolAddress), "repay", [user], i.payments)
103 -                     if ((msg == msg))
104 -                         then                         match msg {
105 -                             case t: String => 
106 -                                 nil
107 -                             case _ => 
108 -                                 throw("Incorrect invoke result!")
109 -                         }
102 +                     let amount = invoke(addressFromStringValue(poolAddress), "repay", [user], i.payments)
103 +                     if ((amount == amount))
104 +                         then {
105 +                             let assetId = getStringValue(addressFromStringValue(poolAddress), "assetId")
106 +                             match amount {
107 +                                 case t: Int => 
108 +                                     if ((assetId == "WAVES"))
109 +                                         then [ScriptTransfer(i.caller, t, unit)]
110 +                                         else [ScriptTransfer(i.caller, t, fromBase58String(assetId))]
111 +                                 case t: String => 
112 +                                     nil
113 +                                 case _ => 
114 +                                     throw("Incorrect invoke result!")
115 +                             }
116 +                             }
110 117                          else throw("Strict value is not equal to itself.")
111 118                      }
112 119                  else throw("No payment attached!")
113 120              else throw("AssetIds does not match")
114 121          }
115 122      else throw("Pool address not found!")
116 123  
117 124  
118 125  
119 126  @Callable(i)
120 127  func borrowFrom (poolAddress,assetId,amount) = if (checkPool(poolAddress))
121 128      then {
122 129          let poolAsset = getStringValue(addressFromStringValue(poolAddress), "assetId")
123 130          if ((poolAsset == assetId))
124 131              then if (checkPoolLiquidity(poolAddress, amount))
125 132                  then {
126 133                      let user = toBase58String(i.caller.bytes)
127 134                      if (checkUserHealth(user, amount, assetId, 0, ""))
128 135                          then {
129 136                              let tokenAmount = invoke(addressFromStringValue(poolAddress), "borrow", [user, amount], nil)
130 137                              if ((tokenAmount == tokenAmount))
131 138                                  then                                 match tokenAmount {
132 139                                      case t: Int => 
133 140                                          if ((poolAsset == "WAVES"))
134 141                                              then [ScriptTransfer(i.caller, t, unit)]
135 142                                              else [ScriptTransfer(i.caller, t, fromBase58String(poolAsset))]
136 143                                      case t: String => 
137 144                                          nil
138 145                                      case _ => 
139 146                                          throw("Incorrect invoke result!")
140 147                                  }
141 148                                  else throw("Strict value is not equal to itself.")
142 149                              }
143 150                          else throw("Borrow exceeds user health!")
144 151                      }
145 152                  else throw("Pool liquidity is not sufficient!")
146 153              else throw("AssetIds does not match")
147 154          }
148 155      else throw("Pool address not found!")
149 156  
150 157  
151 158  
152 159  @Callable(i)
153 160  func setup (configAddress,pools) = if (if (!(isDefined(getString(this, "config"))))
154 161      then !(isDefined(getString(this, "pools")))
155 162      else false)
156 163      then [writeString("config", configAddress), writeString("pools", makeString(pools, ";"))]
157 164      else throw("Admin and config address already definied!")
158 165  
159 166  
160 167  
161 168  @Callable(i)
162 169  func addPool (poolAddress) = if (isAdmin(i.caller))
163 170      then {
164 171          let poolList = split(pools, ";")
165 172          if ((containsElement(poolList, poolAddress) == false))
166 173              then {
167 174                  let newPools = (poolList :+ poolAddress)
168 175  [writeString("pools", makeString(newPools, ";"))]
169 176                  }
170 177              else throw("Pool already exists!")
171 178          }
172 179      else throw("Address does not match with admin address!")
173 180  
174 181  
175 182  
176 183  @Callable(i)
177 184  func updateConfig (configAddress) = if (isAdmin(i.caller))
178 185      then [writeString("config", configAddress)]
179 186      else throw("Address does not match with admin address!")
180 187  
181 188  
182 189  
183 190  @Callable(i)
184 191  func depositAt (poolAddress,isCollateral) = if (checkPool(poolAddress))
185 192      then if ((size(i.payments) > 0))
186 193          then {
187 194              let user = toBase58String(i.caller.bytes)
188 195              let tokenAmount = invoke(addressFromStringValue(poolAddress), "deposit", [user, isCollateral], i.payments)
189 196              if ((tokenAmount == tokenAmount))
190 197                  then {
191 198                      let tokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
192 199                      match tokenAmount {
193 200                          case t: Int => 
194 201  [ScriptTransfer(i.caller, t, fromBase58String(tokenId))]
195 202                          case t: String => 
196 203                              nil
197 204                          case _ => 
198 205                              throw("Incorrect invoke result!")
199 206                      }
200 207                      }
201 208                  else throw("Strict value is not equal to itself.")
202 209              }
203 210          else throw("No payment attached!")
204 211      else throw("Pool address not found!")
205 212  
206 213  
207 214  
208 215  @Callable(i)
209 216  func withdrawFrom (poolAddress) = if (checkPool(poolAddress))
210 217      then {
211 218          let dTokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
212 219          if ((fromBase58String(dTokenId) == i.payments[0].assetId))
213 220              then if ((size(i.payments) > 0))
214 221                  then {
215 222                      let user = toBase58String(i.caller.bytes)
216 223                      let tokenAmount = invoke(addressFromStringValue(poolAddress), "withdraw", [user], i.payments)
217 224                      if ((tokenAmount == tokenAmount))
218 225                          then {
219 226                              let tokenId = getStringValue(addressFromStringValue(poolAddress), "assetId")
220 227                              match tokenAmount {
221 228                                  case t: Int => 
222 229                                      if ((tokenId == "WAVES"))
223 230                                          then [ScriptTransfer(i.caller, t, unit)]
224 231                                          else [ScriptTransfer(i.caller, t, fromBase58String(tokenId))]
225 232                                  case t: String => 
226 233                                      nil
227 234                                  case _ => 
228 235                                      throw("Incorrect invoke result!")
229 236                              }
230 237                              }
231 238                          else throw("Strict value is not equal to itself.")
232 239                      }
233 240                  else throw("No payment attached!")
234 241              else throw("AssetIds does not match")
235 242          }
236 243      else throw("Pool address not found!")
237 244  
238 245  
239 246  
240 247  @Callable(i)
241 248  func lockAsCollateralAt (poolAddress) = if (checkPool(poolAddress))
242 249      then {
243 250          let dTokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
244 251          if ((fromBase58String(dTokenId) == i.payments[0].assetId))
245 252              then if ((size(i.payments) > 0))
246 253                  then {
247 254                      let user = toBase58String(i.caller.bytes)
248 255                      let msg = invoke(addressFromStringValue(poolAddress), "lockAsCollateral", [user], i.payments)
249 256                      if ((msg == msg))
250 257                          then                         match msg {
251 258                              case t: String => 
252 259                                  nil
253 260                              case _ => 
254 261                                  throw("Incorrect invoke result!")
255 262                          }
256 263                          else throw("Strict value is not equal to itself.")
257 264                      }
258 265                  else throw("No payment attached!")
259 266              else throw("AssetIds does not match")
260 267          }
261 268      else throw("Pool address not found!")
262 269  
263 270  
264 271  
265 272  @Callable(i)
266 273  func deleteData (name) = [DeleteEntry(name)]
267 274  
268 275

Old	New		Differences
99	99		then if ((size(i.payments) > 0))
100	100		then {
101	101		let user = toBase58String(i.caller.bytes)
102		-	let msg = invoke(addressFromStringValue(poolAddress), "repay", [user], i.payments)
103		-	if ((msg == msg))
104		-	then match msg {
105		-	case t: String =>
106		-	nil
107		-	case _ =>
108		-	throw("Incorrect invoke result!")
109		-	}
	102	+	let amount = invoke(addressFromStringValue(poolAddress), "repay", [user], i.payments)
	103	+	if ((amount == amount))
	104	+	then {
	105	+	let assetId = getStringValue(addressFromStringValue(poolAddress), "assetId")
	106	+	match amount {
	107	+	case t: Int =>
	108	+	if ((assetId == "WAVES"))
	109	+	then [ScriptTransfer(i.caller, t, unit)]
	110	+	else [ScriptTransfer(i.caller, t, fromBase58String(assetId))]
	111	+	case t: String =>
	112	+	nil
	113	+	case _ =>
	114	+	throw("Incorrect invoke result!")
	115	+	}
	116	+	}
110	117		else throw("Strict value is not equal to itself.")
111	118		}
112	119		else throw("No payment attached!")

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("Return value has the wrong data type")
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 $list23122346 = poolList
64	64		let $size23122346 = size($list23122346)
65	65		let $acc023122346 = $Tuple2(0, 0)
66	66		if (($size23122346 == 0))
67	67		then $acc023122346
68	68		else {
69	69		let $acc123122346 = foldPools($acc023122346, $list23122346[0])
70	70		if (($size23122346 == 1))
71	71		then $acc123122346
72	72		else {
73	73		let $acc223122346 = foldPools($acc123122346, $list23122346[1])
74	74		if (($size23122346 == 2))
75	75		then $acc223122346
76	76		else {
77	77		let $acc323122346 = foldPools($acc223122346, $list23122346[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 repayTo (poolAddress) = if (checkPool(poolAddress))
96	96		then {
97	97		let poolAsset = getStringValue(addressFromStringValue(poolAddress), "assetId")
98	98		if ((fromBase58String(poolAsset) == i.payments[0].assetId))
99	99		then if ((size(i.payments) > 0))
100	100		then {
101	101		let user = toBase58String(i.caller.bytes)
102		-	let msg = invoke(addressFromStringValue(poolAddress), "repay", [user], i.payments)
103		-	if ((msg == msg))
104		-	then match msg {
105		-	case t: String =>
106		-	nil
107		-	case _ =>
108		-	throw("Incorrect invoke result!")
109		-	}
	102	+	let amount = invoke(addressFromStringValue(poolAddress), "repay", [user], i.payments)
	103	+	if ((amount == amount))
	104	+	then {
	105	+	let assetId = getStringValue(addressFromStringValue(poolAddress), "assetId")
	106	+	match amount {
	107	+	case t: Int =>
	108	+	if ((assetId == "WAVES"))
	109	+	then [ScriptTransfer(i.caller, t, unit)]
	110	+	else [ScriptTransfer(i.caller, t, fromBase58String(assetId))]
	111	+	case t: String =>
	112	+	nil
	113	+	case _ =>
	114	+	throw("Incorrect invoke result!")
	115	+	}
	116	+	}
110	117		else throw("Strict value is not equal to itself.")
111	118		}
112	119		else throw("No payment attached!")
113	120		else throw("AssetIds does not match")
114	121		}
115	122		else throw("Pool address not found!")
116	123
117	124
118	125
119	126		@Callable(i)
120	127		func borrowFrom (poolAddress,assetId,amount) = if (checkPool(poolAddress))
121	128		then {
122	129		let poolAsset = getStringValue(addressFromStringValue(poolAddress), "assetId")
123	130		if ((poolAsset == assetId))
124	131		then if (checkPoolLiquidity(poolAddress, amount))
125	132		then {
126	133		let user = toBase58String(i.caller.bytes)
127	134		if (checkUserHealth(user, amount, assetId, 0, ""))
128	135		then {
129	136		let tokenAmount = invoke(addressFromStringValue(poolAddress), "borrow", [user, amount], nil)
130	137		if ((tokenAmount == tokenAmount))
131	138		then match tokenAmount {
132	139		case t: Int =>
133	140		if ((poolAsset == "WAVES"))
134	141		then [ScriptTransfer(i.caller, t, unit)]
135	142		else [ScriptTransfer(i.caller, t, fromBase58String(poolAsset))]
136	143		case t: String =>
137	144		nil
138	145		case _ =>
139	146		throw("Incorrect invoke result!")
140	147		}
141	148		else throw("Strict value is not equal to itself.")
142	149		}
143	150		else throw("Borrow exceeds user health!")
144	151		}
145	152		else throw("Pool liquidity is not sufficient!")
146	153		else throw("AssetIds does not match")
147	154		}
148	155		else throw("Pool address not found!")
149	156
150	157
151	158
152	159		@Callable(i)
153	160		func setup (configAddress,pools) = if (if (!(isDefined(getString(this, "config"))))
154	161		then !(isDefined(getString(this, "pools")))
155	162		else false)
156	163		then [writeString("config", configAddress), writeString("pools", makeString(pools, ";"))]
157	164		else throw("Admin and config address already definied!")
158	165
159	166
160	167
161	168		@Callable(i)
162	169		func addPool (poolAddress) = if (isAdmin(i.caller))
163	170		then {
164	171		let poolList = split(pools, ";")
165	172		if ((containsElement(poolList, poolAddress) == false))
166	173		then {
167	174		let newPools = (poolList :+ poolAddress)
168	175		[writeString("pools", makeString(newPools, ";"))]
169	176		}
170	177		else throw("Pool already exists!")
171	178		}
172	179		else throw("Address does not match with admin address!")
173	180
174	181
175	182
176	183		@Callable(i)
177	184		func updateConfig (configAddress) = if (isAdmin(i.caller))
178	185		then [writeString("config", configAddress)]
179	186		else throw("Address does not match with admin address!")
180	187
181	188
182	189
183	190		@Callable(i)
184	191		func depositAt (poolAddress,isCollateral) = if (checkPool(poolAddress))
185	192		then if ((size(i.payments) > 0))
186	193		then {
187	194		let user = toBase58String(i.caller.bytes)
188	195		let tokenAmount = invoke(addressFromStringValue(poolAddress), "deposit", [user, isCollateral], i.payments)
189	196		if ((tokenAmount == tokenAmount))
190	197		then {
191	198		let tokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
192	199		match tokenAmount {
193	200		case t: Int =>
194	201		[ScriptTransfer(i.caller, t, fromBase58String(tokenId))]
195	202		case t: String =>
196	203		nil
197	204		case _ =>
198	205		throw("Incorrect invoke result!")
199	206		}
200	207		}
201	208		else throw("Strict value is not equal to itself.")
202	209		}
203	210		else throw("No payment attached!")
204	211		else throw("Pool address not found!")
205	212
206	213
207	214
208	215		@Callable(i)
209	216		func withdrawFrom (poolAddress) = if (checkPool(poolAddress))
210	217		then {
211	218		let dTokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
212	219		if ((fromBase58String(dTokenId) == i.payments[0].assetId))
213	220		then if ((size(i.payments) > 0))
214	221		then {
215	222		let user = toBase58String(i.caller.bytes)
216	223		let tokenAmount = invoke(addressFromStringValue(poolAddress), "withdraw", [user], i.payments)
217	224		if ((tokenAmount == tokenAmount))
218	225		then {
219	226		let tokenId = getStringValue(addressFromStringValue(poolAddress), "assetId")
220	227		match tokenAmount {
221	228		case t: Int =>
222	229		if ((tokenId == "WAVES"))
223	230		then [ScriptTransfer(i.caller, t, unit)]
224	231		else [ScriptTransfer(i.caller, t, fromBase58String(tokenId))]
225	232		case t: String =>
226	233		nil
227	234		case _ =>
228	235		throw("Incorrect invoke result!")
229	236		}
230	237		}
231	238		else throw("Strict value is not equal to itself.")
232	239		}
233	240		else throw("No payment attached!")
234	241		else throw("AssetIds does not match")
235	242		}
236	243		else throw("Pool address not found!")
237	244
238	245
239	246
240	247		@Callable(i)
241	248		func lockAsCollateralAt (poolAddress) = if (checkPool(poolAddress))
242	249		then {
243	250		let dTokenId = getStringValue(addressFromStringValue(poolAddress), "dTokenId")
244	251		if ((fromBase58String(dTokenId) == i.payments[0].assetId))
245	252		then if ((size(i.payments) > 0))
246	253		then {
247	254		let user = toBase58String(i.caller.bytes)
248	255		let msg = invoke(addressFromStringValue(poolAddress), "lockAsCollateral", [user], i.payments)
249	256		if ((msg == msg))
250	257		then match msg {
251	258		case t: String =>
252	259		nil
253	260		case _ =>
254	261		throw("Incorrect invoke result!")
255	262		}
256	263		else throw("Strict value is not equal to itself.")
257	264		}
258	265		else throw("No payment attached!")
259	266		else throw("AssetIds does not match")
260	267		}
261	268		else throw("Pool address not found!")
262	269
263	270
264	271
265	272		@Callable(i)
266	273		func deleteData (name) = [DeleteEntry(name)]
267	274
268	275

github/deemru/w8io/026f985 
36.04 ms ◑