w8 · tx · 3XK···PFS

tx · 3XK6M7LVrqCt8ibtUXQt8Eix4muLWgwnXrtWbhE48PFS

3N3BYKYYK6TKoHtPLZYU8JRn8PcHTnauS9z:  -0.02000000 Waves

2021.12.15 15:49 [1835397] smart account 3N3BYKYYK6TKoHtPLZYU8JRn8PcHTnauS9z > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3XK6M7LVrqCt8ibtUXQt8Eix4muLWgwnXrtWbhE48PFS",
    "fee": 2000000,
    "feeAssetId": null,
    "timestamp": 1639572595105,
    "version": 2,
    "chainId": 84,
    "sender": "3N3BYKYYK6TKoHtPLZYU8JRn8PcHTnauS9z",
    "senderPublicKey": "FsjTCE3KV2vD2r7Du9D3J6Ea2T643E6zxzn6y24outXr",
    "proofs": [
        "b67KYYWpN27iQvcQMyUtijUi3J8bfGVbnvRvx2CiUMwkQ5Phym42QkFtVfYKN7PkLSWH4CKTJzwzCXhoL1P3MnN"
    ],
    "script": "base64:AAIDAAAAAAAABwoIARIFCgMBAQESBAoCCAIaDwoBQRIKcmFuZHNDb3VudBoTCgFCEg5yZW1haW5pbmdSYW5kcxoSCgFDEg1kYXRhS2V5c0NvdW50GhEKAUQSDGRhdGFEb25lVHhJZBoPCgFFEgpsYXN0T2Zmc2V0Gg0KAUYSCHNsb3dJZHgxGg0KAUcSCHNsb3dJZHgyGg0KAUgSCGZhc3RJZHgxGg0KAUkSCGZhc3RJZHgyGhAKAUoSC3JhbmRPckVtcHR5GhEKAUsSDGZ1bGxTdGF0ZVN0choYCgFMEhNleHRyYWN0R2FtZURhdGFMaXN0Gg4KAU0SCXNlc3Npb25JZBoPCgFOEgpyYXdEYXRhU3RyGg0KAU8SCG5leHRSYW5kGggKAVASA2RpdhoICgFREgNtaW4aEQoBUhIMY3VyclJhbmRzU3RyGhIKAVMSDXJlbWFpbmluZ0hhc2gaEAoBVBILbmV4dFJhbmRJbnQaEAoBVRILbmV4dFJhbmRTdHIaDgoBVhIJZHVwbGljYXRlGhEKAVcSDGdlbmVyYXRlUmFuZBoJCgFYEgRmcm9tGgcKAVkSAnRvGgwKAVoSB3JzYVNpZ24aDgoBYRIJUlNBUFVCTElDGgwKAmFBEgZib3VuZDMaEAoCYUISCmJhc2VQcmljZTMaCgoCYUMSBGRpdjMaCwoCYUQSBWRpZmYzGhEKAmFFEgttaW5SYW5kc1BtdBoMCgJhRhIGbWluUG10GgcKAmFHEgFpGhEKAmFIEgtyYW5nZUxlbmd0aBoUCgJhSRIObWF4UmFuZ2VMZW5ndGgaDwoCYUoSCXJhbmRUb0xlbhoTCgJhSxINcmFuZHNDb3VudExlbhoWCgJhTBIQZHluYW1pY1N0YXR1c0xlbhoTCgJhTRINbWF4UmFuZHNDb3VudBoOCgJhThIIcmFuZHNQbXQaDQoCYU8SB2RhdGFQbXQaEQoCYVASC2RhdGFUeENvdW50GhMKAmFREg1yYW5kc0NvdW50U3RyGg8KAmFSEglpbml0U3RhdGUaFAoCYVMSDmRyYXdQYXJhbXNMaXN0GhYKAmFUEhByZW1haW5SYW5kc0NvdW50Gg0KAmFVEgdmcm9tU3RyGgsKAmFWEgV0b1N0choVCgJhVxIPb3JnYW5pemVyUHViS2V5GhEKAmFYEgtyYW5kR2VuSW5mbxoVCgJhYRIPbGFzdE9mZnNldEJ5dGVzGhIKAmFiEgxjdXJyU2xvd0lkeDEaEgoCYWMSDGN1cnJTbG93SWR4MhoSCgJhZBIMY3VyckZhc3RJZHgxGhIKAmFlEgxjdXJyRmFzdElkeDIaEAoCYWYSCm5ld0luY0xpc3QaFAoCYWcSDnZhbGlkYXRlRHR4S2V5GgoKAmFoEgRkYXRhGhEKAmFpEgtkYXRhS2V5SW5mbxoSCgJhahIMa2V5U2Vzc2lvbklkGhAKAmFrEgprZXlQb3N0Zml4GhYKAmFsEhBrZXlQb3N0Zml4SW50T3B0GhMKAmFtEg1rZXlQb3N0Zml4SW50Gg0KAmFuEgckbWF0Y2gwGgkKAmFvEgNzdHIaHAoCYXASFnZhbGlkYXRlQW5kR2V0UmFuZHNQbXQaCQoCYXESA3BtdBoQCgJhchIKbWluRGF0YVBtdBoMCgJhcxIGYm91bmQxGhAKAmF0EgpiYXNlUHJpY2UxGgoKAmF1EgRkaXYxGgsKAmF2EgVkaWZmMRoMCgJhdxIGYm91bmQyGhAKAmF4EgpiYXNlUHJpY2UyGgoKAmF5EgRkaXYyGgsKAmF6EgVkaWZmMhoLCgFiEgZTRVJWRVIaDAoBYxIHV0FWRUxFVBoVCgFkEhBTRVNTSU9OSURGSVhTSVpFGhMKAWUSDlJBTkRDWUNMRVBSSUNFGhUKAWYSEE1BWFJBTkRTUEVSQ1lDTEUaDgoBZxIJU1RBVEVJTklUGg0KAWgSCERBVEFET05FGhIKAWkSDVNUQVRFRklOSVNIRUQaDQoBahIISWR4U3RhdGUaFAoBaxIPSWR4T3JnYW5pemVyUHViGhAKAWwSC0lkeFJhbmRGcm9tGg4KAW0SCUlkeFJhbmRUbxoSCgFuEg1JZHhSYW5kc0NvdW50GhgKAW8SE0lkeFJlbWFpblJhbmRzQ291bnQaFQoBcBIQSWR4RGF0YUtleXNDb3VudBoUCgFxEg9JZHhEYXRhRG9uZVR4SWQaEgoBchINSWR4TGFzdE9mZnNldBoRCgFzEgxJZHhDdXJyUmFuZHMaCAoBdBIDYWJzGggKAXUSA3ZhbBoXCgF2EhJmb3JtYXRTdGF0ZURhdGFTdHIaDgoBdxIJZHJhd1N0YXRlGhYKAXgSEW9yZ2FuaXplclB1YktleTU4Gg0KAXkSCHJhbmRGcm9tGgsKAXoSBnJhbmRUbwAAABoAAAAAAWEJAAJbAAAAAQIAAAFzYmFzZTY0OkxTMHRMUzFDUlVkSlRpQlFWVUpNU1VNZ1MwVlpMUzB0TFMwS1RVbEhaazFCTUVkRFUzRkhVMGxpTTBSUlJVSkJVVlZCUVRSSFRrRkVRMEpwVVV0Q1oxRkRSMjVIZDNaVmJHMW1URzVaVGtkeVJTc3pjelIyUVRaUlpBb3dhMjlQTnpkWlVqSkRkVFpwT1dRdmFsRTJPVkprVTBoSFJGbHdiM2hLTTFndlNTODRNbXRwUzFKUmNIbHdjV0pqVVM5VVkzSXhWMVZSTTFSRFFtazFDbkZtWXl0NFpXVnlPUzluY25oVU9FeEphekV2VkZoWFZFWkJRekEyTTNSM1YxZFBiVnBYY0dOUE4za3labFJ1VWtsa1NGUmxhVXMwVDFwelN5dDFaMlVLT1RkR1MzQlRiV294Y21wRlZERm1NMEYzU1VSQlVVRkNDaTB0TFMwdFJVNUVJRkJWUWt4SlF5QkxSVmt0TFMwdExRPT0AAAAAAWIJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQIAAAAjM040dmRxTXNFc0FaU0pXZndZSmNhQ2dVekFTSlRDMkJXc1AAAAAAAWMJAABoAAAAAgkAAGgAAAACAAAAAAAAAABkAAAAAAAAAAPoAAAAAAAAAAPoAAAAAAFkAAAAAAAAAAAsAAAAAAFlCQAAaQAAAAIJAABoAAAAAgAAAAAAAAAABQUAAAABYwAAAAAAAAAD6AAAAAABZgAAAAAAAAAADgAAAAABZwIAAAAESU5JVAAAAAABaAIAAAAFUkVBRFkAAAAAAWkCAAAACEZJTklTSEVEAAAAAAFqAAAAAAAAAAAAAAAAAAFrAAAAAAAAAAABAAAAAAFsAAAAAAAAAAACAAAAAAFtAAAAAAAAAAADAAAAAAFuAAAAAAAAAAAEAAAAAAFvAAAAAAAAAAAFAAAAAAFwAAAAAAAAAAAGAAAAAAFxAAAAAAAAAAAHAAAAAAFyAAAAAAAAAAAIAAAAAAFzAAAAAAAAAAANAQAAAAF0AAAAAQAAAAF1AwkAAGYAAAACAAAAAAAAAAAABQAAAAF1CQEAAAABLQAAAAEFAAAAAXUFAAAAAXUBAAAAAXYAAAAOAAAAAXcAAAABeAAAAAF5AAAAAXoAAAABQQAAAAFCAAAAAUMAAAABRAAAAAFFAAAAAUYAAAABRwAAAAFIAAAAAUkAAAABSgQAAAABSwkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAABdwIAAAABXwUAAAABeAIAAAABXwUAAAABeQIAAAABXwUAAAABegIAAAABXwUAAAABQQIAAAABXwUAAAABQgIAAAABXwUAAAABQwIAAAABXwUAAAABRAIAAAABXwUAAAABRQIAAAABXwUAAAABRgIAAAABXwUAAAABRwIAAAABXwUAAAABSAIAAAABXwUAAAABSQMJAAAAAAAAAgUAAAABSgIAAAAACQABLAAAAAIJAAEsAAAAAgUAAAABSwIAAAABXwIAAAABLQkAASwAAAACCQABLAAAAAIFAAAAAUsCAAAAAV8FAAAAAUoBAAAAAUwAAAABAAAAAU0EAAAAAU4JAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAAAU0JAAS1AAAAAgUAAAABTgIAAAABXwEAAAABTwAAAAUAAAABUAAAAAFRAAAAAVIAAAABQgAAAAFTBAAAAAFUCQAAZAAAAAIJAABqAAAAAgkBAAAAAXQAAAABCQAEsQAAAAEFAAAAAVMFAAAAAVAFAAAAAVEEAAAAAVUJAAGkAAAAAQUAAAABVAQAAAABVgkBAAAACWlzRGVmaW5lZAAAAAEJAASzAAAAAgUAAAABUgUAAAABVQMDCQEAAAABIQAAAAEFAAAAAVYJAABmAAAAAgUAAAABQgAAAAAAAAAAAAcJAARMAAAAAgkAASwAAAACCQABLAAAAAIFAAAAAVICAAAAAS0FAAAAAVUJAARMAAAAAgIAAAADeWVzBQAAAANuaWwJAARMAAAAAgUAAAABUgkABEwAAAACAgAAAAAFAAAAA25pbAEAAAABVwAAAAsAAAABTQAAAAFYAAAAAVkAAAABWgAAAAFSAAAAAUIAAAACYWEAAAACYWIAAAACYWMAAAACYWQAAAACYWUEAAAAAmFmAwkAAGYAAAACCQAAZAAAAAIFAAAAAmFhAAAAAAAAAAABAAAAAAAAAABXAwkAAGYAAAACBQAAAAJhZQAAAAAAAAAA8QkABEwAAAACAAAAAAAAAAAACQAETAAAAAIJAABkAAAAAgUAAAACYWIAAAAAAAAAAAEJAARMAAAAAgkAAGQAAAACBQAAAAJhYwAAAAAAAAAAAQkABEwAAAACAAAAAAAAAAAACQAETAAAAAIAAAAAAAAAAAEFAAAAA25pbAkABEwAAAACAAAAAAAAAAAACQAETAAAAAIFAAAAAmFiCQAETAAAAAIFAAAAAmFjCQAETAAAAAIJAABkAAAAAgUAAAACYWQAAAAAAAAAAAEJAARMAAAAAgkAAGQAAAACBQAAAAJhZQAAAAAAAAAAAQUAAAADbmlsCQAETAAAAAIJAABkAAAAAgUAAAACYWEAAAAAAAAAAAEJAARMAAAAAgUAAAACYWIJAARMAAAAAgUAAAACYWMJAARMAAAAAgUAAAACYWQJAARMAAAAAgUAAAACYWUFAAAAA25pbAUAAAACYWYBAAAAAmFnAAAAAwAAAAFNAAAAAUMAAAACYWgEAAAAAmFpCQAEtQAAAAIIBQAAAAJhaAAAAANrZXkCAAAAAV8DCQEAAAACIT0AAAACCQABkAAAAAEFAAAAAmFpAAAAAAAAAAACCQAAAgAAAAECAAAAPkludmFsaWQgZGF0YSBrZXkgZm9ybWF0LiBJdCBtdXN0IGZvbGxvdyB0byAke3Nlc3Npb25JZH1fJHtudW19BAAAAAJhagkAAZEAAAACBQAAAAJhaQAAAAAAAAAAAAQAAAACYWsJAAGRAAAAAgUAAAACYWkAAAAAAAAAAAEDCQEAAAACIT0AAAACBQAAAAFNBQAAAAJhagkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAACxTZXZlcmFsIGRhdGEga2V5cyBoYXZlIGRpZmZlcmVudCBzZXNzaW9uSWQ6IAUAAAABTQIAAAAFIGFuZCAFAAAAAmFqAwkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAAEdGhpcwgFAAAAAmFoAAAAA2tleQkAAAIAAAABCQABLAAAAAICAAAAQU9uZSBvZiB0aGUgZGF0YSBrZXlzIGhhcyBhbHJlYWR5IHByZXNlbnRlZCBpbiBhY2NvdW50IHN0YXRlOiBrZXk9CAUAAAACYWgAAAADa2V5AwkAAGYAAAACCQABMQAAAAEFAAAAAmFrAAAAAAAAAAAECQAAAgAAAAECAAAAbUludmFsaWQgZGF0YSBrZXkgZm9ybWF0LiBJdCBtdXN0IGZvbGxvdyB0byAke3Nlc3Npb25JZH1fJHtudW19IHdoZXJlICR7bnVtfSBsZW5ndGggY291bGRuJ3QgYmUgZ3JlYXRlciB0aGFuIDQDCQAAAAAAAAIJAAEvAAAAAgUAAAACYWsAAAAAAAAAAAECAAAAATAJAAACAAAAAQIAAABhSW52YWxpZCBkYXRhIGtleSBmb3JtYXQuIEl0IG11c3QgZm9sbG93IHRvICR7c2Vzc2lvbklkfV8ke251bX0gd2hlcmUgJHtudW19IGNvdWxkbid0IHN0YXJ0IGZyb20gMAQAAAACYWwJAAS2AAAAAQUAAAACYWsDCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAACYWwEAAAAAmFtCQEAAAAHZXh0cmFjdAAAAAEFAAAAAmFsAwMJAABmAAAAAgAAAAAAAAAAAQUAAAACYW0GCQAAZgAAAAIFAAAAAmFtBQAAAAFDCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAA+SW52YWxpZCBkYXRhIGtleSBmb3JtYXQuIEl0IG11c3QgZm9sbG93IHRvICR7c2Vzc2lvbklkfV8ke251bX0CAAAAMiB3aGVyZSAke251bX0gbXVzdCBiZSBhIHZhbGlkIGludCB2YWx1ZSBmcm9tIDEgdG8gCQABpAAAAAEFAAAAAUMCAAAADyBidXQgYWN0dWFsTnVtPQkAAaQAAAABBQAAAAJhbQQAAAACYW4IBQAAAAJhaAAAAAV2YWx1ZQMJAAABAAAAAgUAAAACYW4CAAAABlN0cmluZwQAAAACYW8FAAAAAmFuBgkAAAIAAAABCQABLAAAAAIFAAAAAU0CAAAAOSBkcmF3OiBvbmx5IFN0cmluZyB0eXBlIGlzIGFjY2VwdGVkIGZvciBkYXRhIHRyYW5zYWN0aW9ucwkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAA+SW52YWxpZCBkYXRhIGtleSBmb3JtYXQuIEl0IG11c3QgZm9sbG93IHRvICR7c2Vzc2lvbklkfV8ke251bX0CAAAARiB3aGVyZSAke251bX0gbXVzdCBiZSBhIHZhbGlkIGludCB2YWx1ZSBmcm9tIDEgdG8gMzEyNTAgYnV0IGFjdHVhbE51bT0FAAAAAmFrAQAAAAJhcAAAAAMAAAABQQAAAAJhcQAAAAJhcgQAAAACYXMAAAAAAAAAA+gEAAAAAmF0CQAAaQAAAAIJAABoAAAAAgAAAAAAAAAADQUAAAABYwAAAAAAAAAAZAQAAAACYXUAAAAAAAAAADIEAAAAAmF2CQAAaQAAAAIJAABoAAAAAgAAAAAAAAAACAUAAAABYwAAAAAAAAAAZAQAAAACYXcAAAAAAAAAE4gEAAAAAmF4CQAAaQAAAAIJAABoAAAAAgAAAAAAAAABKQUAAAABYwAAAAAAAAAAZAQAAAACYXkAAAAAAAAAA+gEAAAAAmF6CQAAaQAAAAIJAABoAAAAAgAAAAAAAAAAjwUAAAABYwAAAAAAAAAAZAQAAAACYUEAAAAAAAAAw1AEAAAAAmFCCQAAaQAAAAIJAABoAAAAAgAAAAAAAAAFkwUAAAABYwAAAAAAAAAAZAQAAAACYUMAAAAAAAAAE4gEAAAAAmFECQAAaQAAAAIJAABoAAAAAgAAAAAAAAACwQUAAAABYwAAAAAAAAAAZAQAAAACYUUDCQAAZgAAAAIFAAAAAmFzBQAAAAFBCQAAZAAAAAIFAAAAAmF0CQAAaAAAAAIJAABpAAAAAgUAAAABQQUAAAACYXUFAAAAAmF2AwkAAGYAAAACBQAAAAJhdwUAAAABQQkAAGQAAAACBQAAAAJheAkAAGgAAAACCQAAZQAAAAIJAABpAAAAAgUAAAABQQUAAAACYXkAAAAAAAAAAAEFAAAAAmF6AwkAAGYAAAACBQAAAAJhQQUAAAABQQkAAGQAAAACBQAAAAJhQgkAAGgAAAACCQAAZQAAAAIJAABpAAAAAgUAAAABQQUAAAACYUMAAAAAAAAAAAEFAAAAAmFECQAAAgAAAAECAAAAPVBsZWFzZSBjb250YWN0IG91ciBzYWxlcyB0ZWFtIHRvIGdlbmVyYXRlIG1vcmUgdGhhbiA1MGsgcmFuZHMEAAAAAmFGCQAAZAAAAAIFAAAAAmFFBQAAAAJhcgMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAACYXEAAAAHYXNzZXRJZAkAAAIAAAABAgAAADhPbmx5IFdBVkVTIGNhbiBiZSB1c2VkIGFzIGEgcGF5bWVudCBmb3IgcmFuZHMgZ2VuZXJhdGlvbgMJAABmAAAAAgUAAAACYUYIBQAAAAJhcQAAAAZhbW91bnQJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAKUF0dGFjaGVkIHBheW1lbnQgaXMgdG8gc21hbGwgdG8gZ2VuZXJhdGUgCQABpAAAAAEFAAAAAUECAAAAQSB1bmlxdWUgcmFuZG9tcyBudW1iZXJzIGFuZCB1cGxvYWQgYXQgbGVhc3QgMSBkYXRhIHR4OiBhY3R1YWxQbXQ9CQABpAAAAAEIBQAAAAJhcQAAAAZhbW91bnQCAAAADyBidXQgbWluUG10IGlzIAkAAaQAAAABBQAAAAJhRgUAAAACYUUAAAACAAAAAmFHAQAAAAhpbml0RHJhdwAAAAMAAAABeQAAAAF6AAAAAUEEAAAAAU0JAAJYAAAAAQgFAAAAAmFHAAAADXRyYW5zYWN0aW9uSWQEAAAAAmFICQAAZAAAAAIJAABlAAAAAgUAAAABegUAAAABeQAAAAAAAAAAAQQAAAACYUkJAABpAAAAAgUAAAACYUgAAAAAAAAAAAIEAAAAAmFKCQABMQAAAAEJAAGkAAAAAQkAAGUAAAACBQAAAAF6AAAAAAAAAAABBAAAAAJhSwkAATEAAAABCQABpAAAAAEFAAAAAUEEAAAAAmFMCQAAZAAAAAIJAABkAAAAAgkAAGgAAAACAAAAAAAAAAACBQAAAAJhSgkAAGgAAAACAAAAAAAAAAACBQAAAAJhSwAAAAAAAAAABAQAAAACYU0JAABpAAAAAgkAAGUAAAACCQAAZQAAAAIAAAAAAAAAFAAAAAAAAAAAAK8FAAAAAmFMCQAAZAAAAAIFAAAAAmFKAAAAAAAAAAABAwMJAABnAAAAAgAAAAAAAAAAAAUAAAABeQYJAABnAAAAAgAAAAAAAAAAAAUAAAABegkAAAIAAAABAgAAACpyYW5kRnJvbSBhbmQgcmFuZFRvIG11c3QgYmUgZ3JlYXRlciB0aGFuIDADCQAAZwAAAAIFAAAAAXkFAAAAAXoJAAACAAAAAQIAAAAocmFuZEZyb20gbXVzdCBiZSBzdHJpY3QgbGVzcyB0aGVuIHJhbmRUbwMJAABmAAAAAgUAAAABQQUAAAACYUgJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAABdJbXBvc3NpYmxlIHRvIGdlbmVyYXRlIAkAAaQAAAABBQAAAAFBAgAAACsgdW5pcXVlIG51bWJlcnMgZm9yIHByb3ZpZGVkIHJhbmRvbSByYW5nZSBbCQABpAAAAAEFAAAAAXkCAAAAAiwgCQABpAAAAAEFAAAAAXoCAAAAE10gd2l0aCBhY3R1YWwgc2l6ZSAJAAGkAAAAAQUAAAACYUgDCQAAZgAAAAIFAAAAAUEFAAAAAmFJCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAQHJhbmRzQ291bnQgbXVzdCBiZSBsZXNzIHRoZW4gNTAlIG9mIHBhc3NlZCByYW5nZSBsZW5ndGg6IHJhbmdlPVsJAAGkAAAAAQUAAAABeQIAAAACLCAJAAGkAAAAAQUAAAABegIAAAAPXSwgcmFuZ2VMZW5ndGg9CQABpAAAAAEFAAAAAmFIAgAAAAwgcmFuZHNDb3VudD0JAAGkAAAAAQUAAAABQQIAAAATIGFsbG93ZWRSYW5kc0NvdW50PQkAAaQAAAABBQAAAAJhSQMJAABmAAAAAgUAAAABQQUAAAACYU0JAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAPHJhbmRzQ291bnQgY291bGRuJ3QgYmUga2VwdCBpbiAxIGRhdGEgZW50cnk6IDFfcmFuZE51bVNwYWNlPQkAAaQAAAABCQAAZAAAAAIFAAAAAmFKAAAAAAAAAAABAgAAABYgbWF4QWxsb3dlZFJhbmRzQ291bnQ9CQABpAAAAAEFAAAAAmFNAgAAABIgYWN0dWFsUmFuZHNDb3VudD0JAAGkAAAAAQUAAAABQQMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAJhRwAAAAdwYXltZW50CQAAAgAAAAECAAAAOFBsZWFzZSBwcm92aWRlIHBheW1lbnQgdG8gZ2VuZXJhdGUgdW5pcXVlIHJhbmRvbSBudW1iZXJzBAAAAAJhcQkBAAAAB2V4dHJhY3QAAAABCAUAAAACYUcAAAAHcGF5bWVudAQAAAACYXIJAABkAAAAAgkAAGgAAAACCQAAaQAAAAIJAABoAAAAAgUAAAABYwAAAAAAAAAAAQAAAAAAAAAD6AAAAAAAAAAAIQkAAGkAAAACCQAAaAAAAAIFAAAAAWMAAAAAAAAAAAQAAAAAAAAAA+gEAAAAAmFOCQEAAAACYXAAAAADBQAAAAFBBQAAAAJhcQUAAAACYXIEAAAAAmFPCQAAZQAAAAIIBQAAAAJhcQAAAAZhbW91bnQFAAAAAmFOBAAAAAJhUAkAAGkAAAACBQAAAAJhTwUAAAACYXIEAAAAAUMDCQAAZwAAAAIAAAAAAAAAehIJAABoAAAAAgUAAAACYVAAAAAAAAAAAAUJAABoAAAAAgUAAAACYVAAAAAAAAAAAAUAAAAAAAAAehIEAAAAAXgJAAJYAAAAAQgFAAAAAmFHAAAAD2NhbGxlclB1YmxpY0tleQQAAAACYVEJAAGkAAAAAQUAAAABQQQAAAACYVIJAQAAAAF2AAAADgUAAAABaAUAAAABeAkAAaQAAAABBQAAAAF5CQABpAAAAAEFAAAAAXoFAAAAAmFRBQAAAAJhUQkAAaQAAAABBQAAAAFDCQACWAAAAAEIBQAAAAJhRwAAAA10cmFuc2FjdGlvbklkAgAAAAEwAgAAAAEwAgAAAAExAgAAAAEwAgAAAAExAgAAAAAJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAAFNBQAAAAJhUgUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAAWIFAAAAAmFOBQAAAAR1bml0BQAAAANuaWwAAAACYUcBAAAABnJhbmRvbQAAAAIAAAABTQAAAAFaBAAAAAJhUwkBAAAAAUwAAAABBQAAAAFNBAAAAAF3CQABkQAAAAIFAAAAAmFTBQAAAAFqBAAAAAF4CQABkQAAAAIFAAAAAmFTBQAAAAFrBAAAAAJhUQkAAZEAAAACBQAAAAJhUwUAAAABbgQAAAACYVQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJhUwUAAAABbwQAAAACYWEJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJhUwUAAAABcgQAAAABUgkAAZEAAAACBQAAAAJhUwUAAAABcwQAAAACYVUJAAGRAAAAAgUAAAACYVMFAAAAAWwEAAAAAmFWCQABkQAAAAIFAAAAAmFTBQAAAAFtBAAAAAFECQABkQAAAAIFAAAAAmFTBQAAAAFxBAAAAAFGCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACYVMAAAAAAAAAAAkEAAAAAUcJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJhUwAAAAAAAAAACgQAAAABSAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAmFTAAAAAAAAAAALBAAAAAFJCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACYVMAAAAAAAAAAAwEAAAAAVgJAQAAAA1wYXJzZUludFZhbHVlAAAAAQUAAAACYVUEAAAAAVkJAQAAAA1wYXJzZUludFZhbHVlAAAAAQUAAAACYVYEAAAAAmFXCQACWQAAAAEFAAAAAXgDCQEAAAACIT0AAAACBQAAAAF3BQAAAAFoCQAAAgAAAAEJAAEsAAAAAgUAAAABTQIAAAA7IGRyYXc6IGl0IG11c3QgYmUgaW4gUkVBRFkgc3RhdGUgdG8gZ2VuZXJhdGUgcmFuZG9tIG51bWJlcnMDBwkAAAIAAAABAgAAABVJbnZhbGlkIFJTQSBzaWduYXR1cmUEAAAAAmFYCQEAAAABVwAAAAsFAAAAAU0FAAAAAVgFAAAAAVkFAAAAAVoFAAAAAVIFAAAAAmFUBQAAAAJhYQUAAAABRgUAAAABRwUAAAABSAUAAAABSQkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAJYnl0ZVZlY3QxCQABkQAAAAIFAAAAAmFYAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAlieXRlVmVjdDIJAAGRAAAAAgUAAAACYVgAAAAAAAAAAAIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAACWJ5dGVWZWN0MwkAAZEAAAACBQAAAAJhWAAAAAAAAAAAAwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAJYnl0ZVZlY3Q0CQABkQAAAAIFAAAAAmFYAAAAAAAAAAAECQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAAAU0CAAAABHRlc3QJAADLAAAAAgkAAZsAAAABBQAAAAFNCQABmwAAAAEFAAAAAUQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAABTQIAAAAGdGVzdC0yAgAAAAJkcwUAAAADbmlsAAAAAILUYeo=",
    "height": 1835397,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7XLScQ29pXMkqHTw6ufUuSYViALYvGzS74qUESaqB5Lz
