w8 · tx · Brg···dDC

tx · Brgiu3q1bvgAsU1SCMZ2RuVNY3Lfe7EabnKV5eXZudDC

3PKwLVb8jYk58oYbfXxs2dUjD3YEKeqGWrX:  -0.01400000 Waves

2021.10.28 07:34 [2830693] smart account 3PKwLVb8jYk58oYbfXxs2dUjD3YEKeqGWrX > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Brgiu3q1bvgAsU1SCMZ2RuVNY3Lfe7EabnKV5eXZudDC",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1635395709369,
    "version": 2,
    "chainId": 87,
    "sender": "3PKwLVb8jYk58oYbfXxs2dUjD3YEKeqGWrX",
    "senderPublicKey": "27DK15MykfnsVojpifD1gbr8kRr8rpY5mw6EH4zL8R25",
    "proofs": [
        "46fRr3XJQsXmsUtA5N65TEkWX4tF9onh24nhWfjpszGNJp3JLc6giZQxonkKCcAxmmKRsHELzrYcXxH7QGiP5XXj"
    ],
    "script": "base64:AAIFAAAAAAAAABIIAhIECgIICBIGCgQICAgIEgAAAAAUAAAAAA5yZWJpcnRoQWRkcmVzcwEAAAAaAVe+4FzDtneMBo7i5BMYZS7q3y5wnzCPJvkAAAAADWJhY2tlbmRQdWJLZXkBAAAAIKAwsuKwn/NBBI3F39tU5E0/jIWMDU/yK1axkHX5ed41AAAAAA5TVEFSVFRJTUVTVEFNUAAAAAF8FwhqgAAAAAAJTEFQTEVOR1RIAAAAAAABSZcAAAAAAApFR0dBU1NFVElEAQAAACArUw61nWwxe7e9sWV0sV1YHdNa4fYrM30QZbs7HFieqAAAAAANRFVDS0xJTkdQUklDRQAAAAAABMS0AAAAAAAWcGVyY2VudEdyb3d0aFByZWNpc2lvbgAAI4byb8EAAAEAAAAMa2V5VG90YWxGZWVkAAAAAQAAAApkdWNrbGluZ0lkCQABLAAAAAIJAAEsAAAAAgIAAAAJZHVja2xpbmdfBQAAAApkdWNrbGluZ0lkAgAAAAVfZmVlZAEAAAARa2V5RHVja2xpbmdGZWRMYXAAAAABAAAACmR1Y2tsaW5nSWQJAAEsAAAAAgkAASwAAAACAgAAAAlkdWNrbGluZ18FAAAACmR1Y2tsaW5nSWQCAAAAB19mZWRMYXABAAAAEGtleUR1Y2tsaW5nTGV2ZWwAAAABAAAACmR1Y2tsaW5nSWQJAAEsAAAAAgkAASwAAAACAgAAAAlkdWNrbGluZ18FAAAACmR1Y2tsaW5nSWQCAAAABl9sZXZlbAEAAAANa2V5RmVlZEZvckxhcAAAAAIAAAAHYWRkcmVzcwAAAANsYXAJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIYWRkcmVzc18FAAAAB2FkZHJlc3MCAAAABV9sYXBfCQABpAAAAAEFAAAAA2xhcAIAAAAFX2ZlZWQBAAAADXRyeUdldEludGVnZXIAAAABAAAAA2tleQQAAAADdmFsBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFiBQAAAAckbWF0Y2gwBQAAAAFiAAAAAAAAAAAABQAAAAN2YWwBAAAAB2dldEJvb2wAAAABAAAAA2tleQQAAAAHJG1hdGNoMAkABBsAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAB0Jvb2xlYW4EAAAAAWIFAAAAByRtYXRjaDAFAAAAAWIFAAAABHVuaXQBAAAAFWdldEN1cnJlbnRMZXZlbEJpZ0ludAAAAAEAAAAKZHVja2xpbmdJZAQAAAAKa0R1Y2tMZXZlbAkBAAAAEGtleUR1Y2tsaW5nTGV2ZWwAAAABBQAAAApkdWNrbGluZ0lkBAAAAAckbWF0Y2gwCQAEIgAAAAEFAAAACmtEdWNrTGV2ZWwDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABcwUAAAAHJG1hdGNoMAkAAacAAAABBQAAAAFzBAAAAAckbWF0Y2gxCQAEIAAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAlkdWNrbGluZ18FAAAACmR1Y2tsaW5nSWQCAAAAEV9pc3N1ZWRCeUZlZWRDYWxsAwkAAAEAAAACBQAAAAckbWF0Y2gxAgAAAAdCb29sZWFuBAAAAAFiBQAAAAckbWF0Y2gxCQABNgAAAAEAAAAAAAAAAAAJAAE2AAAAAQAAAAAAAAAAFAEAAAANZ2V0Q3VycmVudExhcAAAAAAJAABkAAAAAgkAAGkAAAACCQAAZQAAAAIIBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wBQAAAA5TVEFSVFRJTUVTVEFNUAUAAAAJTEFQTEVOR1RIAAAAAAAAAAABAQAAABljYWxjdWxhdGVOZXdEdWNrbGluZ0xldmVsAAAAAgAAAApkdWNrbGluZ0lkAAAADXBheW1lbnRBbW91bnQEAAAAB2tGZWRMYXAJAQAAABFrZXlEdWNrbGluZ0ZlZExhcAAAAAEFAAAACmR1Y2tsaW5nSWQEAAAAEGxhc3RGZWRMYXBOdW1iZXIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQUAAAAHa0ZlZExhcAQAAAAKY3VycmVudGxhcAkBAAAADWdldEN1cnJlbnRMYXAAAAAABAAAAAdwZW5hbHR5CQABOQAAAAIJAAE2AAAAAQkAAGkAAAACCQAAZQAAAAIFAAAACmN1cnJlbnRsYXAFAAAAEGxhc3RGZWRMYXBOdW1iZXIAAAAAAAAAAAQJAAE2AAAAAQUAAAAWcGVyY2VudEdyb3d0aFByZWNpc2lvbgQAAAAGZ3Jvd3RoCQABPAAAAAMJAAE2AAAAAQUAAAANcGF5bWVudEFtb3VudAkAATYAAAABBQAAABZwZXJjZW50R3Jvd3RoUHJlY2lzaW9uCQABNgAAAAEFAAAADURVQ0tMSU5HUFJJQ0UJAAGmAAAAAQkAATcAAAACCQABOAAAAAIJAQAAABVnZXRDdXJyZW50TGV2ZWxCaWdJbnQAAAABBQAAAApkdWNrbGluZ0lkBQAAAAdwZW5hbHR5BQAAAAZncm93dGgBAAAADGdldEZlZWRCeUxhcAAAAAIAAAAHYWRkcmVzcwAAAANsYXAEAAAAC2tGZWVkRm9yTGFwCQEAAAANa2V5RmVlZEZvckxhcAAAAAIFAAAAB2FkZHJlc3MFAAAAA2xhcAkBAAAADXRyeUdldEludGVnZXIAAAABBQAAAAtrRmVlZEZvckxhcAEAAAATc3RyaW5nTGlzdFRvSW50TGlzdAAAAAEAAAAEbGlzdAoBAAAABnBhcnNlcgAAAAIAAAADYWNjAAAAA3ZhbAkABE4AAAACBQAAAANhY2MJAARMAAAAAgkBAAAABXZhbHVlAAAAAQkABLYAAAABBQAAAAN2YWwFAAAAA25pbAoAAAAAAiRsBQAAAARsaXN0CgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAUAAAADbmlsCgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAZwYXJzZXIAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKAQAAABBnZXRNYXhGZWVkQW1vdW50AAAAAwAAAARsYXBzAAAAB3Jld2FyZHMAAAAHYWRkcmVzcwQAAAAKY3VycmVudExhcAkBAAAADWdldEN1cnJlbnRMYXAAAAAAAwMDAwkBAAAAAiE9AAAAAgkAAZEAAAACBQAAAARsYXBzAAAAAAAAAAADCQAAZQAAAAIFAAAACmN1cnJlbnRMYXAAAAAAAAAAAAEGCQEAAAACIT0AAAACCQABkQAAAAIFAAAABGxhcHMAAAAAAAAAAAIJAABlAAAAAgUAAAAKY3VycmVudExhcAAAAAAAAAAAAgYJAQAAAAIhPQAAAAIJAAGRAAAAAgUAAAAEbGFwcwAAAAAAAAAAAQkAAGUAAAACBQAAAApjdXJyZW50TGFwAAAAAAAAAAADBgkBAAAAAiE9AAAAAgkAAZEAAAACBQAAAARsYXBzAAAAAAAAAAAACQAAZQAAAAIFAAAACmN1cnJlbnRMYXAAAAAAAAAAAAQJAAACAAAAAQIAAAAWT3V0ZGF0ZWQgZGF0YSBmb3IgbGFwcwoBAAAADWdldEZlZWRGb3JMYXAAAAACAAAAA2FjYwAAAANsYXAJAARNAAAAAgUAAAADYWNjCQEAAAAMZ2V0RmVlZEJ5TGFwAAAAAgUAAAAHYWRkcmVzcwUAAAADbGFwCgEAAAADc3VtAAAAAgAAAANhY2MAAAAGcmV3YXJkCQAAZAAAAAIFAAAAA2FjYwUAAAAGcmV3YXJkBAAAAAxmZWVkTGFzdExhcHMKAAAAAAIkbAUAAAAEbGFwcwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAANZ2V0RmVlZEZvckxhcAAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAE0xpc3Qgc2l6ZSBleGNlZWRzIDQJAQAAAAEyAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAQAAAAHbWF4RmVlZAkAAZYAAAABBQAAAAxmZWVkTGFzdExhcHMEAAAAC3RvdGFsUmV3YXJkCgAAAAACJGwFAAAAB3Jld2FyZHMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwAAAAAAAAAAAACgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAANzdW0AAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABNMaXN0IHNpemUgZXhjZWVkcyA0CQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQJAABlAAAAAgUAAAALdG90YWxSZXdhcmQFAAAAB21heEZlZWQBAAAAD2dldEJhY2tlbmRQcm9vZgAAAAMAAAAEbGFwcwAAAAdyZXdhcmRzAAAAB2FkZHJlc3MKAQAAABNJbnRMaXN0VG9CeXRlVmVjdG9yAAAAAgAAAANhY2MAAAAEaXRlbQkAASwAAAACBQAAAANhY2MFAAAABGl0ZW0EAAAADmxhcHNTdHJpbmdQYXJ0CgAAAAACJGwFAAAABGxhcHMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwAgAAAAAKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAE0ludExpc3RUb0J5dGVWZWN0b3IAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKBAAAABFyZXdhcmRzU3RyaW5nUGFydAoAAAAAAiRsBQAAAAdyZXdhcmRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAIAAAAACgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAABNJbnRMaXN0VG9CeXRlVmVjdG9yAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAABMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQAAAAEyAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgkAASwAAAACCQABLAAAAAIFAAAADmxhcHNTdHJpbmdQYXJ0BQAAABFyZXdhcmRzU3RyaW5nUGFydAUAAAAHYWRkcmVzcwAAAAMAAAABaQEAAAARaXNzdWVGcmVlRHVja2xpbmcAAAACAAAAB2FkZHJlc3MAAAAHdHhJZFN0cgQAAAAFYXNzZXQJAARDAAAABwIAAAAQQkFCWS0xMTExMTExMS1HWgIAAAAAAAAAAAAAAAABAAAAAAAAAAAABwUAAAAEdW5pdAUAAAAGaGVpZ2h0BAAAAAdhc3NldElkCQAEOAAAAAEFAAAABWFzc2V0CQAFFAAAAAIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAHYWRkcmVzcwIAAAABXwUAAAAHdHhJZFN0cgIAAAADX2RpCQACWAAAAAEFAAAAB2Fzc2V0SWQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAADHN0YXRzX2Ftb3VudAkAAGQAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAADHN0YXRzX2Ftb3VudAAAAAAAAAAAAQkABEwAAAACCQEAAAAMQm9vbGVhbkVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAACWR1Y2tsaW5nXwkAAlgAAAABBQAAAAdhc3NldElkAgAAABFfaXNzdWVkQnlGZWVkQ2FsbAkAAAAAAAACCAUAAAABaQAAAAZjYWxsZXIFAAAABHRoaXMJAARMAAAAAgUAAAAFYXNzZXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAABXZhbHVlAAAAAQkABCYAAAABBQAAAAdhZGRyZXNzAAAAAAAAAAABBQAAAAdhc3NldElkBQAAAANuaWwJAAJYAAAAAQUAAAAHYXNzZXRJZAAAAAFpAQAAAAxmZWVkRHVja2xpbmcAAAAEAAAACmR1Y2tsaW5nSWQAAAAQYmFja2VuZFNpZ25hdHVyZQAAAAhsYXBzTGlzdAAAAAtyZXdhcmRzTGlzdAQAAAANYWRkcmVzc1N0cmluZwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIEAAAABGxhcHMJAQAAAAV2YWx1ZQAAAAEJAAS1AAAAAgUAAAAIbGFwc0xpc3QCAAAAASwEAAAAB3Jld2FyZHMJAQAAAAV2YWx1ZQAAAAEJAAS1AAAAAgUAAAALcmV3YXJkc0xpc3QCAAAAASwEAAAADGJhY2tlbmRQcm9vZgkBAAAAD2dldEJhY2tlbmRQcm9vZgAAAAMFAAAABGxhcHMFAAAAB3Jld2FyZHMFAAAADWFkZHJlc3NTdHJpbmcEAAAADnJlYWxEdWNrbGluZ0lkAwkBAAAAASEAAAABCQAJxAAAAAMJAAGbAAAAAQUAAAAMYmFja2VuZFByb29mCQACWQAAAAEFAAAAEGJhY2tlbmRTaWduYXR1cmUFAAAADWJhY2tlbmRQdWJLZXkJAAACAAAAAQIAAAAaSW52YWxpZCBwcm9vZiBmcm9tIGJhY2tlbmQDAwkBAAAAAiE9AAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQYJAQAAAAIhPQAAAAIICQEAAAAFdmFsdWUAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQFAAAACkVHR0FTU0VUSUQJAAACAAAAAQIAAAApQmFkIHBheW1lbnQgYXR0YWNoZWQgKGFzc2V0W3NdIG9yIGFtb3VudCkDCQAAAAAAAAIFAAAACmR1Y2tsaW5nSWQCAAAAAAQAAAAPZHVja2xpbmdBc3NldElkCQAD/AAAAAQFAAAABHRoaXMCAAAAEWlzc3VlRnJlZUR1Y2tsaW5nCQAETAAAAAIJAAQlAAAAAQgFAAAAAWkAAAAMb3JpZ2luQ2FsbGVyCQAETAAAAAIJAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAUAAAADbmlsBQAAAANuaWwDCQAAAAAAAAIFAAAAD2R1Y2tsaW5nQXNzZXRJZAUAAAAPZHVja2xpbmdBc3NldElkBAAAAAJpZAQAAAAHJG1hdGNoMAUAAAAPZHVja2xpbmdBc3NldElkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAXYFAAAAByRtYXRjaDAFAAAAAXYJAAACAAAAAQIAAAASQ2FuJ3QgZ2VuZXJhdGUgTkZUBQAAAAJpZAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4EAAAAD2R1Y2tsaW5nSWRDaGVjawkBAAAABXZhbHVlAAAAAQkAA+wAAAABCQACWQAAAAEFAAAACmR1Y2tsaW5nSWQDCQEAAAACIT0AAAACCQAD8AAAAAIIBQAAAAFpAAAABmNhbGxlcggFAAAAD2R1Y2tsaW5nSWRDaGVjawAAAAJpZAAAAAAAAAAAAQkAAAIAAAABAgAAACRZb3UncmUgbm90IHRoZSBvd25lciBvZiB0aGUgZHVja2xpbmcDCQEAAAACIT0AAAACCAUAAAAPZHVja2xpbmdJZENoZWNrAAAABmlzc3VlcgUAAAAEdGhpcwkAAAIAAAABAgAAAB9DYW50IGZpbmQgZHVja2xpbmcgd2l0aCBzdWNoIGlkBAAAABBkdWNrbGluZ0lkU3RyaW5nCQACWAAAAAEIBQAAAA9kdWNrbGluZ0lkQ2hlY2sAAAACaWQFAAAAEGR1Y2tsaW5nSWRTdHJpbmcEAAAAB2ludExhcHMJAQAAABNzdHJpbmdMaXN0VG9JbnRMaXN0AAAAAQUAAAAEbGFwcwQAAAAKaW50UmV3YXJkcwkBAAAAE3N0cmluZ0xpc3RUb0ludExpc3QAAAABBQAAAAdyZXdhcmRzBAAAAA1tYXhGZWVkQW1vdW50CQEAAAAQZ2V0TWF4RmVlZEFtb3VudAAAAAMFAAAAB2ludExhcHMFAAAACmludFJld2FyZHMJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBAAAAA9rRHVja2xpbmdGZWRMYXAJAQAAABFrZXlEdWNrbGluZ0ZlZExhcAAAAAEFAAAADnJlYWxEdWNrbGluZ0lkBAAAAApsYXN0RmVkTGFwCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEFAAAAD2tEdWNrbGluZ0ZlZExhcAQAAAAOY3VycmVudFBheW1lbnQICQEAAAAFdmFsdWUAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAQAAAAJa05ld0xldmVsCQEAAAAQa2V5RHVja2xpbmdMZXZlbAAAAAEFAAAADnJlYWxEdWNrbGluZ0lkBAAAAAprVG90YWxGZWVkCQEAAAAMa2V5VG90YWxGZWVkAAAAAQUAAAAOcmVhbER1Y2tsaW5nSWQEAAAACXRvdGFsRmVlZAkBAAAADXRyeUdldEludGVnZXIAAAABBQAAAAprVG90YWxGZWVkBAAAAAtmZWVkVHhTdGF0cwkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAJZHVja2xpbmdfBQAAAA5yZWFsRHVja2xpbmdJZAIAAAAGX3N0YXRfCQABpAAAAAEIBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wAwkAAGYAAAACBQAAAA5jdXJyZW50UGF5bWVudAUAAAANbWF4RmVlZEFtb3VudAkAAAIAAAABCQABLAAAAAICAAAAOkNhbm5vdCBmZWVkIGR1Y2tsaW5nIGZvciBzdWNoIGFtb3VudCwgbWF4IGZlZWQgYW1vdW50IGlzOiAJAAGkAAAAAQUAAAANbWF4RmVlZEFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAPa0R1Y2tsaW5nRmVkTGFwCQEAAAANZ2V0Q3VycmVudExhcAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAAA1rZXlGZWVkRm9yTGFwAAAAAgUAAAANYWRkcmVzc1N0cmluZwkAAZEAAAACBQAAAAdpbnRMYXBzAAAAAAAAAAAACQAAZAAAAAIJAQAAAAxnZXRGZWVkQnlMYXAAAAACBQAAAA1hZGRyZXNzU3RyaW5nCQABkQAAAAIFAAAAB2ludExhcHMAAAAAAAAAAAAFAAAADmN1cnJlbnRQYXltZW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAANa2V5RmVlZEZvckxhcAAAAAIFAAAADWFkZHJlc3NTdHJpbmcJAAGRAAAAAgUAAAAHaW50TGFwcwAAAAAAAAAAAQkAAGQAAAACCQEAAAAMZ2V0RmVlZEJ5TGFwAAAAAgUAAAANYWRkcmVzc1N0cmluZwkAAZEAAAACBQAAAAdpbnRMYXBzAAAAAAAAAAABBQAAAA5jdXJyZW50UGF5bWVudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAADWtleUZlZWRGb3JMYXAAAAACBQAAAA1hZGRyZXNzU3RyaW5nCQABkQAAAAIFAAAAB2ludExhcHMAAAAAAAAAAAIJAABkAAAAAgkBAAAADGdldEZlZWRCeUxhcAAAAAIFAAAADWFkZHJlc3NTdHJpbmcJAAGRAAAAAgUAAAAHaW50TGFwcwAAAAAAAAAAAgUAAAAOY3VycmVudFBheW1lbnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAAA1rZXlGZWVkRm9yTGFwAAAAAgUAAAANYWRkcmVzc1N0cmluZwkAAZEAAAACBQAAAAdpbnRMYXBzAAAAAAAAAAADCQAAZAAAAAIJAQAAAAxnZXRGZWVkQnlMYXAAAAACBQAAAA1hZGRyZXNzU3RyaW5nCQABkQAAAAIFAAAAB2ludExhcHMAAAAAAAAAAAMFAAAADmN1cnJlbnRQYXltZW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAAprVG90YWxGZWVkCQAAZAAAAAIFAAAACXRvdGFsRmVlZAUAAAAOY3VycmVudFBheW1lbnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAC2ZlZWRUeFN0YXRzBQAAAA5jdXJyZW50UGF5bWVudAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAlrTmV3TGV2ZWwJAQAAABljYWxjdWxhdGVOZXdEdWNrbGluZ0xldmVsAAAAAgUAAAAOcmVhbER1Y2tsaW5nSWQFAAAADmN1cnJlbnRQYXltZW50BQAAAANuaWwAAAABaQEAAAAUdHVybkR1Y2tsaW5nSW50b0R1Y2sAAAAACQAAAgAAAAECAAAAE05vdCBpbXBsZW1lbnRlZCB5ZXQAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAACQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAAAnR4AAAAD3NlbmRlclB1YmxpY0tleaRxGhg=",
    "height": 2830693,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: D2YorNo5v5uMmT1xMUBDmMCySbbksicH5dhhxsQjZ9Do
