tx · 6RABzX8ZBZnt2GEAkhKeJyjr5xuoutocqmmVhA3a5VSz

3MyBtJnMg6n7m1sDczbrijVyosLnRh4FFbc:  -0.01000000 Waves

2022.05.25 13:44 [2067113] smart account 3MyBtJnMg6n7m1sDczbrijVyosLnRh4FFbc > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "6RABzX8ZBZnt2GEAkhKeJyjr5xuoutocqmmVhA3a5VSz",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1653475469310,
    "version": 2,
    "chainId": 84,
    "sender": "3MyBtJnMg6n7m1sDczbrijVyosLnRh4FFbc",
    "senderPublicKey": "H3EzJ6fSm7jHKo92xYdNTXaaQYKj9z5q2DJFovRDLJpf",
    "proofs": [
        "4dUear54wpyg4ntAxErvsRTu8igRivMRyWs9qdLytEtTzGYa7cBya4Vvu8GkCRjjR2Lnm85NNkB3g9TrkLqwRBWk"
    ],
    "script": "base64:AAIFAAAAAAAAABIIAhIHCgUBCAgBARIAEgMKAQgAAAAXAAAAAANTRVACAAAAAl9fAAAAAAVNVUxUNgAAAAAAAA9CQAAAAAAFTVVMVDgAAAAAAAX14QAAAAAACldBVkVTSURTVFICAAAABVdBVkVTAAAAAAdXQVZFU0lECQACWQAAAAEFAAAACldBVkVTSURTVFIBAAAADGdldEludE9yRmFpbAAAAAEAAAADa2V5CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5CQABLAAAAAIJAAEsAAAAAgIAAAAPTWFuZGF0b3J5IHRoaXMuBQAAAANrZXkCAAAADyBpcyBub3QgZGVmaW5lZAEAAAAMZ2V0U3RyT3JFbHNlAAAAAgAAAANrZXkAAAAKZGVmYXVsdFZhbAkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkFAAAACmRlZmF1bHRWYWwBAAAAD2dldFN0cmluZ09yRmFpbAAAAAEAAAADa2V5CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQdAAAAAgUAAAAEdGhpcwUAAAADa2V5CQABLAAAAAIJAAEsAAAAAgIAAAAPTWFuZGF0b3J5IHRoaXMuBQAAAANrZXkCAAAADyBpcyBub3QgZGVmaW5lZAEAAAAQZ2V0QWRkcmVzc09yRmFpbAAAAAEAAAADa2V5CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQmAAAAAQkBAAAAD2dldFN0cmluZ09yRmFpbAAAAAEFAAAAA2tleQkAASwAAAACCQABLAAAAAICAAAAFUZhaWwgdG8gY29udmVydCB0aGlzLgUAAAADa2V5AgAAABMgdmFsdWUgaW50byBBZGRyZXNzAQAAABV2YWxpZGF0ZUFkZHJlc3NPckZhaWwAAAABAAAACmFkZHJlc3NTdHIEAAAAB2FkZHJlc3MJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABCYAAAABBQAAAAphZGRyZXNzU3RyCQABLAAAAAICAAAAHWZhaWwgdG8gY29udmVydCBpbnRvIGFkZHJlc3MgBQAAAAphZGRyZXNzU3RyAwkAAGYAAAACAAAAAAAAAAAACAkAA+8AAAABBQAAAAdhZGRyZXNzAAAACWF2YWlsYWJsZQkBAAAABXRocm93AAAAAAUAAAAKYWRkcmVzc1N0cgEAAAAPa2V5Tm9kZVJlZ2lzdHJ5AAAAAQAAAAdhZGRyZXNzCQABLAAAAAICAAAABCVzX18FAAAAB2FkZHJlc3MBAAAAFGtleU5vZGVSZXdhcmRzVG90YWxzAAAAAQAAAAdhZGRyZXNzCQABLAAAAAICAAAADiVzJXNfX3RvdGFsc19fBQAAAAdhZGRyZXNzAQAAABBrZXlEZXBvc2l0QW1vdW50AAAAAAIAAAAYJXMlc19fY2ZnX19kZXBvc2l0QW1vdW50AQAAABVrZXlOZXV0cmlub0FkZHJlc3NTdHIAAAAAAgAAABolcyVzX19jZmdfX25ldXRyaW5vQWRkcmVzcwEAAAAXa2V5TWFzdGVyTm9kZUFkZHJlc3NTdHIAAAAAAgAAACIlcyVzX19jZmdfX21haW5OZXV0cmlub05vZGVBZGRyZXNzAQAAABFrZXlQcm90b2NvbFBhcnRYNgAAAAACAAAAGSVzJXNfX2NmZ19fcHJvdG9jb2xQYXJ0WDYBAAAAE2tleUJlbmlmaWNhcnlQYXJ0WDYAAAAAAgAAABslcyVzX19jZmdfX2JlbmlmaWNhcnlQYXJ0WDYBAAAAE2Zvcm1hdERlcG9zaXRSZWNvcmQAAAADAAAAB3R4SWRTdHIAAAANZGVwb3NpdEFtb3VudAAAABZyZW1haW5pbmdEZXBvc2l0QW1vdW50CQAEuQAAAAIJAARMAAAAAgIAAAAKJXMlZCVkJWQlZAkABEwAAAACBQAAAAd0eElkU3RyCQAETAAAAAIJAAGkAAAAAQgFAAAACWxhc3RCbG9jawAAAAZoZWlnaHQJAARMAAAAAgkAAaQAAAABCAUAAAAJbGFzdEJsb2NrAAAACXRpbWVzdGFtcAkABEwAAAACCQABpAAAAAEFAAAADWRlcG9zaXRBbW91bnQJAARMAAAAAgkAAaQAAAABBQAAABZyZW1haW5pbmdEZXBvc2l0QW1vdW50BQAAAANuaWwFAAAAA1NFUAEAAAAQa2V5UmV3YXJkSGlzdG9yeQAAAAIAAAALbm9kZUFkZHJlc3MAAAAEdHhJZAkABLkAAAACCQAETAAAAAICAAAABiVzJXMlcwkABEwAAAACAgAAAAdoaXN0b3J5CQAETAAAAAIJAAQlAAAAAQUAAAALbm9kZUFkZHJlc3MJAARMAAAAAgkAAlgAAAABBQAAAAR0eElkBQAAAANuaWwFAAAAA1NFUAEAAAARZGF0YVJld2FyZEhpc3RvcnkAAAAFAAAAEHdhdmVzQW1vdW50VG90YWwAAAAOYmVuZWZpY2lhcnlBbXQAAAALcHJvdG9jb2xBbXQAAAAQcHJvdG9jb2xBbXRQYXJ0MQAAABBwcm90b2NvbEFtdFBhcnQyCQAEuQAAAAIJAARMAAAAAgIAAAAOJWQlZCVkJWQlZCVkJWQJAARMAAAAAgkAAaQAAAABCAUAAAAJbGFzdEJsb2NrAAAABmhlaWdodAkABEwAAAACCQABpAAAAAEIBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wCQAETAAAAAIJAAGkAAAAAQUAAAAQd2F2ZXNBbW91bnRUb3RhbAkABEwAAAACCQABpAAAAAEFAAAADmJlbmVmaWNpYXJ5QW10CQAETAAAAAIJAAGkAAAAAQUAAAALcHJvdG9jb2xBbXQJAARMAAAAAgkAAaQAAAABBQAAABBwcm90b2NvbEFtdFBhcnQxCQAETAAAAAIJAAGkAAAAAQUAAAAQcHJvdG9jb2xBbXRQYXJ0MgUAAAADbmlsBQAAAANTRVABAAAAElJld2FyZEhpc3RvcnlFbnRyeQAAAAcAAAALbm9kZUFkZHJlc3MAAAAEdHhJZAAAAAhtaW5lZEFtdAAAAA5iZW5lZmljaWFyeUFtdAAAAAtwcm90b2NvbEFtdAAAAAxwcm90b2NvbEFtdDEAAAAMcHJvdG9jb2xBbXQyCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAAQa2V5UmV3YXJkSGlzdG9yeQAAAAIFAAAAC25vZGVBZGRyZXNzBQAAAAR0eElkCQEAAAARZGF0YVJld2FyZEhpc3RvcnkAAAAFBQAAAAhtaW5lZEFtdAUAAAAOYmVuZWZpY2lhcnlBbXQFAAAAC3Byb3RvY29sQW10BQAAAAxwcm90b2NvbEFtdDEFAAAADHByb3RvY29sQW10MgEAAAAQZGF0YVJld2FyZFRvdGFscwAAAAUAAAAIbWluZWRBbXQAAAAOYmVuZWZpY2lhcnlBbXQAAAALcHJvdG9jb2xBbXQAAAAQcHJvdG9jb2xBbXRQYXJ0MQAAABBwcm90b2NvbEFtdFBhcnQyCQAEuQAAAAIJAARMAAAAAgIAAAAKJWQlZCVkJWQlZAkABEwAAAACCQABpAAAAAEFAAAACG1pbmVkQW10CQAETAAAAAIJAAGkAAAAAQUAAAAOYmVuZWZpY2lhcnlBbXQJAARMAAAAAgkAAaQAAAABBQAAAAtwcm90b2NvbEFtdAkABEwAAAACCQABpAAAAAEFAAAAEHByb3RvY29sQW10UGFydDEJAARMAAAAAgkAAaQAAAABBQAAABBwcm90b2NvbEFtdFBhcnQyBQAAAANuaWwFAAAAA1NFUAEAAAARUmV3YXJkVG90YWxzRW50cnkAAAAGAAAABW1pbmVyAAAACG1pbmVkQW10AAAADmJlbmVmaWNpYXJ5QW10AAAAC3Byb3RvY29sQW10AAAAEHByb3RvY29sQW10UGFydDEAAAAQcHJvdG9jb2xBbXRQYXJ0MgQAAAAUbm9kZVJld2FyZHNUb3RhbHNLRVkJAQAAABRrZXlOb2RlUmV3YXJkc1RvdGFscwAAAAEJAAQlAAAAAQUAAAAFbWluZXIEAAAAEG5vZGVSZXdhcmRzQXJyYXkJAAS1AAAAAgkBAAAADGdldFN0ck9yRWxzZQAAAAIFAAAAFG5vZGVSZXdhcmRzVG90YWxzS0VZCQEAAAAQZGF0YVJld2FyZFRvdGFscwAAAAUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFAAAAA1NFUAQAAAALbmV3TWluZWRBbXQJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAEG5vZGVSZXdhcmRzQXJyYXkAAAAAAAAAAAEFAAAACG1pbmVkQW10BAAAABFuZXdCZW5lZmljaWFyeUFtdAkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAQbm9kZVJld2FyZHNBcnJheQAAAAAAAAAAAgUAAAAOYmVuZWZpY2lhcnlBbXQEAAAADm5ld1Byb3RvY29sQW10CQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAABBub2RlUmV3YXJkc0FycmF5AAAAAAAAAAADBQAAAAtwcm90b2NvbEFtdAQAAAATbmV3UHJvdG9jb2xBbXRQYXJ0MQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAQbm9kZVJld2FyZHNBcnJheQAAAAAAAAAABAUAAAAQcHJvdG9jb2xBbXRQYXJ0MQQAAAATbmV3UHJvdG9jb2xBbXRQYXJ0MgkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAQbm9kZVJld2FyZHNBcnJheQAAAAAAAAAABQUAAAAQcHJvdG9jb2xBbXRQYXJ0MgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAUbm9kZVJld2FyZHNUb3RhbHNLRVkJAQAAABBkYXRhUmV3YXJkVG90YWxzAAAABQUAAAALbmV3TWluZWRBbXQFAAAAEW5ld0JlbmVmaWNpYXJ5QW10BQAAAA5uZXdQcm90b2NvbEFtdAUAAAATbmV3UHJvdG9jb2xBbXRQYXJ0MQUAAAATbmV3UHJvdG9jb2xBbXRQYXJ0MgAAAAMAAAABaQEAAAALY29uc3RydWN0b3IAAAAFAAAADWRlcG9zaXRBbW91bnQAAAASbmV1dHJpbm9BZGRyZXNzU3RyAAAAFG1hc3Rlck5vZGVBZGRyZXNzU3RyAAAADnByb3RvY29sUGFydFg2AAAAEGJlbmlmaWNhcnlQYXJ0WDYDCQEAAAACIT0AAAACCAUAAAABaQAAAAZjYWxsZXIFAAAABHRoaXMJAAACAAAAAQIAAAAScGVybWlzc2lvbnMgZGVuaWVkAwkAAGYAAAACAAAAAAAAAAAABQAAAA1kZXBvc2l0QW1vdW50CQAAAgAAAAECAAAAHGRlcG9zaXRBbW91bnQgbGVzcyB0aGVuIHplcm8DCQAAZgAAAAIAAAAAAAAAAAAFAAAADnByb3RvY29sUGFydFg2CQAAAgAAAAECAAAAHXByb3RvY29sUGFydFg2IGxlc3MgdGhlbiB6ZXJvAwkAAGYAAAACAAAAAAAAAAAABQAAABBiZW5pZmljYXJ5UGFydFg2CQAAAgAAAAECAAAAH2JlbmlmaWNhcnlQYXJ0WDYgbGVzcyB0aGVuIHplcm8DCQEAAAACIT0AAAACCQAAZAAAAAIFAAAADnByb3RvY29sUGFydFg2BQAAABBiZW5pZmljYXJ5UGFydFg2BQAAAAVNVUxUNgkAAAIAAAABAgAAABNwYXJ0cyBzdW0gbXVzdCBiZSAxCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAAQa2V5RGVwb3NpdEFtb3VudAAAAAAFAAAADWRlcG9zaXRBbW91bnQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAFWtleU5ldXRyaW5vQWRkcmVzc1N0cgAAAAAJAQAAABV2YWxpZGF0ZUFkZHJlc3NPckZhaWwAAAABBQAAABJuZXV0cmlub0FkZHJlc3NTdHIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAF2tleU1hc3Rlck5vZGVBZGRyZXNzU3RyAAAAAAkBAAAAFXZhbGlkYXRlQWRkcmVzc09yRmFpbAAAAAEFAAAAFG1hc3Rlck5vZGVBZGRyZXNzU3RyCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAARa2V5UHJvdG9jb2xQYXJ0WDYAAAAABQAAAA5wcm90b2NvbFBhcnRYNgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAE2tleUJlbmlmaWNhcnlQYXJ0WDYAAAAABQAAABBiZW5pZmljYXJ5UGFydFg2BQAAAANuaWwAAAABaQEAAAAZd291bGRMaWtlVG9CZU5ldXRyaW5vTm9kZQAAAAADCQEAAAACIT0AAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAABCQAAAgAAAAECAAAAIGV4YWN0IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkAwkBAAAAAiE9AAAAAggFAAAAAWkAAAAGY2FsbGVyCAUAAAABaQAAAAxvcmlnaW5DYWxsZXIJAAACAAAAAQIAAAAiZGFwcCB0byBkYXBwIGNhbGxzIGFyZSBub3QgYWxsb3dlZAQAAAADcG10CQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAAdkZXBvc2l0CAUAAAADcG10AAAABmFtb3VudAQAAAAKcG10QXNzZXRJZAkBAAAAC3ZhbHVlT3JFbHNlAAAAAggFAAAAA3BtdAAAAAdhc3NldElkBQAAAAdXQVZFU0lEBAAAABVleHBlY3RlZERlcG9zaXRBbW91bnQJAQAAAAxnZXRJbnRPckZhaWwAAAABCQEAAAAQa2V5RGVwb3NpdEFtb3VudAAAAAAEAAAABHR4SWQJAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAQAAAALbm9kZUFkZHJlc3MJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBAAAAA9ub2RlUmVnaXN0cnlLRVkJAQAAAA9rZXlOb2RlUmVnaXN0cnkAAAABBQAAAAtub2RlQWRkcmVzcwMJAQAAAAIhPQAAAAIFAAAACnBtdEFzc2V0SWQFAAAAB1dBVkVTSUQJAAACAAAAAQIAAAAib25seSBXYXZlcyBjYW4gYmUgdXNlZCBmb3IgZGVwb3NpdAMJAQAAAAIhPQAAAAIFAAAAB2RlcG9zaXQFAAAAFWV4cGVjdGVkRGVwb3NpdEFtb3VudAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAIZXhhY3RseSAJAAGkAAAAAQUAAAAVZXhwZWN0ZWREZXBvc2l0QW1vdW50AgAAABYgV2F2ZWxldHMgYXJlIGV4cGVjdGVkAwkBAAAAAiE9AAAAAgkBAAAADGdldFN0ck9yRWxzZQAAAAIFAAAAD25vZGVSZWdpc3RyeUtFWQIAAAAAAgAAAAAJAAACAAAAAQIAAAAceW91ciBub2RlIGFscmVhZHkgcmVnaXN0ZXJlZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAA9ub2RlUmVnaXN0cnlLRVkJAQAAABNmb3JtYXREZXBvc2l0UmVjb3JkAAAAAwUAAAAEdHhJZAUAAAAHZGVwb3NpdAUAAAAHZGVwb3NpdAUAAAADbmlsAAAAAWkBAAAAFGRpc3RpYnV0ZU1pbmVyUmV3YXJkAAAAAQAAABRiZW5pZmljYXJ5QWRkcmVzc1N0cgMJAQAAAAIhPQAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAEJAAACAAAAAQIAAAAgZXhhY3QgMSBwYXltZW50IG11c3QgYmUgYXR0YWNoZWQDCQEAAAACIT0AAAACCAUAAAABaQAAAAZjYWxsZXIIBQAAAAFpAAAADG9yaWdpbkNhbGxlcgkAAAIAAAABAgAAACJkYXBwIHRvIGRhcHAgY2FsbHMgYXJlIG5vdCBhbGxvd2VkBAAAAANwbXQJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAACG1pbmVkQW10CAUAAAADcG10AAAABmFtb3VudAQAAAAKcG10QXNzZXRJZAkBAAAAC3ZhbHVlT3JFbHNlAAAAAggFAAAAA3BtdAAAAAdhc3NldElkBQAAAAdXQVZFU0lEAwkBAAAAAiE9AAAAAgUAAAAKcG10QXNzZXRJZAUAAAAHV0FWRVNJRAkAAAIAAAABAgAAABZvbmx5IFdhdmVzIGNhbiBiZSB1c2VkBAAAAA9uZXV0cmlub0FkZHJlc3MJAQAAABBnZXRBZGRyZXNzT3JGYWlsAAAAAQkBAAAAFWtleU5ldXRyaW5vQWRkcmVzc1N0cgAAAAAEAAAAEW1hc3Rlck5vZGVBZGRyZXNzCQEAAAAQZ2V0QWRkcmVzc09yRmFpbAAAAAEJAQAAABdrZXlNYXN0ZXJOb2RlQWRkcmVzc1N0cgAAAAAEAAAADG1pbmVyQWRkcmVzcwgFAAAAAWkAAAAGY2FsbGVyBAAAABFiZW5pZmljYXJ5QWRkcmVzcwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAUYmVuaWZpY2FyeUFkZHJlc3NTdHIEAAAADHByb3RvY29sUGFydAkBAAAADGdldEludE9yRmFpbAAAAAEJAQAAABFrZXlQcm90b2NvbFBhcnRYNgAAAAAEAAAADmJlbmlmaWNhcnlQYXJ0CQEAAAAMZ2V0SW50T3JGYWlsAAAAAQkBAAAAE2tleUJlbmlmaWNhcnlQYXJ0WDYAAAAAAwkBAAAAAiE9AAAAAggJAAPvAAAAAQUAAAAMbWluZXJBZGRyZXNzAAAACWF2YWlsYWJsZQAAAAAAAAAAAAkAAAIAAAABAgAAACBhbGwgV2F2ZXMgbXVzdCBiZSBzZW50IGZyb20gTm9kZQQAAAANYmVuaWZpY2FyeUFtdAkAAGsAAAADBQAAAAhtaW5lZEFtdAUAAAAOYmVuaWZpY2FyeVBhcnQFAAAABU1VTFQ2BAAAAAtwcm90b2NvbEFtdAkAAGUAAAACBQAAAAhtaW5lZEFtdAUAAAANYmVuaWZpY2FyeUFtdAQAAAAMcHJvdG9jb2xBbXQxCQAAaQAAAAIFAAAAC3Byb3RvY29sQW10AAAAAAAAAAACBAAAAAxwcm90b2NvbEFtdDIJAABlAAAAAgUAAAALcHJvdG9jb2xBbXQFAAAADHByb3RvY29sQW10MQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAABFiZW5pZmljYXJ5QWRkcmVzcwUAAAANYmVuaWZpY2FyeUFtdAUAAAAEdW5pdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAA9uZXV0cmlub0FkZHJlc3MFAAAADHByb3RvY29sQW10MQUAAAAEdW5pdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAABFtYXN0ZXJOb2RlQWRkcmVzcwUAAAAMcHJvdG9jb2xBbXQyBQAAAAR1bml0CQAETAAAAAIJAQAAABJSZXdhcmRIaXN0b3J5RW50cnkAAAAHBQAAAAxtaW5lckFkZHJlc3MIBQAAAAFpAAAADXRyYW5zYWN0aW9uSWQFAAAACG1pbmVkQW10BQAAAA1iZW5pZmljYXJ5QW10BQAAAAtwcm90b2NvbEFtdAUAAAAMcHJvdG9jb2xBbXQxBQAAAAxwcm90b2NvbEFtdDIJAARMAAAAAgkBAAAAEVJld2FyZFRvdGFsc0VudHJ5AAAABgUAAAAMbWluZXJBZGRyZXNzBQAAAAhtaW5lZEFtdAUAAAANYmVuaWZpY2FyeUFtdAUAAAALcHJvdG9jb2xBbXQFAAAADHByb3RvY29sQW10MQUAAAAMcHJvdG9jb2xBbXQyBQAAAANuaWwAAAAA4HtpJw==",
    "height": 2067113,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 9nia82e4Yq21GC4gPheu1k4ewKj7aTMRDzjeTZj8SLxR
