tx · EDFiBLw4NCyX6fcHXDm8UDzY8uRgssotsPecv8GRuH6L

3MsU936briqQ2XZMpkhWdrV8EsNwm5iCuRY:  -0.01300000 Waves

2022.07.06 20:26 [2128125] smart account 3MsU936briqQ2XZMpkhWdrV8EsNwm5iCuRY > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "EDFiBLw4NCyX6fcHXDm8UDzY8uRgssotsPecv8GRuH6L",
    "fee": 1300000,
    "feeAssetId": null,
    "timestamp": 1657128385614,
    "version": 2,
    "chainId": 84,
    "sender": "3MsU936briqQ2XZMpkhWdrV8EsNwm5iCuRY",
    "senderPublicKey": "F471QhzucRgQCSkZK5opBNc55AoNgiibCabvTp6GZ9nq",
    "proofs": [
        "fLWmwmsyQfWtdBwXunN9PoLGEJwpu5AkPLB54N4s7zMXLMsFAEXjvAvcR7mbHLPubHZ1MVt9XfrzZRkv8iuHJqf"
    ],
    "script": "base64:AAIFAAAAAAAAABwIAhIHCgUBCAgBARIAEgMKAQgSAwoBCBIDCgEIAAAAGgAAAAADU0VQAgAAAAJfXwAAAAAFTVVMVDYAAAAAAAAPQkAAAAAABU1VTFQ4AAAAAAAF9eEAAAAAAApXQVZFU0lEU1RSAgAAAAVXQVZFUwAAAAAHV0FWRVNJRAkAAlkAAAABBQAAAApXQVZFU0lEU1RSAQAAAAxnZXRJbnRPckZhaWwAAAABAAAAA2tleQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQkAASwAAAACCQABLAAAAAICAAAAD01hbmRhdG9yeSB0aGlzLgUAAAADa2V5AgAAAA8gaXMgbm90IGRlZmluZWQBAAAADGdldFN0ck9yRWxzZQAAAAIAAAADa2V5AAAACmRlZmF1bHRWYWwJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQdAAAAAgUAAAAEdGhpcwUAAAADa2V5BQAAAApkZWZhdWx0VmFsAQAAAA9nZXRTdHJpbmdPckZhaWwAAAACAAAAB2FkZHJlc3MAAAADa2V5CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQdAAAAAgUAAAAHYWRkcmVzcwUAAAADa2V5CQABLAAAAAIJAAEsAAAAAgIAAAAPTWFuZGF0b3J5IHRoaXMuBQAAAANrZXkCAAAADyBpcyBub3QgZGVmaW5lZAEAAAAQZ2V0QWRkcmVzc09yRmFpbAAAAAEAAAADa2V5CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQmAAAAAQkBAAAAD2dldFN0cmluZ09yRmFpbAAAAAIFAAAABHRoaXMFAAAAA2tleQkAASwAAAACCQABLAAAAAICAAAAFUZhaWwgdG8gY29udmVydCB0aGlzLgUAAAADa2V5AgAAABMgdmFsdWUgaW50byBBZGRyZXNzAQAAABV2YWxpZGF0ZUFkZHJlc3NPckZhaWwAAAABAAAACmFkZHJlc3NTdHIEAAAAB2FkZHJlc3MJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABCYAAAABBQAAAAphZGRyZXNzU3RyCQABLAAAAAICAAAAHWZhaWwgdG8gY29udmVydCBpbnRvIGFkZHJlc3MgBQAAAAphZGRyZXNzU3RyAwkAAGYAAAACAAAAAAAAAAAACAkAA+8AAAABBQAAAAdhZGRyZXNzAAAACWF2YWlsYWJsZQkBAAAABXRocm93AAAAAAUAAAAKYWRkcmVzc1N0cgEAAAAPa2V5Tm9kZVJlZ2lzdHJ5AAAAAQAAAAdhZGRyZXNzCQABLAAAAAICAAAABCVzX18FAAAAB2FkZHJlc3MBAAAAFGtleU5vZGVSZXdhcmRzVG90YWxzAAAAAQAAAAdhZGRyZXNzCQABLAAAAAICAAAADiVzJXNfX3RvdGFsc19fBQAAAAdhZGRyZXNzAQAAABBrZXlEZXBvc2l0QW1vdW50AAAAAAIAAAAYJXMlc19fY2ZnX19kZXBvc2l0QW1vdW50AQAAABVrZXlOZXV0cmlub0FkZHJlc3NTdHIAAAAAAgAAABolcyVzX19jZmdfX25ldXRyaW5vQWRkcmVzcwEAAAAXa2V5TWFzdGVyTm9kZUFkZHJlc3NTdHIAAAAAAgAAACIlcyVzX19jZmdfX21haW5OZXV0cmlub05vZGVBZGRyZXNzAQAAABFrZXlQcm90b2NvbFBhcnRYNgAAAAACAAAAGSVzJXNfX2NmZ19fcHJvdG9jb2xQYXJ0WDYBAAAAE2tleUJlbmlmaWNhcnlQYXJ0WDYAAAAAAgAAABslcyVzX19jZmdfX2JlbmlmaWNhcnlQYXJ0WDYBAAAAE2tleUxhc3RVcGRhdGVIZWlnaHQAAAAAAgAAABUlc19fbGFzdFVwZGF0ZWRIZWlnaHQBAAAAE2tleVNjcmlwdFVwZGF0ZUhhc2gAAAAAAgAAABQlc19fc2NyaXB0VXBkYXRlSGFzaAEAAAAQZm9ybWF0RGVwb3NpdEFkZAAAAAQAAAAHdHhJZFN0cgAAAA1kZXBvc2l0QW1vdW50AAAAFnJlbWFpbmluZ0RlcG9zaXRBbW91bnQAAAAGc3RhdHVzCQAEuQAAAAIJAARMAAAAAgIAAAAQJXMlZCVkJWQlZCVzJWQlZAkABEwAAAACBQAAAAd0eElkU3RyCQAETAAAAAIJAAGkAAAAAQgFAAAACWxhc3RCbG9jawAAAAZoZWlnaHQJAARMAAAAAgkAAaQAAAABCAUAAAAJbGFzdEJsb2NrAAAACXRpbWVzdGFtcAkABEwAAAACCQABpAAAAAEFAAAADWRlcG9zaXRBbW91bnQJAARMAAAAAgkAAaQAAAABBQAAABZyZW1haW5pbmdEZXBvc2l0QW1vdW50CQAETAAAAAIFAAAABnN0YXR1cwkABEwAAAACAgAAAAEwCQAETAAAAAICAAAAATAFAAAAA25pbAUAAAADU0VQAQAAABlmb3JtYXREZXBvc2l0Q2hhbmdlU3RhdHVzAAAAAgAAAAVvcmlnUwAAAAluZXdTdGF0dXMEAAAABG9yaWcJAAS1AAAAAgUAAAAFb3JpZ1MFAAAAA1NFUAkABLkAAAACCQAETAAAAAICAAAAECVzJWQlZCVkJWQlcyVkJWQJAARMAAAAAgkAAZEAAAACBQAAAARvcmlnAAAAAAAAAAABCQAETAAAAAIJAAGRAAAAAgUAAAAEb3JpZwAAAAAAAAAAAgkABEwAAAACCQABkQAAAAIFAAAABG9yaWcAAAAAAAAAAAMJAARMAAAAAgkAAZEAAAACBQAAAARvcmlnAAAAAAAAAAAECQAETAAAAAIJAAGRAAAAAgUAAAAEb3JpZwAAAAAAAAAABQkABEwAAAACBQAAAAluZXdTdGF0dXMJAARMAAAAAgkAAaQAAAABCAUAAAAJbGFzdEJsb2NrAAAABmhlaWdodAkABEwAAAACCQABpAAAAAEIBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wBQAAAANuaWwFAAAAA1NFUAEAAAAQa2V5UmV3YXJkSGlzdG9yeQAAAAIAAAALbm9kZUFkZHJlc3MAAAAEdHhJZAkABLkAAAACCQAETAAAAAICAAAABiVzJXMlcwkABEwAAAACAgAAAAdoaXN0b3J5CQAETAAAAAIJAAQlAAAAAQUAAAALbm9kZUFkZHJlc3MJAARMAAAAAgkAAlgAAAABBQAAAAR0eElkBQAAAANuaWwFAAAAA1NFUAEAAAARZGF0YVJld2FyZEhpc3RvcnkAAAAFAAAAEHdhdmVzQW1vdW50VG90YWwAAAAOYmVuZWZpY2lhcnlBbXQAAAALcHJvdG9jb2xBbXQAAAAQcHJvdG9jb2xBbXRQYXJ0MQAAABBwcm90b2NvbEFtdFBhcnQyCQAEuQAAAAIJAARMAAAAAgIAAAAOJWQlZCVkJWQlZCVkJWQJAARMAAAAAgkAAaQAAAABCAUAAAAJbGFzdEJsb2NrAAAABmhlaWdodAkABEwAAAACCQABpAAAAAEIBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wCQAETAAAAAIJAAGkAAAAAQUAAAAQd2F2ZXNBbW91bnRUb3RhbAkABEwAAAACCQABpAAAAAEFAAAADmJlbmVmaWNpYXJ5QW10CQAETAAAAAIJAAGkAAAAAQUAAAALcHJvdG9jb2xBbXQJAARMAAAAAgkAAaQAAAABBQAAABBwcm90b2NvbEFtdFBhcnQxCQAETAAAAAIJAAGkAAAAAQUAAAAQcHJvdG9jb2xBbXRQYXJ0MgUAAAADbmlsBQAAAANTRVABAAAAElJld2FyZEhpc3RvcnlFbnRyeQAAAAcAAAALbm9kZUFkZHJlc3MAAAAEdHhJZAAAAAhtaW5lZEFtdAAAAA5iZW5lZmljaWFyeUFtdAAAAAtwcm90b2NvbEFtdAAAAAxwcm90b2NvbEFtdDEAAAAMcHJvdG9jb2xBbXQyCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAAQa2V5UmV3YXJkSGlzdG9yeQAAAAIFAAAAC25vZGVBZGRyZXNzBQAAAAR0eElkCQEAAAARZGF0YVJld2FyZEhpc3RvcnkAAAAFBQAAAAhtaW5lZEFtdAUAAAAOYmVuZWZpY2lhcnlBbXQFAAAAC3Byb3RvY29sQW10BQAAAAxwcm90b2NvbEFtdDEFAAAADHByb3RvY29sQW10MgEAAAAQZGF0YVJld2FyZFRvdGFscwAAAAUAAAAIbWluZWRBbXQAAAAOYmVuZWZpY2lhcnlBbXQAAAALcHJvdG9jb2xBbXQAAAAQcHJvdG9jb2xBbXRQYXJ0MQAAABBwcm90b2NvbEFtdFBhcnQyCQAEuQAAAAIJAARMAAAAAgIAAAAKJWQlZCVkJWQlZAkABEwAAAACCQABpAAAAAEFAAAACG1pbmVkQW10CQAETAAAAAIJAAGkAAAAAQUAAAAOYmVuZWZpY2lhcnlBbXQJAARMAAAAAgkAAaQAAAABBQAAAAtwcm90b2NvbEFtdAkABEwAAAACCQABpAAAAAEFAAAAEHByb3RvY29sQW10UGFydDEJAARMAAAAAgkAAaQAAAABBQAAABBwcm90b2NvbEFtdFBhcnQyBQAAAANuaWwFAAAAA1NFUAEAAAARUmV3YXJkVG90YWxzRW50cnkAAAAGAAAABW1pbmVyAAAACG1pbmVkQW10AAAADmJlbmVmaWNpYXJ5QW10AAAAC3Byb3RvY29sQW10AAAAEHByb3RvY29sQW10UGFydDEAAAAQcHJvdG9jb2xBbXRQYXJ0MgQAAAAUbm9kZVJld2FyZHNUb3RhbHNLRVkJAQAAABRrZXlOb2RlUmV3YXJkc1RvdGFscwAAAAEJAAQlAAAAAQUAAAAFbWluZXIEAAAAEG5vZGVSZXdhcmRzQXJyYXkJAAS1AAAAAgkBAAAADGdldFN0ck9yRWxzZQAAAAIFAAAAFG5vZGVSZXdhcmRzVG90YWxzS0VZCQEAAAAQZGF0YVJld2FyZFRvdGFscwAAAAUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFAAAAA1NFUAQAAAALbmV3TWluZWRBbXQJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAEG5vZGVSZXdhcmRzQXJyYXkAAAAAAAAAAAEFAAAACG1pbmVkQW10BAAAABFuZXdCZW5lZmljaWFyeUFtdAkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAQbm9kZVJld2FyZHNBcnJheQAAAAAAAAAAAgUAAAAOYmVuZWZpY2lhcnlBbXQEAAAADm5ld1Byb3RvY29sQW10CQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAABBub2RlUmV3YXJkc0FycmF5AAAAAAAAAAADBQAAAAtwcm90b2NvbEFtdAQAAAATbmV3UHJvdG9jb2xBbXRQYXJ0MQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAQbm9kZVJld2FyZHNBcnJheQAAAAAAAAAABAUAAAAQcHJvdG9jb2xBbXRQYXJ0MQQAAAATbmV3UHJvdG9jb2xBbXRQYXJ0MgkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAQbm9kZVJld2FyZHNBcnJheQAAAAAAAAAABQUAAAAQcHJvdG9jb2xBbXRQYXJ0MgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAUbm9kZVJld2FyZHNUb3RhbHNLRVkJAQAAABBkYXRhUmV3YXJkVG90YWxzAAAABQUAAAALbmV3TWluZWRBbXQFAAAAEW5ld0JlbmVmaWNpYXJ5QW10BQAAAA5uZXdQcm90b2NvbEFtdAUAAAATbmV3UHJvdG9jb2xBbXRQYXJ0MQUAAAATbmV3UHJvdG9jb2xBbXRQYXJ0MgAAAAUAAAABaQEAAAALY29uc3RydWN0b3IAAAAFAAAADWRlcG9zaXRBbW91bnQAAAASbmV1dHJpbm9BZGRyZXNzU3RyAAAAFG1hc3Rlck5vZGVBZGRyZXNzU3RyAAAADnByb3RvY29sUGFydFg2AAAAEGJlbmlmaWNhcnlQYXJ0WDYDCQEAAAACIT0AAAACCAUAAAABaQAAAAZjYWxsZXIFAAAABHRoaXMJAAACAAAAAQIAAAAScGVybWlzc2lvbnMgZGVuaWVkAwkAAGYAAAACAAAAAAAAAAAABQAAAA1kZXBvc2l0QW1vdW50CQAAAgAAAAECAAAAHGRlcG9zaXRBbW91bnQgbGVzcyB0aGVuIHplcm8DCQAAZgAAAAIAAAAAAAAAAAAFAAAADnByb3RvY29sUGFydFg2CQAAAgAAAAECAAAAHXByb3RvY29sUGFydFg2IGxlc3MgdGhlbiB6ZXJvAwkAAGYAAAACAAAAAAAAAAAABQAAABBiZW5pZmljYXJ5UGFydFg2CQAAAgAAAAECAAAAH2JlbmlmaWNhcnlQYXJ0WDYgbGVzcyB0aGVuIHplcm8DCQEAAAACIT0AAAACCQAAZAAAAAIFAAAADnByb3RvY29sUGFydFg2BQAAABBiZW5pZmljYXJ5UGFydFg2BQAAAAVNVUxUNgkAAAIAAAABAgAAABNwYXJ0cyBzdW0gbXVzdCBiZSAxCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAAQa2V5RGVwb3NpdEFtb3VudAAAAAAFAAAADWRlcG9zaXRBbW91bnQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAFWtleU5ldXRyaW5vQWRkcmVzc1N0cgAAAAAJAQAAABV2YWxpZGF0ZUFkZHJlc3NPckZhaWwAAAABBQAAABJuZXV0cmlub0FkZHJlc3NTdHIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAF2tleU1hc3Rlck5vZGVBZGRyZXNzU3RyAAAAAAkBAAAAFXZhbGlkYXRlQWRkcmVzc09yRmFpbAAAAAEFAAAAFG1hc3Rlck5vZGVBZGRyZXNzU3RyCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAARa2V5UHJvdG9jb2xQYXJ0WDYAAAAABQAAAA5wcm90b2NvbFBhcnRYNgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAE2tleUJlbmlmaWNhcnlQYXJ0WDYAAAAABQAAABBiZW5pZmljYXJ5UGFydFg2BQAAAANuaWwAAAABaQEAAAARc3VtYml0QXBwbGljYXRpb24AAAAAAwkBAAAAAiE9AAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQkAAAIAAAABAgAAACBleGFjdCAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAMJAQAAAAIhPQAAAAIIBQAAAAFpAAAABmNhbGxlcggFAAAAAWkAAAAMb3JpZ2luQ2FsbGVyCQAAAgAAAAECAAAAImRhcHAgdG8gZGFwcCBjYWxscyBhcmUgbm90IGFsbG93ZWQEAAAAA3BtdAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAQAAAAHZGVwb3NpdAgFAAAAA3BtdAAAAAZhbW91bnQEAAAACnBtdEFzc2V0SWQJAQAAAAt2YWx1ZU9yRWxzZQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAHV0FWRVNJRAQAAAAVZXhwZWN0ZWREZXBvc2l0QW1vdW50CQEAAAAMZ2V0SW50T3JGYWlsAAAAAQkBAAAAEGtleURlcG9zaXRBbW91bnQAAAAABAAAAAR0eElkCQACWAAAAAEIBQAAAAFpAAAADXRyYW5zYWN0aW9uSWQEAAAAC25vZGVBZGRyZXNzCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAAPbm9kZVJlZ2lzdHJ5S0VZCQEAAAAPa2V5Tm9kZVJlZ2lzdHJ5AAAAAQUAAAALbm9kZUFkZHJlc3MDCQEAAAACIT0AAAACBQAAAApwbXRBc3NldElkBQAAAAdXQVZFU0lECQAAAgAAAAECAAAAIm9ubHkgV2F2ZXMgY2FuIGJlIHVzZWQgZm9yIGRlcG9zaXQDCQEAAAACIT0AAAACBQAAAAdkZXBvc2l0BQAAABVleHBlY3RlZERlcG9zaXRBbW91bnQJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAACGV4YWN0bHkgCQABpAAAAAEFAAAAFWV4cGVjdGVkRGVwb3NpdEFtb3VudAIAAAAWIFdhdmVsZXRzIGFyZSBleHBlY3RlZAMJAQAAAAIhPQAAAAIJAQAAAAxnZXRTdHJPckVsc2UAAAACBQAAAA9ub2RlUmVnaXN0cnlLRVkCAAAAAAIAAAAACQAAAgAAAAECAAAAHHlvdXIgbm9kZSBhbHJlYWR5IHJlZ2lzdGVyZWQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAPbm9kZVJlZ2lzdHJ5S0VZCQEAAAAQZm9ybWF0RGVwb3NpdEFkZAAAAAQFAAAABHR4SWQFAAAAB2RlcG9zaXQFAAAAB2RlcG9zaXQCAAAAB1BFTkRJTkcFAAAAA25pbAAAAAFpAQAAABRkaXN0aWJ1dGVNaW5lclJld2FyZAAAAAEAAAAUYmVuaWZpY2FyeUFkZHJlc3NTdHIDCQEAAAACIT0AAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAABCQAAAgAAAAECAAAAIGV4YWN0IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkAwkBAAAAAiE9AAAAAggFAAAAAWkAAAAGY2FsbGVyCAUAAAABaQAAAAxvcmlnaW5DYWxsZXIJAAACAAAAAQIAAAAiZGFwcCB0byBkYXBwIGNhbGxzIGFyZSBub3QgYWxsb3dlZAQAAAADcG10CQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAApwbXRBc3NldElkCQEAAAALdmFsdWVPckVsc2UAAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAAB1dBVkVTSUQEAAAABmZlZUFtdAgFAAAAAWkAAAADZmVlBAAAAApmZWVBc3NldElkCQEAAAALdmFsdWVPckVsc2UAAAACCAUAAAABaQAAAApmZWVBc3NldElkBQAAAAdXQVZFU0lEBAAAAApjYWxsUmV3YXJkCQAAaAAAAAIFAAAABmZlZUFtdAAAAAAAAAAAAgQAAAAIbWluZWRBbXQJAABlAAAAAggFAAAAA3BtdAAAAAZhbW91bnQFAAAACmNhbGxSZXdhcmQDCQEAAAACIT0AAAACBQAAAApwbXRBc3NldElkBQAAAAdXQVZFU0lECQAAAgAAAAECAAAAIW9ubHkgV2F2ZXMgY2FuIGJlIHVzZWQgaW4gcGF5bWVudAMJAQAAAAIhPQAAAAIFAAAACmZlZUFzc2V0SWQFAAAAB1dBVkVTSUQJAAACAAAAAQIAAAAeb25seSBXYXZlcyBjYW4gYmUgdXNlZCBpbiBmZWVzAwkBAAAAAiE9AAAAAgUAAAAGZmVlQW10CQAAaQAAAAIJAABoAAAAAgAAAAAAAAAABQUAAAAFTVVMVDgAAAAAAAAAA+gJAAACAAAAAQIAAAAgZmVlIGFtb3VudCBjb3VsZG4ndCBleGNlZWQgMC4wMDUEAAAAD25ldXRyaW5vQWRkcmVzcwkBAAAAEGdldEFkZHJlc3NPckZhaWwAAAABCQEAAAAVa2V5TmV1dHJpbm9BZGRyZXNzU3RyAAAAAAQAAAARbWFzdGVyTm9kZUFkZHJlc3MJAQAAABBnZXRBZGRyZXNzT3JGYWlsAAAAAQkBAAAAF2tleU1hc3Rlck5vZGVBZGRyZXNzU3RyAAAAAAQAAAAMbWluZXJBZGRyZXNzCAUAAAABaQAAAAZjYWxsZXIEAAAAD21pbmVyU2NyaXB0SGFzaAkAA/EAAAABBQAAAAxtaW5lckFkZHJlc3MEAAAAE2JlbmVmaWNhcnlGcm9tUGFyYW0JAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAFGJlbmlmaWNhcnlBZGRyZXNzU3RyBAAAABliZW5lZmljY2FyeUZyb21NaW5lclN0YXRlCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQEAAAAPZ2V0U3RyaW5nT3JGYWlsAAAAAgUAAAAMbWluZXJBZGRyZXNzCQEAAAATa2V5TGFzdFVwZGF0ZUhlaWdodAAAAAAEAAAACyR0MDc0NDc3NjM5AwkAAAAAAAACBQAAAA9taW5lclNjcmlwdEhhc2gFAAAABHVuaXQJAAUUAAAAAgUAAAATYmVuZWZpY2FyeUZyb21QYXJhbQUAAAATYmVuZWZpY2FyeUZyb21QYXJhbQkABRQAAAACBQAAABliZW5lZmljY2FyeUZyb21NaW5lclN0YXRlBQAAABNiZW5lZmljYXJ5RnJvbVBhcmFtBAAAABFiZW5pZmljYXJ5QWRkcmVzcwgFAAAACyR0MDc0NDc3NjM5AAAAAl8xBAAAABJjYWxsUmV3YXJkUmVjZWl2ZXIIBQAAAAskdDA3NDQ3NzYzOQAAAAJfMgQAAAAMcHJvdG9jb2xQYXJ0CQEAAAAMZ2V0SW50T3JGYWlsAAAAAQkBAAAAEWtleVByb3RvY29sUGFydFg2AAAAAAQAAAAOYmVuaWZpY2FyeVBhcnQJAQAAAAxnZXRJbnRPckZhaWwAAAABCQEAAAATa2V5QmVuaWZpY2FyeVBhcnRYNgAAAAAEAAAAEGF2YWlsYWJsZUJhbGFuY2UJAABlAAAAAggJAAPvAAAAAQUAAAAMbWluZXJBZGRyZXNzAAAACWF2YWlsYWJsZQUAAAAGZmVlQW10AwkBAAAAAiE9AAAAAgUAAAAQYXZhaWxhYmxlQmFsYW5jZQAAAAAAAAAAAAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAEYWxsIAkAAaQAAAABBQAAABBhdmFpbGFibGVCYWxhbmNlAgAAAEEgV2F2ZWxldHMgZnJvbSB0aGUgTm9kZSBiYWxhbmNlIG11c3QgYmUgYXR0YWNoZWQgaW50byB0aGUgcGF5bWVudAQAAAANYmVuaWZpY2FyeUFtdAkAAGsAAAADBQAAAAhtaW5lZEFtdAUAAAAOYmVuaWZpY2FyeVBhcnQFAAAABU1VTFQ2BAAAAAtwcm90b2NvbEFtdAkAAGUAAAACBQAAAAhtaW5lZEFtdAUAAAANYmVuaWZpY2FyeUFtdAQAAAAMcHJvdG9jb2xBbXQxCQAAaQAAAAIFAAAAC3Byb3RvY29sQW10AAAAAAAAAAACBAAAAAxwcm90b2NvbEFtdDIJAABlAAAAAgUAAAALcHJvdG9jb2xBbXQFAAAADHByb3RvY29sQW10MQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAABFiZW5pZmljYXJ5QWRkcmVzcwUAAAANYmVuaWZpY2FyeUFtdAUAAAAEdW5pdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAA9uZXV0cmlub0FkZHJlc3MFAAAADHByb3RvY29sQW10MQUAAAAEdW5pdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAABFtYXN0ZXJOb2RlQWRkcmVzcwUAAAAMcHJvdG9jb2xBbXQyBQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAEmNhbGxSZXdhcmRSZWNlaXZlcgUAAAAKY2FsbFJld2FyZAUAAAAEdW5pdAkABEwAAAACCQEAAAASUmV3YXJkSGlzdG9yeUVudHJ5AAAABwUAAAAMbWluZXJBZGRyZXNzCAUAAAABaQAAAA10cmFuc2FjdGlvbklkBQAAAAhtaW5lZEFtdAUAAAANYmVuaWZpY2FyeUFtdAUAAAALcHJvdG9jb2xBbXQFAAAADHByb3RvY29sQW10MQUAAAAMcHJvdG9jb2xBbXQyCQAETAAAAAIJAQAAABFSZXdhcmRUb3RhbHNFbnRyeQAAAAYFAAAADG1pbmVyQWRkcmVzcwUAAAAIbWluZWRBbXQFAAAADWJlbmlmaWNhcnlBbXQFAAAAC3Byb3RvY29sQW10BQAAAAxwcm90b2NvbEFtdDEFAAAADHByb3RvY29sQW10MgUAAAADbmlsAAAAAWkBAAAAGnZhbGlkYXRlQW5kQXBwcm92ZUxlYXNpbmdzAAAAAQAAAAZuTGlzdFMEAAAABW5JZHhzCQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgAAAAAAAAAAAQkABEwAAAACAAAAAAAAAAACCQAETAAAAAIAAAAAAAAAAAMJAARMAAAAAgAAAAAAAAAABAkABEwAAAACAAAAAAAAAAAFCQAETAAAAAIAAAAAAAAAAAYJAARMAAAAAgAAAAAAAAAABwUAAAADbmlsBAAAAAVuTGlzdAkABLUAAAACBQAAAAZuTGlzdFMFAAAAA1NFUAQAAAANZXhwZWN0ZWRDb3VudAkAAZAAAAABBQAAAAVuSWR4cwQAAAAPbmV1dHJpbm9BZGRyZXNzCQEAAAAQZ2V0QWRkcmVzc09yRmFpbAAAAAEJAQAAABVrZXlOZXV0cmlub0FkZHJlc3NTdHIAAAAAAwkBAAAAAiE9AAAAAggFAAAAAWkAAAAGY2FsbGVyBQAAAA9uZXV0cmlub0FkZHJlc3MJAAACAAAAAQIAAAApdmFsaWRhdGVBbmRBcHByb3ZlTGVhc2luZ3Mgbm90IGF1dGhvcml6ZWQDCQEAAAACIT0AAAACCQAAagAAAAIJAAGQAAAAAQUAAAAFbkxpc3QAAAAAAAAAAAIAAAAAAAAAAAAJAAACAAAAAQIAAAAkT25seSBldmVuIG51bWJlciBvZiBub2RlcyBpcyBhbGxvd2VkAwkBAAAAAiE9AAAAAgkAAZAAAAABBQAAAAVuTGlzdAUAAAANZXhwZWN0ZWRDb3VudAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAFT25seSAJAAGkAAAAAQUAAAANZXhwZWN0ZWRDb3VudAIAAAAdIG5vZGUncyBhZGRyZXNzIGNhYiBiZSBwYXNzZWQKAQAAABdmb3JFYWNoTm9kZUNoYW5nZVN0YXR1cwAAAAIAAAADYWNjAAAAAWkEAAAACG5vZGVBZGRyCQABkQAAAAIFAAAABW5MaXN0BQAAAAFpBAAAAA9ub2RlUmVnaXN0cnlLRVkJAQAAAA9rZXlOb2RlUmVnaXN0cnkAAAABBQAAAAhub2RlQWRkcgQAAAALbm9kZURhdGFPcHQJAAQdAAAAAgUAAAAEdGhpcwUAAAAPbm9kZVJlZ2lzdHJ5S0VZAwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAALbm9kZURhdGFPcHQJAAACAAAAAQkAASwAAAACAgAAABVpbnZhbGlkIE5vZGUgaW4gbGlzdCAFAAAACG5vZGVBZGRyBAAAAAhub2RlRGF0YQkABLUAAAACCQEAAAAFdmFsdWUAAAABBQAAAAtub2RlRGF0YU9wdAUAAAADU0VQBAAAAApub2RlU3RhdHVzCQABkQAAAAIFAAAACG5vZGVEYXRhAAAAAAAAAAAGAwMJAABnAAAAAgkAAZAAAAABBQAAAAhub2RlRGF0YQAAAAAAAAAACQkBAAAAAiE9AAAAAgUAAAAKbm9kZVN0YXR1cwIAAAAHUEVORElORwcJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAFbm9kZSAFAAAACG5vZGVBZGRyAgAAABwgYWxyZWFkeSBoYXMgYSBmaW5hbCBzdGF0dXMgBQAAAApub2RlU3RhdHVzCQAETQAAAAIFAAAAA2FjYwkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAPbm9kZVJlZ2lzdHJ5S0VZCQEAAAAZZm9ybWF0RGVwb3NpdENoYW5nZVN0YXR1cwAAAAIJAQAAAAV2YWx1ZQAAAAEFAAAAC25vZGVEYXRhT3B0AgAAAAhBUFBST1ZFRAQAAAARYXBwcm92ZWROb2Rlc0RhdGEKAAAAAAIkbAUAAAAFbklkeHMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwBQAAAANuaWwKAQAAAAUkZjBfMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAABdmb3JFYWNoTm9kZUNoYW5nZVN0YXR1cwAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAABSRmMF8yAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABNMaXN0IHNpemUgZXhjZWVkcyA4CQEAAAAFJGYwXzIAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAkABRQAAAACBQAAABFhcHByb3ZlZE5vZGVzRGF0YQUAAAADbmlsAAAAAWkBAAAADXJldHVybkRlcG9zaXQAAAABAAAAC25vZGVBZGRyZXNzAwkBAAAAAiE9AAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAkAAAIAAAABAgAAABNObyBwYXltZW50cyBhbGxvd2VkBAAAAA1jYWxsZXJBZGRyZXNzCAUAAAABaQAAAAZjYWxsZXIDAwkBAAAAAiE9AAAAAgUAAAANY2FsbGVyQWRkcmVzcwUAAAAEdGhpcwkBAAAAAiE9AAAAAgUAAAALbm9kZUFkZHJlc3MJAAQlAAAAAQUAAAANY2FsbGVyQWRkcmVzcwcJAAACAAAAAQIAAAAgcmV0dXJuRGVwb3NpdCBwZXJtaXNzaW9ucyBkZW5pZWQEAAAAD25vZGVSZWdpc3RyeUtFWQkBAAAAD2tleU5vZGVSZWdpc3RyeQAAAAEFAAAAC25vZGVBZGRyZXNzBAAAAAtub2RlRGF0YU9wdAkABB0AAAACBQAAAAR0aGlzBQAAAA9ub2RlUmVnaXN0cnlLRVkDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABBQAAAAtub2RlRGF0YU9wdAkAAAIAAAABCQABLAAAAAICAAAAKUFkZHJlc3MgaXMgbm90IGFwcGxpZWQgYXMgbmV1dHJpbm8gbm9kZTogBQAAAAtub2RlQWRkcmVzcwQAAAAIbm9kZURhdGEJAAS1AAAAAgkBAAAABXZhbHVlAAAAAQUAAAALbm9kZURhdGFPcHQFAAAAA1NFUAQAAAAGc3RhdHVzAwkAAGcAAAACCQABkAAAAAEFAAAACG5vZGVEYXRhAAAAAAAAAAAJCQABkQAAAAIFAAAACG5vZGVEYXRhAAAAAAAAAAAGAgAAAAdQRU5ESU5HAwkBAAAAAiE9AAAAAgUAAAAGc3RhdHVzAgAAAAdQRU5ESU5HCQAAAgAAAAECAAAAIkFwcGxpY2F0aW9uIHN0YXR1cyBpcyBub3QgUEVORElORyEEAAAACmRlcG9BbW91bnQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAhub2RlRGF0YQAAAAAAAAAABAkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABBQAAAA9ub2RlUmVnaXN0cnlLRVkJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAALbm9kZUFkZHJlc3MFAAAACmRlcG9BbW91bnQFAAAABHVuaXQFAAAAA25pbAAAAABcEaDD",
    "height": 2128125,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 5u33sBQit41a3J4AdmDWbaQYVMXhKfwcna7HXMPt8Amr