Next: 8cUK7vujGjmBzURLgRNTEKtVM2wRmN3z46QsXhs8fvT1

Diff: 
Old New Differences
48 48  
49 49  func getCurrentLevelBigInt (ducklingId) = {
50 50      let kDuckLevel = keyDucklingLevel(ducklingId)
51 -     match kDuckLevel {
51 +     match getString(kDuckLevel) {
52 52          case s: String => 
53 53              parseBigIntValue(s)
54 54          case _ => 
198 198      let laps = value(split(lapsList, ","))
199 199      let rewards = value(split(rewardsList, ","))
200 200      let backendProof = getBackendProof(laps, rewards, addressString)
201 -     let ducklingIdAndLevel = if (!(sigVerify_8Kb(toBytes(backendProof), fromBase58String(backendSignature), backendPubKey)))
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
230 230                                  ducklingIdString
231 231                                  }
232 232                      }
233 -     let realDucklingId = ducklingIdAndLevel
234 233      let intLaps = stringListToIntList(laps)
235 234      let intRewards = stringListToIntList(rewards)
236 235      let maxFeedAmount = getMaxFeedAmount(intLaps, intRewards, toString(i.caller))
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 -     match kDuckLevel {
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 74      toString(((getCurrentLevelBigInt(ducklingId) - penalty) + 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 -     let ducklingIdAndLevel = if (!(sigVerify_8Kb(toBytes(backendProof), fromBase58String(backendSignature), backendPubKey)))
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 -     let realDucklingId = ducklingIdAndLevel
234 233      let intLaps = stringListToIntList(laps)
235 234      let intRewards = stringListToIntList(rewards)
236 235      let maxFeedAmount = getMaxFeedAmount(intLaps, intRewards, toString(i.caller))
237 236      let kDucklingFedLap = keyDucklingFedLap(realDucklingId)
238 237      let lastFedLap = tryGetInteger(kDucklingFedLap)
239 238      let currentPayment = value(i.payments[0]).amount
240 239      let kNewLevel = keyDucklingLevel(realDucklingId)
241 240      let kTotalFeed = keyTotalFeed(realDucklingId)
242 241      let totalFeed = tryGetInteger(kTotalFeed)
243 242      let feedTxStats = ((("duckling_" + realDucklingId) + "_stat_") + toString(lastBlock.timestamp))
244 243      if ((currentPayment > maxFeedAmount))
245 244          then throw(("Cannot feed duckling for such amount, max feed amount is: " + toString(maxFeedAmount)))
246 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))]
247 246      }
248 247  
249 248  
250 249  
251 250  @Callable(i)
252 251  func turnDucklingIntoDuck () = throw("Not implemented yet")
253 252  
254 253  
255 254  @Verifier(tx)
256 255  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
257 256

