w8 · tx · 8cU···vT1

tx · 8cUK7vujGjmBzURLgRNTEKtVM2wRmN3z46QsXhs8fvT1

3PKwLVb8jYk58oYbfXxs2dUjD3YEKeqGWrX:  -0.01400000 Waves

2021.10.28 07:41 [2830699] smart account 3PKwLVb8jYk58oYbfXxs2dUjD3YEKeqGWrX > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "8cUK7vujGjmBzURLgRNTEKtVM2wRmN3z46QsXhs8fvT1",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1635396084459,
    "version": 2,
    "chainId": 87,
    "sender": "3PKwLVb8jYk58oYbfXxs2dUjD3YEKeqGWrX",
    "senderPublicKey": "27DK15MykfnsVojpifD1gbr8kRr8rpY5mw6EH4zL8R25",
    "proofs": [
        "3dvNvj9zBBfgPZ4qgxcApVv8tWsw3GWTWZ9txDm4eaQcybq1SeFpVKtBVKzLzycSicGYUwFtWPmNPBnAynUvWK3P"
    ],
    "script": "base64:AAIFAAAAAAAAABIIAhIECgIICBIGCgQICAgIEgAAAAAUAAAAAA5yZWJpcnRoQWRkcmVzcwEAAAAaAVe+4FzDtneMBo7i5BMYZS7q3y5wnzCPJvkAAAAADWJhY2tlbmRQdWJLZXkBAAAAIKAwsuKwn/NBBI3F39tU5E0/jIWMDU/yK1axkHX5ed41AAAAAA5TVEFSVFRJTUVTVEFNUAAAAAF8FwhqgAAAAAAJTEFQTEVOR1RIAAAAAAABSZcAAAAAAApFR0dBU1NFVElEAQAAACArUw61nWwxe7e9sWV0sV1YHdNa4fYrM30QZbs7HFieqAAAAAANRFVDS0xJTkdQUklDRQAAAAAABMS0AAAAAAAWcGVyY2VudEdyb3d0aFByZWNpc2lvbgAAI4byb8EAAAEAAAAMa2V5VG90YWxGZWVkAAAAAQAAAApkdWNrbGluZ0lkCQABLAAAAAIJAAEsAAAAAgIAAAAJZHVja2xpbmdfBQAAAApkdWNrbGluZ0lkAgAAAAVfZmVlZAEAAAARa2V5RHVja2xpbmdGZWRMYXAAAAABAAAACmR1Y2tsaW5nSWQJAAEsAAAAAgkAASwAAAACAgAAAAlkdWNrbGluZ18FAAAACmR1Y2tsaW5nSWQCAAAAB19mZWRMYXABAAAAEGtleUR1Y2tsaW5nTGV2ZWwAAAABAAAACmR1Y2tsaW5nSWQJAAEsAAAAAgkAASwAAAACAgAAAAlkdWNrbGluZ18FAAAACmR1Y2tsaW5nSWQCAAAABl9sZXZlbAEAAAANa2V5RmVlZEZvckxhcAAAAAIAAAAHYWRkcmVzcwAAAANsYXAJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIYWRkcmVzc18FAAAAB2FkZHJlc3MCAAAABV9sYXBfCQABpAAAAAEFAAAAA2xhcAIAAAAFX2ZlZWQBAAAADXRyeUdldEludGVnZXIAAAABAAAAA2tleQQAAAADdmFsBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFiBQAAAAckbWF0Y2gwBQAAAAFiAAAAAAAAAAAABQAAAAN2YWwBAAAAB2dldEJvb2wAAAABAAAAA2tleQQAAAAHJG1hdGNoMAkABBsAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAB0Jvb2xlYW4EAAAAAWIFAAAAByRtYXRjaDAFAAAAAWIFAAAABHVuaXQBAAAAFWdldEN1cnJlbnRMZXZlbEJpZ0ludAAAAAEAAAAKZHVja2xpbmdJZAQAAAAKa0R1Y2tMZXZlbAkBAAAAEGtleUR1Y2tsaW5nTGV2ZWwAAAABBQAAAApkdWNrbGluZ0lkBAAAAAckbWF0Y2gwCQAEIgAAAAEFAAAACmtEdWNrTGV2ZWwDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABcwUAAAAHJG1hdGNoMAkAAacAAAABBQAAAAFzBAAAAAckbWF0Y2gxCQAEIAAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAlkdWNrbGluZ18FAAAACmR1Y2tsaW5nSWQCAAAAEV9pc3N1ZWRCeUZlZWRDYWxsAwkAAAEAAAACBQAAAAckbWF0Y2gxAgAAAAdCb29sZWFuBAAAAAFiBQAAAAckbWF0Y2gxCQABNgAAAAEAAAAAAAAAAAAJAAE2AAAAAQAAAAAAAAAAFAEAAAANZ2V0Q3VycmVudExhcAAAAAAJAABkAAAAAgkAAGkAAAACCQAAZQAAAAIIBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wBQAAAA5TVEFSVFRJTUVTVEFNUAUAAAAJTEFQTEVOR1RIAAAAAAAAAAABAQAAABljYWxjdWxhdGVOZXdEdWNrbGluZ0xldmVsAAAAAgAAAApkdWNrbGluZ0lkAAAADXBheW1lbnRBbW91bnQEAAAAB2tGZWRMYXAJAQAAABFrZXlEdWNrbGluZ0ZlZExhcAAAAAEFAAAACmR1Y2tsaW5nSWQEAAAAEGxhc3RGZWRMYXBOdW1iZXIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQUAAAAHa0ZlZExhcAQAAAAKY3VycmVudGxhcAkBAAAADWdldEN1cnJlbnRMYXAAAAAABAAAAAdwZW5hbHR5CQABOQAAAAIJAAE2AAAAAQkAAGkAAAACCQAAZQAAAAIFAAAACmN1cnJlbnRsYXAFAAAAEGxhc3RGZWRMYXBOdW1iZXIAAAAAAAAAAAQJAAE2AAAAAQUAAAAWcGVyY2VudEdyb3d0aFByZWNpc2lvbgQAAAAGZ3Jvd3RoCQABPAAAAAMJAAE2AAAAAQUAAAANcGF5bWVudEFtb3VudAkAATYAAAABBQAAABZwZXJjZW50R3Jvd3RoUHJlY2lzaW9uCQABNgAAAAEFAAAADURVQ0tMSU5HUFJJQ0UJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAADmN1cnJlbnRMZXZlbDogCQABpgAAAAEJAQAAABVnZXRDdXJyZW50TGV2ZWxCaWdJbnQAAAABBQAAAApkdWNrbGluZ0lkAgAAAAogcGVuYWx0eTogCQABpgAAAAEFAAAAB3BlbmFsdHkCAAAACGdyb3d0aDogCQABpgAAAAEFAAAABmdyb3d0aAEAAAAMZ2V0RmVlZEJ5TGFwAAAAAgAAAAdhZGRyZXNzAAAAA2xhcAQAAAALa0ZlZWRGb3JMYXAJAQAAAA1rZXlGZWVkRm9yTGFwAAAAAgUAAAAHYWRkcmVzcwUAAAADbGFwCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEFAAAAC2tGZWVkRm9yTGFwAQAAABNzdHJpbmdMaXN0VG9JbnRMaXN0AAAAAQAAAARsaXN0CgEAAAAGcGFyc2VyAAAAAgAAAANhY2MAAAADdmFsCQAETgAAAAIFAAAAA2FjYwkABEwAAAACCQEAAAAFdmFsdWUAAAABCQAEtgAAAAEFAAAAA3ZhbAUAAAADbmlsCgAAAAACJGwFAAAABGxpc3QKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwBQAAAANuaWwKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAABnBhcnNlcgAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoBAAAAEGdldE1heEZlZWRBbW91bnQAAAADAAAABGxhcHMAAAAHcmV3YXJkcwAAAAdhZGRyZXNzBAAAAApjdXJyZW50TGFwCQEAAAANZ2V0Q3VycmVudExhcAAAAAADAwMDCQEAAAACIT0AAAACCQABkQAAAAIFAAAABGxhcHMAAAAAAAAAAAMJAABlAAAAAgUAAAAKY3VycmVudExhcAAAAAAAAAAAAQYJAQAAAAIhPQAAAAIJAAGRAAAAAgUAAAAEbGFwcwAAAAAAAAAAAgkAAGUAAAACBQAAAApjdXJyZW50TGFwAAAAAAAAAAACBgkBAAAAAiE9AAAAAgkAAZEAAAACBQAAAARsYXBzAAAAAAAAAAABCQAAZQAAAAIFAAAACmN1cnJlbnRMYXAAAAAAAAAAAAMGCQEAAAACIT0AAAACCQABkQAAAAIFAAAABGxhcHMAAAAAAAAAAAAJAABlAAAAAgUAAAAKY3VycmVudExhcAAAAAAAAAAABAkAAAIAAAABAgAAABZPdXRkYXRlZCBkYXRhIGZvciBsYXBzCgEAAAANZ2V0RmVlZEZvckxhcAAAAAIAAAADYWNjAAAAA2xhcAkABE0AAAACBQAAAANhY2MJAQAAAAxnZXRGZWVkQnlMYXAAAAACBQAAAAdhZGRyZXNzBQAAAANsYXAKAQAAAANzdW0AAAACAAAAA2FjYwAAAAZyZXdhcmQJAABkAAAAAgUAAAADYWNjBQAAAAZyZXdhcmQEAAAADGZlZWRMYXN0TGFwcwoAAAAAAiRsBQAAAARsYXBzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAUAAAADbmlsCgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAA1nZXRGZWVkRm9yTGFwAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAABMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAATTGlzdCBzaXplIGV4Y2VlZHMgNAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEBAAAAAdtYXhGZWVkCQABlgAAAAEFAAAADGZlZWRMYXN0TGFwcwQAAAALdG90YWxSZXdhcmQKAAAAAAIkbAUAAAAHcmV3YXJkcwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAAAAAAAAAAAAAKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAA3N1bQAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAE0xpc3Qgc2l6ZSBleGNlZWRzIDQJAQAAAAEyAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAkAAGUAAAACBQAAAAt0b3RhbFJld2FyZAUAAAAHbWF4RmVlZAEAAAAPZ2V0QmFja2VuZFByb29mAAAAAwAAAARsYXBzAAAAB3Jld2FyZHMAAAAHYWRkcmVzcwoBAAAAE0ludExpc3RUb0J5dGVWZWN0b3IAAAACAAAAA2FjYwAAAARpdGVtCQABLAAAAAIFAAAAA2FjYwUAAAAEaXRlbQQAAAAObGFwc1N0cmluZ1BhcnQKAAAAAAIkbAUAAAAEbGFwcwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzACAAAAAAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAATSW50TGlzdFRvQnl0ZVZlY3RvcgAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoEAAAAEXJld2FyZHNTdHJpbmdQYXJ0CgAAAAACJGwFAAAAB3Jld2FyZHMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwAgAAAAAKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAE0ludExpc3RUb0J5dGVWZWN0b3IAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKCQABLAAAAAIJAAEsAAAAAgUAAAAObGFwc1N0cmluZ1BhcnQFAAAAEXJld2FyZHNTdHJpbmdQYXJ0BQAAAAdhZGRyZXNzAAAAAwAAAAFpAQAAABFpc3N1ZUZyZWVEdWNrbGluZwAAAAIAAAAHYWRkcmVzcwAAAAd0eElkU3RyBAAAAAVhc3NldAkABEMAAAAHAgAAABBCQUJZLTExMTExMTExLUdaAgAAAAAAAAAAAAAAAAEAAAAAAAAAAAAHBQAAAAR1bml0BQAAAAZoZWlnaHQEAAAAB2Fzc2V0SWQJAAQ4AAAAAQUAAAAFYXNzZXQJAAUUAAAAAgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAdhZGRyZXNzAgAAAAFfBQAAAAd0eElkU3RyAgAAAANfZGkJAAJYAAAAAQUAAAAHYXNzZXRJZAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAMc3RhdHNfYW1vdW50CQAAZAAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAMc3RhdHNfYW1vdW50AAAAAAAAAAABCQAETAAAAAIJAQAAAAxCb29sZWFuRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAJZHVja2xpbmdfCQACWAAAAAEFAAAAB2Fzc2V0SWQCAAAAEV9pc3N1ZWRCeUZlZWRDYWxsCQAAAAAAAAIIBQAAAAFpAAAABmNhbGxlcgUAAAAEdGhpcwkABEwAAAACBQAAAAVhc3NldAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAFdmFsdWUAAAABCQAEJgAAAAEFAAAAB2FkZHJlc3MAAAAAAAAAAAEFAAAAB2Fzc2V0SWQFAAAAA25pbAkAAlgAAAABBQAAAAdhc3NldElkAAAAAWkBAAAADGZlZWREdWNrbGluZwAAAAQAAAAKZHVja2xpbmdJZAAAABBiYWNrZW5kU2lnbmF0dXJlAAAACGxhcHNMaXN0AAAAC3Jld2FyZHNMaXN0BAAAAA1hZGRyZXNzU3RyaW5nCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAAEbGFwcwkBAAAABXZhbHVlAAAAAQkABLUAAAACBQAAAAhsYXBzTGlzdAIAAAABLAQAAAAHcmV3YXJkcwkBAAAABXZhbHVlAAAAAQkABLUAAAACBQAAAAtyZXdhcmRzTGlzdAIAAAABLAQAAAAMYmFja2VuZFByb29mCQEAAAAPZ2V0QmFja2VuZFByb29mAAAAAwUAAAAEbGFwcwUAAAAHcmV3YXJkcwUAAAANYWRkcmVzc1N0cmluZwQAAAAOcmVhbER1Y2tsaW5nSWQDCQEAAAABIQAAAAEJAAnEAAAAAwkAAZsAAAABBQAAAAxiYWNrZW5kUHJvb2YJAAJZAAAAAQUAAAAQYmFja2VuZFNpZ25hdHVyZQUAAAANYmFja2VuZFB1YktleQkAAAIAAAABAgAAABpJbnZhbGlkIHByb29mIGZyb20gYmFja2VuZAMDCQEAAAACIT0AAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAABBgkBAAAAAiE9AAAAAggJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAHYXNzZXRJZAUAAAAKRUdHQVNTRVRJRAkAAAIAAAABAgAAAClCYWQgcGF5bWVudCBhdHRhY2hlZCAoYXNzZXRbc10gb3IgYW1vdW50KQMJAAAAAAAAAgUAAAAKZHVja2xpbmdJZAIAAAAABAAAAA9kdWNrbGluZ0Fzc2V0SWQJAAP8AAAABAUAAAAEdGhpcwIAAAARaXNzdWVGcmVlRHVja2xpbmcJAARMAAAAAgkABCUAAAABCAUAAAABaQAAAAxvcmlnaW5DYWxsZXIJAARMAAAAAgkAAlgAAAABCAUAAAABaQAAAA10cmFuc2FjdGlvbklkBQAAAANuaWwFAAAAA25pbAMJAAAAAAAAAgUAAAAPZHVja2xpbmdBc3NldElkBQAAAA9kdWNrbGluZ0Fzc2V0SWQEAAAAAmlkBAAAAAckbWF0Y2gwBQAAAA9kdWNrbGluZ0Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABdgUAAAAHJG1hdGNoMAUAAAABdgkAAAIAAAABAgAAABJDYW4ndCBnZW5lcmF0ZSBORlQFAAAAAmlkCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQAAAAPZHVja2xpbmdJZENoZWNrCQEAAAAFdmFsdWUAAAABCQAD7AAAAAEJAAJZAAAAAQUAAAAKZHVja2xpbmdJZAMJAQAAAAIhPQAAAAIJAAPwAAAAAggFAAAAAWkAAAAGY2FsbGVyCAUAAAAPZHVja2xpbmdJZENoZWNrAAAAAmlkAAAAAAAAAAABCQAAAgAAAAECAAAAJFlvdSdyZSBub3QgdGhlIG93bmVyIG9mIHRoZSBkdWNrbGluZwMJAQAAAAIhPQAAAAIIBQAAAA9kdWNrbGluZ0lkQ2hlY2sAAAAGaXNzdWVyBQAAAAR0aGlzCQAAAgAAAAECAAAAH0NhbnQgZmluZCBkdWNrbGluZyB3aXRoIHN1Y2ggaWQEAAAAEGR1Y2tsaW5nSWRTdHJpbmcJAAJYAAAAAQgFAAAAD2R1Y2tsaW5nSWRDaGVjawAAAAJpZAUAAAAQZHVja2xpbmdJZFN0cmluZwQAAAAHaW50TGFwcwkBAAAAE3N0cmluZ0xpc3RUb0ludExpc3QAAAABBQAAAARsYXBzBAAAAAppbnRSZXdhcmRzCQEAAAATc3RyaW5nTGlzdFRvSW50TGlzdAAAAAEFAAAAB3Jld2FyZHMEAAAADW1heEZlZWRBbW91bnQJAQAAABBnZXRNYXhGZWVkQW1vdW50AAAAAwUAAAAHaW50TGFwcwUAAAAKaW50UmV3YXJkcwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIEAAAAD2tEdWNrbGluZ0ZlZExhcAkBAAAAEWtleUR1Y2tsaW5nRmVkTGFwAAAAAQUAAAAOcmVhbER1Y2tsaW5nSWQEAAAACmxhc3RGZWRMYXAJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQUAAAAPa0R1Y2tsaW5nRmVkTGFwBAAAAA5jdXJyZW50UGF5bWVudAgJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50BAAAAAlrTmV3TGV2ZWwJAQAAABBrZXlEdWNrbGluZ0xldmVsAAAAAQUAAAAOcmVhbER1Y2tsaW5nSWQEAAAACmtUb3RhbEZlZWQJAQAAAAxrZXlUb3RhbEZlZWQAAAABBQAAAA5yZWFsRHVja2xpbmdJZAQAAAAJdG90YWxGZWVkCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEFAAAACmtUb3RhbEZlZWQEAAAAC2ZlZWRUeFN0YXRzCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAlkdWNrbGluZ18FAAAADnJlYWxEdWNrbGluZ0lkAgAAAAZfc3RhdF8JAAGkAAAAAQgFAAAACWxhc3RCbG9jawAAAAl0aW1lc3RhbXADCQAAZgAAAAIFAAAADmN1cnJlbnRQYXltZW50BQAAAA1tYXhGZWVkQW1vdW50CQAAAgAAAAEJAAEsAAAAAgIAAAA6Q2Fubm90IGZlZWQgZHVja2xpbmcgZm9yIHN1Y2ggYW1vdW50LCBtYXggZmVlZCBhbW91bnQgaXM6IAkAAaQAAAABBQAAAA1tYXhGZWVkQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAA9rRHVja2xpbmdGZWRMYXAJAQAAAA1nZXRDdXJyZW50TGFwAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAADWtleUZlZWRGb3JMYXAAAAACBQAAAA1hZGRyZXNzU3RyaW5nCQABkQAAAAIFAAAAB2ludExhcHMAAAAAAAAAAAAJAABkAAAAAgkBAAAADGdldEZlZWRCeUxhcAAAAAIFAAAADWFkZHJlc3NTdHJpbmcJAAGRAAAAAgUAAAAHaW50TGFwcwAAAAAAAAAAAAUAAAAOY3VycmVudFBheW1lbnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAAA1rZXlGZWVkRm9yTGFwAAAAAgUAAAANYWRkcmVzc1N0cmluZwkAAZEAAAACBQAAAAdpbnRMYXBzAAAAAAAAAAABCQAAZAAAAAIJAQAAAAxnZXRGZWVkQnlMYXAAAAACBQAAAA1hZGRyZXNzU3RyaW5nCQABkQAAAAIFAAAAB2ludExhcHMAAAAAAAAAAAEFAAAADmN1cnJlbnRQYXltZW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAANa2V5RmVlZEZvckxhcAAAAAIFAAAADWFkZHJlc3NTdHJpbmcJAAGRAAAAAgUAAAAHaW50TGFwcwAAAAAAAAAAAgkAAGQAAAACCQEAAAAMZ2V0RmVlZEJ5TGFwAAAAAgUAAAANYWRkcmVzc1N0cmluZwkAAZEAAAACBQAAAAdpbnRMYXBzAAAAAAAAAAACBQAAAA5jdXJyZW50UGF5bWVudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAADWtleUZlZWRGb3JMYXAAAAACBQAAAA1hZGRyZXNzU3RyaW5nCQABkQAAAAIFAAAAB2ludExhcHMAAAAAAAAAAAMJAABkAAAAAgkBAAAADGdldEZlZWRCeUxhcAAAAAIFAAAADWFkZHJlc3NTdHJpbmcJAAGRAAAAAgUAAAAHaW50TGFwcwAAAAAAAAAAAwUAAAAOY3VycmVudFBheW1lbnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAACmtUb3RhbEZlZWQJAABkAAAAAgUAAAAJdG90YWxGZWVkBQAAAA5jdXJyZW50UGF5bWVudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAALZmVlZFR4U3RhdHMFAAAADmN1cnJlbnRQYXltZW50CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAACWtOZXdMZXZlbAkBAAAAGWNhbGN1bGF0ZU5ld0R1Y2tsaW5nTGV2ZWwAAAACBQAAAA5yZWFsRHVja2xpbmdJZAUAAAAOY3VycmVudFBheW1lbnQFAAAAA25pbAAAAAFpAQAAABR0dXJuRHVja2xpbmdJbnRvRHVjawAAAAAJAAACAAAAAQIAAAATTm90IGltcGxlbWVudGVkIHlldAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5Mv4aVw==",
    "height": 2830699,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Brgiu3q1bvgAsU1SCMZ2RuVNY3Lfe7EabnKV5eXZudDC