Next: BkfyGK3pZkEeWk3LYDiZeTbQtcZqCtekwit6mzWuE4WK

Diff: 

OldNewDifferences
33 {-# CONTENT_TYPE DAPP #-}
44 let SEP = "__"
55 
6-func keyControlAddress () = "%s%s__config__controlAddress"
6+let MULT6 = 1000000
7+
8+let MULT8 = 100000000
9+
10+let WAVESIDSTR = "WAVES"
11+
12+let WAVESID = fromBase58String(WAVESIDSTR)
13+
14+func getIntOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("Mandatory this." + key) + " is not defined"))
715 
816 
9-func keyRestAddress () = "%s%s__config__restAddress"
17+func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
1018 
1119 
12-func getStrOrFail (key) = valueOrErrorMessage(getString(this, key), (("Mandatory this." + key) + " is not defined"))
20+func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (("Mandatory this." + key) + " is not defined"))
1321 
1422 
15-func getAddressOrFail (key) = valueOrErrorMessage(addressFromString(getStrOrFail(key)), ("fail to parse address for this." + key))
23+func getAddressOrFail (key) = valueOrErrorMessage(addressFromString(getStringOrFail(key)), (("Fail to convert this." + key) + " value into Address"))
1624 
1725 
18-func asString (val) = match val {
19-    case valStr: String => 
20-        valStr
21-    case _ => 
22-        throw("fail to cast into String")
23-}
24-
25-
26-func parseRestResult (restResultStr) = {
27-    let idx = valueOrErrorMessage(indexOf(restResultStr, SEP), "unsupported REST format")
28-    let metaPart = take(restResultStr, idx)
29-    let dataPart = drop(restResultStr, (idx + size(SEP)))
30-    $Tuple2(metaPart, dataPart)
26+func validateAddressOrFail (addressStr) = {
27+    let address = valueOrErrorMessage(addressFromString(addressStr), ("fail to convert into address " + addressStr))
28+    if ((0 > wavesBalance(address).available))
29+        then throw()
30+        else addressStr
3131     }
3232 
3333 
34-func produceJson (strMap) = {
35-    let indexes = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19]
36-    let length = size(strMap)
37-    if (((length % 2) != 0))
38-        then throw("only even args size is accepeted")
39-        else if ((length > size(indexes)))
40-            then throw(("strMap length is greater then " + toString(size(indexes))))
41-            else {
42-                func produceJson (jsonAccum,nextIdx) =                 if (if (((nextIdx % 2) == 0))
43-                    then (length >= (nextIdx + 1))
44-                    else false)
45-                    then (((((jsonAccum + "
46-\"") + strMap[nextIdx]) + "\": \"") + strMap[(nextIdx + 1)]) + "\",")
47-                    else jsonAccum
34+func keyNodeRegistry (address) = ("%s__" + address)
4835 
49-                let preJsonResult = {
50-                    let $l = indexes
51-                    let $s = size($l)
52-                    let $acc0 = ""
53-                    func $f0_1 ($a,$i) =                     if (($i >= $s))
54-                        then $a
55-                        else produceJson($a, $l[$i])
5636 
57-                    func $f0_2 ($a,$i) =                     if (($i >= $s))
58-                        then $a
59-                        else throw("List size exceeds 20")
37+func keyNodeRewardsTotals (address) = ("%s%s__totals__" + address)
6038 
61-                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
62-                    }
63-                (("{" + dropRight(preJsonResult, 1)) + "}")
64-                }
39+
40+func keyDepositAmount () = "%s%s__cfg__depositAmount"
41+
42+
43+func keyNeutrinoAddressStr () = "%s%s__cfg__neutrinoAddress"
44+
45+
46+func keyMasterNodeAddressStr () = "%s%s__cfg__mainNeutrinoNodeAddress"
47+
48+
49+func keyProtocolPartX6 () = "%s%s__cfg__protocolPartX6"
50+
51+
52+func keyBenificaryPartX6 () = "%s%s__cfg__benificaryPartX6"
53+
54+
55+func formatDepositRecord (txIdStr,depositAmount,remainingDepositAmount) = makeString(["%s%d%d%d%d", txIdStr, toString(lastBlock.height), toString(lastBlock.timestamp), toString(depositAmount), toString(remainingDepositAmount)], SEP)
56+
57+
58+func keyRewardHistory (nodeAddress,txId) = makeString(["%s%s%s", "history", toString(nodeAddress), toBase58String(txId)], SEP)
59+
60+
61+func dataRewardHistory (wavesAmountTotal,beneficiaryAmt,protocolAmt,protocolAmtPart1,protocolAmtPart2) = makeString(["%d%d%d%d%d%d%d", toString(lastBlock.height), toString(lastBlock.timestamp), toString(wavesAmountTotal), toString(beneficiaryAmt), toString(protocolAmt), toString(protocolAmtPart1), toString(protocolAmtPart2)], SEP)
62+
63+
64+func RewardHistoryEntry (nodeAddress,txId,minedAmt,beneficiaryAmt,protocolAmt,protocolAmt1,protocolAmt2) = StringEntry(keyRewardHistory(nodeAddress, txId), dataRewardHistory(minedAmt, beneficiaryAmt, protocolAmt, protocolAmt1, protocolAmt2))
65+
66+
67+func dataRewardTotals (minedAmt,beneficiaryAmt,protocolAmt,protocolAmtPart1,protocolAmtPart2) = makeString(["%d%d%d%d%d", toString(minedAmt), toString(beneficiaryAmt), toString(protocolAmt), toString(protocolAmtPart1), toString(protocolAmtPart2)], SEP)
68+
69+
70+func RewardTotalsEntry (miner,minedAmt,beneficiaryAmt,protocolAmt,protocolAmtPart1,protocolAmtPart2) = {
71+    let nodeRewardsTotalsKEY = keyNodeRewardsTotals(toString(miner))
72+    let nodeRewardsArray = split(getStrOrElse(nodeRewardsTotalsKEY, dataRewardTotals(0, 0, 0, 0, 0)), SEP)
73+    let newMinedAmt = (parseIntValue(nodeRewardsArray[1]) + minedAmt)
74+    let newBeneficiaryAmt = (parseIntValue(nodeRewardsArray[2]) + beneficiaryAmt)
75+    let newProtocolAmt = (parseIntValue(nodeRewardsArray[3]) + protocolAmt)
76+    let newProtocolAmtPart1 = (parseIntValue(nodeRewardsArray[4]) + protocolAmtPart1)
77+    let newProtocolAmtPart2 = (parseIntValue(nodeRewardsArray[5]) + protocolAmtPart2)
78+    StringEntry(nodeRewardsTotalsKEY, dataRewardTotals(newMinedAmt, newBeneficiaryAmt, newProtocolAmt, newProtocolAmtPart1, newProtocolAmtPart2))
6579     }
6680 
6781 
68-let controlAcc = getAddressOrFail(keyControlAddress())
69-
70-let restAcc = getAddressOrFail(keyRestAddress())
71-
7282 @Callable(i)
73-func constructor (controlAddress58,restAddress58) = if ((i.caller != this))
74-    then throw("not authorized")
75-    else [StringEntry(keyControlAddress(), controlAddress58), StringEntry(keyRestAddress(), restAddress58)]
83+func constructor (depositAmount,neutrinoAddressStr,masterNodeAddressStr,protocolPartX6,benificaryPartX6) = if ((i.caller != this))
84+    then throw("permissions denied")
85+    else if ((0 > depositAmount))
86+        then throw("depositAmount less then zero")
87+        else if ((0 > protocolPartX6))
88+            then throw("protocolPartX6 less then zero")
89+            else if ((0 > benificaryPartX6))
90+                then throw("benificaryPartX6 less then zero")
91+                else if (((protocolPartX6 + benificaryPartX6) != MULT6))
92+                    then throw("parts sum must be 1")
93+                    else [IntegerEntry(keyDepositAmount(), depositAmount), StringEntry(keyNeutrinoAddressStr(), validateAddressOrFail(neutrinoAddressStr)), StringEntry(keyMasterNodeAddressStr(), validateAddressOrFail(masterNodeAddressStr)), IntegerEntry(keyProtocolPartX6(), protocolPartX6), IntegerEntry(keyBenificaryPartX6(), benificaryPartX6)]
7694 
7795 
7896 
7997 @Callable(i)
80-func stakeNsbtPageREADONLY (userAddressStrOpt,nsbtAmtDiff) = {
81-    let gnsbtInfo = asString(invoke(restAcc, "gnsbtInfoREADONLY", [userAddressStrOpt, nsbtAmtDiff], nil))
82-    let $t021152203 = parseRestResult(gnsbtInfo)
83-    let gNsbtInfoMETA = $t021152203._1
84-    let gNsbtInfoDATA = $t021152203._2
85-    let swapInfo = asString(invoke(restAcc, "swapInfoREADONLY", [userAddressStrOpt], nil))
86-    let swapInfoArray = split(swapInfo, SEP)
87-    let blocks2LmtReset = swapInfoArray[8]
88-    $Tuple2(nil, produceJson(["gnsbtInfoREADONLY", gnsbtInfo, "swapInfoREADONLY", swapInfo]))
89-    }
98+func wouldLikeToBeNeutrinoNode () = if ((size(i.payments) != 1))
99+    then throw("exact 1 payment must be attached")
100+    else if ((i.caller != i.originCaller))
101+        then throw("dapp to dapp calls are not allowed")
102+        else {
103+            let pmt = i.payments[0]
104+            let deposit = pmt.amount
105+            let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
106+            let expectedDepositAmount = getIntOrFail(keyDepositAmount())
107+            let txId = toBase58String(i.transactionId)
108+            let nodeAddress = toString(i.caller)
109+            let nodeRegistryKEY = keyNodeRegistry(nodeAddress)
110+            if ((pmtAssetId != WAVESID))
111+                then throw("only Waves can be used for deposit")
112+                else if ((deposit != expectedDepositAmount))
113+                    then throw((("exactly " + toString(expectedDepositAmount)) + " Wavelets are expected"))
114+                    else if ((getStrOrElse(nodeRegistryKEY, "") != ""))
115+                        then throw("your node already registered")
116+                        else [StringEntry(nodeRegistryKEY, formatDepositRecord(txId, deposit, deposit))]
117+            }
90118 
91119 
92120 
93121 @Callable(i)
94-func buyNsbtPageREADONLY (userAddressStrOpt) = {
95-    let gnsbtInfo = asString(invoke(restAcc, "gnsbtInfoREADONLY", [userAddressStrOpt, 100000000], nil))
96-    let neutrinoStats = asString(invoke(restAcc, "neutrinoStatsREADONLY", nil, nil))
97-    $Tuple2(nil, produceJson(["gnsbtInfoREADONLY", gnsbtInfo, "neutrinoStatsREADONLY", neutrinoStats]))
98-    }
122+func distibuteMinerReward (benificaryAddressStr) = if ((size(i.payments) != 1))
123+    then throw("exact 1 payment must be attached")
124+    else if ((i.caller != i.originCaller))
125+        then throw("dapp to dapp calls are not allowed")
126+        else {
127+            let pmt = i.payments[0]
128+            let minedAmt = pmt.amount
129+            let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
130+            if ((pmtAssetId != WAVESID))
131+                then throw("only Waves can be used")
132+                else {
133+                    let neutrinoAddress = getAddressOrFail(keyNeutrinoAddressStr())
134+                    let masterNodeAddress = getAddressOrFail(keyMasterNodeAddressStr())
135+                    let minerAddress = i.caller
136+                    let benificaryAddress = addressFromStringValue(benificaryAddressStr)
137+                    let protocolPart = getIntOrFail(keyProtocolPartX6())
138+                    let benificaryPart = getIntOrFail(keyBenificaryPartX6())
139+                    if ((wavesBalance(minerAddress).available != 0))
140+                        then throw("all Waves must be sent from Node")
141+                        else {
142+                            let benificaryAmt = fraction(minedAmt, benificaryPart, MULT6)
143+                            let protocolAmt = (minedAmt - benificaryAmt)
144+                            let protocolAmt1 = (protocolAmt / 2)
145+                            let protocolAmt2 = (protocolAmt - protocolAmt1)
146+[ScriptTransfer(benificaryAddress, benificaryAmt, unit), ScriptTransfer(neutrinoAddress, protocolAmt1, unit), ScriptTransfer(masterNodeAddress, protocolAmt2, unit), RewardHistoryEntry(minerAddress, i.transactionId, minedAmt, benificaryAmt, protocolAmt, protocolAmt1, protocolAmt2), RewardTotalsEntry(minerAddress, minedAmt, benificaryAmt, protocolAmt, protocolAmt1, protocolAmt2)]
147+                            }
148+                    }
149+            }
99150 
100151 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let SEP = "__"
55 
6-func keyControlAddress () = "%s%s__config__controlAddress"
6+let MULT6 = 1000000
7+
8+let MULT8 = 100000000
9+
10+let WAVESIDSTR = "WAVES"
11+
12+let WAVESID = fromBase58String(WAVESIDSTR)
13+
14+func getIntOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("Mandatory this." + key) + " is not defined"))
715 
816 
9-func keyRestAddress () = "%s%s__config__restAddress"
17+func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
1018 
1119 
12-func getStrOrFail (key) = valueOrErrorMessage(getString(this, key), (("Mandatory this." + key) + " is not defined"))
20+func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (("Mandatory this." + key) + " is not defined"))
1321 
1422 
15-func getAddressOrFail (key) = valueOrErrorMessage(addressFromString(getStrOrFail(key)), ("fail to parse address for this." + key))
23+func getAddressOrFail (key) = valueOrErrorMessage(addressFromString(getStringOrFail(key)), (("Fail to convert this." + key) + " value into Address"))
1624 
1725 
18-func asString (val) = match val {
19-    case valStr: String => 
20-        valStr
21-    case _ => 
22-        throw("fail to cast into String")
23-}
24-
25-
26-func parseRestResult (restResultStr) = {
27-    let idx = valueOrErrorMessage(indexOf(restResultStr, SEP), "unsupported REST format")
28-    let metaPart = take(restResultStr, idx)
29-    let dataPart = drop(restResultStr, (idx + size(SEP)))
30-    $Tuple2(metaPart, dataPart)
26+func validateAddressOrFail (addressStr) = {
27+    let address = valueOrErrorMessage(addressFromString(addressStr), ("fail to convert into address " + addressStr))
28+    if ((0 > wavesBalance(address).available))
29+        then throw()
30+        else addressStr
3131     }
3232 
3333 
34-func produceJson (strMap) = {
35-    let indexes = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19]
36-    let length = size(strMap)
37-    if (((length % 2) != 0))
38-        then throw("only even args size is accepeted")
39-        else if ((length > size(indexes)))
40-            then throw(("strMap length is greater then " + toString(size(indexes))))
41-            else {
42-                func produceJson (jsonAccum,nextIdx) =                 if (if (((nextIdx % 2) == 0))
43-                    then (length >= (nextIdx + 1))
44-                    else false)
45-                    then (((((jsonAccum + "
46-\"") + strMap[nextIdx]) + "\": \"") + strMap[(nextIdx + 1)]) + "\",")
47-                    else jsonAccum
34+func keyNodeRegistry (address) = ("%s__" + address)
4835 
49-                let preJsonResult = {
50-                    let $l = indexes
51-                    let $s = size($l)
52-                    let $acc0 = ""
53-                    func $f0_1 ($a,$i) =                     if (($i >= $s))
54-                        then $a
55-                        else produceJson($a, $l[$i])
5636 
57-                    func $f0_2 ($a,$i) =                     if (($i >= $s))
58-                        then $a
59-                        else throw("List size exceeds 20")
37+func keyNodeRewardsTotals (address) = ("%s%s__totals__" + address)
6038 
61-                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
62-                    }
63-                (("{" + dropRight(preJsonResult, 1)) + "}")
64-                }
39+
40+func keyDepositAmount () = "%s%s__cfg__depositAmount"
41+
42+
43+func keyNeutrinoAddressStr () = "%s%s__cfg__neutrinoAddress"
44+
45+
46+func keyMasterNodeAddressStr () = "%s%s__cfg__mainNeutrinoNodeAddress"
47+
48+
49+func keyProtocolPartX6 () = "%s%s__cfg__protocolPartX6"
50+
51+
52+func keyBenificaryPartX6 () = "%s%s__cfg__benificaryPartX6"
53+
54+
55+func formatDepositRecord (txIdStr,depositAmount,remainingDepositAmount) = makeString(["%s%d%d%d%d", txIdStr, toString(lastBlock.height), toString(lastBlock.timestamp), toString(depositAmount), toString(remainingDepositAmount)], SEP)
56+
57+
58+func keyRewardHistory (nodeAddress,txId) = makeString(["%s%s%s", "history", toString(nodeAddress), toBase58String(txId)], SEP)
59+
60+
61+func dataRewardHistory (wavesAmountTotal,beneficiaryAmt,protocolAmt,protocolAmtPart1,protocolAmtPart2) = makeString(["%d%d%d%d%d%d%d", toString(lastBlock.height), toString(lastBlock.timestamp), toString(wavesAmountTotal), toString(beneficiaryAmt), toString(protocolAmt), toString(protocolAmtPart1), toString(protocolAmtPart2)], SEP)
62+
63+
64+func RewardHistoryEntry (nodeAddress,txId,minedAmt,beneficiaryAmt,protocolAmt,protocolAmt1,protocolAmt2) = StringEntry(keyRewardHistory(nodeAddress, txId), dataRewardHistory(minedAmt, beneficiaryAmt, protocolAmt, protocolAmt1, protocolAmt2))
65+
66+
67+func dataRewardTotals (minedAmt,beneficiaryAmt,protocolAmt,protocolAmtPart1,protocolAmtPart2) = makeString(["%d%d%d%d%d", toString(minedAmt), toString(beneficiaryAmt), toString(protocolAmt), toString(protocolAmtPart1), toString(protocolAmtPart2)], SEP)
68+
69+
70+func RewardTotalsEntry (miner,minedAmt,beneficiaryAmt,protocolAmt,protocolAmtPart1,protocolAmtPart2) = {
71+    let nodeRewardsTotalsKEY = keyNodeRewardsTotals(toString(miner))
72+    let nodeRewardsArray = split(getStrOrElse(nodeRewardsTotalsKEY, dataRewardTotals(0, 0, 0, 0, 0)), SEP)
73+    let newMinedAmt = (parseIntValue(nodeRewardsArray[1]) + minedAmt)
74+    let newBeneficiaryAmt = (parseIntValue(nodeRewardsArray[2]) + beneficiaryAmt)
75+    let newProtocolAmt = (parseIntValue(nodeRewardsArray[3]) + protocolAmt)
76+    let newProtocolAmtPart1 = (parseIntValue(nodeRewardsArray[4]) + protocolAmtPart1)
77+    let newProtocolAmtPart2 = (parseIntValue(nodeRewardsArray[5]) + protocolAmtPart2)
78+    StringEntry(nodeRewardsTotalsKEY, dataRewardTotals(newMinedAmt, newBeneficiaryAmt, newProtocolAmt, newProtocolAmtPart1, newProtocolAmtPart2))
6579     }
6680 
6781 
68-let controlAcc = getAddressOrFail(keyControlAddress())
69-
70-let restAcc = getAddressOrFail(keyRestAddress())
71-
7282 @Callable(i)
73-func constructor (controlAddress58,restAddress58) = if ((i.caller != this))
74-    then throw("not authorized")
75-    else [StringEntry(keyControlAddress(), controlAddress58), StringEntry(keyRestAddress(), restAddress58)]
83+func constructor (depositAmount,neutrinoAddressStr,masterNodeAddressStr,protocolPartX6,benificaryPartX6) = if ((i.caller != this))
84+    then throw("permissions denied")
85+    else if ((0 > depositAmount))
86+        then throw("depositAmount less then zero")
87+        else if ((0 > protocolPartX6))
88+            then throw("protocolPartX6 less then zero")
89+            else if ((0 > benificaryPartX6))
90+                then throw("benificaryPartX6 less then zero")
91+                else if (((protocolPartX6 + benificaryPartX6) != MULT6))
92+                    then throw("parts sum must be 1")
93+                    else [IntegerEntry(keyDepositAmount(), depositAmount), StringEntry(keyNeutrinoAddressStr(), validateAddressOrFail(neutrinoAddressStr)), StringEntry(keyMasterNodeAddressStr(), validateAddressOrFail(masterNodeAddressStr)), IntegerEntry(keyProtocolPartX6(), protocolPartX6), IntegerEntry(keyBenificaryPartX6(), benificaryPartX6)]
7694 
7795 
7896 
7997 @Callable(i)
80-func stakeNsbtPageREADONLY (userAddressStrOpt,nsbtAmtDiff) = {
81-    let gnsbtInfo = asString(invoke(restAcc, "gnsbtInfoREADONLY", [userAddressStrOpt, nsbtAmtDiff], nil))
82-    let $t021152203 = parseRestResult(gnsbtInfo)
83-    let gNsbtInfoMETA = $t021152203._1
84-    let gNsbtInfoDATA = $t021152203._2
85-    let swapInfo = asString(invoke(restAcc, "swapInfoREADONLY", [userAddressStrOpt], nil))
86-    let swapInfoArray = split(swapInfo, SEP)
87-    let blocks2LmtReset = swapInfoArray[8]
88-    $Tuple2(nil, produceJson(["gnsbtInfoREADONLY", gnsbtInfo, "swapInfoREADONLY", swapInfo]))
89-    }
98+func wouldLikeToBeNeutrinoNode () = if ((size(i.payments) != 1))
99+    then throw("exact 1 payment must be attached")
100+    else if ((i.caller != i.originCaller))
101+        then throw("dapp to dapp calls are not allowed")
102+        else {
103+            let pmt = i.payments[0]
104+            let deposit = pmt.amount
105+            let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
106+            let expectedDepositAmount = getIntOrFail(keyDepositAmount())
107+            let txId = toBase58String(i.transactionId)
108+            let nodeAddress = toString(i.caller)
109+            let nodeRegistryKEY = keyNodeRegistry(nodeAddress)
110+            if ((pmtAssetId != WAVESID))
111+                then throw("only Waves can be used for deposit")
112+                else if ((deposit != expectedDepositAmount))
113+                    then throw((("exactly " + toString(expectedDepositAmount)) + " Wavelets are expected"))
114+                    else if ((getStrOrElse(nodeRegistryKEY, "") != ""))
115+                        then throw("your node already registered")
116+                        else [StringEntry(nodeRegistryKEY, formatDepositRecord(txId, deposit, deposit))]
117+            }
90118 
91119 
92120 
93121 @Callable(i)
94-func buyNsbtPageREADONLY (userAddressStrOpt) = {
95-    let gnsbtInfo = asString(invoke(restAcc, "gnsbtInfoREADONLY", [userAddressStrOpt, 100000000], nil))
96-    let neutrinoStats = asString(invoke(restAcc, "neutrinoStatsREADONLY", nil, nil))
97-    $Tuple2(nil, produceJson(["gnsbtInfoREADONLY", gnsbtInfo, "neutrinoStatsREADONLY", neutrinoStats]))
98-    }
122+func distibuteMinerReward (benificaryAddressStr) = if ((size(i.payments) != 1))
123+    then throw("exact 1 payment must be attached")
124+    else if ((i.caller != i.originCaller))
125+        then throw("dapp to dapp calls are not allowed")
126+        else {
127+            let pmt = i.payments[0]
128+            let minedAmt = pmt.amount
129+            let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
130+            if ((pmtAssetId != WAVESID))
131+                then throw("only Waves can be used")
132+                else {
133+                    let neutrinoAddress = getAddressOrFail(keyNeutrinoAddressStr())
134+                    let masterNodeAddress = getAddressOrFail(keyMasterNodeAddressStr())
135+                    let minerAddress = i.caller
136+                    let benificaryAddress = addressFromStringValue(benificaryAddressStr)
137+                    let protocolPart = getIntOrFail(keyProtocolPartX6())
138+                    let benificaryPart = getIntOrFail(keyBenificaryPartX6())
139+                    if ((wavesBalance(minerAddress).available != 0))
140+                        then throw("all Waves must be sent from Node")
141+                        else {
142+                            let benificaryAmt = fraction(minedAmt, benificaryPart, MULT6)
143+                            let protocolAmt = (minedAmt - benificaryAmt)
144+                            let protocolAmt1 = (protocolAmt / 2)
145+                            let protocolAmt2 = (protocolAmt - protocolAmt1)
146+[ScriptTransfer(benificaryAddress, benificaryAmt, unit), ScriptTransfer(neutrinoAddress, protocolAmt1, unit), ScriptTransfer(masterNodeAddress, protocolAmt2, unit), RewardHistoryEntry(minerAddress, i.transactionId, minedAmt, benificaryAmt, protocolAmt, protocolAmt1, protocolAmt2), RewardTotalsEntry(minerAddress, minedAmt, benificaryAmt, protocolAmt, protocolAmt1, protocolAmt2)]
147+                            }
148+                    }
149+            }
99150 
100151 
github/deemru/w8io/026f985 
36.23 ms ◑