w8 · tx · 9VF···DxW

tx · 9VFxopaCPNrovAcoN8WL8HDfNEb72qt7sAiUFSXRLDxW

3MyfKzBNordUSxbv54zj1hxm98ojcDvaiXU:  -0.04000000 Waves

2021.09.02 00:23 [1684501] smart account 3MyfKzBNordUSxbv54zj1hxm98ojcDvaiXU > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9VFxopaCPNrovAcoN8WL8HDfNEb72qt7sAiUFSXRLDxW",
    "fee": 4000000,
    "feeAssetId": null,
    "timestamp": 1630531455682,
    "version": 2,
    "chainId": 84,
    "sender": "3MyfKzBNordUSxbv54zj1hxm98ojcDvaiXU",
    "senderPublicKey": "EhGswdVQkp8SXCWyKvRCUKYDidTrRjnzTPa8CZk6GYgN",
    "proofs": [
        "LMv3KhQE1myHDtnQLUy9j1idbZx8xraEs2BmmSB35WNbqGA22geesgz64sEFUA4qCWvavc38TLDFYcqw6fP65kF"
    ],
    "script": "base64:AAIFAAAAAAAAABoIAhIECgIIBBIDCgEIEgYKBAgICAgSAwoBCAAAACgAAAAACmJhc2VGYWN0b3IAAAAAAAAAA+gAAAAACWJhc2VJbmRleAAAI4byb8EAAAAAAAANYmxvY2tzUGVyWWVhcgAAAAAAAAgFIAAAAAAGY29uZmlnCQEAAAALdmFsdWVPckVsc2UAAAACCQAEHQAAAAIFAAAABHRoaXMCAAAADWNvbmZpZ0FkZHJlc3MCAAAAAAAAAAAFYWRtaW4JAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQdAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAGY29uZmlnAgAAAAVhZG1pbgIAAAAAAAAAAAt3YXZldHJvbGxlcgkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABB0AAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAZjb25maWcCAAAAC3dhdmV0cm9sbGVyAgAAAAAAAAAACmFzc2V0SWRTdWIJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABB0AAAACBQAAAAR0aGlzAgAAAAdhc3NldElkAgAAACpObyBhc3NldElkIGNvdWxkIGJlIGZvdW5kIGluIGRhdGEgc3RvcmFnZSEAAAAADWFzc2V0RGVjaW1hbHMJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAZjb25maWcJAAEsAAAAAgUAAAAKYXNzZXRJZFN1YgIAAAAJX0RlY2ltYWxzCQABLAAAAAIJAAEsAAAAAgIAAAAHTm8ga2V5IAkAASwAAAACBQAAAAphc3NldElkU3ViAgAAAAlfRGVjaW1hbHMCAAAACiB3YXMgZm91bmQAAAAACm11bHRpcGxpZXIJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAZjb25maWcJAAEsAAAAAgUAAAAKYXNzZXRJZFN1YgIAAAALX011bHRpcGxpZXIJAAEsAAAAAgkAASwAAAACAgAAAAdObyBrZXkgCQABLAAAAAIFAAAACmFzc2V0SWRTdWICAAAAC19NdWx0aXBsaWVyAgAAAAogd2FzIGZvdW5kAAAAAARraW5rCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAGY29uZmlnCQABLAAAAAIFAAAACmFzc2V0SWRTdWICAAAABV9LaW5rCQABLAAAAAIJAAEsAAAAAgIAAAAHTm8ga2V5IAkAASwAAAACBQAAAAphc3NldElkU3ViAgAAAAVfS2luawIAAAAKIHdhcyBmb3VuZAAAAAAOanVtcE11bHRpcGxpZXIJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAZjb25maWcJAAEsAAAAAgUAAAAKYXNzZXRJZFN1YgIAAAAPX0p1bXBNdWx0aXBsaWVyCQABLAAAAAIJAAEsAAAAAgIAAAAHTm8ga2V5IAkAASwAAAACBQAAAAphc3NldElkU3ViAgAAAA9fSnVtcE11bHRpcGxpZXICAAAACiB3YXMgZm91bmQAAAAACGJhc2VSYXRlCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAGY29uZmlnCQABLAAAAAIFAAAACmFzc2V0SWRTdWICAAAACV9CYXNlUmF0ZQkAASwAAAACCQABLAAAAAICAAAAB05vIGtleSAJAAEsAAAAAgUAAAAKYXNzZXRJZFN1YgIAAAAJX0Jhc2VSYXRlAgAAAAogd2FzIGZvdW5kAAAAAA1yZXNlcnZlRmFjdG9yCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAGY29uZmlnCQABLAAAAAIFAAAACmFzc2V0SWRTdWICAAAADl9SZXNlcnZlRmFjdG9yCQABLAAAAAIJAAEsAAAAAgIAAAAHTm8ga2V5IAkAASwAAAACBQAAAAphc3NldElkU3ViAgAAAA5fUmVzZXJ2ZUZhY3RvcgIAAAAKIHdhcyBmb3VuZAAAAAALdG90YWxCb3Jyb3cJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwIAAAALdG90YWxCb3Jyb3cAAAAAAAAAAAAAAAAAC3RvdGFsU3VwcGx5CQEAAAALdmFsdWVPckVsc2UAAAACCQAEGgAAAAIFAAAABHRoaXMCAAAAC3RvdGFsU3VwcGx5AAAAAAAAAAAAAAAAAAx0b3RhbFJlc2VydmUJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwIAAAAMdG90YWxSZXNlcnZlAAAAAAAAAAAAAAAAAAxkVG9rZW5TdXBwbHkJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzAgAAAAxkVG9rZW5TdXBwbHkCAAAAHU5vIGtleSBkVG9rZW5TdXBwbHkgd2FzIGZvdW5kAAAAAA5kVG9rZW5EZWNpbWFscwkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGgAAAAIFAAAABHRoaXMCAAAADmRUb2tlbkRlY2ltYWxzAgAAAB9ObyBrZXkgZFRva2VuRGVjaW1hbHMgd2FzIGZvdW5kAAAAAAhkVG9rZW5JZAkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAABHRoaXMCAAAACGRUb2tlbklkAgAAABlObyBrZXkgZFRva2VuSWQgd2FzIGZvdW5kAAAAAAxzdG9yZWRIZWlnaHQJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwIAAAAMc3RvcmVkSGVpZ2h0BQAAAAZoZWlnaHQAAAAAC3N0b3JlZEluZGV4CQEAAAALdmFsdWVPckVsc2UAAAACCQAEGgAAAAIFAAAABHRoaXMCAAAAC3N0b3JlZEluZGV4AAAjhvJvwQAAAQAAAA5pc0FkbWluQWRkcmVzcwAAAAEAAAAHYWRkcmVzcwMJAAAAAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAFYWRtaW4FAAAAB2FkZHJlc3MGBwEAAAANaXNXYXZldHJvbGxlcgAAAAEAAAAHYWRkcmVzcwMJAAAAAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAALd2F2ZXRyb2xsZXIFAAAAB2FkZHJlc3MGBwEAAAATaXNBY2NlcHRhYmxlQXNzZXRJZAAAAAEAAAAHYXNzZXRJZAMJAAAAAAAAAgUAAAAHYXNzZXRJZAUAAAAKYXNzZXRJZFN1YgYHAQAAAAt3cml0ZVN0cmluZwAAAAIAAAADa2V5AAAAC3N0cmluZ1ZhbHVlCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAANrZXkFAAAAC3N0cmluZ1ZhbHVlAQAAAAx3cml0ZUludGVnZXIAAAACAAAAA2tleQAAAAxpbnRlZ2VyVmFsdWUJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAANrZXkFAAAADGludGVnZXJWYWx1ZQEAAAARdXNlcmxvY2tlZEJhbGFuY2UAAAABAAAAC3VzZXJBZGRyZXNzCQEAAAALdmFsdWVPckVsc2UAAAACCQAEGgAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAALdXNlckFkZHJlc3MCAAAAB19sb2NrZWQAAAAAAAAAAAAAAAAAC3V0aWxpemF0aW9uAwkAAGYAAAACBQAAAAt0b3RhbFN1cHBseQAAAAAAAAAAAAkAAGsAAAADBQAAAAt0b3RhbEJvcnJvdwUAAAAKYmFzZUZhY3RvcgUAAAALdG90YWxTdXBwbHkAAAAAAAAAAAAAAAAAA2FwcgQAAAAIbWluVmFsdWUJAARMAAAAAgUAAAALdXRpbGl6YXRpb24JAARMAAAAAgUAAAAEa2luawUAAAADbmlsBAAAAAxtaW5WYWx1ZUl0ZW0JAAGXAAAAAQUAAAAIbWluVmFsdWUEAAAACG1heFZhbHVlCQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgkAAGUAAAACBQAAAAt1dGlsaXphdGlvbgUAAAAEa2luawUAAAADbmlsBAAAAAxtYXhWYWx1ZUl0ZW0JAAGWAAAAAQUAAAAIbWF4VmFsdWUJAABkAAAAAgkAAGQAAAACCQAAawAAAAMFAAAACm11bHRpcGxpZXIFAAAADG1pblZhbHVlSXRlbQUAAAAKYmFzZUZhY3RvcgkAAGsAAAADBQAAAA5qdW1wTXVsdGlwbGllcgUAAAAMbWF4VmFsdWVJdGVtBQAAAApiYXNlRmFjdG9yBQAAAAhiYXNlUmF0ZQAAAAADYXB5CQAAawAAAAMJAABrAAAAAwUAAAADYXByBQAAAAt1dGlsaXphdGlvbgUAAAAKYmFzZUZhY3RvcgkAAGUAAAACBQAAAApiYXNlRmFjdG9yBQAAAA1yZXNlcnZlRmFjdG9yBQAAAApiYXNlRmFjdG9yAAAAABJib3Jyb3dSYXRlUGVyQmxvY2sJAABrAAAAAwUAAAADYXByBQAAAAliYXNlSW5kZXgJAABoAAAAAgUAAAANYmxvY2tzUGVyWWVhcgUAAAAKYmFzZUZhY3RvcgAAAAALZGVsdGFCbG9ja3MJAABlAAAAAgUAAAAGaGVpZ2h0BQAAAAxzdG9yZWRIZWlnaHQAAAAADGN1cnJlbnRJbmRleAkBAAAACGZyYWN0aW9uAAAABAUAAAALc3RvcmVkSW5kZXgJAABkAAAAAgUAAAAJYmFzZUluZGV4CQAAaAAAAAIFAAAAEmJvcnJvd1JhdGVQZXJCbG9jawUAAAALZGVsdGFCbG9ja3MFAAAACWJhc2VJbmRleAUAAAAHQ0VJTElORwAAAAASY3VycmVudFRvdGFsQm9ycm93CQAAawAAAAMFAAAAC3RvdGFsQm9ycm93BQAAAAxjdXJyZW50SW5kZXgFAAAAC3N0b3JlZEluZGV4AAAAABFjb2xsZWN0ZWRJbnRlcmVzdAkAAGsAAAADBQAAAAt0b3RhbEJvcnJvdwkAAGgAAAACBQAAABJib3Jyb3dSYXRlUGVyQmxvY2sFAAAAC2RlbHRhQmxvY2tzBQAAAAliYXNlSW5kZXgAAAAAEmN1cnJlbnRUb3RhbFN1cHBseQkAAGQAAAACBQAAAAt0b3RhbFN1cHBseQkAAGsAAAADCQAAZQAAAAIFAAAACmJhc2VGYWN0b3IFAAAADXJlc2VydmVGYWN0b3IFAAAAEWNvbGxlY3RlZEludGVyZXN0BQAAAApiYXNlRmFjdG9yAAAAAA5jdXJyZW50UmVzZXJ2ZQkAAGQAAAACBQAAAAx0b3RhbFJlc2VydmUJAABrAAAAAwUAAAANcmVzZXJ2ZUZhY3RvcgUAAAARY29sbGVjdGVkSW50ZXJlc3QFAAAACmJhc2VGYWN0b3IAAAAADGV4Y2hhbmdlUmF0ZQMJAABmAAAAAgUAAAAMZFRva2VuU3VwcGx5AAAAAAAAAAAABAAAAAhleHBvbmVudAkAAGQAAAACCQAAZQAAAAIAAAAAAAAAABIFAAAADmRUb2tlbkRlY2ltYWxzBQAAAA1hc3NldERlY2ltYWxzBAAAAAhtYW50aXNzYQkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAABQAAAAhleHBvbmVudAAAAAAAAAAAAAAAAAAAAAAAAAUAAAAHQ0VJTElORwkAAGsAAAADBQAAABJjdXJyZW50VG90YWxTdXBwbHkFAAAACG1hbnRpc3NhBQAAAAxkVG9rZW5TdXBwbHkAAEcN5N+CAAABAAAAEGNhbGNEVG9rZW5BbW91bnQAAAABAAAAC2Fzc2V0QW1vdW50BAAAAAhleHBvbmVudAkAAGQAAAACCQAAZQAAAAIAAAAAAAAAABIFAAAADmRUb2tlbkRlY2ltYWxzBQAAAA1hc3NldERlY2ltYWxzBAAAAAhtYW50aXNzYQkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAABQAAAAhleHBvbmVudAAAAAAAAAAAAAAAAAAAAAAAAAUAAAAHQ0VJTElORwkAAGsAAAADBQAAAAthc3NldEFtb3VudAUAAAAIbWFudGlzc2EFAAAADGV4Y2hhbmdlUmF0ZQEAAAAPY2FsY0Fzc2V0QW1vdW50AAAAAQAAAAxkVG9rZW5BbW91bnQEAAAACGV4cG9uZW50CQAAZAAAAAIJAABlAAAAAgAAAAAAAAAAEgUAAAAOZFRva2VuRGVjaW1hbHMFAAAADWFzc2V0RGVjaW1hbHMEAAAACG1hbnRpc3NhCQAAbAAAAAYAAAAAAAAAAAoAAAAAAAAAAAAFAAAACGV4cG9uZW50AAAAAAAAAAAAAAAAAAAAAAAABQAAAAdDRUlMSU5HCQAAawAAAAMFAAAADGRUb2tlbkFtb3VudAUAAAAMZXhjaGFuZ2VSYXRlBQAAAAhtYW50aXNzYQAAAAQAAAABaQEAAAAHZGVwb3NpdAAAAAIAAAAEdXNlcgAAAAxpc0NvbGxhdGVyYWwDCQEAAAANaXNXYXZldHJvbGxlcgAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAAPdXNlclRva2VuQW1vdW50CQEAAAAQY2FsY0RUb2tlbkFtb3VudAAAAAEICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAQAAAATY3VycmVudERUb2tlblN1cHBseQkAAGQAAAACBQAAAAxkVG9rZW5TdXBwbHkFAAAAD3VzZXJUb2tlbkFtb3VudAMFAAAADGlzQ29sbGF0ZXJhbAQAAAARbG9ja2VkVXNlckJhbGFuY2UJAABkAAAAAgkBAAAAEXVzZXJsb2NrZWRCYWxhbmNlAAAAAQUAAAAEdXNlcgUAAAAPdXNlclRva2VuQW1vdW50CQAFFAAAAAIJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAIJAAEsAAAAAgUAAAAEdXNlcgIAAAAHX2xvY2tlZAUAAAARbG9ja2VkVXNlckJhbGFuY2UJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAADGRUb2tlblN1cHBseQUAAAATY3VycmVudERUb2tlblN1cHBseQkABEwAAAACCQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgIAAAALdG90YWxCb3Jyb3cFAAAAEmN1cnJlbnRUb3RhbEJvcnJvdwkABEwAAAACCQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgIAAAALdG90YWxTdXBwbHkJAABkAAAAAgUAAAASY3VycmVudFRvdGFsU3VwcGx5CAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAADHRvdGFsUmVzZXJ2ZQUAAAAOY3VycmVudFJlc2VydmUJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAAC3N0b3JlZEluZGV4BQAAAAxjdXJyZW50SW5kZXgJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAADHN0b3JlZEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAdSZWlzc3VlAAAAAwkAAlkAAAABBQAAAAhkVG9rZW5JZAUAAAAPdXNlclRva2VuQW1vdW50BgUAAAADbmlsCQABLAAAAAIJAAGkAAAAAQgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50AgAAABh3ZXJlIHN1Y2Nlc3NmdWxseSBsb2NrZWQJAAUUAAAAAgkABEwAAAACCQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgIAAAAMZFRva2VuU3VwcGx5BQAAABNjdXJyZW50RFRva2VuU3VwcGx5CQAETAAAAAIJAQAAAAx3cml0ZUludGVnZXIAAAACAgAAAAt0b3RhbEJvcnJvdwUAAAASY3VycmVudFRvdGFsQm9ycm93CQAETAAAAAIJAQAAAAx3cml0ZUludGVnZXIAAAACAgAAAAt0b3RhbFN1cHBseQkAAGQAAAACBQAAABJjdXJyZW50VG90YWxTdXBwbHkICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAkABEwAAAACCQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgIAAAAMdG90YWxSZXNlcnZlBQAAAA5jdXJyZW50UmVzZXJ2ZQkABEwAAAACCQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgIAAAALc3RvcmVkSW5kZXgFAAAADGN1cnJlbnRJbmRleAkABEwAAAACCQEAAAAMd3JpdGVJbnRlZ2VyAAAAAgIAAAAMc3RvcmVkSGVpZ2h0BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAAB1JlaXNzdWUAAAADCQACWQAAAAEFAAAACGRUb2tlbklkBQAAAA91c2VyVG9rZW5BbW91bnQGCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAPdXNlclRva2VuQW1vdW50CQACWQAAAAEFAAAACGRUb2tlbklkBQAAAANuaWwFAAAAD3VzZXJUb2tlbkFtb3VudAkAAAIAAAABAgAAADBBZGRyZXNzIGRvZXMgbm90IG1hdGNoIHdpdGggd2F2ZXRyb2xsZXIgYWRkcmVzcyEAAAABaQEAAAAId2l0aGRyYXcAAAABAAAABHVzZXIDCQEAAAANaXNXYXZldHJvbGxlcgAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAASYXZhaWxhYmxlTGlxdWlkaXR5CQAAZQAAAAIFAAAAEmN1cnJlbnRUb3RhbFN1cHBseQUAAAASY3VycmVudFRvdGFsQm9ycm93BAAAABRyZXF1ZXN0ZWRBc3NldEFtb3VudAkBAAAAD2NhbGNBc3NldEFtb3VudAAAAAEICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAMJAABnAAAAAgUAAAASYXZhaWxhYmxlTGlxdWlkaXR5BQAAABRyZXF1ZXN0ZWRBc3NldEFtb3VudAkABRQAAAACCQAETAAAAAIJAQAAAAx3cml0ZUludGVnZXIAAAACAgAAAAxkVG9rZW5TdXBwbHkJAABlAAAAAgUAAAAMZFRva2VuU3VwcGx5CAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAAC3RvdGFsQm9ycm93BQAAABJjdXJyZW50VG90YWxCb3Jyb3cJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAAC3RvdGFsU3VwcGx5CQAAZQAAAAIFAAAAEmN1cnJlbnRUb3RhbFN1cHBseQUAAAAUcmVxdWVzdGVkQXNzZXRBbW91bnQJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAADHRvdGFsUmVzZXJ2ZQUAAAAOY3VycmVudFJlc2VydmUJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAAC3N0b3JlZEluZGV4BQAAAAxjdXJyZW50SW5kZXgJAARMAAAAAgkBAAAADHdyaXRlSW50ZWdlcgAAAAICAAAADHN0b3JlZEhlaWdodAUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAARCdXJuAAAAAgkAAlkAAAABBQAAAAhkVG9rZW5JZAgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50CQAETAAAAAIDCQAAAAAAAAIFAAAACmFzc2V0SWRTdWICAAAABVdBVkVTCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAFHJlcXVlc3RlZEFzc2V0QW1vdW50BQAAAAR1bml0CQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAFHJlcXVlc3RlZEFzc2V0QW1vdW50CQACWQAAAAEFAAAACmFzc2V0SWRTdWIFAAAAA25pbAUAAAAUcmVxdWVzdGVkQXNzZXRBbW91bnQJAAACAAAAAQIAAAAhUG9vbCBsaXF1aWRpdHkgaXMgbm90IHN1ZmZpY2llbnQhCQAAAgAAAAECAAAAMEFkZHJlc3MgZG9lcyBub3QgbWF0Y2ggd2l0aCB3YXZldHJvbGxlciBhZGRyZXNzIQAAAAFpAQAAAAVzZXR1cAAAAAQAAAADYUlkAAAACWNvbmZpZ0FkZAAAAAl0b2tlbk5hbWUAAAAQdG9rZW5EZXNjcmlwdGlvbgMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAAEdGhpcwIAAAANY29uZmlnQWRkcmVzcwQAAAAFYXNzZXQJAARCAAAABQUAAAAJdG9rZW5OYW1lBQAAABB0b2tlbkRlc2NyaXB0aW9uAAAAAAAAAAAAAAAAAAAAAAAIBgQAAAAHdG9rZW5JZAkABDgAAAABBQAAAAVhc3NldAkABEwAAAACBQAAAAVhc3NldAkABEwAAAACCQEAAAALd3JpdGVTdHJpbmcAAAACAgAAAAdhc3NldElkBQAAAANhSWQJAARMAAAAAgkBAAAAC3dyaXRlU3RyaW5nAAAAAgIAAAANY29uZmlnQWRkcmVzcwUAAAAJY29uZmlnQWRkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAt0b3RhbEJvcnJvdwAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAALdG90YWxTdXBwbHkAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAADHRvdGFsUmVzZXJ2ZQAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAALc3RvcmVkSW5kZXgFAAAACWJhc2VJbmRleAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAMc3RvcmVkSGVpZ2h0BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAAC3dyaXRlU3RyaW5nAAAAAgIAAAAKZFRva2VuTmFtZQUAAAAJdG9rZW5OYW1lCQAETAAAAAIJAQAAAAt3cml0ZVN0cmluZwAAAAICAAAACGRUb2tlbklkCQACWAAAAAEFAAAAB3Rva2VuSWQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAADmRUb2tlbkRlY2ltYWxzAAAAAAAAAAAICQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAxkVG9rZW5TdXBwbHkAAAAAAAAAAAAFAAAAA25pbAkAAAIAAAABAgAAABNQb29sIGFscmVhZHkgc2V0dXAhAAAAAWkBAAAACmRlbGV0RW50cnkAAAABAAAAA2tleQMJAQAAAA5pc0FkbWluQWRkcmVzcwAAAAEIBQAAAAFpAAAABmNhbGxlcgkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABBQAAAANrZXkFAAAAA25pbAkAAAIAAAABAgAAABdDYWxsZXIgaXMgbm90IGFuIGFkbWluIQAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5VDxqkg==",
    "height": 1684501,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 44vcH6UD2Su3C9yWRWt5W6JbbHT1Yfmk3j7RoMkVw1Fg