Old	New		Differences
48	48
49	49		func getCurrentLevelBigInt (ducklingId) = {
50	50		let kDuckLevel = keyDucklingLevel(ducklingId)
51		-	match kDuckLevel {
	51	+	match getString(kDuckLevel) {
52	52		case s: String =>
53	53		parseBigIntValue(s)
54	54		case _ =>

198	198		let laps = value(split(lapsList, ","))
199	199		let rewards = value(split(rewardsList, ","))
200	200		let backendProof = getBackendProof(laps, rewards, addressString)
201		-	let ~~ducklingIdAndLevel~~ = if (!(sigVerify_8Kb(toBytes(backendProof), fromBase58String(backendSignature), backendPubKey)))
	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

230	230		ducklingIdString
231	231		}
232	232		}
233		-	let realDucklingId = ducklingIdAndLevel
234	233		let intLaps = stringListToIntList(laps)
235	234		let intRewards = stringListToIntList(rewards)
236	235		let maxFeedAmount = getMaxFeedAmount(intLaps, intRewards, toString(i.caller))

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		-	match kDuckLevel {
	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	74		toString(((getCurrentLevelBigInt(ducklingId) - penalty) + 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		-	let ~~ducklingIdAndLevel~~ = if (!(sigVerify_8Kb(toBytes(backendProof), fromBase58String(backendSignature), backendPubKey)))
	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		-	let realDucklingId = ducklingIdAndLevel
234	233		let intLaps = stringListToIntList(laps)
235	234		let intRewards = stringListToIntList(rewards)
236	235		let maxFeedAmount = getMaxFeedAmount(intLaps, intRewards, toString(i.caller))
237	236		let kDucklingFedLap = keyDucklingFedLap(realDucklingId)
238	237		let lastFedLap = tryGetInteger(kDucklingFedLap)
239	238		let currentPayment = value(i.payments[0]).amount
240	239		let kNewLevel = keyDucklingLevel(realDucklingId)
241	240		let kTotalFeed = keyTotalFeed(realDucklingId)
242	241		let totalFeed = tryGetInteger(kTotalFeed)
243	242		let feedTxStats = ((("duckling_" + realDucklingId) + "_stat_") + toString(lastBlock.timestamp))
244	243		if ((currentPayment > maxFeedAmount))
245	244		then throw(("Cannot feed duckling for such amount, max feed amount is: " + toString(maxFeedAmount)))
246	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))]
247	246		}
248	247
249	248
250	249
251	250		@Callable(i)
252	251		func turnDucklingIntoDuck () = throw("Not implemented yet")
253	252
254	253
255	254		@Verifier(tx)
256	255		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
257	256

github/deemru/w8io/6500d08 
55.69 ms ◑