w8 · tx · Jne···XBK

tx · JneAGKc5DbtdZtjcx8XHiXLrDCJqDc4n9h9H4gRXXBK

3MyfKzBNordUSxbv54zj1hxm98ojcDvaiXU:  -0.04000000 Waves

2021.09.02 23:54 [1685926] smart account 3MyfKzBNordUSxbv54zj1hxm98ojcDvaiXU > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "JneAGKc5DbtdZtjcx8XHiXLrDCJqDc4n9h9H4gRXXBK",
    "fee": 4000000,
    "feeAssetId": null,
    "timestamp": 1630616143705,
    "version": 2,
    "chainId": 84,
    "sender": "3MyfKzBNordUSxbv54zj1hxm98ojcDvaiXU",
    "senderPublicKey": "EhGswdVQkp8SXCWyKvRCUKYDidTrRjnzTPa8CZk6GYgN",
    "proofs": [
        "3eeveEWkpgVf8Dhw3zY5zpSsNVyTFqzqQRhFxR92pxAugsNcbGHwWaUF1FXZc9TH8DiCoBZq1GqG58uTGzKiLjKB"
    ],
    "script": "base64:AAIFAAAAAAAAAB8IAhIECgIIBBIDCgEIEgMKAQgSBgoECAgICBIDCgEIAAAAKQAAAAAKYmFzZUZhY3RvcgAAAAAAAAAD6AAAAAAJYmFzZUluZGV4AAAjhvJvwQAAAAAAAA1ibG9ja3NQZXJZZWFyAAAAAAAACAUgAAAAAAZjb25maWcJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQdAAAAAgUAAAAEdGhpcwIAAAANY29uZmlnQWRkcmVzcwIAAAAAAAAAAAVhZG1pbgkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABB0AAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAZjb25maWcCAAAABWFkbWluAgAAAAAAAAAAC3dhdmV0cm9sbGVyCQEAAAALdmFsdWVPckVsc2UAAAACCQAEHQAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAABmNvbmZpZwIAAAALd2F2ZXRyb2xsZXICAAAAAAAAAAAKYXNzZXRJZFN1YgkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAABHRoaXMCAAAAB2Fzc2V0SWQCAAAAKk5vIGFzc2V0SWQgY291bGQgYmUgZm91bmQgaW4gZGF0YSBzdG9yYWdlIQAAAAANYXNzZXREZWNpbWFscwkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGgAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAABmNvbmZpZwkAASwAAAACBQAAAAphc3NldElkU3ViAgAAAAlfRGVjaW1hbHMJAAEsAAAAAgkAASwAAAACAgAAAAdObyBrZXkgCQABLAAAAAIFAAAACmFzc2V0SWRTdWICAAAACV9EZWNpbWFscwIAAAAKIHdhcyBmb3VuZAAAAAAKbXVsdGlwbGllcgkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGgAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAABmNvbmZpZwkAASwAAAACBQAAAAphc3NldElkU3ViAgAAAAtfTXVsdGlwbGllcgkAASwAAAACCQABLAAAAAICAAAAB05vIGtleSAJAAEsAAAAAgUAAAAKYXNzZXRJZFN1YgIAAAALX011bHRpcGxpZXICAAAACiB3YXMgZm91bmQAAAAABGtpbmsJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAZjb25maWcJAAEsAAAAAgUAAAAKYXNzZXRJZFN1YgIAAAAFX0tpbmsJAAEsAAAAAgkAASwAAAACAgAAAAdObyBrZXkgCQABLAAAAAIFAAAACmFzc2V0SWRTdWICAAAABV9LaW5rAgAAAAogd2FzIGZvdW5kAAAAAA5qdW1wTXVsdGlwbGllcgkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGgAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAABmNvbmZpZwkAASwAAAACBQAAAAphc3NldElkU3ViAgAAAA9fSnVtcE11bHRpcGxpZXIJAAEsAAAAAgkAASwAAAACAgAAAAdObyBrZXkgCQABLAAAAAIFAAAACmFzc2V0SWRTdWICAAAAD19KdW1wTXVsdGlwbGllcgIAAAAKIHdhcyBmb3VuZAAAAAAIYmFzZVJhdGUJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAZjb25maWcJAAEsAAAAAgUAAAAKYXNzZXRJZFN1YgIAAAAJX0Jhc2VSYXRlCQABLAAAAAIJAAEsAAAAAgIAAAAHTm8ga2V5IAkAASwAAAACBQAAAAphc3NldElkU3ViAgAAAAlfQmFzZVJhdGUCAAAACiB3YXMgZm91bmQAAAAADXJlc2VydmVGYWN0b3IJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAZjb25maWcJAAEsAAAAAgUAAAAKYXNzZXRJZFN1YgIAAAAOX1Jlc2VydmVGYWN0b3IJAAEsAAAAAgkAASwAAAACAgAAAAdObyBrZXkgCQABLAAAAAIFAAAACmFzc2V0SWRTdWICAAAADl9SZXNlcnZlRmFjdG9yAgAAAAogd2FzIGZvdW5kAAAAAAt0b3RhbEJvcnJvdwkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAAAR0aGlzAgAAAAt0b3RhbEJvcnJvdwAAAAAAAAAAAAAAAAALdG90YWxTdXBwbHkJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwIAAAALdG90YWxTdXBwbHkAAAAAAAAAAAAAAAAADHRvdGFsUmVzZXJ2ZQkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAAAR0aGlzAgAAAAx0b3RhbFJlc2VydmUAAAAAAAAAAAAAAAAADGRUb2tlblN1cHBseQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGgAAAAIFAAAABHRoaXMCAAAADGRUb2tlblN1cHBseQIAAAAdTm8ga2V5IGRUb2tlblN1cHBseSB3YXMgZm91bmQAAAAADmRUb2tlbkRlY2ltYWxzCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwIAAAAOZFRva2VuRGVjaW1hbHMCAAAAH05vIGtleSBkVG9rZW5EZWNpbWFscyB3YXMgZm91bmQAAAAACGRUb2tlbklkCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQdAAAAAgUAAAAEdGhpcwIAAAAIZFRva2VuSWQCAAAAGU5vIGtleSBkVG9rZW5JZCB3YXMgZm91bmQAAAAACmRUb2tlbk5hbWUJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABB0AAAACBQAAAAR0aGlzAgAAAApkVG9rZW5OYW1lAgAAABtObyBrZXkgZFRva2VuTmFtZSB3YXMgZm91bmQAAAAADHN0b3JlZEhlaWdodAkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAAAR0aGlzAgAAAAxzdG9yZWRIZWlnaHQFAAAABmhlaWdodAAAAAALc3RvcmVkSW5kZXgJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwIAAAALc3RvcmVkSW5kZXgAACOG8m/BAAABAAAADmlzQWRtaW5BZGRyZXNzAAAAAQAAAAdhZGRyZXNzAwkAAAAAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAVhZG1pbgUAAAAHYWRkcmVzcwYHAQAAAA1pc1dhdmV0cm9sbGVyAAAAAQAAAAdhZGRyZXNzAwkAAAAAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAt3YXZldHJvbGxlcgUAAAAHYWRkcmVzcwYHAQAAABNpc0FjY2VwdGFibGVBc3NldElkAAAAAQAAAAdhc3NldElkAwkAAAAAAAACBQAAAAdhc3NldElkBQAAAAphc3NldElkU3ViBgcBAAAAC3dyaXRlU3RyaW5nAAAAAgAAAANrZXkAAAALc3RyaW5nVmFsdWUJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAA2tleQUAAAALc3RyaW5nVmFsdWUBAAAADHdyaXRlSW50ZWdlcgAAAAIAAAADa2V5AAAADGludGVnZXJWYWx1ZQkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAA2tleQUAAAAMaW50ZWdlclZhbHVlAQAAABF1c2VybG9ja2VkQmFsYW5jZQAAAAEAAAALdXNlckFkZHJlc3MJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAt1c2VyQWRkcmVzcwIAAAAHX2xvY2tlZAAAAAAAAAAAAAAAAAALdXRpbGl6YXRpb24DCQAAZgAAAAIFAAAAC3RvdGFsU3VwcGx5AAAAAAAAAAAACQAAawAAAAMFAAAAC3RvdGFsQm9ycm93BQAAAApiYXNlRmFjdG9yBQAAAAt0b3RhbFN1cHBseQAAAAAAAAAAAAAAAAADYXByBAAAAAhtaW5WYWx1ZQkABEwAAAACBQAAAAt1dGlsaXphdGlvbgkABEwAAAACBQAAAARraW5rBQAAAANuaWwEAAAADG1pblZhbHVlSXRlbQkAAZcAAAABBQAAAAhtaW5WYWx1ZQQAAAAIbWF4VmFsdWUJAARMAAAAAgAAAAAAAAAAAAkABEwAAAACCQAAZQAAAAIFAAAAC3V0aWxpemF0aW9uBQAAAARraW5rBQAAAANuaWwEAAAADG1heFZhbHVlSXRlbQkAAZYAAAABBQAAAAhtYXhWYWx1ZQkAAGQAAAACCQAAZAAAAAIJAABrAAAAAwUAAAAKbXVsdGlwbGllcgUAAAAMbWluVmFsdWVJdGVtBQAAAApiYXNlRmFjdG9yCQAAawAAAAMFAAAADmp1bXBNdWx0aXBsaWVyBQAAAAxtYXhWYWx1ZUl0ZW0FAAAACmJhc2VGYWN0b3IFAAAACGJhc2VSYXRlAAAAAANhcHkJAABrAAAAAwkAAGsAAAADBQAAAANhcHIFAAAAC3V0aWxpemF0aW9uBQAAAApiYXNlRmFjdG9yCQAAZQAAAAIFAAAACmJhc2VGYWN0b3IFAAAADXJlc2VydmVGYWN0b3IFAAAACmJhc2VGYWN0b3IAAAAAEmJvcnJvd1JhdGVQZXJCbG9jawkAAGsAAAADBQAAAANhcHIFAAAACWJhc2VJbmRleAkAAGgAAAACBQAAAA1ibG9ja3NQZXJZZWFyBQAAAApiYXNlRmFjdG9yAAAAAAtkZWx0YUJsb2NrcwkAAGUAAAACBQAAAAZoZWlnaHQFAAAADHN0b3JlZEhlaWdodAAAAAAMY3VycmVudEluZGV4CQEAAAAIZnJhY3Rpb24AAAAEBQAAAAtzdG9yZWRJbmRleAkAAGQAAAACBQAAAAliYXNlSW5kZXgJAABoAAAAAgUAAAASYm9ycm93UmF0ZVBlckJsb2NrBQAAAAtkZWx0YUJsb2NrcwUAAAAJYmFzZUluZGV4BQAAAAdDRUlMSU5HAAAAABJjdXJyZW50VG90YWxCb3Jyb3cJAABrAAAAAwUAAAALdG90YWxCb3Jyb3cFAAAADGN1cnJlbnRJbmRleAUAAAALc3RvcmVkSW5kZXgAAAAAEWNvbGxlY3RlZEludGVyZXN0CQAAawAAAAMFAAAAC3RvdGFsQm9ycm93CQAAaAAAAAIFAAAAEmJvcnJvd1JhdGVQZXJCbG9jawUAAAALZGVsdGFCbG9ja3MFAAAACWJhc2VJbmRleAAAAAASY3VycmVudFRvdGFsU3VwcGx5CQAAZAAAAAIFAAAAC3RvdGFsU3VwcGx5CQAAawAAAAMJAABlAAAAAgUAAAAKYmFzZUZhY3RvcgUAAAANcmVzZXJ2ZUZhY3RvcgUAAAARY29sbGVjdGVkSW50ZXJlc3QFAAAACmJhc2VGYWN0b3IAAAAADmN1cnJlbnRSZXNlcnZlCQAAZAAAAAIFAAAADHRvdGFsUmVzZXJ2ZQkAAGsAAAADBQAAAA1yZXNlcnZlRmFjdG9yBQAAABFjb2xsZWN0ZWRJbnRlcmVzdAUAAAAKYmFzZUZhY3RvcgAAAAAMZXhjaGFuZ2VSYXRlAwkAAGYAAAACBQAAAAxkVG9rZW5TdXBwbHkAAAAAAAAAAAAEAAAACGV4cG9uZW50CQAAZAAAAAIJAABlAAAAAgAAAAAAAAAAEgUAAAAOZFRva2VuRGVjaW1hbHMFAAAADWFzc2V0RGVjaW1hbHMEAAAACG1hbnRpc3NhCQAAbAAAAAYAAAAAAAAAAAoAAAAAAAAAAAAFAAAACGV4cG9uZW50AAAAAAAAAAAAAAAAAAAAAAAABQAAAAdDRUlMSU5HCQAAawAAAAMFAAAAEmN1cnJlbnRUb3RhbFN1cHBseQUAAAAIbWFudGlzc2EFAAAADGRUb2tlblN1cHBseQAARw3k34IAAAEAAAAQY2FsY0RUb2tlbkFtb3VudAAAAAEAAAALYXNzZXRBbW91bnQEAAAACGV4cG9uZW50CQAAZAAAAAIJAABlAAAAAgAAAAAAAAAAEgUAAAAOZFRva2VuRGVjaW1hbHMFAAAADWFzc2V0RGVjaW1hbHMEAAAACG1hbnRpc3NhCQAAbAAAAAYAAAAAAAAAAAoAAAAAAAAAAAAFAAAACGV4cG9uZW50AAAAAAAAAAAAAAAAAAAAAAAABQAAAAdDRUlMSU5HCQAAawAAAAMFAAAAC2Fzc2V0QW1vdW50BQAAAAhtYW50aXNzYQUAAAAMZXhjaGFuZ2VSYXRlAQAAAA9jYWxjQXNzZXRBbW91bnQAAAABAAAADGRUb2tlbkFtb3VudAQAAAAIZXhwb25lbnQJAABkAAAAAgkAAGUAAAACAAAAAAAAAAASBQAAAA5kVG9rZW5EZWNpbWFscwUAAAANYXNzZXREZWNpbWFscwQAAAAIbWFudGlzc2EJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAUAAAAIZXhwb25lbnQAAAAAAAAAAAAAAAAAAAAAAAAFAAAAB0NFSUxJTkcJAABrAAAAAwUAAAAMZFRva2VuQW1vdW50BQAAAAxleGNoYW5nZVJhdGUFAAAACG1hbnRpc3NhAAAABQAAAAFpAQAAAAdkZXBvc2l0AAAAAgAAAAR1c2VyAAAADGlzQ29sbGF0ZXJhbAMJAQAAAA1pc1dhdmV0cm9sbGVyAAAAAQgFAAAAAWkAAAAGY2FsbGVyBAAAAA91c2VyVG9rZW5BbW91bnQJAQAAABBjYWxjRFRva2VuQW1vdW50AAAAAQgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50BAAAABNjdXJyZW50RFRva2VuU3VwcGx5CQAAZAAAAAIFAAAADGRUb2tlblN1cHBseQUAAAAPdXNlclRva2VuQW1vdW50AwUAAAAMaXNDb2xsYXRlcmFsBAAAABFsb2NrZWRVc2VyQmFsYW5jZQkAAGQAAAACCQEAAAARdXNlcmxvY2tlZEJhbGFuY2UAAAABBQAAAAR1c2VyBQAAAA91c2VyVG9rZW5BbW91bnQJAAUUAAAAAgkABEwAAAACCQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgkAASwAAAACBQAAAAR1c2VyAgAAAAdfbG9ja2VkBQAAABFsb2NrZWRVc2VyQmFsYW5jZQkABEwAAAACCQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgIAAAAMZFRva2VuU3VwcGx5BQAAABNjdXJyZW50RFRva2VuU3VwcGx5CQAETAAAAAIJAQAAAAx3cml0ZUludGVnZXIAAAACAgAAAAt0b3RhbEJvcnJvdwUAAAASY3VycmVudFRvdGFsQm9ycm93CQAETAAAAAIJAQAAAAx3cml0ZUludGVnZXIAAAACAgAAAAt0b3RhbFN1cHBseQkAAGQAAAACBQAAABJjdXJyZW50VG90YWxTdXBwbHkICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAkABEwAAAACCQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgIAAAAMdG90YWxSZXNlcnZlBQAAAA5jdXJyZW50UmVzZXJ2ZQkABEwAAAACCQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgIAAAALc3RvcmVkSW5kZXgFAAAADGN1cnJlbnRJbmRleAkABEwAAAACCQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgIAAAAMc3RvcmVkSGVpZ2h0BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAAB1JlaXNzdWUAAAADCQACWQAAAAEFAAAACGRUb2tlbklkBQAAAA91c2VyVG9rZW5BbW91bnQGBQAAAANuaWwJAAEsAAAAAgkAASwAAAACCQABpAAAAAEICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAUAAAAKZFRva2VuTmFtZQIAAAAYd2VyZSBzdWNjZXNzZnVsbHkgbG9ja2VkCQAFFAAAAAIJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAADGRUb2tlblN1cHBseQUAAAATY3VycmVudERUb2tlblN1cHBseQkABEwAAAACCQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgIAAAALdG90YWxCb3Jyb3cFAAAAEmN1cnJlbnRUb3RhbEJvcnJvdwkABEwAAAACCQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgIAAAALdG90YWxTdXBwbHkJAABkAAAAAgUAAAASY3VycmVudFRvdGFsU3VwcGx5CAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAADHRvdGFsUmVzZXJ2ZQUAAAAOY3VycmVudFJlc2VydmUJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAAC3N0b3JlZEluZGV4BQAAAAxjdXJyZW50SW5kZXgJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAADHN0b3JlZEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAdSZWlzc3VlAAAAAwkAAlkAAAABBQAAAAhkVG9rZW5JZAUAAAAPdXNlclRva2VuQW1vdW50BgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAD3VzZXJUb2tlbkFtb3VudAkAAlkAAAABBQAAAAhkVG9rZW5JZAUAAAADbmlsBQAAAA91c2VyVG9rZW5BbW91bnQJAAACAAAAAQIAAAAwQWRkcmVzcyBkb2VzIG5vdCBtYXRjaCB3aXRoIHdhdmV0cm9sbGVyIGFkZHJlc3MhAAAAAWkBAAAACHdpdGhkcmF3AAAAAQAAAAR1c2VyAwkBAAAADWlzV2F2ZXRyb2xsZXIAAAABCAUAAAABaQAAAAZjYWxsZXIEAAAAEmF2YWlsYWJsZUxpcXVpZGl0eQkAAGUAAAACBQAAABJjdXJyZW50VG90YWxTdXBwbHkFAAAAEmN1cnJlbnRUb3RhbEJvcnJvdwQAAAAUcmVxdWVzdGVkQXNzZXRBbW91bnQJAQAAAA9jYWxjQXNzZXRBbW91bnQAAAABCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQDCQAAZwAAAAIFAAAAEmF2YWlsYWJsZUxpcXVpZGl0eQUAAAAUcmVxdWVzdGVkQXNzZXRBbW91bnQJAAUUAAAAAgkABEwAAAACCQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgIAAAAMZFRva2VuU3VwcGx5CQAAZQAAAAIFAAAADGRUb2tlblN1cHBseQgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50CQAETAAAAAIJAQAAAAx3cml0ZUludGVnZXIAAAACAgAAAAt0b3RhbEJvcnJvdwUAAAASY3VycmVudFRvdGFsQm9ycm93CQAETAAAAAIJAQAAAAx3cml0ZUludGVnZXIAAAACAgAAAAt0b3RhbFN1cHBseQkAAGUAAAACBQAAABJjdXJyZW50VG90YWxTdXBwbHkFAAAAFHJlcXVlc3RlZEFzc2V0QW1vdW50CQAETAAAAAIJAQAAAAx3cml0ZUludGVnZXIAAAACAgAAAAx0b3RhbFJlc2VydmUFAAAADmN1cnJlbnRSZXNlcnZlCQAETAAAAAIJAQAAAAx3cml0ZUludGVnZXIAAAACAgAAAAtzdG9yZWRJbmRleAUAAAAMY3VycmVudEluZGV4CQAETAAAAAIJAQAAAAx3cml0ZUludGVnZXIAAAACAgAAAAxzdG9yZWRIZWlnaHQFAAAABmhlaWdodAkABEwAAAACCQEAAAAEQnVybgAAAAIJAAJZAAAAAQUAAAAIZFRva2VuSWQICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAkABEwAAAACAwkAAAAAAAACBQAAAAphc3NldElkU3ViAgAAAAVXQVZFUwkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAABRyZXF1ZXN0ZWRBc3NldEFtb3VudAUAAAAEdW5pdAkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAABRyZXF1ZXN0ZWRBc3NldEFtb3VudAkAAlkAAAABBQAAAAphc3NldElkU3ViBQAAAANuaWwFAAAAFHJlcXVlc3RlZEFzc2V0QW1vdW50CQAAAgAAAAECAAAAIVBvb2wgbGlxdWlkaXR5IGlzIG5vdCBzdWZmaWNpZW50IQkAAAIAAAABAgAAADBBZGRyZXNzIGRvZXMgbm90IG1hdGNoIHdpdGggd2F2ZXRyb2xsZXIgYWRkcmVzcyEAAAABaQEAAAAQbG9ja0FzQ29sbGF0ZXJhbAAAAAEAAAAEdXNlcgMJAQAAAA1pc1dhdmV0cm9sbGVyAAAAAQgFAAAAAWkAAAAGY2FsbGVyBAAAABBuZXdMb2NrZWRCYWxhbmNlCQAAZAAAAAIJAQAAABF1c2VybG9ja2VkQmFsYW5jZQAAAAEFAAAABHVzZXIICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAkABRQAAAACCQAETAAAAAIJAQAAAAx3cml0ZUludGVnZXIAAAACCQABLAAAAAIFAAAABHVzZXICAAAAB19sb2NrZWQFAAAAEG5ld0xvY2tlZEJhbGFuY2UJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAAC3RvdGFsQm9ycm93BQAAABJjdXJyZW50VG90YWxCb3Jyb3cJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAAC3RvdGFsU3VwcGx5BQAAABJjdXJyZW50VG90YWxTdXBwbHkJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAADHRvdGFsUmVzZXJ2ZQUAAAAOY3VycmVudFJlc2VydmUJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAAC3N0b3JlZEluZGV4BQAAAAxjdXJyZW50SW5kZXgJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAADHN0b3JlZEhlaWdodAUAAAAGaGVpZ2h0BQAAAANuaWwJAAEsAAAAAgkAASwAAAACCQABpAAAAAEICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAUAAAAKZFRva2VuTmFtZQIAAAAYd2VyZSBzdWNjZXNzZnVsbHkgbG9ja2VkCQAAAgAAAAECAAAAMEFkZHJlc3MgZG9lcyBub3QgbWF0Y2ggd2l0aCB3YXZldHJvbGxlciBhZGRyZXNzIQAAAAFpAQAAAAVzZXR1cAAAAAQAAAADYUlkAAAACWNvbmZpZ0FkZAAAAAl0b2tlbk5hbWUAAAAQdG9rZW5EZXNjcmlwdGlvbgMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAAEdGhpcwIAAAANY29uZmlnQWRkcmVzcwQAAAAFYXNzZXQJAARCAAAABQUAAAAJdG9rZW5OYW1lBQAAABB0b2tlbkRlc2NyaXB0aW9uAAAAAAAAAAAAAAAAAAAAAAAIBgQAAAAHdG9rZW5JZAkABDgAAAABBQAAAAVhc3NldAkABEwAAAACBQAAAAVhc3NldAkABEwAAAACCQEAAAALd3JpdGVTdHJpbmcAAAACAgAAAAdhc3NldElkBQAAAANhSWQJAARMAAAAAgkBAAAAC3dyaXRlU3RyaW5nAAAAAgIAAAANY29uZmlnQWRkcmVzcwUAAAAJY29uZmlnQWRkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAt0b3RhbEJvcnJvdwAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAALdG90YWxTdXBwbHkAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAADHRvdGFsUmVzZXJ2ZQAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAALc3RvcmVkSW5kZXgFAAAACWJhc2VJbmRleAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAMc3RvcmVkSGVpZ2h0BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAAC3dyaXRlU3RyaW5nAAAAAgIAAAAKZFRva2VuTmFtZQUAAAAJdG9rZW5OYW1lCQAETAAAAAIJAQAAAAt3cml0ZVN0cmluZwAAAAICAAAACGRUb2tlbklkCQACWAAAAAEFAAAAB3Rva2VuSWQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAADmRUb2tlbkRlY2ltYWxzAAAAAAAAAAAICQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAxkVG9rZW5TdXBwbHkAAAAAAAAAAAAFAAAAA25pbAkAAAIAAAABAgAAABNQb29sIGFscmVhZHkgc2V0dXAhAAAAAWkBAAAACmRlbGV0RW50cnkAAAABAAAAA2tleQMJAQAAAA5pc0FkbWluQWRkcmVzcwAAAAEIBQAAAAFpAAAABmNhbGxlcgkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABBQAAAANrZXkFAAAAA25pbAkAAAIAAAABAgAAABdDYWxsZXIgaXMgbm90IGFuIGFkbWluIQAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5wGftAw==",
    "height": 1685926,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BHFQadct4QZHnyrg1akvf6H4oEhcqHfn43S7VTtjgEEn