Next: B2S12WJgkzNTkH1P3du17zJfP3F2mvtaPpoWAuvMeHut

Diff: 
Old New Differences
71 71      let currentlap = getCurrentLap()
72 72      let penalty = (toBigInt(((currentlap - lastFedLapNumber) / 4)) * toBigInt(percentGrowthPrecision))
73 73      let growth = fraction(toBigInt(paymentAmount), toBigInt(percentGrowthPrecision), toBigInt(DUCKLINGPRICE))
74 -     toString(((getCurrentLevelBigInt(ducklingId) - penalty) + growth))
74 +     throw(((((("currentLevel: " + toString(getCurrentLevelBigInt(ducklingId))) + " penalty: ") + toString(penalty)) + "growth: ") + toString(growth)))
75 75      }
76 76  
77 77  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let rebirthAddress = base58'3PKL9tfUmNciXvbSA3zpXr6PnDNnhn936ba'
5 5  
6 6  let backendPubKey = base58'BnKJTqkWD69SotKhJXdKu76NRtkdQJEpThqGGeFwF9EL'
7 7  
8 8  let STARTTIMESTAMP = 1632474000000
9 9  
10 10  let LAPLENGTH = 21600000
11 11  
12 12  let EGGASSETID = base58'3v7zGkeHS6KrsvmTRzEzvCxm5cdzkCtM7z5cM6efcjCB'
13 13  
14 14  let DUCKLINGPRICE = 80000000
15 15  
16 16  let percentGrowthPrecision = 10000000000000000
17 17  
18 18  func keyTotalFeed (ducklingId) = (("duckling_" + ducklingId) + "_feed")
19 19  
20 20  
21 21  func keyDucklingFedLap (ducklingId) = (("duckling_" + ducklingId) + "_fedLap")
22 22  
23 23  
24 24  func keyDucklingLevel (ducklingId) = (("duckling_" + ducklingId) + "_level")
25 25  
26 26  
27 27  func keyFeedForLap (address,lap) = (((("address_" + address) + "_lap_") + toString(lap)) + "_feed")
28 28  
29 29  
30 30  func tryGetInteger (key) = {
31 31      let val =     match getInteger(this, key) {
32 32          case b: Int => 
33 33              b
34 34          case _ => 
35 35              0
36 36      }
37 37      val
38 38      }
39 39  
40 40  
41 41  func getBool (key) = match getBoolean(this, key) {
42 42      case b: Boolean => 
43 43          b
44 44      case _ => 
45 45          unit
46 46  }
47 47  
48 48  
49 49  func getCurrentLevelBigInt (ducklingId) = {
50 50      let kDuckLevel = keyDucklingLevel(ducklingId)
51 51      match getString(kDuckLevel) {
52 52          case s: String => 
53 53              parseBigIntValue(s)
54 54          case _ => 
55 55              match getBoolean((("duckling_" + ducklingId) + "_issuedByFeedCall")) {
56 56                  case b: Boolean => 
57 57                      toBigInt(0)
58 58                  case _ => 
59 59                      toBigInt(20)
60 60              }
61 61      }
62 62      }
63 63  
64 64  
65 65  func getCurrentLap () = (((lastBlock.timestamp - STARTTIMESTAMP) / LAPLENGTH) + 1)
66 66  
67 67  
68 68  func calculateNewDucklingLevel (ducklingId,paymentAmount) = {
69 69      let kFedLap = keyDucklingFedLap(ducklingId)
70 70      let lastFedLapNumber = tryGetInteger(kFedLap)
71 71      let currentlap = getCurrentLap()
72 72      let penalty = (toBigInt(((currentlap - lastFedLapNumber) / 4)) * toBigInt(percentGrowthPrecision))
73 73      let growth = fraction(toBigInt(paymentAmount), toBigInt(percentGrowthPrecision), toBigInt(DUCKLINGPRICE))
74 -     toString(((getCurrentLevelBigInt(ducklingId) - penalty) + growth))
74 +     throw(((((("currentLevel: " + toString(getCurrentLevelBigInt(ducklingId))) + " penalty: ") + toString(penalty)) + "growth: ") + toString(growth)))
75 75      }
76 76  
77 77  
78 78  func getFeedByLap (address,lap) = {
79 79      let kFeedForLap = keyFeedForLap(address, lap)
80 80      tryGetInteger(kFeedForLap)
81 81      }
82 82  
83 83  
84 84  func stringListToIntList (list) = {
85 85      func parser (acc,val) =     (acc ++ [value(parseInt(val))])
86 86  
87 87      let $l = list
88 88      let $s = size($l)
89 89      let $acc0 = nil
90 90      func 1 ($a,$i) =     if (($i >= $s))
91 91          then $a
92 92          else parser($a, $l[$i])
93 93  
94 94      func 2 ($a,$i) =     if (($i >= $s))
95 95          then $a
96 96          else throw("List size exceeds 10")
97 97  
98 98      2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
99 99      }
100 100  
101 101  
102 102  func getMaxFeedAmount (laps,rewards,address) = {
103 103      let currentLap = getCurrentLap()
104 104      if (if (if (if ((laps[3] != (currentLap - 1)))
105 105          then true
106 106          else (laps[2] != (currentLap - 2)))
107 107          then true
108 108          else (laps[1] != (currentLap - 3)))
109 109          then true
110 110          else (laps[0] != (currentLap - 4)))
111 111          then throw("Outdated data for laps")
112 112          else {
113 113              func getFeedForLap (acc,lap) =             (acc :+ getFeedByLap(address, lap))
114 114  
115 115              func sum (acc,reward) =             (acc + reward)
116 116  
117 117              let feedLastLaps = {
118 118                  let $l = laps
119 119                  let $s = size($l)
120 120                  let $acc0 = nil
121 121                  func 1 ($a,$i) =                 if (($i >= $s))
122 122                      then $a
123 123                      else getFeedForLap($a, $l[$i])
124 124  
125 125                  func 2 ($a,$i) =                 if (($i >= $s))
126 126                      then $a
127 127                      else throw("List size exceeds 4")
128 128  
129 129                  2(1(1(1(1($acc0, 0), 1), 2), 3), 4)
130 130                  }
131 131              let maxFeed = max(feedLastLaps)
132 132              let totalReward = {
133 133                  let $l = rewards
134 134                  let $s = size($l)
135 135                  let $acc0 = 0
136 136                  func 1 ($a,$i) =                 if (($i >= $s))
137 137                      then $a
138 138                      else sum($a, $l[$i])
139 139  
140 140                  func 2 ($a,$i) =                 if (($i >= $s))
141 141                      then $a
142 142                      else throw("List size exceeds 4")
143 143  
144 144                  2(1(1(1(1($acc0, 0), 1), 2), 3), 4)
145 145                  }
146 146              (totalReward - maxFeed)
147 147              }
148 148      }
149 149  
150 150  
151 151  func getBackendProof (laps,rewards,address) = {
152 152      func IntListToByteVector (acc,item) =     (acc + item)
153 153  
154 154      let lapsStringPart = {
155 155          let $l = laps
156 156          let $s = size($l)
157 157          let $acc0 = ""
158 158          func 1 ($a,$i) =         if (($i >= $s))
159 159              then $a
160 160              else IntListToByteVector($a, $l[$i])
161 161  
162 162          func 2 ($a,$i) =         if (($i >= $s))
163 163              then $a
164 164              else throw("List size exceeds 10")
165 165  
166 166          2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
167 167          }
168 168      let rewardsStringPart = {
169 169          let $l = rewards
170 170          let $s = size($l)
171 171          let $acc0 = ""
172 172          func 1 ($a,$i) =         if (($i >= $s))
173 173              then $a
174 174              else IntListToByteVector($a, $l[$i])
175 175  
176 176          func 2 ($a,$i) =         if (($i >= $s))
177 177              then $a
178 178              else throw("List size exceeds 10")
179 179  
180 180          2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
181 181          }
182 182      ((lapsStringPart + rewardsStringPart) + address)
183 183      }
184 184  
185 185  
186 186  @Callable(i)
187 187  func issueFreeDuckling (address,txIdStr) = {
188 188      let asset = Issue("BABY-11111111-GZ", "", 1, 0, false, unit, height)
189 189      let assetId = calculateAssetId(asset)
190 190      $Tuple2([StringEntry((((address + "_") + txIdStr) + "_di"), toBase58String(assetId)), IntegerEntry("stats_amount", (tryGetInteger("stats_amount") + 1)), BooleanEntry((("duckling_" + toBase58String(assetId)) + "_issuedByFeedCall"), (i.caller == this)), asset, ScriptTransfer(value(addressFromString(address)), 1, assetId)], toBase58String(assetId))
191 191      }
192 192  
193 193  
194 194  
195 195  @Callable(i)
196 196  func feedDuckling (ducklingId,backendSignature,lapsList,rewardsList) = {
197 197      let addressString = toString(i.caller)
198 198      let laps = value(split(lapsList, ","))
199 199      let rewards = value(split(rewardsList, ","))
200 200      let backendProof = getBackendProof(laps, rewards, addressString)
201 201      let realDucklingId = if (!(sigVerify_8Kb(toBytes(backendProof), fromBase58String(backendSignature), backendPubKey)))
202 202          then throw("Invalid proof from backend")
203 203          else if (if ((size(i.payments) != 1))
204 204              then true
205 205              else (value(i.payments[0]).assetId != EGGASSETID))
206 206              then throw("Bad payment attached (asset[s] or amount)")
207 207              else if ((ducklingId == ""))
208 208                  then {
209 209                      let ducklingAssetId = invoke(this, "issueFreeDuckling", [toString(i.originCaller), toBase58String(i.transactionId)], nil)
210 210                      if ((ducklingAssetId == ducklingAssetId))
211 211                          then {
212 212                              let id =                             match ducklingAssetId {
213 213                                  case v: String => 
214 214                                      v
215 215                                  case _ => 
216 216                                      throw("Can't generate NFT")
217 217                              }
218 218                              id
219 219                              }
220 220                          else throw("Strict value is not equal to itself.")
221 221                      }
222 222                  else {
223 223                      let ducklingIdCheck = value(assetInfo(fromBase58String(ducklingId)))
224 224                      if ((assetBalance(i.caller, ducklingIdCheck.id) != 1))
225 225                          then throw("You're not the owner of the duckling")
226 226                          else if ((ducklingIdCheck.issuer != this))
227 227                              then throw("Cant find duckling with such id")
228 228                              else {
229 229                                  let ducklingIdString = toBase58String(ducklingIdCheck.id)
230 230                                  ducklingIdString
231 231                                  }
232 232                      }
233 233      let intLaps = stringListToIntList(laps)
234 234      let intRewards = stringListToIntList(rewards)
235 235      let maxFeedAmount = getMaxFeedAmount(intLaps, intRewards, toString(i.caller))
236 236      let kDucklingFedLap = keyDucklingFedLap(realDucklingId)
237 237      let lastFedLap = tryGetInteger(kDucklingFedLap)
238 238      let currentPayment = value(i.payments[0]).amount
239 239      let kNewLevel = keyDucklingLevel(realDucklingId)
240 240      let kTotalFeed = keyTotalFeed(realDucklingId)
241 241      let totalFeed = tryGetInteger(kTotalFeed)
242 242      let feedTxStats = ((("duckling_" + realDucklingId) + "_stat_") + toString(lastBlock.timestamp))
243 243      if ((currentPayment > maxFeedAmount))
244 244          then throw(("Cannot feed duckling for such amount, max feed amount is: " + toString(maxFeedAmount)))
245 245          else [IntegerEntry(kDucklingFedLap, getCurrentLap()), IntegerEntry(keyFeedForLap(addressString, intLaps[0]), (getFeedByLap(addressString, intLaps[0]) + currentPayment)), IntegerEntry(keyFeedForLap(addressString, intLaps[1]), (getFeedByLap(addressString, intLaps[1]) + currentPayment)), IntegerEntry(keyFeedForLap(addressString, intLaps[2]), (getFeedByLap(addressString, intLaps[2]) + currentPayment)), IntegerEntry(keyFeedForLap(addressString, intLaps[3]), (getFeedByLap(addressString, intLaps[3]) + currentPayment)), IntegerEntry(kTotalFeed, (totalFeed + currentPayment)), IntegerEntry(feedTxStats, currentPayment), StringEntry(kNewLevel, calculateNewDucklingLevel(realDucklingId, currentPayment))]
246 246      }
247 247  
248 248  
249 249  
250 250  @Callable(i)
251 251  func turnDucklingIntoDuck () = throw("Not implemented yet")
252 252  
253 253  
254 254  @Verifier(tx)
255 255  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
256 256