Next: wwHH9oWy8GFRKRFuyS1BnqRCLD2DpYqqnS7sZCUTu7M

Diff: 
Old New Differences
76 76              then [0, (currSlowIdx1 + 1), (currSlowIdx2 + 1), 0, 1]
77 77              else [0, currSlowIdx1, currSlowIdx2, (currFastIdx1 + 1), (currFastIdx2 + 1)]
78 78          else [(lastOffsetBytes + 1), currSlowIdx1, currSlowIdx2, currFastIdx1, currFastIdx2]
79 -     ((((newIncList[0] + newIncList[1]) + newIncList[2]) + newIncList[3]) + newIncList[4])
79 +     newIncList
80 80      }
81 81  
82 82  
212 212              then throw("Invalid RSA signature")
213 213              else {
214 214                  let randGenInfo = generateRand(sessionId, from, to, rsaSign, currRandsStr, remainRandsCount, lastOffsetBytes, slowIdx1, slowIdx2, fastIdx1, fastIdx2)
215 -                 WriteSet([DataEntry("byteVect", randGenInfo), DataEntry((sessionId + "test"), (toBytes(sessionId) + toBytes(dataDoneTxId))), DataEntry((sessionId + "test-2"), "ds")])
215 +                 WriteSet([DataEntry("byteVect1", randGenInfo[1]), DataEntry("byteVect2", randGenInfo[2]), DataEntry("byteVect3", randGenInfo[3]), DataEntry("byteVect4", randGenInfo[4]), DataEntry((sessionId + "test"), (toBytes(sessionId) + toBytes(dataDoneTxId))), DataEntry((sessionId + "test-2"), "ds")])
216 216                  }
217 217      }
218 218  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let RSAPUBLIC = fromBase64String("base64:LS0tLS1CRUdJTiBQVUJMSUMgS0VZLS0tLS0KTUlHZk1BMEdDU3FHU0liM0RRRUJBUVVBQTRHTkFEQ0JpUUtCZ1FDR25Hd3ZVbG1mTG5ZTkdyRSszczR2QTZRZAowa29PNzdZUjJDdTZpOWQvalE2OVJkU0hHRFlwb3hKM1gvSS84MmtpS1JRcHlwcWJjUS9UY3IxV1VRM1RDQmk1CnFmYyt4ZWVyOS9ncnhUOExJazEvVFhXVEZBQzA2M3R3V1dPbVpXcGNPN3kyZlRuUklkSFRlaUs0T1pzSyt1Z2UKOTdGS3BTbWoxcmpFVDFmM0F3SURBUUFCCi0tLS0tRU5EIFBVQkxJQyBLRVktLS0tLQ==")
5 5  
6 6  let SERVER = addressFromStringValue("3N4vdqMsEsAZSJWfwYJcaCgUzASJTC2BWsP")
7 7  
8 8  let WAVELET = ((100 * 1000) * 1000)
9 9  
10 10  let SESSIONIDFIXSIZE = 44
11 11  
12 12  let RANDCYCLEPRICE = ((5 * WAVELET) / 1000)
13 13  
14 14  let MAXRANDSPERCYCLE = 14
15 15  
16 16  let STATEINIT = "INIT"
17 17  
18 18  let DATADONE = "READY"
19 19  
20 20  let STATEFINISHED = "FINISHED"
21 21  
22 22  let IdxState = 0
23 23  
24 24  let IdxOrganizerPub = 1
25 25  
26 26  let IdxRandFrom = 2
27 27  
28 28  let IdxRandTo = 3
29 29  
30 30  let IdxRandsCount = 4
31 31  
32 32  let IdxRemainRandsCount = 5
33 33  
34 34  let IdxDataKeysCount = 6
35 35  
36 36  let IdxDataDoneTxId = 7
37 37  
38 38  let IdxLastOffset = 8
39 39  
40 40  let IdxCurrRands = 13
41 41  
42 42  func abs (val) = if ((0 > val))
43 43      then -(val)
44 44      else val
45 45  
46 46  
47 47  func formatStateDataStr (drawState,organizerPubKey58,randFrom,randTo,randsCount,remainingRands,dataKeysCount,dataDoneTxId,lastOffset,slowIdx1,slowIdx2,fastIdx1,fastIdx2,randOrEmpty) = {
48 48      let fullStateStr = ((((((((((((((((((((((((drawState + "_") + organizerPubKey58) + "_") + randFrom) + "_") + randTo) + "_") + randsCount) + "_") + remainingRands) + "_") + dataKeysCount) + "_") + dataDoneTxId) + "_") + lastOffset) + "_") + slowIdx1) + "_") + slowIdx2) + "_") + fastIdx1) + "_") + fastIdx2)
49 49      if ((randOrEmpty == ""))
50 50          then ((fullStateStr + "_") + "-")
51 51          else ((fullStateStr + "_") + randOrEmpty)
52 52      }
53 53  
54 54  
55 55  func extractGameDataList (sessionId) = {
56 56      let rawDataStr = getStringValue(this, sessionId)
57 57      split(rawDataStr, "_")
58 58      }
59 59  
60 60  
61 61  func nextRand (div,min,currRandsStr,remainingRands,remainingHash) = {
62 62      let nextRandInt = ((abs(toInt(remainingHash)) % div) + min)
63 63      let nextRandStr = toString(nextRandInt)
64 64      let duplicate = isDefined(indexOf(currRandsStr, nextRandStr))
65 65      if (if (!(duplicate))
66 66          then (remainingRands > 0)
67 67          else false)
68 68          then [((currRandsStr + "-") + nextRandStr), "yes"]
69 69          else [currRandsStr, ""]
70 70      }
71 71  
72 72  
73 73  func generateRand (sessionId,from,to,rsaSign,currRandsStr,remainingRands,lastOffsetBytes,currSlowIdx1,currSlowIdx2,currFastIdx1,currFastIdx2) = {
74 74      let newIncList = if (((lastOffsetBytes + 1) > 87))
75 75          then if ((currFastIdx2 > 241))
76 76              then [0, (currSlowIdx1 + 1), (currSlowIdx2 + 1), 0, 1]
77 77              else [0, currSlowIdx1, currSlowIdx2, (currFastIdx1 + 1), (currFastIdx2 + 1)]
78 78          else [(lastOffsetBytes + 1), currSlowIdx1, currSlowIdx2, currFastIdx1, currFastIdx2]
79 -     ((((newIncList[0] + newIncList[1]) + newIncList[2]) + newIncList[3]) + newIncList[4])
79 +     newIncList
80 80      }
81 81  
82 82  
83 83  func validateDtxKey (sessionId,dataKeysCount,data) = {
84 84      let dataKeyInfo = split(data.key, "_")
85 85      if ((size(dataKeyInfo) != 2))
86 86          then throw("Invalid data key format. It must follow to ${sessionId}_${num}")
87 87          else {
88 88              let keySessionId = dataKeyInfo[0]
89 89              let keyPostfix = dataKeyInfo[1]
90 90              if ((sessionId != keySessionId))
91 91                  then throw(((("Several data keys have different sessionId: " + sessionId) + " and ") + keySessionId))
92 92                  else if (isDefined(getString(this, data.key)))
93 93                      then throw(("One of the data keys has already presented in account state: key=" + data.key))
94 94                      else if ((size(keyPostfix) > 4))
95 95                          then throw("Invalid data key format. It must follow to ${sessionId}_${num} where ${num} length couldn't be greater than 4")
96 96                          else if ((take(keyPostfix, 1) == "0"))
97 97                              then throw("Invalid data key format. It must follow to ${sessionId}_${num} where ${num} couldn't start from 0")
98 98                              else {
99 99                                  let keyPostfixIntOpt = parseInt(keyPostfix)
100 100                                  if (isDefined(keyPostfixIntOpt))
101 101                                      then {
102 102                                          let keyPostfixInt = extract(keyPostfixIntOpt)
103 103                                          if (if ((1 > keyPostfixInt))
104 104                                              then true
105 105                                              else (keyPostfixInt > dataKeysCount))
106 106                                              then throw((((("Invalid data key format. It must follow to ${sessionId}_${num}" + " where ${num} must be a valid int value from 1 to ") + toString(dataKeysCount)) + " but actualNum=") + toString(keyPostfixInt)))
107 107                                              else                                             match data.value {
108 108                                                  case str: String => 
109 109                                                      true
110 110                                                  case _ => 
111 111                                                      throw((sessionId + " draw: only String type is accepted for data transactions"))
112 112                                              }
113 113                                          }
114 114                                      else throw((("Invalid data key format. It must follow to ${sessionId}_${num}" + " where ${num} must be a valid int value from 1 to 31250 but actualNum=") + keyPostfix))
115 115                                  }
116 116              }
117 117      }
118 118  
119 119  
120 120  func validateAndGetRandsPmt (randsCount,pmt,minDataPmt) = {
121 121      let bound1 = 1000
122 122      let basePrice1 = ((13 * WAVELET) / 100)
123 123      let div1 = 50
124 124      let diff1 = ((8 * WAVELET) / 100)
125 125      let bound2 = 5000
126 126      let basePrice2 = ((297 * WAVELET) / 100)
127 127      let div2 = 1000
128 128      let diff2 = ((143 * WAVELET) / 100)
129 129      let bound3 = 50000
130 130      let basePrice3 = ((1427 * WAVELET) / 100)
131 131      let div3 = 5000
132 132      let diff3 = ((705 * WAVELET) / 100)
133 133      let minRandsPmt = if ((bound1 > randsCount))
134 134          then (basePrice1 + ((randsCount / div1) * diff1))
135 135          else if ((bound2 > randsCount))
136 136              then (basePrice2 + (((randsCount / div2) - 1) * diff2))
137 137              else if ((bound3 > randsCount))
138 138                  then (basePrice3 + (((randsCount / div3) - 1) * diff3))
139 139                  else throw("Please contact our sales team to generate more than 50k rands")
140 140      let minPmt = (minRandsPmt + minDataPmt)
141 141      if (isDefined(pmt.assetId))
142 142          then throw("Only WAVES can be used as a payment for rands generation")
143 143          else if ((minPmt > pmt.amount))
144 144              then throw(((((("Attached payment is to small to generate " + toString(randsCount)) + " unique randoms numbers and upload at least 1 data tx: actualPmt=") + toString(pmt.amount)) + " but minPmt is ") + toString(minPmt)))
145 145              else minRandsPmt
146 146      }
147 147  
148 148  
149 149  @Callable(i)
150 150  func initDraw (randFrom,randTo,randsCount) = {
151 151      let sessionId = toBase58String(i.transactionId)
152 152      let rangeLength = ((randTo - randFrom) + 1)
153 153      let maxRangeLength = (rangeLength / 2)
154 154      let randToLen = size(toString((randTo - 1)))
155 155      let randsCountLen = size(toString(randsCount))
156 156      let dynamicStatusLen = (((2 * randToLen) + (2 * randsCountLen)) + 4)
157 157      let maxRandsCount = (((5120 - 175) - dynamicStatusLen) / (randToLen + 1))
158 158      if (if ((0 >= randFrom))
159 159          then true
160 160          else (0 >= randTo))
161 161          then throw("randFrom and randTo must be greater than 0")
162 162          else if ((randFrom >= randTo))
163 163              then throw("randFrom must be strict less then randTo")
164 164              else if ((randsCount > rangeLength))
165 165                  then throw(((((((("Impossible to generate " + toString(randsCount)) + " unique numbers for provided random range [") + toString(randFrom)) + ", ") + toString(randTo)) + "] with actual size ") + toString(rangeLength)))
166 166                  else if ((randsCount > maxRangeLength))
167 167                      then throw(((((((((("randsCount must be less then 50% of passed range length: range=[" + toString(randFrom)) + ", ") + toString(randTo)) + "], rangeLength=") + toString(rangeLength)) + " randsCount=") + toString(randsCount)) + " allowedRandsCount=") + toString(maxRangeLength)))
168 168                      else if ((randsCount > maxRandsCount))
169 169                          then throw(((((("randsCount couldn't be kept in 1 data entry: 1_randNumSpace=" + toString((randToLen + 1))) + " maxAllowedRandsCount=") + toString(maxRandsCount)) + " actualRandsCount=") + toString(randsCount)))
170 170                          else if (!(isDefined(i.payment)))
171 171                              then throw("Please provide payment to generate unique random numbers")
172 172                              else {
173 173                                  let pmt = extract(i.payment)
174 174                                  let minDataPmt = ((((WAVELET * 1) / 1000) * 33) + ((WAVELET * 4) / 1000))
175 175                                  let randsPmt = validateAndGetRandsPmt(randsCount, pmt, minDataPmt)
176 176                                  let dataPmt = (pmt.amount - randsPmt)
177 177                                  let dataTxCount = (dataPmt / minDataPmt)
178 178                                  let dataKeysCount = if ((31250 >= (dataTxCount * 5)))
179 179                                      then (dataTxCount * 5)
180 180                                      else 31250
181 181                                  let organizerPubKey58 = toBase58String(i.callerPublicKey)
182 182                                  let randsCountStr = toString(randsCount)
183 183                                  let initState = formatStateDataStr(DATADONE, organizerPubKey58, toString(randFrom), toString(randTo), randsCountStr, randsCountStr, toString(dataKeysCount), toBase58String(i.transactionId), "0", "0", "1", "0", "1", "")
184 184                                  ScriptResult(WriteSet([DataEntry(sessionId, initState)]), TransferSet([ScriptTransfer(SERVER, randsPmt, unit)]))
185 185                                  }
186 186      }
187 187  
188 188  
189 189  
190 190  @Callable(i)
191 191  func random (sessionId,rsaSign) = {
192 192      let drawParamsList = extractGameDataList(sessionId)
193 193      let drawState = drawParamsList[IdxState]
194 194      let organizerPubKey58 = drawParamsList[IdxOrganizerPub]
195 195      let randsCountStr = drawParamsList[IdxRandsCount]
196 196      let remainRandsCount = parseIntValue(drawParamsList[IdxRemainRandsCount])
197 197      let lastOffsetBytes = parseIntValue(drawParamsList[IdxLastOffset])
198 198      let currRandsStr = drawParamsList[IdxCurrRands]
199 199      let fromStr = drawParamsList[IdxRandFrom]
200 200      let toStr = drawParamsList[IdxRandTo]
201 201      let dataDoneTxId = drawParamsList[IdxDataDoneTxId]
202 202      let slowIdx1 = parseIntValue(drawParamsList[9])
203 203      let slowIdx2 = parseIntValue(drawParamsList[10])
204 204      let fastIdx1 = parseIntValue(drawParamsList[11])
205 205      let fastIdx2 = parseIntValue(drawParamsList[12])
206 206      let from = parseIntValue(fromStr)
207 207      let to = parseIntValue(toStr)
208 208      let organizerPubKey = fromBase58String(organizerPubKey58)
209 209      if ((drawState != DATADONE))
210 210          then throw((sessionId + " draw: it must be in READY state to generate random numbers"))
211 211          else if (false)
212 212              then throw("Invalid RSA signature")
213 213              else {
214 214                  let randGenInfo = generateRand(sessionId, from, to, rsaSign, currRandsStr, remainRandsCount, lastOffsetBytes, slowIdx1, slowIdx2, fastIdx1, fastIdx2)
215 -                 WriteSet([DataEntry("byteVect", randGenInfo), DataEntry((sessionId + "test"), (toBytes(sessionId) + toBytes(dataDoneTxId))), DataEntry((sessionId + "test-2"), "ds")])
215 +                 WriteSet([DataEntry("byteVect1", randGenInfo[1]), DataEntry("byteVect2", randGenInfo[2]), DataEntry("byteVect3", randGenInfo[3]), DataEntry("byteVect4", randGenInfo[4]), DataEntry((sessionId + "test"), (toBytes(sessionId) + toBytes(dataDoneTxId))), DataEntry((sessionId + "test-2"), "ds")])
216 216                  }
217 217      }
218 218  
219 219