Next: 8hVgMLDwMoxTGjTG4wRjrDELv4xzEsAVVXHwqWmPct8E

Diff: 
Old New Differences
139 139          let availableLiquidity = (currentTotalSupply - currentTotalBorrow)
140 140          let requestedAssetAmount = calcAssetAmount(i.payments[0].amount)
141 141          if ((availableLiquidity >= requestedAssetAmount))
142 -             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), ScriptTransfer(i.caller, requestedAssetAmount, fromBase58String(assetIdSub))], requestedAssetAmount)
142 +             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"))
143 +                 then ScriptTransfer(i.caller, requestedAssetAmount, unit)
144 +                 else ScriptTransfer(i.caller, requestedAssetAmount, fromBase58String(assetIdSub))], requestedAssetAmount)
143 145              else throw("Pool liquidity is not sufficient!")
144 146          }
145 147      else throw("Address does not match with wavetroller address!")
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 storedHeight = valueOrElse(getInteger(this, "storedHeight"), height)
43 43  
44 44  let storedIndex = valueOrElse(getInteger(this, "storedIndex"), 10000000000000000)
45 45  
46 46  func isAdminAddress (address) = if ((addressFromStringValue(admin) == address))
47 47      then true
48 48      else false
49 49  
50 50  
51 51  func isWavetroller (address) = if ((addressFromStringValue(wavetroller) == address))
52 52      then true
53 53      else false
54 54  
55 55  
56 56  func isAcceptableAssetId (assetId) = if ((assetId == assetIdSub))
57 57      then true
58 58      else false
59 59  
60 60  
61 61  func writeString (key,stringValue) = StringEntry(key, stringValue)
62 62  
63 63  
64 64  func writeInteger (key,integerValue) = IntegerEntry(key, integerValue)
65 65  
66 66  
67 67  func userlockedBalance (userAddress) = valueOrElse(getInteger(this, (userAddress + "_locked")), 0)
68 68  
69 69  
70 70  let utilization = if ((totalSupply > 0))
71 71      then fraction(totalBorrow, baseFactor, totalSupply)
72 72      else 0
73 73  
74 74  let apr = {
75 75      let minValue = [utilization, kink]
76 76      let minValueItem = min(minValue)
77 77      let maxValue = [0, (utilization - kink)]
78 78      let maxValueItem = max(maxValue)
79 79      ((fraction(multiplier, minValueItem, baseFactor) + fraction(jumpMultiplier, maxValueItem, baseFactor)) + baseRate)
80 80      }
81 81  
82 82  let apy = fraction(fraction(apr, utilization, baseFactor), (baseFactor - reserveFactor), baseFactor)
83 83  
84 84  let borrowRatePerBlock = fraction(apr, baseIndex, (blocksPerYear * baseFactor))
85 85  
86 86  let deltaBlocks = (height - storedHeight)
87 87  
88 88  let currentIndex = fraction(storedIndex, (baseIndex + (borrowRatePerBlock * deltaBlocks)), baseIndex, CEILING)
89 89  
90 90  let currentTotalBorrow = fraction(totalBorrow, currentIndex, storedIndex)
91 91  
92 92  let collectedInterest = fraction(totalBorrow, (borrowRatePerBlock * deltaBlocks), baseIndex)
93 93  
94 94  let currentTotalSupply = (totalSupply + fraction((baseFactor - reserveFactor), collectedInterest, baseFactor))
95 95  
96 96  let currentReserve = (totalReserve + fraction(reserveFactor, collectedInterest, baseFactor))
97 97  
98 98  let exchangeRate = if ((dTokenSupply > 0))
99 99      then {
100 100          let exponent = ((18 - dTokenDecimals) + assetDecimals)
101 101          let mantissa = pow(10, 0, exponent, 0, 0, CEILING)
102 102          fraction(currentTotalSupply, mantissa, dTokenSupply)
103 103          }
104 104      else 20000000000000000
105 105  
106 106  func calcDTokenAmount (assetAmount) = {
107 107      let exponent = ((18 - dTokenDecimals) + assetDecimals)
108 108      let mantissa = pow(10, 0, exponent, 0, 0, CEILING)
109 109      fraction(assetAmount, mantissa, exchangeRate)
110 110      }
111 111  
112 112  
113 113  func calcAssetAmount (dTokenAmount) = {
114 114      let exponent = ((18 - dTokenDecimals) + assetDecimals)
115 115      let mantissa = pow(10, 0, exponent, 0, 0, CEILING)
116 116      fraction(dTokenAmount, exchangeRate, mantissa)
117 117      }
118 118  
119 119  
120 120  @Callable(i)
121 121  func deposit (user,isCollateral) = if (isWavetroller(i.caller))
122 122      then {
123 123          let userTokenAmount = calcDTokenAmount(i.payments[0].amount)
124 124          let currentDTokenSupply = (dTokenSupply + userTokenAmount)
125 125          if (isCollateral)
126 126              then {
127 127                  let lockedUserBalance = (userlockedBalance(user) + userTokenAmount)
128 128                  $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) + "were successfully locked"))
129 129                  }
130 130              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)
131 131          }
132 132      else throw("Address does not match with wavetroller address!")
133 133  
134 134  
135 135  
136 136  @Callable(i)
137 137  func withdraw (user) = if (isWavetroller(i.caller))
138 138      then {
139 139          let availableLiquidity = (currentTotalSupply - currentTotalBorrow)
140 140          let requestedAssetAmount = calcAssetAmount(i.payments[0].amount)
141 141          if ((availableLiquidity >= requestedAssetAmount))
142 -             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), ScriptTransfer(i.caller, requestedAssetAmount, fromBase58String(assetIdSub))], requestedAssetAmount)
142 +             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"))
143 +                 then ScriptTransfer(i.caller, requestedAssetAmount, unit)
144 +                 else ScriptTransfer(i.caller, requestedAssetAmount, fromBase58String(assetIdSub))], requestedAssetAmount)
143 145              else throw("Pool liquidity is not sufficient!")
144 146          }
145 147      else throw("Address does not match with wavetroller address!")
146 148  
147 149  
148 150  
149 151  @Callable(i)
150 152  func setup (aId,configAdd,tokenName,tokenDescription) = if (!(isDefined(getString(this, "configAddress"))))
151 153      then {
152 154          let asset = Issue(tokenName, tokenDescription, 0, 8, true)
153 155          let tokenId = calculateAssetId(asset)
154 156  [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)]
155 157          }
156 158      else throw("Pool already setup!")
157 159  
158 160  
159 161  
160 162  @Callable(i)
161 163  func deletEntry (key) = if (isAdminAddress(i.caller))
162 164      then [DeleteEntry(key)]
163 165      else throw("Caller is not an admin!")
164 166  
165 167  
166 168  @Verifier(tx)
167 169  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
168 170