Next: C2KWePqFpWzbh3nXiupHDe9CjsHkrNhBQgun6vSR2WPA

Diff: 
Old New Differences
141 141          let availableLiquidity = (currentTotalSupply - currentTotalBorrow)
142 142          let requestedAssetAmount = calcAssetAmount(i.payments[0].amount)
143 143          if ((availableLiquidity >= requestedAssetAmount))
144 -             then $Tuple2([writeInteger("dTokenSupply", (dTokenSupply - i.payments[0].amount)), writeInteger("totalBorrow", currentTotalBorrow), writeInteger("totalSupply", currentTotalSupply), writeInteger("totalReserve", currentReserve), writeInteger("storedIndex", currentIndex), writeInteger("storedHeight", height), Burn(fromBase58String(dTokenId), i.payments[0].amount), if ((assetIdSub == "WAVES"))
144 +             then $Tuple2([writeInteger("dTokenSupply", (dTokenSupply - i.payments[0].amount)), writeInteger("totalBorrow", currentTotalBorrow), writeInteger("totalSupply", (currentTotalSupply - requestedAssetAmount)), writeInteger("totalReserve", currentReserve), writeInteger("storedIndex", currentIndex), writeInteger("storedHeight", height), Burn(fromBase58String(dTokenId), i.payments[0].amount), if ((assetIdSub == "WAVES"))
145 145                  then ScriptTransfer(i.caller, requestedAssetAmount, unit)
146 146                  else ScriptTransfer(i.caller, requestedAssetAmount, fromBase58String(assetIdSub))], requestedAssetAmount)
147 147              else throw("Pool liquidity is not sufficient!")
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let baseFactor = 1000
5 5  
6 6  let baseIndex = 10000000000000000
7 7  
8 8  let blocksPerYear = 525600
9 9  
10 10  let config = valueOrElse(getString(this, "configAddress"), "")
11 11  
12 12  let admin = valueOrElse(getString(addressFromStringValue(config), "admin"), "")
13 13  
14 14  let wavetroller = valueOrElse(getString(addressFromStringValue(config), "wavetroller"), "")
15 15  
16 16  let assetIdSub = valueOrErrorMessage(getString(this, "assetId"), "No assetId could be found in data storage!")
17 17  
18 18  let assetDecimals = valueOrErrorMessage(getInteger(addressFromStringValue(config), (assetIdSub + "_Decimals")), (("No key " + (assetIdSub + "_Decimals")) + " was found"))
19 19  
20 20  let multiplier = valueOrErrorMessage(getInteger(addressFromStringValue(config), (assetIdSub + "_Multiplier")), (("No key " + (assetIdSub + "_Multiplier")) + " was found"))
21 21  
22 22  let kink = valueOrErrorMessage(getInteger(addressFromStringValue(config), (assetIdSub + "_Kink")), (("No key " + (assetIdSub + "_Kink")) + " was found"))
23 23  
24 24  let jumpMultiplier = valueOrErrorMessage(getInteger(addressFromStringValue(config), (assetIdSub + "_JumpMultiplier")), (("No key " + (assetIdSub + "_JumpMultiplier")) + " was found"))
25 25  
26 26  let baseRate = valueOrErrorMessage(getInteger(addressFromStringValue(config), (assetIdSub + "_BaseRate")), (("No key " + (assetIdSub + "_BaseRate")) + " was found"))
27 27  
28 28  let reserveFactor = valueOrErrorMessage(getInteger(addressFromStringValue(config), (assetIdSub + "_ReserveFactor")), (("No key " + (assetIdSub + "_ReserveFactor")) + " was found"))
29 29  
30 30  let totalBorrow = valueOrElse(getInteger(this, "totalBorrow"), 0)
31 31  
32 32  let totalSupply = valueOrElse(getInteger(this, "totalSupply"), 0)
33 33  
34 34  let totalReserve = valueOrElse(getInteger(this, "totalReserve"), 0)
35 35  
36 36  let dTokenSupply = valueOrErrorMessage(getInteger(this, "dTokenSupply"), "No key dTokenSupply was found")
37 37  
38 38  let dTokenDecimals = valueOrErrorMessage(getInteger(this, "dTokenDecimals"), "No key dTokenDecimals was found")
39 39  
40 40  let dTokenId = valueOrErrorMessage(getString(this, "dTokenId"), "No key dTokenId was found")
41 41  
42 42  let dTokenName = valueOrErrorMessage(getString(this, "dTokenName"), "No key dTokenName was found")
43 43  
44 44  let storedHeight = valueOrElse(getInteger(this, "storedHeight"), height)
45 45  
46 46  let storedIndex = valueOrElse(getInteger(this, "storedIndex"), 10000000000000000)
47 47  
48 48  func isAdminAddress (address) = if ((addressFromStringValue(admin) == address))
49 49      then true
50 50      else false
51 51  
52 52  
53 53  func isWavetroller (address) = if ((addressFromStringValue(wavetroller) == address))
54 54      then true
55 55      else false
56 56  
57 57  
58 58  func isAcceptableAssetId (assetId) = if ((assetId == assetIdSub))
59 59      then true
60 60      else false
61 61  
62 62  
63 63  func writeString (key,stringValue) = StringEntry(key, stringValue)
64 64  
65 65  
66 66  func writeInteger (key,integerValue) = IntegerEntry(key, integerValue)
67 67  
68 68  
69 69  func userlockedBalance (userAddress) = valueOrElse(getInteger(this, (userAddress + "_locked")), 0)
70 70  
71 71  
72 72  let utilization = if ((totalSupply > 0))
73 73      then fraction(totalBorrow, baseFactor, totalSupply)
74 74      else 0
75 75  
76 76  let apr = {
77 77      let minValue = [utilization, kink]
78 78      let minValueItem = min(minValue)
79 79      let maxValue = [0, (utilization - kink)]
80 80      let maxValueItem = max(maxValue)
81 81      ((fraction(multiplier, minValueItem, baseFactor) + fraction(jumpMultiplier, maxValueItem, baseFactor)) + baseRate)
82 82      }
83 83  
84 84  let apy = fraction(fraction(apr, utilization, baseFactor), (baseFactor - reserveFactor), baseFactor)
85 85  
86 86  let borrowRatePerBlock = fraction(apr, baseIndex, (blocksPerYear * baseFactor))
87 87  
88 88  let deltaBlocks = (height - storedHeight)
89 89  
90 90  let currentIndex = fraction(storedIndex, (baseIndex + (borrowRatePerBlock * deltaBlocks)), baseIndex, CEILING)
91 91  
92 92  let currentTotalBorrow = fraction(totalBorrow, currentIndex, storedIndex)
93 93  
94 94  let collectedInterest = fraction(totalBorrow, (borrowRatePerBlock * deltaBlocks), baseIndex)
95 95  
96 96  let currentTotalSupply = (totalSupply + fraction((baseFactor - reserveFactor), collectedInterest, baseFactor))
97 97  
98 98  let currentReserve = (totalReserve + fraction(reserveFactor, collectedInterest, baseFactor))
99 99  
100 100  let exchangeRate = if ((dTokenSupply > 0))
101 101      then {
102 102          let exponent = ((18 - dTokenDecimals) + assetDecimals)
103 103          let mantissa = pow(10, 0, exponent, 0, 0, CEILING)
104 104          fraction(currentTotalSupply, mantissa, dTokenSupply)
105 105          }
106 106      else 20000000000000000
107 107  
108 108  func calcDTokenAmount (assetAmount) = {
109 109      let exponent = ((18 - dTokenDecimals) + assetDecimals)
110 110      let mantissa = pow(10, 0, exponent, 0, 0, CEILING)
111 111      fraction(assetAmount, mantissa, exchangeRate)
112 112      }
113 113  
114 114  
115 115  func calcAssetAmount (dTokenAmount) = {
116 116      let exponent = ((18 - dTokenDecimals) + assetDecimals)
117 117      let mantissa = pow(10, 0, exponent, 0, 0, CEILING)
118 118      fraction(dTokenAmount, exchangeRate, mantissa)
119 119      }
120 120  
121 121  
122 122  @Callable(i)
123 123  func deposit (user,isCollateral) = if (isWavetroller(i.caller))
124 124      then {
125 125          let userTokenAmount = calcDTokenAmount(i.payments[0].amount)
126 126          let currentDTokenSupply = (dTokenSupply + userTokenAmount)
127 127          if (isCollateral)
128 128              then {
129 129                  let lockedUserBalance = (userlockedBalance(user) + userTokenAmount)
130 130                  $Tuple2([writeInteger((user + "_locked"), lockedUserBalance), writeInteger("dTokenSupply", currentDTokenSupply), writeInteger("totalBorrow", currentTotalBorrow), writeInteger("totalSupply", (currentTotalSupply + i.payments[0].amount)), writeInteger("totalReserve", currentReserve), writeInteger("storedIndex", currentIndex), writeInteger("storedHeight", height), Reissue(fromBase58String(dTokenId), userTokenAmount, true)], ((toString(i.payments[0].amount) + dTokenName) + "were successfully locked"))
131 131                  }
132 132              else $Tuple2([writeInteger("dTokenSupply", currentDTokenSupply), writeInteger("totalBorrow", currentTotalBorrow), writeInteger("totalSupply", (currentTotalSupply + i.payments[0].amount)), writeInteger("totalReserve", currentReserve), writeInteger("storedIndex", currentIndex), writeInteger("storedHeight", height), Reissue(fromBase58String(dTokenId), userTokenAmount, true), ScriptTransfer(i.caller, userTokenAmount, fromBase58String(dTokenId))], userTokenAmount)
133 133          }
134 134      else throw("Address does not match with wavetroller address!")
135 135  
136 136  
137 137  
138 138  @Callable(i)
139 139  func withdraw (user) = if (isWavetroller(i.caller))
140 140      then {
141 141          let availableLiquidity = (currentTotalSupply - currentTotalBorrow)
142 142          let requestedAssetAmount = calcAssetAmount(i.payments[0].amount)
143 143          if ((availableLiquidity >= requestedAssetAmount))
144 -             then $Tuple2([writeInteger("dTokenSupply", (dTokenSupply - i.payments[0].amount)), writeInteger("totalBorrow", currentTotalBorrow), writeInteger("totalSupply", currentTotalSupply), writeInteger("totalReserve", currentReserve), writeInteger("storedIndex", currentIndex), writeInteger("storedHeight", height), Burn(fromBase58String(dTokenId), i.payments[0].amount), if ((assetIdSub == "WAVES"))
144 +             then $Tuple2([writeInteger("dTokenSupply", (dTokenSupply - i.payments[0].amount)), writeInteger("totalBorrow", currentTotalBorrow), writeInteger("totalSupply", (currentTotalSupply - requestedAssetAmount)), writeInteger("totalReserve", currentReserve), writeInteger("storedIndex", currentIndex), writeInteger("storedHeight", height), Burn(fromBase58String(dTokenId), i.payments[0].amount), if ((assetIdSub == "WAVES"))
145 145                  then ScriptTransfer(i.caller, requestedAssetAmount, unit)
146 146                  else ScriptTransfer(i.caller, requestedAssetAmount, fromBase58String(assetIdSub))], requestedAssetAmount)
147 147              else throw("Pool liquidity is not sufficient!")
148 148          }
149 149      else throw("Address does not match with wavetroller address!")
150 150  
151 151  
152 152  
153 153  @Callable(i)
154 154  func lockAsCollateral (user) = if (isWavetroller(i.caller))
155 155      then {
156 156          let newLockedBalance = (userlockedBalance(user) + i.payments[0].amount)
157 157          $Tuple2([writeInteger((user + "_locked"), newLockedBalance), writeInteger("totalBorrow", currentTotalBorrow), writeInteger("totalSupply", currentTotalSupply), writeInteger("totalReserve", currentReserve), writeInteger("storedIndex", currentIndex), writeInteger("storedHeight", height)], ((toString(i.payments[0].amount) + dTokenName) + "were successfully locked"))
158 158          }
159 159      else throw("Address does not match with wavetroller address!")
160 160  
161 161  
162 162  
163 163  @Callable(i)
164 164  func setup (aId,configAdd,tokenName,tokenDescription) = if (!(isDefined(getString(this, "configAddress"))))
165 165      then {
166 166          let asset = Issue(tokenName, tokenDescription, 0, 8, true)
167 167          let tokenId = calculateAssetId(asset)
168 168  [asset, writeString("assetId", aId), writeString("configAddress", configAdd), IntegerEntry("totalBorrow", 0), IntegerEntry("totalSupply", 0), IntegerEntry("totalReserve", 0), IntegerEntry("storedIndex", baseIndex), IntegerEntry("storedHeight", height), writeString("dTokenName", tokenName), writeString("dTokenId", toBase58String(tokenId)), IntegerEntry("dTokenDecimals", 8), IntegerEntry("dTokenSupply", 0)]
169 169          }
170 170      else throw("Pool already setup!")
171 171  
172 172  
173 173  
174 174  @Callable(i)
175 175  func deletEntry (key) = if (isAdminAddress(i.caller))
176 176      then [DeleteEntry(key)]
177 177      else throw("Caller is not an admin!")
178 178  
179 179  
180 180  @Verifier(tx)
181 181  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
182 182

Old	New		Differences
141	141		let availableLiquidity = (currentTotalSupply - currentTotalBorrow)
142	142		let requestedAssetAmount = calcAssetAmount(i.payments[0].amount)
143	143		if ((availableLiquidity >= requestedAssetAmount))
144		-	then $Tuple2([writeInteger("dTokenSupply", (dTokenSupply - i.payments[0].amount)), writeInteger("totalBorrow", currentTotalBorrow), writeInteger("totalSupply", currentTotalSupply), writeInteger("totalReserve", currentReserve), writeInteger("storedIndex", currentIndex), writeInteger("storedHeight", height), Burn(fromBase58String(dTokenId), i.payments[0].amount), if ((assetIdSub == "WAVES"))
	144	+	then $Tuple2([writeInteger("dTokenSupply", (dTokenSupply - i.payments[0].amount)), writeInteger("totalBorrow", currentTotalBorrow), writeInteger("totalSupply", (currentTotalSupply - requestedAssetAmount)), writeInteger("totalReserve", currentReserve), writeInteger("storedIndex", currentIndex), writeInteger("storedHeight", height), Burn(fromBase58String(dTokenId), i.payments[0].amount), if ((assetIdSub == "WAVES"))
145	145		then ScriptTransfer(i.caller, requestedAssetAmount, unit)
146	146		else ScriptTransfer(i.caller, requestedAssetAmount, fromBase58String(assetIdSub))], requestedAssetAmount)
147	147		else throw("Pool liquidity is not sufficient!")

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let baseFactor = 1000
5	5
6	6		let baseIndex = 10000000000000000
7	7
8	8		let blocksPerYear = 525600
9	9
10	10		let config = valueOrElse(getString(this, "configAddress"), "")
11	11
12	12		let admin = valueOrElse(getString(addressFromStringValue(config), "admin"), "")
13	13
14	14		let wavetroller = valueOrElse(getString(addressFromStringValue(config), "wavetroller"), "")
15	15
16	16		let assetIdSub = valueOrErrorMessage(getString(this, "assetId"), "No assetId could be found in data storage!")
17	17
18	18		let assetDecimals = valueOrErrorMessage(getInteger(addressFromStringValue(config), (assetIdSub + "_Decimals")), (("No key " + (assetIdSub + "_Decimals")) + " was found"))
19	19
20	20		let multiplier = valueOrErrorMessage(getInteger(addressFromStringValue(config), (assetIdSub + "_Multiplier")), (("No key " + (assetIdSub + "_Multiplier")) + " was found"))
21	21
22	22		let kink = valueOrErrorMessage(getInteger(addressFromStringValue(config), (assetIdSub + "_Kink")), (("No key " + (assetIdSub + "_Kink")) + " was found"))
23	23
24	24		let jumpMultiplier = valueOrErrorMessage(getInteger(addressFromStringValue(config), (assetIdSub + "_JumpMultiplier")), (("No key " + (assetIdSub + "_JumpMultiplier")) + " was found"))
25	25
26	26		let baseRate = valueOrErrorMessage(getInteger(addressFromStringValue(config), (assetIdSub + "_BaseRate")), (("No key " + (assetIdSub + "_BaseRate")) + " was found"))
27	27
28	28		let reserveFactor = valueOrErrorMessage(getInteger(addressFromStringValue(config), (assetIdSub + "_ReserveFactor")), (("No key " + (assetIdSub + "_ReserveFactor")) + " was found"))
29	29
30	30		let totalBorrow = valueOrElse(getInteger(this, "totalBorrow"), 0)
31	31
32	32		let totalSupply = valueOrElse(getInteger(this, "totalSupply"), 0)
33	33
34	34		let totalReserve = valueOrElse(getInteger(this, "totalReserve"), 0)
35	35
36	36		let dTokenSupply = valueOrErrorMessage(getInteger(this, "dTokenSupply"), "No key dTokenSupply was found")
37	37
38	38		let dTokenDecimals = valueOrErrorMessage(getInteger(this, "dTokenDecimals"), "No key dTokenDecimals was found")
39	39
40	40		let dTokenId = valueOrErrorMessage(getString(this, "dTokenId"), "No key dTokenId was found")
41	41
42	42		let dTokenName = valueOrErrorMessage(getString(this, "dTokenName"), "No key dTokenName was found")
43	43
44	44		let storedHeight = valueOrElse(getInteger(this, "storedHeight"), height)
45	45
46	46		let storedIndex = valueOrElse(getInteger(this, "storedIndex"), 10000000000000000)
47	47
48	48		func isAdminAddress (address) = if ((addressFromStringValue(admin) == address))
49	49		then true
50	50		else false
51	51
52	52
53	53		func isWavetroller (address) = if ((addressFromStringValue(wavetroller) == address))
54	54		then true
55	55		else false
56	56
57	57
58	58		func isAcceptableAssetId (assetId) = if ((assetId == assetIdSub))
59	59		then true
60	60		else false
61	61
62	62
63	63		func writeString (key,stringValue) = StringEntry(key, stringValue)
64	64
65	65
66	66		func writeInteger (key,integerValue) = IntegerEntry(key, integerValue)
67	67
68	68
69	69		func userlockedBalance (userAddress) = valueOrElse(getInteger(this, (userAddress + "_locked")), 0)
70	70
71	71
72	72		let utilization = if ((totalSupply > 0))
73	73		then fraction(totalBorrow, baseFactor, totalSupply)
74	74		else 0
75	75
76	76		let apr = {
77	77		let minValue = [utilization, kink]
78	78		let minValueItem = min(minValue)
79	79		let maxValue = [0, (utilization - kink)]
80	80		let maxValueItem = max(maxValue)
81	81		((fraction(multiplier, minValueItem, baseFactor) + fraction(jumpMultiplier, maxValueItem, baseFactor)) + baseRate)
82	82		}
83	83
84	84		let apy = fraction(fraction(apr, utilization, baseFactor), (baseFactor - reserveFactor), baseFactor)
85	85
86	86		let borrowRatePerBlock = fraction(apr, baseIndex, (blocksPerYear * baseFactor))
87	87
88	88		let deltaBlocks = (height - storedHeight)
89	89
90	90		let currentIndex = fraction(storedIndex, (baseIndex + (borrowRatePerBlock * deltaBlocks)), baseIndex, CEILING)
91	91
92	92		let currentTotalBorrow = fraction(totalBorrow, currentIndex, storedIndex)
93	93
94	94		let collectedInterest = fraction(totalBorrow, (borrowRatePerBlock * deltaBlocks), baseIndex)
95	95
96	96		let currentTotalSupply = (totalSupply + fraction((baseFactor - reserveFactor), collectedInterest, baseFactor))
97	97
98	98		let currentReserve = (totalReserve + fraction(reserveFactor, collectedInterest, baseFactor))
99	99
100	100		let exchangeRate = if ((dTokenSupply > 0))
101	101		then {
102	102		let exponent = ((18 - dTokenDecimals) + assetDecimals)
103	103		let mantissa = pow(10, 0, exponent, 0, 0, CEILING)
104	104		fraction(currentTotalSupply, mantissa, dTokenSupply)
105	105		}
106	106		else 20000000000000000
107	107
108	108		func calcDTokenAmount (assetAmount) = {
109	109		let exponent = ((18 - dTokenDecimals) + assetDecimals)
110	110		let mantissa = pow(10, 0, exponent, 0, 0, CEILING)
111	111		fraction(assetAmount, mantissa, exchangeRate)
112	112		}
113	113
114	114
115	115		func calcAssetAmount (dTokenAmount) = {
116	116		let exponent = ((18 - dTokenDecimals) + assetDecimals)
117	117		let mantissa = pow(10, 0, exponent, 0, 0, CEILING)
118	118		fraction(dTokenAmount, exchangeRate, mantissa)
119	119		}
120	120
121	121
122	122		@Callable(i)
123	123		func deposit (user,isCollateral) = if (isWavetroller(i.caller))
124	124		then {
125	125		let userTokenAmount = calcDTokenAmount(i.payments[0].amount)
126	126		let currentDTokenSupply = (dTokenSupply + userTokenAmount)
127	127		if (isCollateral)
128	128		then {
129	129		let lockedUserBalance = (userlockedBalance(user) + userTokenAmount)
130	130		$Tuple2([writeInteger((user + "_locked"), lockedUserBalance), writeInteger("dTokenSupply", currentDTokenSupply), writeInteger("totalBorrow", currentTotalBorrow), writeInteger("totalSupply", (currentTotalSupply + i.payments[0].amount)), writeInteger("totalReserve", currentReserve), writeInteger("storedIndex", currentIndex), writeInteger("storedHeight", height), Reissue(fromBase58String(dTokenId), userTokenAmount, true)], ((toString(i.payments[0].amount) + dTokenName) + "were successfully locked"))
131	131		}
132	132		else $Tuple2([writeInteger("dTokenSupply", currentDTokenSupply), writeInteger("totalBorrow", currentTotalBorrow), writeInteger("totalSupply", (currentTotalSupply + i.payments[0].amount)), writeInteger("totalReserve", currentReserve), writeInteger("storedIndex", currentIndex), writeInteger("storedHeight", height), Reissue(fromBase58String(dTokenId), userTokenAmount, true), ScriptTransfer(i.caller, userTokenAmount, fromBase58String(dTokenId))], userTokenAmount)
133	133		}
134	134		else throw("Address does not match with wavetroller address!")
135	135
136	136
137	137
138	138		@Callable(i)
139	139		func withdraw (user) = if (isWavetroller(i.caller))
140	140		then {
141	141		let availableLiquidity = (currentTotalSupply - currentTotalBorrow)
142	142		let requestedAssetAmount = calcAssetAmount(i.payments[0].amount)
143	143		if ((availableLiquidity >= requestedAssetAmount))
144		-	then $Tuple2([writeInteger("dTokenSupply", (dTokenSupply - i.payments[0].amount)), writeInteger("totalBorrow", currentTotalBorrow), writeInteger("totalSupply", currentTotalSupply), writeInteger("totalReserve", currentReserve), writeInteger("storedIndex", currentIndex), writeInteger("storedHeight", height), Burn(fromBase58String(dTokenId), i.payments[0].amount), if ((assetIdSub == "WAVES"))
	144	+	then $Tuple2([writeInteger("dTokenSupply", (dTokenSupply - i.payments[0].amount)), writeInteger("totalBorrow", currentTotalBorrow), writeInteger("totalSupply", (currentTotalSupply - requestedAssetAmount)), writeInteger("totalReserve", currentReserve), writeInteger("storedIndex", currentIndex), writeInteger("storedHeight", height), Burn(fromBase58String(dTokenId), i.payments[0].amount), if ((assetIdSub == "WAVES"))
145	145		then ScriptTransfer(i.caller, requestedAssetAmount, unit)
146	146		else ScriptTransfer(i.caller, requestedAssetAmount, fromBase58String(assetIdSub))], requestedAssetAmount)
147	147		else throw("Pool liquidity is not sufficient!")
148	148		}
149	149		else throw("Address does not match with wavetroller address!")
150	150
151	151
152	152
153	153		@Callable(i)
154	154		func lockAsCollateral (user) = if (isWavetroller(i.caller))
155	155		then {
156	156		let newLockedBalance = (userlockedBalance(user) + i.payments[0].amount)
157	157		$Tuple2([writeInteger((user + "_locked"), newLockedBalance), writeInteger("totalBorrow", currentTotalBorrow), writeInteger("totalSupply", currentTotalSupply), writeInteger("totalReserve", currentReserve), writeInteger("storedIndex", currentIndex), writeInteger("storedHeight", height)], ((toString(i.payments[0].amount) + dTokenName) + "were successfully locked"))
158	158		}
159	159		else throw("Address does not match with wavetroller address!")
160	160
161	161
162	162
163	163		@Callable(i)
164	164		func setup (aId,configAdd,tokenName,tokenDescription) = if (!(isDefined(getString(this, "configAddress"))))
165	165		then {
166	166		let asset = Issue(tokenName, tokenDescription, 0, 8, true)
167	167		let tokenId = calculateAssetId(asset)
168	168		[asset, writeString("assetId", aId), writeString("configAddress", configAdd), IntegerEntry("totalBorrow", 0), IntegerEntry("totalSupply", 0), IntegerEntry("totalReserve", 0), IntegerEntry("storedIndex", baseIndex), IntegerEntry("storedHeight", height), writeString("dTokenName", tokenName), writeString("dTokenId", toBase58String(tokenId)), IntegerEntry("dTokenDecimals", 8), IntegerEntry("dTokenSupply", 0)]
169	169		}
170	170		else throw("Pool already setup!")
171	171
172	172
173	173
174	174		@Callable(i)
175	175		func deletEntry (key) = if (isAdminAddress(i.caller))
176	176		then [DeleteEntry(key)]
177	177		else throw("Caller is not an admin!")
178	178
179	179
180	180		@Verifier(tx)
181	181		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
182	182

github/deemru/w8io/c3f4982 
38.41 ms ◑