Old	New		Differences
71	71		let currentlap = getCurrentLap()
72	72		let penalty = (toBigInt(((currentlap - lastFedLapNumber) / 4)) * toBigInt(percentGrowthPrecision))
73	73		let growth = fraction(toBigInt(paymentAmount), toBigInt(percentGrowthPrecision), toBigInt(DUCKLINGPRICE))
74		-	~~toString~~(((getCurrentLevelBigInt(ducklingId) ~~- penalty~~) + growth))
	74	+	throw(((((("currentLevel: " + toString(getCurrentLevelBigInt(ducklingId))) + " penalty: ") + toString(penalty)) + "growth: ") + toString(growth)))
75	75		}
76	76
77	77

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let rebirthAddress = base58'3PKL9tfUmNciXvbSA3zpXr6PnDNnhn936ba'
5	5
6	6		let backendPubKey = base58'BnKJTqkWD69SotKhJXdKu76NRtkdQJEpThqGGeFwF9EL'
7	7
8	8		let STARTTIMESTAMP = 1632474000000
9	9
10	10		let LAPLENGTH = 21600000
11	11
12	12		let EGGASSETID = base58'3v7zGkeHS6KrsvmTRzEzvCxm5cdzkCtM7z5cM6efcjCB'
13	13
14	14		let DUCKLINGPRICE = 80000000
15	15
16	16		let percentGrowthPrecision = 10000000000000000
17	17
18	18		func keyTotalFeed (ducklingId) = (("duckling_" + ducklingId) + "_feed")
19	19
20	20
21	21		func keyDucklingFedLap (ducklingId) = (("duckling_" + ducklingId) + "_fedLap")
22	22
23	23
24	24		func keyDucklingLevel (ducklingId) = (("duckling_" + ducklingId) + "_level")
25	25
26	26
27	27		func keyFeedForLap (address,lap) = (((("address_" + address) + "_lap_") + toString(lap)) + "_feed")
28	28
29	29
30	30		func tryGetInteger (key) = {
31	31		let val = match getInteger(this, key) {
32	32		case b: Int =>
33	33		b
34	34		case _ =>
35	35		0
36	36		}
37	37		val
38	38		}
39	39
40	40
41	41		func getBool (key) = match getBoolean(this, key) {
42	42		case b: Boolean =>
43	43		b
44	44		case _ =>
45	45		unit
46	46		}
47	47
48	48
49	49		func getCurrentLevelBigInt (ducklingId) = {
50	50		let kDuckLevel = keyDucklingLevel(ducklingId)
51	51		match getString(kDuckLevel) {
52	52		case s: String =>
53	53		parseBigIntValue(s)
54	54		case _ =>
55	55		match getBoolean((("duckling_" + ducklingId) + "_issuedByFeedCall")) {
56	56		case b: Boolean =>
57	57		toBigInt(0)
58	58		case _ =>
59	59		toBigInt(20)
60	60		}
61	61		}
62	62		}
63	63
64	64
65	65		func getCurrentLap () = (((lastBlock.timestamp - STARTTIMESTAMP) / LAPLENGTH) + 1)
66	66
67	67
68	68		func calculateNewDucklingLevel (ducklingId,paymentAmount) = {
69	69		let kFedLap = keyDucklingFedLap(ducklingId)
70	70		let lastFedLapNumber = tryGetInteger(kFedLap)
71	71		let currentlap = getCurrentLap()
72	72		let penalty = (toBigInt(((currentlap - lastFedLapNumber) / 4)) * toBigInt(percentGrowthPrecision))
73	73		let growth = fraction(toBigInt(paymentAmount), toBigInt(percentGrowthPrecision), toBigInt(DUCKLINGPRICE))
74		-	~~toString~~(((getCurrentLevelBigInt(ducklingId) ~~- penalty~~) + growth))
	74	+	throw(((((("currentLevel: " + toString(getCurrentLevelBigInt(ducklingId))) + " penalty: ") + toString(penalty)) + "growth: ") + toString(growth)))
75	75		}
76	76
77	77
78	78		func getFeedByLap (address,lap) = {
79	79		let kFeedForLap = keyFeedForLap(address, lap)
80	80		tryGetInteger(kFeedForLap)
81	81		}
82	82
83	83
84	84		func stringListToIntList (list) = {
85	85		func parser (acc,val) = (acc ++ [value(parseInt(val))])
86	86
87	87		let $l = list
88	88		let $s = size($l)
89	89		let $acc0 = nil
90	90		func 1 ($a,$i) = if (($i >= $s))
91	91		then $a
92	92		else parser($a, $l[$i])
93	93
94	94		func 2 ($a,$i) = if (($i >= $s))
95	95		then $a
96	96		else throw("List size exceeds 10")
97	97
98	98		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
99	99		}
100	100
101	101
102	102		func getMaxFeedAmount (laps,rewards,address) = {
103	103		let currentLap = getCurrentLap()
104	104		if (if (if (if ((laps[3] != (currentLap - 1)))
105	105		then true
106	106		else (laps[2] != (currentLap - 2)))
107	107		then true
108	108		else (laps[1] != (currentLap - 3)))
109	109		then true
110	110		else (laps[0] != (currentLap - 4)))
111	111		then throw("Outdated data for laps")
112	112		else {
113	113		func getFeedForLap (acc,lap) = (acc :+ getFeedByLap(address, lap))
114	114
115	115		func sum (acc,reward) = (acc + reward)
116	116
117	117		let feedLastLaps = {
118	118		let $l = laps
119	119		let $s = size($l)
120	120		let $acc0 = nil
121	121		func 1 ($a,$i) = if (($i >= $s))
122	122		then $a
123	123		else getFeedForLap($a, $l[$i])
124	124
125	125		func 2 ($a,$i) = if (($i >= $s))
126	126		then $a
127	127		else throw("List size exceeds 4")
128	128
129	129		2(1(1(1(1($acc0, 0), 1), 2), 3), 4)
130	130		}
131	131		let maxFeed = max(feedLastLaps)
132	132		let totalReward = {
133	133		let $l = rewards
134	134		let $s = size($l)
135	135		let $acc0 = 0
136	136		func 1 ($a,$i) = if (($i >= $s))
137	137		then $a
138	138		else sum($a, $l[$i])
139	139
140	140		func 2 ($a,$i) = if (($i >= $s))
141	141		then $a
142	142		else throw("List size exceeds 4")
143	143
144	144		2(1(1(1(1($acc0, 0), 1), 2), 3), 4)
145	145		}
146	146		(totalReward - maxFeed)
147	147		}
148	148		}
149	149
150	150
151	151		func getBackendProof (laps,rewards,address) = {
152	152		func IntListToByteVector (acc,item) = (acc + item)
153	153
154	154		let lapsStringPart = {
155	155		let $l = laps
156	156		let $s = size($l)
157	157		let $acc0 = ""
158	158		func 1 ($a,$i) = if (($i >= $s))
159	159		then $a
160	160		else IntListToByteVector($a, $l[$i])
161	161
162	162		func 2 ($a,$i) = if (($i >= $s))
163	163		then $a
164	164		else throw("List size exceeds 10")
165	165
166	166		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
167	167		}
168	168		let rewardsStringPart = {
169	169		let $l = rewards
170	170		let $s = size($l)
171	171		let $acc0 = ""
172	172		func 1 ($a,$i) = if (($i >= $s))
173	173		then $a
174	174		else IntListToByteVector($a, $l[$i])
175	175
176	176		func 2 ($a,$i) = if (($i >= $s))
177	177		then $a
178	178		else throw("List size exceeds 10")
179	179
180	180		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
181	181		}
182	182		((lapsStringPart + rewardsStringPart) + address)
183	183		}
184	184
185	185
186	186		@Callable(i)
187	187		func issueFreeDuckling (address,txIdStr) = {
188	188		let asset = Issue("BABY-11111111-GZ", "", 1, 0, false, unit, height)
189	189		let assetId = calculateAssetId(asset)
190	190		$Tuple2([StringEntry((((address + "_") + txIdStr) + "_di"), toBase58String(assetId)), IntegerEntry("stats_amount", (tryGetInteger("stats_amount") + 1)), BooleanEntry((("duckling_" + toBase58String(assetId)) + "_issuedByFeedCall"), (i.caller == this)), asset, ScriptTransfer(value(addressFromString(address)), 1, assetId)], toBase58String(assetId))
191	191		}
192	192
193	193
194	194
195	195		@Callable(i)
196	196		func feedDuckling (ducklingId,backendSignature,lapsList,rewardsList) = {
197	197		let addressString = toString(i.caller)
198	198		let laps = value(split(lapsList, ","))
199	199		let rewards = value(split(rewardsList, ","))
200	200		let backendProof = getBackendProof(laps, rewards, addressString)
201	201		let realDucklingId = if (!(sigVerify_8Kb(toBytes(backendProof), fromBase58String(backendSignature), backendPubKey)))
202	202		then throw("Invalid proof from backend")
203	203		else if (if ((size(i.payments) != 1))
204	204		then true
205	205		else (value(i.payments[0]).assetId != EGGASSETID))
206	206		then throw("Bad payment attached (asset[s] or amount)")
207	207		else if ((ducklingId == ""))
208	208		then {
209	209		let ducklingAssetId = invoke(this, "issueFreeDuckling", [toString(i.originCaller), toBase58String(i.transactionId)], nil)
210	210		if ((ducklingAssetId == ducklingAssetId))
211	211		then {
212	212		let id = match ducklingAssetId {
213	213		case v: String =>
214	214		v
215	215		case _ =>
216	216		throw("Can't generate NFT")
217	217		}
218	218		id
219	219		}
220	220		else throw("Strict value is not equal to itself.")
221	221		}
222	222		else {
223	223		let ducklingIdCheck = value(assetInfo(fromBase58String(ducklingId)))
224	224		if ((assetBalance(i.caller, ducklingIdCheck.id) != 1))
225	225		then throw("You're not the owner of the duckling")
226	226		else if ((ducklingIdCheck.issuer != this))
227	227		then throw("Cant find duckling with such id")
228	228		else {
229	229		let ducklingIdString = toBase58String(ducklingIdCheck.id)
230	230		ducklingIdString
231	231		}
232	232		}
233	233		let intLaps = stringListToIntList(laps)
234	234		let intRewards = stringListToIntList(rewards)
235	235		let maxFeedAmount = getMaxFeedAmount(intLaps, intRewards, toString(i.caller))
236	236		let kDucklingFedLap = keyDucklingFedLap(realDucklingId)
237	237		let lastFedLap = tryGetInteger(kDucklingFedLap)
238	238		let currentPayment = value(i.payments[0]).amount
239	239		let kNewLevel = keyDucklingLevel(realDucklingId)
240	240		let kTotalFeed = keyTotalFeed(realDucklingId)
241	241		let totalFeed = tryGetInteger(kTotalFeed)
242	242		let feedTxStats = ((("duckling_" + realDucklingId) + "_stat_") + toString(lastBlock.timestamp))
243	243		if ((currentPayment > maxFeedAmount))
244	244		then throw(("Cannot feed duckling for such amount, max feed amount is: " + toString(maxFeedAmount)))
245	245		else [IntegerEntry(kDucklingFedLap, getCurrentLap()), IntegerEntry(keyFeedForLap(addressString, intLaps[0]), (getFeedByLap(addressString, intLaps[0]) + currentPayment)), IntegerEntry(keyFeedForLap(addressString, intLaps[1]), (getFeedByLap(addressString, intLaps[1]) + currentPayment)), IntegerEntry(keyFeedForLap(addressString, intLaps[2]), (getFeedByLap(addressString, intLaps[2]) + currentPayment)), IntegerEntry(keyFeedForLap(addressString, intLaps[3]), (getFeedByLap(addressString, intLaps[3]) + currentPayment)), IntegerEntry(kTotalFeed, (totalFeed + currentPayment)), IntegerEntry(feedTxStats, currentPayment), StringEntry(kNewLevel, calculateNewDucklingLevel(realDucklingId, currentPayment))]
246	246		}
247	247
248	248
249	249
250	250		@Callable(i)
251	251		func turnDucklingIntoDuck () = throw("Not implemented yet")
252	252
253	253
254	254		@Verifier(tx)
255	255		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
256	256

github/deemru/w8io/3ef1775 
45.99 ms ◑