Old	New		Differences
139	139		let availableLiquidity = (currentTotalSupply - currentTotalBorrow)
140	140		let requestedAssetAmount = calcAssetAmount(i.payments[0].amount)
141	141		if ((availableLiquidity >= requestedAssetAmount))
142		-	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), ScriptTransfer(i.caller, requestedAssetAmount, fromBase58String(assetIdSub))], requestedAssetAmount)
	142	+	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"))
	143	+	then ScriptTransfer(i.caller, requestedAssetAmount, unit)
	144	+	else ScriptTransfer(i.caller, requestedAssetAmount, fromBase58String(assetIdSub))], requestedAssetAmount)
143	145		else throw("Pool liquidity is not sufficient!")
144	146		}
145	147		else throw("Address does not match with wavetroller address!")

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 storedHeight = valueOrElse(getInteger(this, "storedHeight"), height)
43	43
44	44		let storedIndex = valueOrElse(getInteger(this, "storedIndex"), 10000000000000000)
45	45
46	46		func isAdminAddress (address) = if ((addressFromStringValue(admin) == address))
47	47		then true
48	48		else false
49	49
50	50
51	51		func isWavetroller (address) = if ((addressFromStringValue(wavetroller) == address))
52	52		then true
53	53		else false
54	54
55	55
56	56		func isAcceptableAssetId (assetId) = if ((assetId == assetIdSub))
57	57		then true
58	58		else false
59	59
60	60
61	61		func writeString (key,stringValue) = StringEntry(key, stringValue)
62	62
63	63
64	64		func writeInteger (key,integerValue) = IntegerEntry(key, integerValue)
65	65
66	66
67	67		func userlockedBalance (userAddress) = valueOrElse(getInteger(this, (userAddress + "_locked")), 0)
68	68
69	69
70	70		let utilization = if ((totalSupply > 0))
71	71		then fraction(totalBorrow, baseFactor, totalSupply)
72	72		else 0
73	73
74	74		let apr = {
75	75		let minValue = [utilization, kink]
76	76		let minValueItem = min(minValue)
77	77		let maxValue = [0, (utilization - kink)]
78	78		let maxValueItem = max(maxValue)
79	79		((fraction(multiplier, minValueItem, baseFactor) + fraction(jumpMultiplier, maxValueItem, baseFactor)) + baseRate)
80	80		}
81	81
82	82		let apy = fraction(fraction(apr, utilization, baseFactor), (baseFactor - reserveFactor), baseFactor)
83	83
84	84		let borrowRatePerBlock = fraction(apr, baseIndex, (blocksPerYear * baseFactor))
85	85
86	86		let deltaBlocks = (height - storedHeight)
87	87
88	88		let currentIndex = fraction(storedIndex, (baseIndex + (borrowRatePerBlock * deltaBlocks)), baseIndex, CEILING)
89	89
90	90		let currentTotalBorrow = fraction(totalBorrow, currentIndex, storedIndex)
91	91
92	92		let collectedInterest = fraction(totalBorrow, (borrowRatePerBlock * deltaBlocks), baseIndex)
93	93
94	94		let currentTotalSupply = (totalSupply + fraction((baseFactor - reserveFactor), collectedInterest, baseFactor))
95	95
96	96		let currentReserve = (totalReserve + fraction(reserveFactor, collectedInterest, baseFactor))
97	97
98	98		let exchangeRate = if ((dTokenSupply > 0))
99	99		then {
100	100		let exponent = ((18 - dTokenDecimals) + assetDecimals)
101	101		let mantissa = pow(10, 0, exponent, 0, 0, CEILING)
102	102		fraction(currentTotalSupply, mantissa, dTokenSupply)
103	103		}
104	104		else 20000000000000000
105	105
106	106		func calcDTokenAmount (assetAmount) = {
107	107		let exponent = ((18 - dTokenDecimals) + assetDecimals)
108	108		let mantissa = pow(10, 0, exponent, 0, 0, CEILING)
109	109		fraction(assetAmount, mantissa, exchangeRate)
110	110		}
111	111
112	112
113	113		func calcAssetAmount (dTokenAmount) = {
114	114		let exponent = ((18 - dTokenDecimals) + assetDecimals)
115	115		let mantissa = pow(10, 0, exponent, 0, 0, CEILING)
116	116		fraction(dTokenAmount, exchangeRate, mantissa)
117	117		}
118	118
119	119
120	120		@Callable(i)
121	121		func deposit (user,isCollateral) = if (isWavetroller(i.caller))
122	122		then {
123	123		let userTokenAmount = calcDTokenAmount(i.payments[0].amount)
124	124		let currentDTokenSupply = (dTokenSupply + userTokenAmount)
125	125		if (isCollateral)
126	126		then {
127	127		let lockedUserBalance = (userlockedBalance(user) + userTokenAmount)
128	128		$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) + "were successfully locked"))
129	129		}
130	130		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)
131	131		}
132	132		else throw("Address does not match with wavetroller address!")
133	133
134	134
135	135
136	136		@Callable(i)
137	137		func withdraw (user) = if (isWavetroller(i.caller))
138	138		then {
139	139		let availableLiquidity = (currentTotalSupply - currentTotalBorrow)
140	140		let requestedAssetAmount = calcAssetAmount(i.payments[0].amount)
141	141		if ((availableLiquidity >= requestedAssetAmount))
142		-	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), ScriptTransfer(i.caller, requestedAssetAmount, fromBase58String(assetIdSub))], requestedAssetAmount)
	142	+	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"))
	143	+	then ScriptTransfer(i.caller, requestedAssetAmount, unit)
	144	+	else ScriptTransfer(i.caller, requestedAssetAmount, fromBase58String(assetIdSub))], requestedAssetAmount)
143	145		else throw("Pool liquidity is not sufficient!")
144	146		}
145	147		else throw("Address does not match with wavetroller address!")
146	148
147	149
148	150
149	151		@Callable(i)
150	152		func setup (aId,configAdd,tokenName,tokenDescription) = if (!(isDefined(getString(this, "configAddress"))))
151	153		then {
152	154		let asset = Issue(tokenName, tokenDescription, 0, 8, true)
153	155		let tokenId = calculateAssetId(asset)
154	156		[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)]
155	157		}
156	158		else throw("Pool already setup!")
157	159
158	160
159	161
160	162		@Callable(i)
161	163		func deletEntry (key) = if (isAdminAddress(i.caller))
162	164		then [DeleteEntry(key)]
163	165		else throw("Caller is not an admin!")
164	166
165	167
166	168		@Verifier(tx)
167	169		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
168	170

github/deemru/w8io/169f3d6 
62.27 ms ◑