Old	New		Differences
76	76		then [0, (currSlowIdx1 + 1), (currSlowIdx2 + 1), 0, 1]
77	77		else [0, currSlowIdx1, currSlowIdx2, (currFastIdx1 + 1), (currFastIdx2 + 1)]
78	78		else [(lastOffsetBytes + 1), currSlowIdx1, currSlowIdx2, currFastIdx1, currFastIdx2]
79		-	~~((((~~newIncList~~[0] + newIncList[1]) + newIncList[2]) + newIncList[3]) + newIncList[4])~~
	79	+	newIncList
80	80		}
81	81
82	82

212	212		then throw("Invalid RSA signature")
213	213		else {
214	214		let randGenInfo = generateRand(sessionId, from, to, rsaSign, currRandsStr, remainRandsCount, lastOffsetBytes, slowIdx1, slowIdx2, fastIdx1, fastIdx2)
215		-	WriteSet([DataEntry("~~byteVect~~", randGenInfo), DataEntry((sessionId + "test"), (toBytes(sessionId) + toBytes(dataDoneTxId))), DataEntry((sessionId + "test-2"), "ds")])
	215	+	WriteSet([DataEntry("byteVect1", randGenInfo[1]), DataEntry("byteVect2", randGenInfo[2]), DataEntry("byteVect3", randGenInfo[3]), DataEntry("byteVect4", randGenInfo[4]), DataEntry((sessionId + "test"), (toBytes(sessionId) + toBytes(dataDoneTxId))), DataEntry((sessionId + "test-2"), "ds")])
216	216		}
217	217		}
218	218

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let RSAPUBLIC = fromBase64String("base64:LS0tLS1CRUdJTiBQVUJMSUMgS0VZLS0tLS0KTUlHZk1BMEdDU3FHU0liM0RRRUJBUVVBQTRHTkFEQ0JpUUtCZ1FDR25Hd3ZVbG1mTG5ZTkdyRSszczR2QTZRZAowa29PNzdZUjJDdTZpOWQvalE2OVJkU0hHRFlwb3hKM1gvSS84MmtpS1JRcHlwcWJjUS9UY3IxV1VRM1RDQmk1CnFmYyt4ZWVyOS9ncnhUOExJazEvVFhXVEZBQzA2M3R3V1dPbVpXcGNPN3kyZlRuUklkSFRlaUs0T1pzSyt1Z2UKOTdGS3BTbWoxcmpFVDFmM0F3SURBUUFCCi0tLS0tRU5EIFBVQkxJQyBLRVktLS0tLQ==")
5	5
6	6		let SERVER = addressFromStringValue("3N4vdqMsEsAZSJWfwYJcaCgUzASJTC2BWsP")
7	7
8	8		let WAVELET = ((100 * 1000) * 1000)
9	9
10	10		let SESSIONIDFIXSIZE = 44
11	11
12	12		let RANDCYCLEPRICE = ((5 * WAVELET) / 1000)
13	13
14	14		let MAXRANDSPERCYCLE = 14
15	15
16	16		let STATEINIT = "INIT"
17	17
18	18		let DATADONE = "READY"
19	19
20	20		let STATEFINISHED = "FINISHED"
21	21
22	22		let IdxState = 0
23	23
24	24		let IdxOrganizerPub = 1
25	25
26	26		let IdxRandFrom = 2
27	27
28	28		let IdxRandTo = 3
29	29
30	30		let IdxRandsCount = 4
31	31
32	32		let IdxRemainRandsCount = 5
33	33
34	34		let IdxDataKeysCount = 6
35	35
36	36		let IdxDataDoneTxId = 7
37	37
38	38		let IdxLastOffset = 8
39	39
40	40		let IdxCurrRands = 13
41	41
42	42		func abs (val) = if ((0 > val))
43	43		then -(val)
44	44		else val
45	45
46	46
47	47		func formatStateDataStr (drawState,organizerPubKey58,randFrom,randTo,randsCount,remainingRands,dataKeysCount,dataDoneTxId,lastOffset,slowIdx1,slowIdx2,fastIdx1,fastIdx2,randOrEmpty) = {
48	48		let fullStateStr = ((((((((((((((((((((((((drawState + "_") + organizerPubKey58) + "_") + randFrom) + "_") + randTo) + "_") + randsCount) + "_") + remainingRands) + "_") + dataKeysCount) + "_") + dataDoneTxId) + "_") + lastOffset) + "_") + slowIdx1) + "_") + slowIdx2) + "_") + fastIdx1) + "_") + fastIdx2)
49	49		if ((randOrEmpty == ""))
50	50		then ((fullStateStr + "_") + "-")
51	51		else ((fullStateStr + "_") + randOrEmpty)
52	52		}
53	53
54	54
55	55		func extractGameDataList (sessionId) = {
56	56		let rawDataStr = getStringValue(this, sessionId)
57	57		split(rawDataStr, "_")
58	58		}
59	59
60	60
61	61		func nextRand (div,min,currRandsStr,remainingRands,remainingHash) = {
62	62		let nextRandInt = ((abs(toInt(remainingHash)) % div) + min)
63	63		let nextRandStr = toString(nextRandInt)
64	64		let duplicate = isDefined(indexOf(currRandsStr, nextRandStr))
65	65		if (if (!(duplicate))
66	66		then (remainingRands > 0)
67	67		else false)
68	68		then [((currRandsStr + "-") + nextRandStr), "yes"]
69	69		else [currRandsStr, ""]
70	70		}
71	71
72	72
73	73		func generateRand (sessionId,from,to,rsaSign,currRandsStr,remainingRands,lastOffsetBytes,currSlowIdx1,currSlowIdx2,currFastIdx1,currFastIdx2) = {
74	74		let newIncList = if (((lastOffsetBytes + 1) > 87))
75	75		then if ((currFastIdx2 > 241))
76	76		then [0, (currSlowIdx1 + 1), (currSlowIdx2 + 1), 0, 1]
77	77		else [0, currSlowIdx1, currSlowIdx2, (currFastIdx1 + 1), (currFastIdx2 + 1)]
78	78		else [(lastOffsetBytes + 1), currSlowIdx1, currSlowIdx2, currFastIdx1, currFastIdx2]
79		-	~~((((~~newIncList~~[0] + newIncList[1]) + newIncList[2]) + newIncList[3]) + newIncList[4])~~
	79	+	newIncList
80	80		}
81	81
82	82
83	83		func validateDtxKey (sessionId,dataKeysCount,data) = {
84	84		let dataKeyInfo = split(data.key, "_")
85	85		if ((size(dataKeyInfo) != 2))
86	86		then throw("Invalid data key format. It must follow to ${sessionId}_${num}")
87	87		else {
88	88		let keySessionId = dataKeyInfo[0]
89	89		let keyPostfix = dataKeyInfo[1]
90	90		if ((sessionId != keySessionId))
91	91		then throw(((("Several data keys have different sessionId: " + sessionId) + " and ") + keySessionId))
92	92		else if (isDefined(getString(this, data.key)))
93	93		then throw(("One of the data keys has already presented in account state: key=" + data.key))
94	94		else if ((size(keyPostfix) > 4))
95	95		then throw("Invalid data key format. It must follow to ${sessionId}_${num} where ${num} length couldn't be greater than 4")
96	96		else if ((take(keyPostfix, 1) == "0"))
97	97		then throw("Invalid data key format. It must follow to ${sessionId}_${num} where ${num} couldn't start from 0")
98	98		else {
99	99		let keyPostfixIntOpt = parseInt(keyPostfix)
100	100		if (isDefined(keyPostfixIntOpt))
101	101		then {
102	102		let keyPostfixInt = extract(keyPostfixIntOpt)
103	103		if (if ((1 > keyPostfixInt))
104	104		then true
105	105		else (keyPostfixInt > dataKeysCount))
106	106		then throw((((("Invalid data key format. It must follow to ${sessionId}_${num}" + " where ${num} must be a valid int value from 1 to ") + toString(dataKeysCount)) + " but actualNum=") + toString(keyPostfixInt)))
107	107		else match data.value {
108	108		case str: String =>
109	109		true
110	110		case _ =>
111	111		throw((sessionId + " draw: only String type is accepted for data transactions"))
112	112		}
113	113		}
114	114		else throw((("Invalid data key format. It must follow to ${sessionId}_${num}" + " where ${num} must be a valid int value from 1 to 31250 but actualNum=") + keyPostfix))
115	115		}
116	116		}
117	117		}
118	118
119	119
120	120		func validateAndGetRandsPmt (randsCount,pmt,minDataPmt) = {
121	121		let bound1 = 1000
122	122		let basePrice1 = ((13 * WAVELET) / 100)
123	123		let div1 = 50
124	124		let diff1 = ((8 * WAVELET) / 100)
125	125		let bound2 = 5000
126	126		let basePrice2 = ((297 * WAVELET) / 100)
127	127		let div2 = 1000
128	128		let diff2 = ((143 * WAVELET) / 100)
129	129		let bound3 = 50000
130	130		let basePrice3 = ((1427 * WAVELET) / 100)
131	131		let div3 = 5000
132	132		let diff3 = ((705 * WAVELET) / 100)
133	133		let minRandsPmt = if ((bound1 > randsCount))
134	134		then (basePrice1 + ((randsCount / div1) * diff1))
135	135		else if ((bound2 > randsCount))
136	136		then (basePrice2 + (((randsCount / div2) - 1) * diff2))
137	137		else if ((bound3 > randsCount))
138	138		then (basePrice3 + (((randsCount / div3) - 1) * diff3))
139	139		else throw("Please contact our sales team to generate more than 50k rands")
140	140		let minPmt = (minRandsPmt + minDataPmt)
141	141		if (isDefined(pmt.assetId))
142	142		then throw("Only WAVES can be used as a payment for rands generation")
143	143		else if ((minPmt > pmt.amount))
144	144		then throw(((((("Attached payment is to small to generate " + toString(randsCount)) + " unique randoms numbers and upload at least 1 data tx: actualPmt=") + toString(pmt.amount)) + " but minPmt is ") + toString(minPmt)))
145	145		else minRandsPmt
146	146		}
147	147
148	148
149	149		@Callable(i)
150	150		func initDraw (randFrom,randTo,randsCount) = {
151	151		let sessionId = toBase58String(i.transactionId)
152	152		let rangeLength = ((randTo - randFrom) + 1)
153	153		let maxRangeLength = (rangeLength / 2)
154	154		let randToLen = size(toString((randTo - 1)))
155	155		let randsCountLen = size(toString(randsCount))
156	156		let dynamicStatusLen = (((2 * randToLen) + (2 * randsCountLen)) + 4)
157	157		let maxRandsCount = (((5120 - 175) - dynamicStatusLen) / (randToLen + 1))
158	158		if (if ((0 >= randFrom))
159	159		then true
160	160		else (0 >= randTo))
161	161		then throw("randFrom and randTo must be greater than 0")
162	162		else if ((randFrom >= randTo))
163	163		then throw("randFrom must be strict less then randTo")
164	164		else if ((randsCount > rangeLength))
165	165		then throw(((((((("Impossible to generate " + toString(randsCount)) + " unique numbers for provided random range [") + toString(randFrom)) + ", ") + toString(randTo)) + "] with actual size ") + toString(rangeLength)))
166	166		else if ((randsCount > maxRangeLength))
167	167		then throw(((((((((("randsCount must be less then 50% of passed range length: range=[" + toString(randFrom)) + ", ") + toString(randTo)) + "], rangeLength=") + toString(rangeLength)) + " randsCount=") + toString(randsCount)) + " allowedRandsCount=") + toString(maxRangeLength)))
168	168		else if ((randsCount > maxRandsCount))
169	169		then throw(((((("randsCount couldn't be kept in 1 data entry: 1_randNumSpace=" + toString((randToLen + 1))) + " maxAllowedRandsCount=") + toString(maxRandsCount)) + " actualRandsCount=") + toString(randsCount)))
170	170		else if (!(isDefined(i.payment)))
171	171		then throw("Please provide payment to generate unique random numbers")
172	172		else {
173	173		let pmt = extract(i.payment)
174	174		let minDataPmt = ((((WAVELET * 1) / 1000) * 33) + ((WAVELET * 4) / 1000))
175	175		let randsPmt = validateAndGetRandsPmt(randsCount, pmt, minDataPmt)
176	176		let dataPmt = (pmt.amount - randsPmt)
177	177		let dataTxCount = (dataPmt / minDataPmt)
178	178		let dataKeysCount = if ((31250 >= (dataTxCount * 5)))
179	179		then (dataTxCount * 5)
180	180		else 31250
181	181		let organizerPubKey58 = toBase58String(i.callerPublicKey)
182	182		let randsCountStr = toString(randsCount)
183	183		let initState = formatStateDataStr(DATADONE, organizerPubKey58, toString(randFrom), toString(randTo), randsCountStr, randsCountStr, toString(dataKeysCount), toBase58String(i.transactionId), "0", "0", "1", "0", "1", "")
184	184		ScriptResult(WriteSet([DataEntry(sessionId, initState)]), TransferSet([ScriptTransfer(SERVER, randsPmt, unit)]))
185	185		}
186	186		}
187	187
188	188
189	189
190	190		@Callable(i)
191	191		func random (sessionId,rsaSign) = {
192	192		let drawParamsList = extractGameDataList(sessionId)
193	193		let drawState = drawParamsList[IdxState]
194	194		let organizerPubKey58 = drawParamsList[IdxOrganizerPub]
195	195		let randsCountStr = drawParamsList[IdxRandsCount]
196	196		let remainRandsCount = parseIntValue(drawParamsList[IdxRemainRandsCount])
197	197		let lastOffsetBytes = parseIntValue(drawParamsList[IdxLastOffset])
198	198		let currRandsStr = drawParamsList[IdxCurrRands]
199	199		let fromStr = drawParamsList[IdxRandFrom]
200	200		let toStr = drawParamsList[IdxRandTo]
201	201		let dataDoneTxId = drawParamsList[IdxDataDoneTxId]
202	202		let slowIdx1 = parseIntValue(drawParamsList[9])
203	203		let slowIdx2 = parseIntValue(drawParamsList[10])
204	204		let fastIdx1 = parseIntValue(drawParamsList[11])
205	205		let fastIdx2 = parseIntValue(drawParamsList[12])
206	206		let from = parseIntValue(fromStr)
207	207		let to = parseIntValue(toStr)
208	208		let organizerPubKey = fromBase58String(organizerPubKey58)
209	209		if ((drawState != DATADONE))
210	210		then throw((sessionId + " draw: it must be in READY state to generate random numbers"))
211	211		else if (false)
212	212		then throw("Invalid RSA signature")
213	213		else {
214	214		let randGenInfo = generateRand(sessionId, from, to, rsaSign, currRandsStr, remainRandsCount, lastOffsetBytes, slowIdx1, slowIdx2, fastIdx1, fastIdx2)
215		-	WriteSet([DataEntry("~~byteVect~~", randGenInfo), DataEntry((sessionId + "test"), (toBytes(sessionId) + toBytes(dataDoneTxId))), DataEntry((sessionId + "test-2"), "ds")])
	215	+	WriteSet([DataEntry("byteVect1", randGenInfo[1]), DataEntry("byteVect2", randGenInfo[2]), DataEntry("byteVect3", randGenInfo[3]), DataEntry("byteVect4", randGenInfo[4]), DataEntry((sessionId + "test"), (toBytes(sessionId) + toBytes(dataDoneTxId))), DataEntry((sessionId + "test-2"), "ds")])
216	216		}
217	217		}
218	218
219	219

github/deemru/w8io/169f3d6 
42.25 ms ◑