Next: 8MkKkEZPDDHDnTT4Vv7xkc66vTQAqGeAiuTZtT36FpSb

Diff: 

OldNewDifferences
1717 func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
1818 
1919 
20-func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (("Mandatory this." + key) + " is not defined"))
20+func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), (("Mandatory this." + key) + " is not defined"))
2121 
2222 
23-func getAddressOrFail (key) = valueOrErrorMessage(addressFromString(getStringOrFail(key)), (("Fail to convert this." + key) + " value into Address"))
23+func getAddressOrFail (key) = valueOrErrorMessage(addressFromString(getStringOrFail(this, key)), (("Fail to convert this." + key) + " value into Address"))
2424 
2525 
2626 func validateAddressOrFail (addressStr) = {
5252 func keyBenificaryPartX6 () = "%s%s__cfg__benificaryPartX6"
5353 
5454 
55-func formatDepositRecord (txIdStr,depositAmount,remainingDepositAmount) = makeString(["%s%d%d%d%d", txIdStr, toString(lastBlock.height), toString(lastBlock.timestamp), toString(depositAmount), toString(remainingDepositAmount)], SEP)
55+func keyLastUpdateHeight () = "%s__lastUpdatedHeight"
56+
57+
58+func keyScriptUpdateHash () = "%s__scriptUpdateHash"
59+
60+
61+func formatDepositAdd (txIdStr,depositAmount,remainingDepositAmount,status) = makeString(["%s%d%d%d%d%s%d%d", txIdStr, toString(lastBlock.height), toString(lastBlock.timestamp), toString(depositAmount), toString(remainingDepositAmount), status, "0", "0"], SEP)
62+
63+
64+func formatDepositChangeStatus (origS,newStatus) = {
65+    let orig = split(origS, SEP)
66+    makeString(["%s%d%d%d%d%s%d%d", orig[1], orig[2], orig[3], orig[4], orig[5], newStatus, toString(lastBlock.height), toString(lastBlock.timestamp)], SEP)
67+    }
5668 
5769 
5870 func keyRewardHistory (nodeAddress,txId) = makeString(["%s%s%s", "history", toString(nodeAddress), toBase58String(txId)], SEP)
95107 
96108 
97109 @Callable(i)
98-func sumbitNewMiner () = if ((size(i.payments) != 1))
110+func sumbitApplication () = if ((size(i.payments) != 1))
99111     then throw("exact 1 payment must be attached")
100112     else if ((i.caller != i.originCaller))
101113         then throw("dapp to dapp calls are not allowed")
113125                     then throw((("exactly " + toString(expectedDepositAmount)) + " Wavelets are expected"))
114126                     else if ((getStrOrElse(nodeRegistryKEY, "") != ""))
115127                         then throw("your node already registered")
116-                        else [StringEntry(nodeRegistryKEY, formatDepositRecord(txId, deposit, deposit))]
128+                        else [StringEntry(nodeRegistryKEY, formatDepositAdd(txId, deposit, deposit, "PENDING"))]
117129             }
118130 
119131 
125137         then throw("dapp to dapp calls are not allowed")
126138         else {
127139             let pmt = i.payments[0]
128-            let minedAmt = pmt.amount
129140             let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
130141             let feeAmt = i.fee
131142             let feeAssetId = valueOrElse(i.feeAssetId, WAVESID)
143+            let callReward = (feeAmt * 2)
144+            let minedAmt = (pmt.amount - callReward)
132145             if ((pmtAssetId != WAVESID))
133146                 then throw("only Waves can be used in payment")
134147                 else if ((feeAssetId != WAVESID))
139152                             let neutrinoAddress = getAddressOrFail(keyNeutrinoAddressStr())
140153                             let masterNodeAddress = getAddressOrFail(keyMasterNodeAddressStr())
141154                             let minerAddress = i.caller
142-                            let benificaryAddress = addressFromStringValue(benificaryAddressStr)
155+                            let minerScriptHash = scriptHash(minerAddress)
156+                            let beneficaryFromParam = addressFromStringValue(benificaryAddressStr)
157+                            let beneficcaryFromMinerState = addressFromStringValue(getStringOrFail(minerAddress, keyLastUpdateHeight()))
158+                            let $t074477639 = if ((minerScriptHash == unit))
159+                                then $Tuple2(beneficaryFromParam, beneficaryFromParam)
160+                                else $Tuple2(beneficcaryFromMinerState, beneficaryFromParam)
161+                            let benificaryAddress = $t074477639._1
162+                            let callRewardReceiver = $t074477639._2
143163                             let protocolPart = getIntOrFail(keyProtocolPartX6())
144164                             let benificaryPart = getIntOrFail(keyBenificaryPartX6())
145165                             let availableBalance = (wavesBalance(minerAddress).available - feeAmt)
150170                                     let protocolAmt = (minedAmt - benificaryAmt)
151171                                     let protocolAmt1 = (protocolAmt / 2)
152172                                     let protocolAmt2 = (protocolAmt - protocolAmt1)
153-[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)]
173+[ScriptTransfer(benificaryAddress, benificaryAmt, unit), ScriptTransfer(neutrinoAddress, protocolAmt1, unit), ScriptTransfer(masterNodeAddress, protocolAmt2, unit), ScriptTransfer(callRewardReceiver, callReward, unit), RewardHistoryEntry(minerAddress, i.transactionId, minedAmt, benificaryAmt, protocolAmt, protocolAmt1, protocolAmt2), RewardTotalsEntry(minerAddress, minedAmt, benificaryAmt, protocolAmt, protocolAmt1, protocolAmt2)]
154174                                     }
155175                             }
156176             }
177+
178+
179+
180+@Callable(i)
181+func validateAndApproveLeasings (nListS) = {
182+    let nIdxs = [0, 1, 2, 3, 4, 5, 6, 7]
183+    let nList = split(nListS, SEP)
184+    let expectedCount = size(nIdxs)
185+    let neutrinoAddress = getAddressOrFail(keyNeutrinoAddressStr())
186+    if ((i.caller != neutrinoAddress))
187+        then throw("validateAndApproveLeasings not authorized")
188+        else if (((size(nList) % 2) != 0))
189+            then throw("Only even number of nodes is allowed")
190+            else if ((size(nList) != expectedCount))
191+                then throw((("Only " + toString(expectedCount)) + " node's address cab be passed"))
192+                else {
193+                    func forEachNodeChangeStatus (acc,i) =                     {
194+                        let nodeAddr = nList[i]
195+                        let nodeRegistryKEY = keyNodeRegistry(nodeAddr)
196+                        let nodeDataOpt = getString(this, nodeRegistryKEY)
197+                        if (!(isDefined(nodeDataOpt)))
198+                            then throw(("invalid Node in list " + nodeAddr))
199+                            else {
200+                                let nodeData = split(value(nodeDataOpt), SEP)
201+                                let nodeStatus = nodeData[6]
202+                                if (if ((size(nodeData) >= 9))
203+                                    then (nodeStatus != "PENDING")
204+                                    else false)
205+                                    then throw(((("node " + nodeAddr) + " already has a final status ") + nodeStatus))
206+                                    else (acc :+ StringEntry(nodeRegistryKEY, formatDepositChangeStatus(value(nodeDataOpt), "APPROVED")))
207+                                }
208+                        }
209+
210+                    let approvedNodesData = {
211+                        let $l = nIdxs
212+                        let $s = size($l)
213+                        let $acc0 = nil
214+                        func $f0_1 ($a,$i) =                         if (($i >= $s))
215+                            then $a
216+                            else forEachNodeChangeStatus($a, $l[$i])
217+
218+                        func $f0_2 ($a,$i) =                         if (($i >= $s))
219+                            then $a
220+                            else throw("List size exceeds 8")
221+
222+                        $f0_2($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)
223+                        }
224+                    $Tuple2(approvedNodesData, nil)
225+                    }
226+    }
227+
228+
229+
230+@Callable(i)
231+func returnDeposit (nodeAddress) = if ((size(i.payments) != 0))
232+    then throw("No payments allowed")
233+    else {
234+        let callerAddress = i.caller
235+        if (if ((callerAddress != this))
236+            then (nodeAddress != toString(callerAddress))
237+            else false)
238+            then throw("returnDeposit permissions denied")
239+            else {
240+                let nodeRegistryKEY = keyNodeRegistry(nodeAddress)
241+                let nodeDataOpt = getString(this, nodeRegistryKEY)
242+                if (!(isDefined(nodeDataOpt)))
243+                    then throw(("Address is not applied as neutrino node: " + nodeAddress))
244+                    else {
245+                        let nodeData = split(value(nodeDataOpt), SEP)
246+                        let status = if ((size(nodeData) >= 9))
247+                            then nodeData[6]
248+                            else "PENDING"
249+                        if ((status != "PENDING"))
250+                            then throw("Application status is not PENDING!")
251+                            else {
252+                                let depoAmount = parseIntValue(nodeData[4])
253+[DeleteEntry(nodeRegistryKEY), ScriptTransfer(addressFromStringValue(nodeAddress), depoAmount, unit)]
254+                                }
255+                        }
256+                }
257+        }
157258 
158259 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let SEP = "__"
55 
66 let MULT6 = 1000000
77 
88 let MULT8 = 100000000
99 
1010 let WAVESIDSTR = "WAVES"
1111 
1212 let WAVESID = fromBase58String(WAVESIDSTR)
1313 
1414 func getIntOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("Mandatory this." + key) + " is not defined"))
1515 
1616 
1717 func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
1818 
1919 
20-func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (("Mandatory this." + key) + " is not defined"))
20+func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), (("Mandatory this." + key) + " is not defined"))
2121 
2222 
23-func getAddressOrFail (key) = valueOrErrorMessage(addressFromString(getStringOrFail(key)), (("Fail to convert this." + key) + " value into Address"))
23+func getAddressOrFail (key) = valueOrErrorMessage(addressFromString(getStringOrFail(this, key)), (("Fail to convert this." + key) + " value into Address"))
2424 
2525 
2626 func validateAddressOrFail (addressStr) = {
2727     let address = valueOrErrorMessage(addressFromString(addressStr), ("fail to convert into address " + addressStr))
2828     if ((0 > wavesBalance(address).available))
2929         then throw()
3030         else addressStr
3131     }
3232 
3333 
3434 func keyNodeRegistry (address) = ("%s__" + address)
3535 
3636 
3737 func keyNodeRewardsTotals (address) = ("%s%s__totals__" + address)
3838 
3939 
4040 func keyDepositAmount () = "%s%s__cfg__depositAmount"
4141 
4242 
4343 func keyNeutrinoAddressStr () = "%s%s__cfg__neutrinoAddress"
4444 
4545 
4646 func keyMasterNodeAddressStr () = "%s%s__cfg__mainNeutrinoNodeAddress"
4747 
4848 
4949 func keyProtocolPartX6 () = "%s%s__cfg__protocolPartX6"
5050 
5151 
5252 func keyBenificaryPartX6 () = "%s%s__cfg__benificaryPartX6"
5353 
5454 
55-func formatDepositRecord (txIdStr,depositAmount,remainingDepositAmount) = makeString(["%s%d%d%d%d", txIdStr, toString(lastBlock.height), toString(lastBlock.timestamp), toString(depositAmount), toString(remainingDepositAmount)], SEP)
55+func keyLastUpdateHeight () = "%s__lastUpdatedHeight"
56+
57+
58+func keyScriptUpdateHash () = "%s__scriptUpdateHash"
59+
60+
61+func formatDepositAdd (txIdStr,depositAmount,remainingDepositAmount,status) = makeString(["%s%d%d%d%d%s%d%d", txIdStr, toString(lastBlock.height), toString(lastBlock.timestamp), toString(depositAmount), toString(remainingDepositAmount), status, "0", "0"], SEP)
62+
63+
64+func formatDepositChangeStatus (origS,newStatus) = {
65+    let orig = split(origS, SEP)
66+    makeString(["%s%d%d%d%d%s%d%d", orig[1], orig[2], orig[3], orig[4], orig[5], newStatus, toString(lastBlock.height), toString(lastBlock.timestamp)], SEP)
67+    }
5668 
5769 
5870 func keyRewardHistory (nodeAddress,txId) = makeString(["%s%s%s", "history", toString(nodeAddress), toBase58String(txId)], SEP)
5971 
6072 
6173 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)
6274 
6375 
6476 func RewardHistoryEntry (nodeAddress,txId,minedAmt,beneficiaryAmt,protocolAmt,protocolAmt1,protocolAmt2) = StringEntry(keyRewardHistory(nodeAddress, txId), dataRewardHistory(minedAmt, beneficiaryAmt, protocolAmt, protocolAmt1, protocolAmt2))
6577 
6678 
6779 func dataRewardTotals (minedAmt,beneficiaryAmt,protocolAmt,protocolAmtPart1,protocolAmtPart2) = makeString(["%d%d%d%d%d", toString(minedAmt), toString(beneficiaryAmt), toString(protocolAmt), toString(protocolAmtPart1), toString(protocolAmtPart2)], SEP)
6880 
6981 
7082 func RewardTotalsEntry (miner,minedAmt,beneficiaryAmt,protocolAmt,protocolAmtPart1,protocolAmtPart2) = {
7183     let nodeRewardsTotalsKEY = keyNodeRewardsTotals(toString(miner))
7284     let nodeRewardsArray = split(getStrOrElse(nodeRewardsTotalsKEY, dataRewardTotals(0, 0, 0, 0, 0)), SEP)
7385     let newMinedAmt = (parseIntValue(nodeRewardsArray[1]) + minedAmt)
7486     let newBeneficiaryAmt = (parseIntValue(nodeRewardsArray[2]) + beneficiaryAmt)
7587     let newProtocolAmt = (parseIntValue(nodeRewardsArray[3]) + protocolAmt)
7688     let newProtocolAmtPart1 = (parseIntValue(nodeRewardsArray[4]) + protocolAmtPart1)
7789     let newProtocolAmtPart2 = (parseIntValue(nodeRewardsArray[5]) + protocolAmtPart2)
7890     StringEntry(nodeRewardsTotalsKEY, dataRewardTotals(newMinedAmt, newBeneficiaryAmt, newProtocolAmt, newProtocolAmtPart1, newProtocolAmtPart2))
7991     }
8092 
8193 
8294 @Callable(i)
8395 func constructor (depositAmount,neutrinoAddressStr,masterNodeAddressStr,protocolPartX6,benificaryPartX6) = if ((i.caller != this))
8496     then throw("permissions denied")
8597     else if ((0 > depositAmount))
8698         then throw("depositAmount less then zero")
8799         else if ((0 > protocolPartX6))
88100             then throw("protocolPartX6 less then zero")
89101             else if ((0 > benificaryPartX6))
90102                 then throw("benificaryPartX6 less then zero")
91103                 else if (((protocolPartX6 + benificaryPartX6) != MULT6))
92104                     then throw("parts sum must be 1")
93105                     else [IntegerEntry(keyDepositAmount(), depositAmount), StringEntry(keyNeutrinoAddressStr(), validateAddressOrFail(neutrinoAddressStr)), StringEntry(keyMasterNodeAddressStr(), validateAddressOrFail(masterNodeAddressStr)), IntegerEntry(keyProtocolPartX6(), protocolPartX6), IntegerEntry(keyBenificaryPartX6(), benificaryPartX6)]
94106 
95107 
96108 
97109 @Callable(i)
98-func sumbitNewMiner () = if ((size(i.payments) != 1))
110+func sumbitApplication () = if ((size(i.payments) != 1))
99111     then throw("exact 1 payment must be attached")
100112     else if ((i.caller != i.originCaller))
101113         then throw("dapp to dapp calls are not allowed")
102114         else {
103115             let pmt = i.payments[0]
104116             let deposit = pmt.amount
105117             let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
106118             let expectedDepositAmount = getIntOrFail(keyDepositAmount())
107119             let txId = toBase58String(i.transactionId)
108120             let nodeAddress = toString(i.caller)
109121             let nodeRegistryKEY = keyNodeRegistry(nodeAddress)
110122             if ((pmtAssetId != WAVESID))
111123                 then throw("only Waves can be used for deposit")
112124                 else if ((deposit != expectedDepositAmount))
113125                     then throw((("exactly " + toString(expectedDepositAmount)) + " Wavelets are expected"))
114126                     else if ((getStrOrElse(nodeRegistryKEY, "") != ""))
115127                         then throw("your node already registered")
116-                        else [StringEntry(nodeRegistryKEY, formatDepositRecord(txId, deposit, deposit))]
128+                        else [StringEntry(nodeRegistryKEY, formatDepositAdd(txId, deposit, deposit, "PENDING"))]
117129             }
118130 
119131 
120132 
121133 @Callable(i)
122134 func distibuteMinerReward (benificaryAddressStr) = if ((size(i.payments) != 1))
123135     then throw("exact 1 payment must be attached")
124136     else if ((i.caller != i.originCaller))
125137         then throw("dapp to dapp calls are not allowed")
126138         else {
127139             let pmt = i.payments[0]
128-            let minedAmt = pmt.amount
129140             let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
130141             let feeAmt = i.fee
131142             let feeAssetId = valueOrElse(i.feeAssetId, WAVESID)
143+            let callReward = (feeAmt * 2)
144+            let minedAmt = (pmt.amount - callReward)
132145             if ((pmtAssetId != WAVESID))
133146                 then throw("only Waves can be used in payment")
134147                 else if ((feeAssetId != WAVESID))
135148                     then throw("only Waves can be used in fees")
136149                     else if ((feeAmt != ((5 * MULT8) / 1000)))
137150                         then throw("fee amount couldn't exceed 0.005")
138151                         else {
139152                             let neutrinoAddress = getAddressOrFail(keyNeutrinoAddressStr())
140153                             let masterNodeAddress = getAddressOrFail(keyMasterNodeAddressStr())
141154                             let minerAddress = i.caller
142-                            let benificaryAddress = addressFromStringValue(benificaryAddressStr)
155+                            let minerScriptHash = scriptHash(minerAddress)
156+                            let beneficaryFromParam = addressFromStringValue(benificaryAddressStr)
157+                            let beneficcaryFromMinerState = addressFromStringValue(getStringOrFail(minerAddress, keyLastUpdateHeight()))
158+                            let $t074477639 = if ((minerScriptHash == unit))
159+                                then $Tuple2(beneficaryFromParam, beneficaryFromParam)
160+                                else $Tuple2(beneficcaryFromMinerState, beneficaryFromParam)
161+                            let benificaryAddress = $t074477639._1
162+                            let callRewardReceiver = $t074477639._2
143163                             let protocolPart = getIntOrFail(keyProtocolPartX6())
144164                             let benificaryPart = getIntOrFail(keyBenificaryPartX6())
145165                             let availableBalance = (wavesBalance(minerAddress).available - feeAmt)
146166                             if ((availableBalance != 0))
147167                                 then throw((("all " + toString(availableBalance)) + " Wavelets from the Node balance must be attached into the payment"))
148168                                 else {
149169                                     let benificaryAmt = fraction(minedAmt, benificaryPart, MULT6)
150170                                     let protocolAmt = (minedAmt - benificaryAmt)
151171                                     let protocolAmt1 = (protocolAmt / 2)
152172                                     let protocolAmt2 = (protocolAmt - protocolAmt1)
153-[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)]
173+[ScriptTransfer(benificaryAddress, benificaryAmt, unit), ScriptTransfer(neutrinoAddress, protocolAmt1, unit), ScriptTransfer(masterNodeAddress, protocolAmt2, unit), ScriptTransfer(callRewardReceiver, callReward, unit), RewardHistoryEntry(minerAddress, i.transactionId, minedAmt, benificaryAmt, protocolAmt, protocolAmt1, protocolAmt2), RewardTotalsEntry(minerAddress, minedAmt, benificaryAmt, protocolAmt, protocolAmt1, protocolAmt2)]
154174                                     }
155175                             }
156176             }
177+
178+
179+
180+@Callable(i)
181+func validateAndApproveLeasings (nListS) = {
182+    let nIdxs = [0, 1, 2, 3, 4, 5, 6, 7]
183+    let nList = split(nListS, SEP)
184+    let expectedCount = size(nIdxs)
185+    let neutrinoAddress = getAddressOrFail(keyNeutrinoAddressStr())
186+    if ((i.caller != neutrinoAddress))
187+        then throw("validateAndApproveLeasings not authorized")
188+        else if (((size(nList) % 2) != 0))
189+            then throw("Only even number of nodes is allowed")
190+            else if ((size(nList) != expectedCount))
191+                then throw((("Only " + toString(expectedCount)) + " node's address cab be passed"))
192+                else {
193+                    func forEachNodeChangeStatus (acc,i) =                     {
194+                        let nodeAddr = nList[i]
195+                        let nodeRegistryKEY = keyNodeRegistry(nodeAddr)
196+                        let nodeDataOpt = getString(this, nodeRegistryKEY)
197+                        if (!(isDefined(nodeDataOpt)))
198+                            then throw(("invalid Node in list " + nodeAddr))
199+                            else {
200+                                let nodeData = split(value(nodeDataOpt), SEP)
201+                                let nodeStatus = nodeData[6]
202+                                if (if ((size(nodeData) >= 9))
203+                                    then (nodeStatus != "PENDING")
204+                                    else false)
205+                                    then throw(((("node " + nodeAddr) + " already has a final status ") + nodeStatus))
206+                                    else (acc :+ StringEntry(nodeRegistryKEY, formatDepositChangeStatus(value(nodeDataOpt), "APPROVED")))
207+                                }
208+                        }
209+
210+                    let approvedNodesData = {
211+                        let $l = nIdxs
212+                        let $s = size($l)
213+                        let $acc0 = nil
214+                        func $f0_1 ($a,$i) =                         if (($i >= $s))
215+                            then $a
216+                            else forEachNodeChangeStatus($a, $l[$i])
217+
218+                        func $f0_2 ($a,$i) =                         if (($i >= $s))
219+                            then $a
220+                            else throw("List size exceeds 8")
221+
222+                        $f0_2($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)
223+                        }
224+                    $Tuple2(approvedNodesData, nil)
225+                    }
226+    }
227+
228+
229+
230+@Callable(i)
231+func returnDeposit (nodeAddress) = if ((size(i.payments) != 0))
232+    then throw("No payments allowed")
233+    else {
234+        let callerAddress = i.caller
235+        if (if ((callerAddress != this))
236+            then (nodeAddress != toString(callerAddress))
237+            else false)
238+            then throw("returnDeposit permissions denied")
239+            else {
240+                let nodeRegistryKEY = keyNodeRegistry(nodeAddress)
241+                let nodeDataOpt = getString(this, nodeRegistryKEY)
242+                if (!(isDefined(nodeDataOpt)))
243+                    then throw(("Address is not applied as neutrino node: " + nodeAddress))
244+                    else {
245+                        let nodeData = split(value(nodeDataOpt), SEP)
246+                        let status = if ((size(nodeData) >= 9))
247+                            then nodeData[6]
248+                            else "PENDING"
249+                        if ((status != "PENDING"))
250+                            then throw("Application status is not PENDING!")
251+                            else {
252+                                let depoAmount = parseIntValue(nodeData[4])
253+[DeleteEntry(nodeRegistryKEY), ScriptTransfer(addressFromStringValue(nodeAddress), depoAmount, unit)]
254+                                }
255+                        }
256+                }
257+        }
157258 
158259 
github/deemru/w8io/169f3d6 
65.18 ms ◑