w8 · tx · Ftk···8Zs

tx · FtkZs9yCJz58imHRaVLtdpNCiaWk8kBxBwx9hgvf48Zs

3N3BYKYYK6TKoHtPLZYU8JRn8PcHTnauS9z:  -0.02000000 Waves

2021.12.15 14:38 [1835326] smart account 3N3BYKYYK6TKoHtPLZYU8JRn8PcHTnauS9z > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "FtkZs9yCJz58imHRaVLtdpNCiaWk8kBxBwx9hgvf48Zs",
    "fee": 2000000,
    "feeAssetId": null,
    "timestamp": 1639568375038,
    "version": 2,
    "chainId": 84,
    "sender": "3N3BYKYYK6TKoHtPLZYU8JRn8PcHTnauS9z",
    "senderPublicKey": "FsjTCE3KV2vD2r7Du9D3J6Ea2T643E6zxzn6y24outXr",
    "proofs": [
        "3mPiyHuVWtaqJTaXiaWW6uzv1TWj8kf925PNgqw212FGhM29CcWZw2TFQ1CP4vzE1RgTTwXj66LpPmScLa885Dxs"
    ],
    "script": "base64:AAIDAAAAAAAACNEIARIFCgMBAQESBAoCCAIaDwoBQRIKcmFuZHNDb3VudBoTCgFCEg5yZW1haW5pbmdSYW5kcxoSCgFDEg1kYXRhS2V5c0NvdW50GhEKAUQSDGRhdGFEb25lVHhJZBoPCgFFEgpsYXN0T2Zmc2V0Gg0KAUYSCHNsb3dJZHgxGg0KAUcSCHNsb3dJZHgyGg0KAUgSCGZhc3RJZHgxGg0KAUkSCGZhc3RJZHgyGhAKAUoSC3JhbmRPckVtcHR5GhEKAUsSDGZ1bGxTdGF0ZVN0choYCgFMEhNleHRyYWN0R2FtZURhdGFMaXN0Gg4KAU0SCXNlc3Npb25JZBoPCgFOEgpyYXdEYXRhU3RyGg0KAU8SCG5leHRSYW5kGggKAVASA2RpdhoICgFREgNtaW4aEQoBUhIMY3VyclJhbmRzU3RyGhIKAVMSDXJlbWFpbmluZ0hhc2gaEAoBVBILbmV4dFJhbmRJbnQaEAoBVRILbmV4dFJhbmRTdHIaDgoBVhIJZHVwbGljYXRlGhEKAVcSDGdlbmVyYXRlUmFuZBoJCgFYEgRmcm9tGgcKAVkSAnRvGgwKAVoSB3JzYVNpZ24aDgoBYRIJUlNBUFVCTElDGgoKAmFBEgRyZW03GgsKAmFCEgVyYW5kOBoKCgJhQxIEcmVtOBoLCgJhRBIFcmFuZDkaCgoCYUUSBHJlbTkaDAoCYUYSBnJhbmQxMBoLCgJhRxIFcmVtMTAaDAoCYUgSBnJhbmQxMRoLCgJhSRIFcmVtMTEaFAoCYUoSDnZhbGlkYXRlRHR4S2V5GgoKAmFLEgRkYXRhGhEKAmFMEgtkYXRhS2V5SW5mbxoSCgJhTRIMa2V5U2Vzc2lvbklkGhAKAmFOEgprZXlQb3N0Zml4GhYKAmFPEhBrZXlQb3N0Zml4SW50T3B0GhMKAmFQEg1rZXlQb3N0Zml4SW50Gg0KAmFREgckbWF0Y2gwGgkKAmFSEgNzdHIaHAoCYVMSFnZhbGlkYXRlQW5kR2V0UmFuZHNQbXQaCQoCYVQSA3BtdBoQCgJhVRIKbWluRGF0YVBtdBoMCgJhVhIGYm91bmQxGhAKAmFXEgpiYXNlUHJpY2UxGgoKAmFYEgRkaXYxGgsKAmFZEgVkaWZmMRoMCgJhWhIGYm91bmQyGhUKAmFhEg9sYXN0T2Zmc2V0Qnl0ZXMaEgoCYWISDGN1cnJTbG93SWR4MRoSCgJhYxIMY3VyclNsb3dJZHgyGhIKAmFkEgxjdXJyRmFzdElkeDEaEgoCYWUSDGN1cnJGYXN0SWR4MhoQCgJhZhIKbmV3SW5jTGlzdBoUCgJhZxIObmV3T2Zmc2V0Qnl0ZXMaEQoCYWgSC25ld1Nsb3dJZHgxGhEKAmFpEgtuZXdTbG93SWR4MhoRCgJhahILbmV3RmFzdElkeDEaEQoCYWsSC25ld0Zhc3RJZHgyGg4KAmFsEghieXRlVmVjdBoOCgJhbRIIcmFuZEhhc2gaCwoCYW4SBXJhbmQxGgoKAmFvEgRyZW0xGgsKAmFwEgVyYW5kMhoKCgJhcRIEcmVtMhoLCgJhchIFcmFuZDMaCgoCYXMSBHJlbTMaCwoCYXQSBXJhbmQ0GgoKAmF1EgRyZW00GgsKAmF2EgVyYW5kNRoKCgJhdxIEcmVtNRoLCgJheBIFcmFuZDYaCgoCYXkSBHJlbTYaCwoCYXoSBXJhbmQ3GgsKAWISBlNFUlZFUhoRCgJiQRILcmFuZEdlbkluZm8aHAoCYkISFm5ld1JlbWFpblJhbmRzQ291bnRTdHIaDgoCYkMSCG5ld1N0YXRlGhAKAmJhEgpiYXNlUHJpY2UyGgoKAmJiEgRkaXYyGgsKAmJjEgVkaWZmMhoMCgJiZBIGYm91bmQzGhAKAmJlEgpiYXNlUHJpY2UzGgoKAmJmEgRkaXYzGgsKAmJnEgVkaWZmMxoRCgJiaBILbWluUmFuZHNQbXQaDAoCYmkSBm1pblBtdBoHCgJiahIBaRoRCgJiaxILcmFuZ2VMZW5ndGgaFAoCYmwSDm1heFJhbmdlTGVuZ3RoGg8KAmJtEglyYW5kVG9MZW4aEwoCYm4SDXJhbmRzQ291bnRMZW4aFgoCYm8SEGR5bmFtaWNTdGF0dXNMZW4aEwoCYnASDW1heFJhbmRzQ291bnQaDgoCYnESCHJhbmRzUG10Gg0KAmJyEgdkYXRhUG10GhEKAmJzEgtkYXRhVHhDb3VudBoTCgJidBINcmFuZHNDb3VudFN0choPCgJidRIJaW5pdFN0YXRlGhQKAmJ2Eg5kcmF3UGFyYW1zTGlzdBoWCgJidxIQcmVtYWluUmFuZHNDb3VudBoNCgJieBIHZnJvbVN0choLCgJieRIFdG9TdHIaFQoCYnoSD29yZ2FuaXplclB1YktleRoMCgFjEgdXQVZFTEVUGhUKAWQSEFNFU1NJT05JREZJWFNJWkUaEwoBZRIOUkFORENZQ0xFUFJJQ0UaFQoBZhIQTUFYUkFORFNQRVJDWUNMRRoOCgFnEglTVEFURUlOSVQaDQoBaBIIREFUQURPTkUaEgoBaRINU1RBVEVGSU5JU0hFRBoNCgFqEghJZHhTdGF0ZRoUCgFrEg9JZHhPcmdhbml6ZXJQdWIaEAoBbBILSWR4UmFuZEZyb20aDgoBbRIJSWR4UmFuZFRvGhIKAW4SDUlkeFJhbmRzQ291bnQaGAoBbxITSWR4UmVtYWluUmFuZHNDb3VudBoVCgFwEhBJZHhEYXRhS2V5c0NvdW50GhQKAXESD0lkeERhdGFEb25lVHhJZBoSCgFyEg1JZHhMYXN0T2Zmc2V0GhEKAXMSDElkeEN1cnJSYW5kcxoICgF0EgNhYnMaCAoBdRIDdmFsGhcKAXYSEmZvcm1hdFN0YXRlRGF0YVN0choOCgF3EglkcmF3U3RhdGUaFgoBeBIRb3JnYW5pemVyUHViS2V5NTgaDQoBeRIIcmFuZEZyb20aCwoBehIGcmFuZFRvAAAAGgAAAAABYQkAAlsAAAABAgAAAXNiYXNlNjQ6TFMwdExTMUNSVWRKVGlCUVZVSk1TVU1nUzBWWkxTMHRMUzBLVFVsSFprMUJNRWREVTNGSFUwbGlNMFJSUlVKQlVWVkJRVFJIVGtGRVEwSnBVVXRDWjFGRFIyNUhkM1pWYkcxbVRHNVpUa2R5UlNzemN6UjJRVFpSWkFvd2EyOVBOemRaVWpKRGRUWnBPV1F2YWxFMk9WSmtVMGhIUkZsd2IzaEtNMWd2U1M4NE1tdHBTMUpSY0hsd2NXSmpVUzlVWTNJeFYxVlJNMVJEUW1rMUNuRm1ZeXQ0WldWeU9TOW5jbmhVT0V4SmF6RXZWRmhYVkVaQlF6QTJNM1IzVjFkUGJWcFhjR05QTjNreVpsUnVVa2xrU0ZSbGFVczBUMXB6U3l0MVoyVUtPVGRHUzNCVGJXb3hjbXBGVkRGbU0wRjNTVVJCVVVGQ0NpMHRMUzB0UlU1RUlGQlZRa3hKUXlCTFJWa3RMUzB0TFE9PQAAAAABYgkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABAgAAACMzTjR2ZHFNc0VzQVpTSldmd1lKY2FDZ1V6QVNKVEMyQldzUAAAAAABYwkAAGgAAAACCQAAaAAAAAIAAAAAAAAAAGQAAAAAAAAAA+gAAAAAAAAAA+gAAAAAAWQAAAAAAAAAACwAAAAAAWUJAABpAAAAAgkAAGgAAAACAAAAAAAAAAAFBQAAAAFjAAAAAAAAAAPoAAAAAAFmAAAAAAAAAAAOAAAAAAFnAgAAAARJTklUAAAAAAFoAgAAAAVSRUFEWQAAAAABaQIAAAAIRklOSVNIRUQAAAAAAWoAAAAAAAAAAAAAAAAAAWsAAAAAAAAAAAEAAAAAAWwAAAAAAAAAAAIAAAAAAW0AAAAAAAAAAAMAAAAAAW4AAAAAAAAAAAQAAAAAAW8AAAAAAAAAAAUAAAAAAXAAAAAAAAAAAAYAAAAAAXEAAAAAAAAAAAcAAAAAAXIAAAAAAAAAAAgAAAAAAXMAAAAAAAAAAA0BAAAAAXQAAAABAAAAAXUDCQAAZgAAAAIAAAAAAAAAAAAFAAAAAXUJAQAAAAEtAAAAAQUAAAABdQUAAAABdQEAAAABdgAAAA4AAAABdwAAAAF4AAAAAXkAAAABegAAAAFBAAAAAUIAAAABQwAAAAFEAAAAAUUAAAABRgAAAAFHAAAAAUgAAAABSQAAAAFKBAAAAAFLCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAF3AgAAAAFfBQAAAAF4AgAAAAFfBQAAAAF5AgAAAAFfBQAAAAF6AgAAAAFfBQAAAAFBAgAAAAFfBQAAAAFCAgAAAAFfBQAAAAFDAgAAAAFfBQAAAAFEAgAAAAFfBQAAAAFFAgAAAAFfBQAAAAFGAgAAAAFfBQAAAAFHAgAAAAFfBQAAAAFIAgAAAAFfBQAAAAFJAwkAAAAAAAACBQAAAAFKAgAAAAAJAAEsAAAAAgkAASwAAAACBQAAAAFLAgAAAAFfAgAAAAEtCQABLAAAAAIJAAEsAAAAAgUAAAABSwIAAAABXwUAAAABSgEAAAABTAAAAAEAAAABTQQAAAABTgkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwUAAAABTQkABLUAAAACBQAAAAFOAgAAAAFfAQAAAAFPAAAABQAAAAFQAAAAAVEAAAABUgAAAAFCAAAAAVMEAAAAAVQJAABkAAAAAgkAAGoAAAACCQEAAAABdAAAAAEJAASxAAAAAQUAAAABUwUAAAABUAUAAAABUQQAAAABVQkAAaQAAAABBQAAAAFUBAAAAAFWCQEAAAAJaXNEZWZpbmVkAAAAAQkABLMAAAACBQAAAAFSBQAAAAFVAwMJAQAAAAEhAAAAAQUAAAABVgkAAGYAAAACBQAAAAFCAAAAAAAAAAAABwkABEwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAABUgIAAAABLQUAAAABVQkABEwAAAACAgAAAAN5ZXMFAAAAA25pbAkABEwAAAACBQAAAAFSCQAETAAAAAICAAAAAAUAAAADbmlsAQAAAAFXAAAACwAAAAFNAAAAAVgAAAABWQAAAAFaAAAAAVIAAAABQgAAAAJhYQAAAAJhYgAAAAJhYwAAAAJhZAAAAAJhZQQAAAACYWYDCQAAZgAAAAIJAABkAAAAAgUAAAACYWEAAAAAAAAAAAEAAAAAAAAAAFcDCQAAZgAAAAIFAAAAAmFlAAAAAAAAAADxCQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgkAAGQAAAACBQAAAAJhYgAAAAAAAAAAAQkABEwAAAACCQAAZAAAAAIFAAAAAmFjAAAAAAAAAAABCQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgAAAAAAAAAAAQUAAAADbmlsCQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgUAAAACYWIJAARMAAAAAgUAAAACYWMJAARMAAAAAgkAAGQAAAACBQAAAAJhZAAAAAAAAAAAAQkABEwAAAACCQAAZAAAAAIFAAAAAmFlAAAAAAAAAAABBQAAAANuaWwJAARMAAAAAgkAAGQAAAACBQAAAAJhYQAAAAAAAAAAAQkABEwAAAACBQAAAAJhYgkABEwAAAACBQAAAAJhYwkABEwAAAACBQAAAAJhZAkABEwAAAACBQAAAAJhZQUAAAADbmlsBAAAAAJhZwkAAZEAAAACBQAAAAJhZgAAAAAAAAAAAAQAAAACYWgJAAGRAAAAAgUAAAACYWYAAAAAAAAAAAEEAAAAAmFpCQABkQAAAAIFAAAAAmFmAAAAAAAAAAACBAAAAAJhagkAAZEAAAACBQAAAAJhZgAAAAAAAAAAAwQAAAACYWsJAAGRAAAAAgUAAAACYWYAAAAAAAAAAAQEAAAAAmFsCQAAywAAAAIJAADLAAAAAgkAAMsAAAACCQAAywAAAAIJAADLAAAAAgkAAMsAAAACCQAAywAAAAIJAADJAAAAAgkAAMoAAAACBQAAAAFaBQAAAAJhaAAAAAAAAAAAAQkAAMkAAAACCQAAygAAAAIFAAAAAVoAAAAAAAAAAAEAAAAAAAAAAAEJAADJAAAAAgkAAMoAAAACBQAAAAFaBQAAAAJhagAAAAAAAAAAAQkAAMkAAAACCQAAygAAAAIFAAAAAVoAAAAAAAAAAAMAAAAAAAAAAAEJAADJAAAAAgkAAMoAAAACBQAAAAFaBQAAAAJhaQAAAAAAAAAAAQkAAMkAAAACCQAAygAAAAIFAAAAAVoAAAAAAAAAAAUAAAAAAAAAAAEJAADJAAAAAgkAAMoAAAACBQAAAAFaAAAAAAAAAAAGAAAAAAAAAAABCQAAyQAAAAIJAADKAAAAAgUAAAABWgUAAAACYWsAAAAAAAAAAAEEAAAAAmFtCQAAywAAAAIJAADLAAAAAgkAAfcAAAABBQAAAAJhbAkAAfYAAAABBQAAAAJhbAkAAfUAAAABBQAAAAJhbAQAAAABUAkAAGQAAAACCQAAZQAAAAIFAAAAAVkFAAAAAVgAAAAAAAAAAAEEAAAAAmFuCQEAAAABTwAAAAUFAAAAAVAFAAAAAVgFAAAAAVIFAAAAAUIJAADKAAAAAgUAAAACYW0FAAAAAmFnBAAAAAJhbwMJAQAAAAIhPQAAAAIJAAGRAAAAAgUAAAACYW4AAAAAAAAAAAECAAAAAAkAAGUAAAACBQAAAAFCAAAAAAAAAAABBQAAAAFCBAAAAAJhcAkBAAAAAU8AAAAFBQAAAAFQBQAAAAFYCQABkQAAAAIFAAAAAmFuAAAAAAAAAAAABQAAAAJhbwkAAMoAAAACBQAAAAJhbQkAAGQAAAACBQAAAAJhZwAAAAAAAAAAAQQAAAACYXEDCQEAAAACIT0AAAACCQABkQAAAAIFAAAAAmFwAAAAAAAAAAABAgAAAAAJAABlAAAAAgUAAAACYW8AAAAAAAAAAAEFAAAAAmFvBAAAAAJhcgkBAAAAAU8AAAAFBQAAAAFQBQAAAAFYCQABkQAAAAIFAAAAAmFwAAAAAAAAAAAABQAAAAJhcQkAAMoAAAACBQAAAAJhbQkAAGQAAAACBQAAAAJhZwAAAAAAAAAAAgQAAAACYXMDCQEAAAACIT0AAAACCQABkQAAAAIFAAAAAmFyAAAAAAAAAAABAgAAAAAJAABlAAAAAgUAAAACYXEAAAAAAAAAAAEFAAAAAmFxBAAAAAJhdAkBAAAAAU8AAAAFBQAAAAFQBQAAAAFYCQABkQAAAAIFAAAAAmFyAAAAAAAAAAAABQAAAAJhcwkAAMoAAAACBQAAAAJhbQkAAGQAAAACBQAAAAJhZwAAAAAAAAAAAwQAAAACYXUDCQEAAAACIT0AAAACCQABkQAAAAIFAAAAAmF0AAAAAAAAAAABAgAAAAAJAABlAAAAAgUAAAACYXMAAAAAAAAAAAEFAAAAAmFzBAAAAAJhdgkBAAAAAU8AAAAFBQAAAAFQBQAAAAFYCQABkQAAAAIFAAAAAmF0AAAAAAAAAAAABQAAAAJhdQkAAMoAAAACBQAAAAJhbQkAAGQAAAACBQAAAAJhZwAAAAAAAAAABAQAAAACYXcDCQEAAAACIT0AAAACCQABkQAAAAIFAAAAAmF2AAAAAAAAAAABAgAAAAAJAABlAAAAAgUAAAACYXUAAAAAAAAAAAEFAAAAAmF1BAAAAAJheAkBAAAAAU8AAAAFBQAAAAFQBQAAAAFYCQABkQAAAAIFAAAAAmF2AAAAAAAAAAAABQAAAAJhdwkAAMoAAAACBQAAAAJhbQkAAGQAAAACBQAAAAJhZwAAAAAAAAAABQQAAAACYXkDCQEAAAACIT0AAAACCQABkQAAAAIFAAAAAmF4AAAAAAAAAAABAgAAAAAJAABlAAAAAgUAAAACYXcAAAAAAAAAAAEFAAAAAmF3BAAAAAJhegkBAAAAAU8AAAAFBQAAAAFQBQAAAAFYCQABkQAAAAIFAAAAAmF4AAAAAAAAAAAABQAAAAJheQkAAMoAAAACBQAAAAJhbQkAAGQAAAACBQAAAAJhZwAAAAAAAAAABgQAAAACYUEDCQEAAAACIT0AAAACCQABkQAAAAIFAAAAAmF6AAAAAAAAAAABAgAAAAAJAABlAAAAAgUAAAACYXkAAAAAAAAAAAEFAAAAAmF5BAAAAAJhQgkBAAAAAU8AAAAFBQAAAAFQBQAAAAFYCQABkQAAAAIFAAAAAmF6AAAAAAAAAAAABQAAAAJhQQkAAMoAAAACBQAAAAJhbQkAAGQAAAACBQAAAAJhZwAAAAAAAAAABwQAAAACYUMDCQEAAAACIT0AAAACCQABkQAAAAIFAAAAAmFCAAAAAAAAAAABAgAAAAAJAABlAAAAAgUAAAACYUEAAAAAAAAAAAEFAAAAAmFBBAAAAAJhRAkBAAAAAU8AAAAFBQAAAAFQBQAAAAFYCQABkQAAAAIFAAAAAmFCAAAAAAAAAAAABQAAAAJhQwkAAMoAAAACBQAAAAJhbQkAAGQAAAACBQAAAAJhZwAAAAAAAAAACAQAAAACYUUDCQEAAAACIT0AAAACCQABkQAAAAIFAAAAAmFEAAAAAAAAAAABAgAAAAAJAABlAAAAAgUAAAACYUMAAAAAAAAAAAEFAAAAAmFDBAAAAAJhRgkBAAAAAU8AAAAFBQAAAAFQBQAAAAFYCQABkQAAAAIFAAAAAmFEAAAAAAAAAAAABQAAAAJhRQkAAMoAAAACBQAAAAJhbQkAAGQAAAACBQAAAAJhZwAAAAAAAAAACQQAAAACYUcDCQEAAAACIT0AAAACCQABkQAAAAIFAAAAAmFGAAAAAAAAAAABAgAAAAAJAABlAAAAAgUAAAACYUUAAAAAAAAAAAEFAAAAAmFFBAAAAAJhSAkBAAAAAU8AAAAFBQAAAAFQBQAAAAFYCQABkQAAAAIFAAAAAmFGAAAAAAAAAAAABQAAAAJhRwkAAMoAAAACBQAAAAJhbQkAAGQAAAACBQAAAAJhZwAAAAAAAAAACgQAAAACYUkDCQEAAAACIT0AAAACCQABkQAAAAIFAAAAAmFIAAAAAAAAAAABAgAAAAAJAABlAAAAAgUAAAACYUcAAAAAAAAAAAEFAAAAAmFHCQAETAAAAAIJAAGRAAAAAgUAAAACYUgAAAAAAAAAAAAJAARMAAAAAgMJAAAAAAAAAgUAAAACYUkAAAAAAAAAAAACAAAAATAJAAGkAAAAAQUAAAACYUkJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIFAAAAAmFnAAAAAAAAAAAKCQAETAAAAAIJAAGkAAAAAQUAAAACYWgJAARMAAAAAgkAAaQAAAABBQAAAAJhaQkABEwAAAACCQABpAAAAAEFAAAAAmFqCQAETAAAAAIJAAGkAAAAAQUAAAACYWsFAAAAA25pbAEAAAACYUoAAAADAAAAAU0AAAABQwAAAAJhSwQAAAACYUwJAAS1AAAAAggFAAAAAmFLAAAAA2tleQIAAAABXwMJAQAAAAIhPQAAAAIJAAGQAAAAAQUAAAACYUwAAAAAAAAAAAIJAAACAAAAAQIAAAA+SW52YWxpZCBkYXRhIGtleSBmb3JtYXQuIEl0IG11c3QgZm9sbG93IHRvICR7c2Vzc2lvbklkfV8ke251bX0EAAAAAmFNCQABkQAAAAIFAAAAAmFMAAAAAAAAAAAABAAAAAJhTgkAAZEAAAACBQAAAAJhTAAAAAAAAAAAAQMJAQAAAAIhPQAAAAIFAAAAAU0FAAAAAmFNCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAALFNldmVyYWwgZGF0YSBrZXlzIGhhdmUgZGlmZmVyZW50IHNlc3Npb25JZDogBQAAAAFNAgAAAAUgYW5kIAUAAAACYU0DCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAR0aGlzCAUAAAACYUsAAAADa2V5CQAAAgAAAAEJAAEsAAAAAgIAAABBT25lIG9mIHRoZSBkYXRhIGtleXMgaGFzIGFscmVhZHkgcHJlc2VudGVkIGluIGFjY291bnQgc3RhdGU6IGtleT0IBQAAAAJhSwAAAANrZXkDCQAAZgAAAAIJAAExAAAAAQUAAAACYU4AAAAAAAAAAAQJAAACAAAAAQIAAABtSW52YWxpZCBkYXRhIGtleSBmb3JtYXQuIEl0IG11c3QgZm9sbG93IHRvICR7c2Vzc2lvbklkfV8ke251bX0gd2hlcmUgJHtudW19IGxlbmd0aCBjb3VsZG4ndCBiZSBncmVhdGVyIHRoYW4gNAMJAAAAAAAAAgkAAS8AAAACBQAAAAJhTgAAAAAAAAAAAQIAAAABMAkAAAIAAAABAgAAAGFJbnZhbGlkIGRhdGEga2V5IGZvcm1hdC4gSXQgbXVzdCBmb2xsb3cgdG8gJHtzZXNzaW9uSWR9XyR7bnVtfSB3aGVyZSAke251bX0gY291bGRuJ3Qgc3RhcnQgZnJvbSAwBAAAAAJhTwkABLYAAAABBQAAAAJhTgMJAQAAAAlpc0RlZmluZWQAAAABBQAAAAJhTwQAAAACYVAJAQAAAAdleHRyYWN0AAAAAQUAAAACYU8DAwkAAGYAAAACAAAAAAAAAAABBQAAAAJhUAYJAABmAAAAAgUAAAACYVAFAAAAAUMJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAD5JbnZhbGlkIGRhdGEga2V5IGZvcm1hdC4gSXQgbXVzdCBmb2xsb3cgdG8gJHtzZXNzaW9uSWR9XyR7bnVtfQIAAAAyIHdoZXJlICR7bnVtfSBtdXN0IGJlIGEgdmFsaWQgaW50IHZhbHVlIGZyb20gMSB0byAJAAGkAAAAAQUAAAABQwIAAAAPIGJ1dCBhY3R1YWxOdW09CQABpAAAAAEFAAAAAmFQBAAAAAJhUQgFAAAAAmFLAAAABXZhbHVlAwkAAAEAAAACBQAAAAJhUQIAAAAGU3RyaW5nBAAAAAJhUgUAAAACYVEGCQAAAgAAAAEJAAEsAAAAAgUAAAABTQIAAAA5IGRyYXc6IG9ubHkgU3RyaW5nIHR5cGUgaXMgYWNjZXB0ZWQgZm9yIGRhdGEgdHJhbnNhY3Rpb25zCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAD5JbnZhbGlkIGRhdGEga2V5IGZvcm1hdC4gSXQgbXVzdCBmb2xsb3cgdG8gJHtzZXNzaW9uSWR9XyR7bnVtfQIAAABGIHdoZXJlICR7bnVtfSBtdXN0IGJlIGEgdmFsaWQgaW50IHZhbHVlIGZyb20gMSB0byAzMTI1MCBidXQgYWN0dWFsTnVtPQUAAAACYU4BAAAAAmFTAAAAAwAAAAFBAAAAAmFUAAAAAmFVBAAAAAJhVgAAAAAAAAAD6AQAAAACYVcJAABpAAAAAgkAAGgAAAACAAAAAAAAAAANBQAAAAFjAAAAAAAAAABkBAAAAAJhWAAAAAAAAAAAMgQAAAACYVkJAABpAAAAAgkAAGgAAAACAAAAAAAAAAAIBQAAAAFjAAAAAAAAAABkBAAAAAJhWgAAAAAAAAATiAQAAAACYmEJAABpAAAAAgkAAGgAAAACAAAAAAAAAAEpBQAAAAFjAAAAAAAAAABkBAAAAAJiYgAAAAAAAAAD6AQAAAACYmMJAABpAAAAAgkAAGgAAAACAAAAAAAAAACPBQAAAAFjAAAAAAAAAABkBAAAAAJiZAAAAAAAAADDUAQAAAACYmUJAABpAAAAAgkAAGgAAAACAAAAAAAAAAWTBQAAAAFjAAAAAAAAAABkBAAAAAJiZgAAAAAAAAATiAQAAAACYmcJAABpAAAAAgkAAGgAAAACAAAAAAAAAALBBQAAAAFjAAAAAAAAAABkBAAAAAJiaAMJAABmAAAAAgUAAAACYVYFAAAAAUEJAABkAAAAAgUAAAACYVcJAABoAAAAAgkAAGkAAAACBQAAAAFBBQAAAAJhWAUAAAACYVkDCQAAZgAAAAIFAAAAAmFaBQAAAAFBCQAAZAAAAAIFAAAAAmJhCQAAaAAAAAIJAABlAAAAAgkAAGkAAAACBQAAAAFBBQAAAAJiYgAAAAAAAAAAAQUAAAACYmMDCQAAZgAAAAIFAAAAAmJkBQAAAAFBCQAAZAAAAAIFAAAAAmJlCQAAaAAAAAIJAABlAAAAAgkAAGkAAAACBQAAAAFBBQAAAAJiZgAAAAAAAAAAAQUAAAACYmcJAAACAAAAAQIAAAA9UGxlYXNlIGNvbnRhY3Qgb3VyIHNhbGVzIHRlYW0gdG8gZ2VuZXJhdGUgbW9yZSB0aGFuIDUwayByYW5kcwQAAAACYmkJAABkAAAAAgUAAAACYmgFAAAAAmFVAwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAJhVAAAAAdhc3NldElkCQAAAgAAAAECAAAAOE9ubHkgV0FWRVMgY2FuIGJlIHVzZWQgYXMgYSBwYXltZW50IGZvciByYW5kcyBnZW5lcmF0aW9uAwkAAGYAAAACBQAAAAJiaQgFAAAAAmFUAAAABmFtb3VudAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAApQXR0YWNoZWQgcGF5bWVudCBpcyB0byBzbWFsbCB0byBnZW5lcmF0ZSAJAAGkAAAAAQUAAAABQQIAAABBIHVuaXF1ZSByYW5kb21zIG51bWJlcnMgYW5kIHVwbG9hZCBhdCBsZWFzdCAxIGRhdGEgdHg6IGFjdHVhbFBtdD0JAAGkAAAAAQgFAAAAAmFUAAAABmFtb3VudAIAAAAPIGJ1dCBtaW5QbXQgaXMgCQABpAAAAAEFAAAAAmJpBQAAAAJiaAAAAAIAAAACYmoBAAAACGluaXREcmF3AAAAAwAAAAF5AAAAAXoAAAABQQQAAAABTQkAAlgAAAABCAUAAAACYmoAAAANdHJhbnNhY3Rpb25JZAQAAAACYmsJAABkAAAAAgkAAGUAAAACBQAAAAF6BQAAAAF5AAAAAAAAAAABBAAAAAJibAkAAGkAAAACBQAAAAJiawAAAAAAAAAAAgQAAAACYm0JAAExAAAAAQkAAaQAAAABCQAAZQAAAAIFAAAAAXoAAAAAAAAAAAEEAAAAAmJuCQABMQAAAAEJAAGkAAAAAQUAAAABQQQAAAACYm8JAABkAAAAAgkAAGQAAAACCQAAaAAAAAIAAAAAAAAAAAIFAAAAAmJtCQAAaAAAAAIAAAAAAAAAAAIFAAAAAmJuAAAAAAAAAAAEBAAAAAJicAkAAGkAAAACCQAAZQAAAAIJAABlAAAAAgAAAAAAAAAUAAAAAAAAAAAArwUAAAACYm8JAABkAAAAAgUAAAACYm0AAAAAAAAAAAEDAwkAAGcAAAACAAAAAAAAAAAABQAAAAF5BgkAAGcAAAACAAAAAAAAAAAABQAAAAF6CQAAAgAAAAECAAAAKnJhbmRGcm9tIGFuZCByYW5kVG8gbXVzdCBiZSBncmVhdGVyIHRoYW4gMAMJAABnAAAAAgUAAAABeQUAAAABegkAAAIAAAABAgAAAChyYW5kRnJvbSBtdXN0IGJlIHN0cmljdCBsZXNzIHRoZW4gcmFuZFRvAwkAAGYAAAACBQAAAAFBBQAAAAJiawkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAF0ltcG9zc2libGUgdG8gZ2VuZXJhdGUgCQABpAAAAAEFAAAAAUECAAAAKyB1bmlxdWUgbnVtYmVycyBmb3IgcHJvdmlkZWQgcmFuZG9tIHJhbmdlIFsJAAGkAAAAAQUAAAABeQIAAAACLCAJAAGkAAAAAQUAAAABegIAAAATXSB3aXRoIGFjdHVhbCBzaXplIAkAAaQAAAABBQAAAAJiawMJAABmAAAAAgUAAAABQQUAAAACYmwJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAABAcmFuZHNDb3VudCBtdXN0IGJlIGxlc3MgdGhlbiA1MCUgb2YgcGFzc2VkIHJhbmdlIGxlbmd0aDogcmFuZ2U9WwkAAaQAAAABBQAAAAF5AgAAAAIsIAkAAaQAAAABBQAAAAF6AgAAAA9dLCByYW5nZUxlbmd0aD0JAAGkAAAAAQUAAAACYmsCAAAADCByYW5kc0NvdW50PQkAAaQAAAABBQAAAAFBAgAAABMgYWxsb3dlZFJhbmRzQ291bnQ9CQABpAAAAAEFAAAAAmJsAwkAAGYAAAACBQAAAAFBBQAAAAJicAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAA8cmFuZHNDb3VudCBjb3VsZG4ndCBiZSBrZXB0IGluIDEgZGF0YSBlbnRyeTogMV9yYW5kTnVtU3BhY2U9CQABpAAAAAEJAABkAAAAAgUAAAACYm0AAAAAAAAAAAECAAAAFiBtYXhBbGxvd2VkUmFuZHNDb3VudD0JAAGkAAAAAQUAAAACYnACAAAAEiBhY3R1YWxSYW5kc0NvdW50PQkAAaQAAAABBQAAAAFBAwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAAmJqAAAAB3BheW1lbnQJAAACAAAAAQIAAAA4UGxlYXNlIHByb3ZpZGUgcGF5bWVudCB0byBnZW5lcmF0ZSB1bmlxdWUgcmFuZG9tIG51bWJlcnMEAAAAAmFUCQEAAAAHZXh0cmFjdAAAAAEIBQAAAAJiagAAAAdwYXltZW50BAAAAAJhVQkAAGQAAAACCQAAaAAAAAIJAABpAAAAAgkAAGgAAAACBQAAAAFjAAAAAAAAAAABAAAAAAAAAAPoAAAAAAAAAAAhCQAAaQAAAAIJAABoAAAAAgUAAAABYwAAAAAAAAAABAAAAAAAAAAD6AQAAAACYnEJAQAAAAJhUwAAAAMFAAAAAUEFAAAAAmFUBQAAAAJhVQQAAAACYnIJAABlAAAAAggFAAAAAmFUAAAABmFtb3VudAUAAAACYnEEAAAAAmJzCQAAaQAAAAIFAAAAAmJyBQAAAAJhVQQAAAABQwMJAABnAAAAAgAAAAAAAAB6EgkAAGgAAAACBQAAAAJicwAAAAAAAAAABQkAAGgAAAACBQAAAAJicwAAAAAAAAAABQAAAAAAAAB6EgQAAAABeAkAAlgAAAABCAUAAAACYmoAAAAPY2FsbGVyUHVibGljS2V5BAAAAAJidAkAAaQAAAABBQAAAAFBBAAAAAJidQkBAAAAAXYAAAAOBQAAAAFoBQAAAAF4CQABpAAAAAEFAAAAAXkJAAGkAAAAAQUAAAABegUAAAACYnQFAAAAAmJ0CQABpAAAAAEFAAAAAUMJAAJYAAAAAQgFAAAAAmJqAAAADXRyYW5zYWN0aW9uSWQCAAAAATACAAAAATACAAAAATECAAAAATACAAAAATECAAAAAAkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAAAU0FAAAAAmJ1BQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAABYgUAAAACYnEFAAAABHVuaXQFAAAAA25pbAAAAAJiagEAAAAGcmFuZG9tAAAAAgAAAAFNAAAAAVoEAAAAAmJ2CQEAAAABTAAAAAEFAAAAAU0EAAAAAXcJAAGRAAAAAgUAAAACYnYFAAAAAWoEAAAAAXgJAAGRAAAAAgUAAAACYnYFAAAAAWsEAAAAAmJ0CQABkQAAAAIFAAAAAmJ2BQAAAAFuBAAAAAJidwkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAmJ2BQAAAAFvBAAAAAJhYQkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAmJ2BQAAAAFyBAAAAAFSCQABkQAAAAIFAAAAAmJ2BQAAAAFzBAAAAAJieAkAAZEAAAACBQAAAAJidgUAAAABbAQAAAACYnkJAAGRAAAAAgUAAAACYnYFAAAAAW0EAAAAAUQJAAGRAAAAAgUAAAACYnYFAAAAAXEEAAAAAUYJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJidgAAAAAAAAAACQQAAAABRwkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAmJ2AAAAAAAAAAAKBAAAAAFICQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACYnYAAAAAAAAAAAsEAAAAAUkJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJidgAAAAAAAAAADAQAAAABWAkBAAAADXBhcnNlSW50VmFsdWUAAAABBQAAAAJieAQAAAABWQkBAAAADXBhcnNlSW50VmFsdWUAAAABBQAAAAJieQQAAAACYnoJAAJZAAAAAQUAAAABeAMJAQAAAAIhPQAAAAIFAAAAAXcFAAAAAWgJAAACAAAAAQkAASwAAAACBQAAAAFNAgAAADsgZHJhdzogaXQgbXVzdCBiZSBpbiBSRUFEWSBzdGF0ZSB0byBnZW5lcmF0ZSByYW5kb20gbnVtYmVycwMHCQAAAgAAAAECAAAAFUludmFsaWQgUlNBIHNpZ25hdHVyZQQAAAACYkEJAQAAAAFXAAAACwUAAAABTQUAAAABWAUAAAABWQUAAAABWgUAAAABUgUAAAACYncFAAAAAmFhBQAAAAFGBQAAAAFHBQAAAAFIBQAAAAFJBAAAAAJiQgkAAZEAAAACBQAAAAJiQQAAAAAAAAAAAQQAAAACYkMDCQAAAAAAAAIFAAAAAmJCAgAAAAEwBQAAAAFpBQAAAAFoCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAAAU0CAAAABnRlc3QtMQUAAAACYkMJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAABTQIAAAAGdGVzdC0yBQAAAAJiQgUAAAADbmlsAAAAAGADpQw=",
    "height": 1835326,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DNUwRDcMVr2zo8U9jGueDAby4Gi51tngHHJJbHtjifkH
Next: 4asSuTtY4kv3Ta6iw5QBpsRp7g6WnftavSm7k4BinUoQ

Diff: 
Old New Differences
270 270                  let newState = if ((newRemainRandsCountStr == "0"))
271 271                      then STATEFINISHED
272 272                      else DATADONE
273 -                 WriteSet([DataEntry(sessionId, formatStateDataStr(newState, organizerPubKey58, fromStr, toStr, randsCountStr, newRemainRandsCountStr, drawParamsList[IdxDataKeysCount], dataDoneTxId, randGenInfo[2], randGenInfo[3], randGenInfo[4], randGenInfo[5], randGenInfo[6], randGenInfo[0]))])
273 +                 WriteSet([DataEntry((sessionId + "test-1"), newState), DataEntry((sessionId + "test-2"), newRemainRandsCountStr)])
274 274                  }
275 275      }
276 276  
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 79      let newOffsetBytes = newIncList[0]
80 80      let newSlowIdx1 = newIncList[1]
81 81      let newSlowIdx2 = newIncList[2]
82 82      let newFastIdx1 = newIncList[3]
83 83      let newFastIdx2 = newIncList[4]
84 84      let byteVect = (((((((take(drop(rsaSign, newSlowIdx1), 1) + take(drop(rsaSign, 1), 1)) + take(drop(rsaSign, newFastIdx1), 1)) + take(drop(rsaSign, 3), 1)) + take(drop(rsaSign, newSlowIdx2), 1)) + take(drop(rsaSign, 5), 1)) + take(drop(rsaSign, 6), 1)) + take(drop(rsaSign, newFastIdx2), 1))
85 85      let randHash = ((sha256(byteVect) + blake2b256(byteVect)) + keccak256(byteVect))
86 86      let div = ((to - from) + 1)
87 87      let rand1 = nextRand(div, from, currRandsStr, remainingRands, drop(randHash, newOffsetBytes))
88 88      let rem1 = if ((rand1[1] != ""))
89 89          then (remainingRands - 1)
90 90          else remainingRands
91 91      let rand2 = nextRand(div, from, rand1[0], rem1, drop(randHash, (newOffsetBytes + 1)))
92 92      let rem2 = if ((rand2[1] != ""))
93 93          then (rem1 - 1)
94 94          else rem1
95 95      let rand3 = nextRand(div, from, rand2[0], rem2, drop(randHash, (newOffsetBytes + 2)))
96 96      let rem3 = if ((rand3[1] != ""))
97 97          then (rem2 - 1)
98 98          else rem2
99 99      let rand4 = nextRand(div, from, rand3[0], rem3, drop(randHash, (newOffsetBytes + 3)))
100 100      let rem4 = if ((rand4[1] != ""))
101 101          then (rem3 - 1)
102 102          else rem3
103 103      let rand5 = nextRand(div, from, rand4[0], rem4, drop(randHash, (newOffsetBytes + 4)))
104 104      let rem5 = if ((rand5[1] != ""))
105 105          then (rem4 - 1)
106 106          else rem4
107 107      let rand6 = nextRand(div, from, rand5[0], rem5, drop(randHash, (newOffsetBytes + 5)))
108 108      let rem6 = if ((rand6[1] != ""))
109 109          then (rem5 - 1)
110 110          else rem5
111 111      let rand7 = nextRand(div, from, rand6[0], rem6, drop(randHash, (newOffsetBytes + 6)))
112 112      let rem7 = if ((rand7[1] != ""))
113 113          then (rem6 - 1)
114 114          else rem6
115 115      let rand8 = nextRand(div, from, rand7[0], rem7, drop(randHash, (newOffsetBytes + 7)))
116 116      let rem8 = if ((rand8[1] != ""))
117 117          then (rem7 - 1)
118 118          else rem7
119 119      let rand9 = nextRand(div, from, rand8[0], rem8, drop(randHash, (newOffsetBytes + 8)))
120 120      let rem9 = if ((rand9[1] != ""))
121 121          then (rem8 - 1)
122 122          else rem8
123 123      let rand10 = nextRand(div, from, rand9[0], rem9, drop(randHash, (newOffsetBytes + 9)))
124 124      let rem10 = if ((rand10[1] != ""))
125 125          then (rem9 - 1)
126 126          else rem9
127 127      let rand11 = nextRand(div, from, rand10[0], rem10, drop(randHash, (newOffsetBytes + 10)))
128 128      let rem11 = if ((rand11[1] != ""))
129 129          then (rem10 - 1)
130 130          else rem10
131 131  [rand11[0], if ((rem11 == 0))
132 132          then "0"
133 133          else toString(rem11), toString((newOffsetBytes + 10)), toString(newSlowIdx1), toString(newSlowIdx2), toString(newFastIdx1), toString(newFastIdx2)]
134 134      }
135 135  
136 136  
137 137  func validateDtxKey (sessionId,dataKeysCount,data) = {
138 138      let dataKeyInfo = split(data.key, "_")
139 139      if ((size(dataKeyInfo) != 2))
140 140          then throw("Invalid data key format. It must follow to ${sessionId}_${num}")
141 141          else {
142 142              let keySessionId = dataKeyInfo[0]
143 143              let keyPostfix = dataKeyInfo[1]
144 144              if ((sessionId != keySessionId))
145 145                  then throw(((("Several data keys have different sessionId: " + sessionId) + " and ") + keySessionId))
146 146                  else if (isDefined(getString(this, data.key)))
147 147                      then throw(("One of the data keys has already presented in account state: key=" + data.key))
148 148                      else if ((size(keyPostfix) > 4))
149 149                          then throw("Invalid data key format. It must follow to ${sessionId}_${num} where ${num} length couldn't be greater than 4")
150 150                          else if ((take(keyPostfix, 1) == "0"))
151 151                              then throw("Invalid data key format. It must follow to ${sessionId}_${num} where ${num} couldn't start from 0")
152 152                              else {
153 153                                  let keyPostfixIntOpt = parseInt(keyPostfix)
154 154                                  if (isDefined(keyPostfixIntOpt))
155 155                                      then {
156 156                                          let keyPostfixInt = extract(keyPostfixIntOpt)
157 157                                          if (if ((1 > keyPostfixInt))
158 158                                              then true
159 159                                              else (keyPostfixInt > dataKeysCount))
160 160                                              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)))
161 161                                              else                                             match data.value {
162 162                                                  case str: String => 
163 163                                                      true
164 164                                                  case _ => 
165 165                                                      throw((sessionId + " draw: only String type is accepted for data transactions"))
166 166                                              }
167 167                                          }
168 168                                      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))
169 169                                  }
170 170              }
171 171      }
172 172  
173 173  
174 174  func validateAndGetRandsPmt (randsCount,pmt,minDataPmt) = {
175 175      let bound1 = 1000
176 176      let basePrice1 = ((13 * WAVELET) / 100)
177 177      let div1 = 50
178 178      let diff1 = ((8 * WAVELET) / 100)
179 179      let bound2 = 5000
180 180      let basePrice2 = ((297 * WAVELET) / 100)
181 181      let div2 = 1000
182 182      let diff2 = ((143 * WAVELET) / 100)
183 183      let bound3 = 50000
184 184      let basePrice3 = ((1427 * WAVELET) / 100)
185 185      let div3 = 5000
186 186      let diff3 = ((705 * WAVELET) / 100)
187 187      let minRandsPmt = if ((bound1 > randsCount))
188 188          then (basePrice1 + ((randsCount / div1) * diff1))
189 189          else if ((bound2 > randsCount))
190 190              then (basePrice2 + (((randsCount / div2) - 1) * diff2))
191 191              else if ((bound3 > randsCount))
192 192                  then (basePrice3 + (((randsCount / div3) - 1) * diff3))
193 193                  else throw("Please contact our sales team to generate more than 50k rands")
194 194      let minPmt = (minRandsPmt + minDataPmt)
195 195      if (isDefined(pmt.assetId))
196 196          then throw("Only WAVES can be used as a payment for rands generation")
197 197          else if ((minPmt > pmt.amount))
198 198              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)))
199 199              else minRandsPmt
200 200      }
201 201  
202 202  
203 203  @Callable(i)
204 204  func initDraw (randFrom,randTo,randsCount) = {
205 205      let sessionId = toBase58String(i.transactionId)
206 206      let rangeLength = ((randTo - randFrom) + 1)
207 207      let maxRangeLength = (rangeLength / 2)
208 208      let randToLen = size(toString((randTo - 1)))
209 209      let randsCountLen = size(toString(randsCount))
210 210      let dynamicStatusLen = (((2 * randToLen) + (2 * randsCountLen)) + 4)
211 211      let maxRandsCount = (((5120 - 175) - dynamicStatusLen) / (randToLen + 1))
212 212      if (if ((0 >= randFrom))
213 213          then true
214 214          else (0 >= randTo))
215 215          then throw("randFrom and randTo must be greater than 0")
216 216          else if ((randFrom >= randTo))
217 217              then throw("randFrom must be strict less then randTo")
218 218              else if ((randsCount > rangeLength))
219 219                  then throw(((((((("Impossible to generate " + toString(randsCount)) + " unique numbers for provided random range [") + toString(randFrom)) + ", ") + toString(randTo)) + "] with actual size ") + toString(rangeLength)))
220 220                  else if ((randsCount > maxRangeLength))
221 221                      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)))
222 222                      else if ((randsCount > maxRandsCount))
223 223                          then throw(((((("randsCount couldn't be kept in 1 data entry: 1_randNumSpace=" + toString((randToLen + 1))) + " maxAllowedRandsCount=") + toString(maxRandsCount)) + " actualRandsCount=") + toString(randsCount)))
224 224                          else if (!(isDefined(i.payment)))
225 225                              then throw("Please provide payment to generate unique random numbers")
226 226                              else {
227 227                                  let pmt = extract(i.payment)
228 228                                  let minDataPmt = ((((WAVELET * 1) / 1000) * 33) + ((WAVELET * 4) / 1000))
229 229                                  let randsPmt = validateAndGetRandsPmt(randsCount, pmt, minDataPmt)
230 230                                  let dataPmt = (pmt.amount - randsPmt)
231 231                                  let dataTxCount = (dataPmt / minDataPmt)
232 232                                  let dataKeysCount = if ((31250 >= (dataTxCount * 5)))
233 233                                      then (dataTxCount * 5)
234 234                                      else 31250
235 235                                  let organizerPubKey58 = toBase58String(i.callerPublicKey)
236 236                                  let randsCountStr = toString(randsCount)
237 237                                  let initState = formatStateDataStr(DATADONE, organizerPubKey58, toString(randFrom), toString(randTo), randsCountStr, randsCountStr, toString(dataKeysCount), toBase58String(i.transactionId), "0", "0", "1", "0", "1", "")
238 238                                  ScriptResult(WriteSet([DataEntry(sessionId, initState)]), TransferSet([ScriptTransfer(SERVER, randsPmt, unit)]))
239 239                                  }
240 240      }
241 241  
242 242  
243 243  
244 244  @Callable(i)
245 245  func random (sessionId,rsaSign) = {
246 246      let drawParamsList = extractGameDataList(sessionId)
247 247      let drawState = drawParamsList[IdxState]
248 248      let organizerPubKey58 = drawParamsList[IdxOrganizerPub]
249 249      let randsCountStr = drawParamsList[IdxRandsCount]
250 250      let remainRandsCount = parseIntValue(drawParamsList[IdxRemainRandsCount])
251 251      let lastOffsetBytes = parseIntValue(drawParamsList[IdxLastOffset])
252 252      let currRandsStr = drawParamsList[IdxCurrRands]
253 253      let fromStr = drawParamsList[IdxRandFrom]
254 254      let toStr = drawParamsList[IdxRandTo]
255 255      let dataDoneTxId = drawParamsList[IdxDataDoneTxId]
256 256      let slowIdx1 = parseIntValue(drawParamsList[9])
257 257      let slowIdx2 = parseIntValue(drawParamsList[10])
258 258      let fastIdx1 = parseIntValue(drawParamsList[11])
259 259      let fastIdx2 = parseIntValue(drawParamsList[12])
260 260      let from = parseIntValue(fromStr)
261 261      let to = parseIntValue(toStr)
262 262      let organizerPubKey = fromBase58String(organizerPubKey58)
263 263      if ((drawState != DATADONE))
264 264          then throw((sessionId + " draw: it must be in READY state to generate random numbers"))
265 265          else if (false)
266 266              then throw("Invalid RSA signature")
267 267              else {
268 268                  let randGenInfo = generateRand(sessionId, from, to, rsaSign, currRandsStr, remainRandsCount, lastOffsetBytes, slowIdx1, slowIdx2, fastIdx1, fastIdx2)
269 269                  let newRemainRandsCountStr = randGenInfo[1]
270 270                  let newState = if ((newRemainRandsCountStr == "0"))
271 271                      then STATEFINISHED
272 272                      else DATADONE
273 -                 WriteSet([DataEntry(sessionId, formatStateDataStr(newState, organizerPubKey58, fromStr, toStr, randsCountStr, newRemainRandsCountStr, drawParamsList[IdxDataKeysCount], dataDoneTxId, randGenInfo[2], randGenInfo[3], randGenInfo[4], randGenInfo[5], randGenInfo[6], randGenInfo[0]))])
273 +                 WriteSet([DataEntry((sessionId + "test-1"), newState), DataEntry((sessionId + "test-2"), newRemainRandsCountStr)])
274 274                  }
275 275      }
276 276  
277 277

Old	New		Differences
270	270		let newState = if ((newRemainRandsCountStr == "0"))
271	271		then STATEFINISHED
272	272		else DATADONE
273		-	WriteSet([DataEntry(sessionId, ~~formatStateDataStr(~~newState, ~~organizerPubKey58, fromStr,~~ ~~toStr, randsCountStr~~, newRemainRandsCountStr~~, drawParamsList[IdxDataKeysCount], dataDoneTxId, randGenInfo[2], randGenInfo[3], randGenInfo[4], randGenInfo[5], randGenInfo[6], randGenInfo[0])~~)])
	273	+	WriteSet([DataEntry((sessionId + "test-1"), newState), DataEntry((sessionId + "test-2"), newRemainRandsCountStr)])
274	274		}
275	275		}
276	276

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	79		let newOffsetBytes = newIncList[0]
80	80		let newSlowIdx1 = newIncList[1]
81	81		let newSlowIdx2 = newIncList[2]
82	82		let newFastIdx1 = newIncList[3]
83	83		let newFastIdx2 = newIncList[4]
84	84		let byteVect = (((((((take(drop(rsaSign, newSlowIdx1), 1) + take(drop(rsaSign, 1), 1)) + take(drop(rsaSign, newFastIdx1), 1)) + take(drop(rsaSign, 3), 1)) + take(drop(rsaSign, newSlowIdx2), 1)) + take(drop(rsaSign, 5), 1)) + take(drop(rsaSign, 6), 1)) + take(drop(rsaSign, newFastIdx2), 1))
85	85		let randHash = ((sha256(byteVect) + blake2b256(byteVect)) + keccak256(byteVect))
86	86		let div = ((to - from) + 1)
87	87		let rand1 = nextRand(div, from, currRandsStr, remainingRands, drop(randHash, newOffsetBytes))
88	88		let rem1 = if ((rand1[1] != ""))
89	89		then (remainingRands - 1)
90	90		else remainingRands
91	91		let rand2 = nextRand(div, from, rand1[0], rem1, drop(randHash, (newOffsetBytes + 1)))
92	92		let rem2 = if ((rand2[1] != ""))
93	93		then (rem1 - 1)
94	94		else rem1
95	95		let rand3 = nextRand(div, from, rand2[0], rem2, drop(randHash, (newOffsetBytes + 2)))
96	96		let rem3 = if ((rand3[1] != ""))
97	97		then (rem2 - 1)
98	98		else rem2
99	99		let rand4 = nextRand(div, from, rand3[0], rem3, drop(randHash, (newOffsetBytes + 3)))
100	100		let rem4 = if ((rand4[1] != ""))
101	101		then (rem3 - 1)
102	102		else rem3
103	103		let rand5 = nextRand(div, from, rand4[0], rem4, drop(randHash, (newOffsetBytes + 4)))
104	104		let rem5 = if ((rand5[1] != ""))
105	105		then (rem4 - 1)
106	106		else rem4
107	107		let rand6 = nextRand(div, from, rand5[0], rem5, drop(randHash, (newOffsetBytes + 5)))
108	108		let rem6 = if ((rand6[1] != ""))
109	109		then (rem5 - 1)
110	110		else rem5
111	111		let rand7 = nextRand(div, from, rand6[0], rem6, drop(randHash, (newOffsetBytes + 6)))
112	112		let rem7 = if ((rand7[1] != ""))
113	113		then (rem6 - 1)
114	114		else rem6
115	115		let rand8 = nextRand(div, from, rand7[0], rem7, drop(randHash, (newOffsetBytes + 7)))
116	116		let rem8 = if ((rand8[1] != ""))
117	117		then (rem7 - 1)
118	118		else rem7
119	119		let rand9 = nextRand(div, from, rand8[0], rem8, drop(randHash, (newOffsetBytes + 8)))
120	120		let rem9 = if ((rand9[1] != ""))
121	121		then (rem8 - 1)
122	122		else rem8
123	123		let rand10 = nextRand(div, from, rand9[0], rem9, drop(randHash, (newOffsetBytes + 9)))
124	124		let rem10 = if ((rand10[1] != ""))
125	125		then (rem9 - 1)
126	126		else rem9
127	127		let rand11 = nextRand(div, from, rand10[0], rem10, drop(randHash, (newOffsetBytes + 10)))
128	128		let rem11 = if ((rand11[1] != ""))
129	129		then (rem10 - 1)
130	130		else rem10
131	131		[rand11[0], if ((rem11 == 0))
132	132		then "0"
133	133		else toString(rem11), toString((newOffsetBytes + 10)), toString(newSlowIdx1), toString(newSlowIdx2), toString(newFastIdx1), toString(newFastIdx2)]
134	134		}
135	135
136	136
137	137		func validateDtxKey (sessionId,dataKeysCount,data) = {
138	138		let dataKeyInfo = split(data.key, "_")
139	139		if ((size(dataKeyInfo) != 2))
140	140		then throw("Invalid data key format. It must follow to ${sessionId}_${num}")
141	141		else {
142	142		let keySessionId = dataKeyInfo[0]
143	143		let keyPostfix = dataKeyInfo[1]
144	144		if ((sessionId != keySessionId))
145	145		then throw(((("Several data keys have different sessionId: " + sessionId) + " and ") + keySessionId))
146	146		else if (isDefined(getString(this, data.key)))
147	147		then throw(("One of the data keys has already presented in account state: key=" + data.key))
148	148		else if ((size(keyPostfix) > 4))
149	149		then throw("Invalid data key format. It must follow to ${sessionId}_${num} where ${num} length couldn't be greater than 4")
150	150		else if ((take(keyPostfix, 1) == "0"))
151	151		then throw("Invalid data key format. It must follow to ${sessionId}_${num} where ${num} couldn't start from 0")
152	152		else {
153	153		let keyPostfixIntOpt = parseInt(keyPostfix)
154	154		if (isDefined(keyPostfixIntOpt))
155	155		then {
156	156		let keyPostfixInt = extract(keyPostfixIntOpt)
157	157		if (if ((1 > keyPostfixInt))
158	158		then true
159	159		else (keyPostfixInt > dataKeysCount))
160	160		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)))
161	161		else match data.value {
162	162		case str: String =>
163	163		true
164	164		case _ =>
165	165		throw((sessionId + " draw: only String type is accepted for data transactions"))
166	166		}
167	167		}
168	168		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))
169	169		}
170	170		}
171	171		}
172	172
173	173
174	174		func validateAndGetRandsPmt (randsCount,pmt,minDataPmt) = {
175	175		let bound1 = 1000
176	176		let basePrice1 = ((13 * WAVELET) / 100)
177	177		let div1 = 50
178	178		let diff1 = ((8 * WAVELET) / 100)
179	179		let bound2 = 5000
180	180		let basePrice2 = ((297 * WAVELET) / 100)
181	181		let div2 = 1000
182	182		let diff2 = ((143 * WAVELET) / 100)
183	183		let bound3 = 50000
184	184		let basePrice3 = ((1427 * WAVELET) / 100)
185	185		let div3 = 5000
186	186		let diff3 = ((705 * WAVELET) / 100)
187	187		let minRandsPmt = if ((bound1 > randsCount))
188	188		then (basePrice1 + ((randsCount / div1) * diff1))
189	189		else if ((bound2 > randsCount))
190	190		then (basePrice2 + (((randsCount / div2) - 1) * diff2))
191	191		else if ((bound3 > randsCount))
192	192		then (basePrice3 + (((randsCount / div3) - 1) * diff3))
193	193		else throw("Please contact our sales team to generate more than 50k rands")
194	194		let minPmt = (minRandsPmt + minDataPmt)
195	195		if (isDefined(pmt.assetId))
196	196		then throw("Only WAVES can be used as a payment for rands generation")
197	197		else if ((minPmt > pmt.amount))
198	198		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)))
199	199		else minRandsPmt
200	200		}
201	201
202	202
203	203		@Callable(i)
204	204		func initDraw (randFrom,randTo,randsCount) = {
205	205		let sessionId = toBase58String(i.transactionId)
206	206		let rangeLength = ((randTo - randFrom) + 1)
207	207		let maxRangeLength = (rangeLength / 2)
208	208		let randToLen = size(toString((randTo - 1)))
209	209		let randsCountLen = size(toString(randsCount))
210	210		let dynamicStatusLen = (((2 * randToLen) + (2 * randsCountLen)) + 4)
211	211		let maxRandsCount = (((5120 - 175) - dynamicStatusLen) / (randToLen + 1))
212	212		if (if ((0 >= randFrom))
213	213		then true
214	214		else (0 >= randTo))
215	215		then throw("randFrom and randTo must be greater than 0")
216	216		else if ((randFrom >= randTo))
217	217		then throw("randFrom must be strict less then randTo")
218	218		else if ((randsCount > rangeLength))
219	219		then throw(((((((("Impossible to generate " + toString(randsCount)) + " unique numbers for provided random range [") + toString(randFrom)) + ", ") + toString(randTo)) + "] with actual size ") + toString(rangeLength)))
220	220		else if ((randsCount > maxRangeLength))
221	221		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)))
222	222		else if ((randsCount > maxRandsCount))
223	223		then throw(((((("randsCount couldn't be kept in 1 data entry: 1_randNumSpace=" + toString((randToLen + 1))) + " maxAllowedRandsCount=") + toString(maxRandsCount)) + " actualRandsCount=") + toString(randsCount)))
224	224		else if (!(isDefined(i.payment)))
225	225		then throw("Please provide payment to generate unique random numbers")
226	226		else {
227	227		let pmt = extract(i.payment)
228	228		let minDataPmt = ((((WAVELET * 1) / 1000) * 33) + ((WAVELET * 4) / 1000))
229	229		let randsPmt = validateAndGetRandsPmt(randsCount, pmt, minDataPmt)
230	230		let dataPmt = (pmt.amount - randsPmt)
231	231		let dataTxCount = (dataPmt / minDataPmt)
232	232		let dataKeysCount = if ((31250 >= (dataTxCount * 5)))
233	233		then (dataTxCount * 5)
234	234		else 31250
235	235		let organizerPubKey58 = toBase58String(i.callerPublicKey)
236	236		let randsCountStr = toString(randsCount)
237	237		let initState = formatStateDataStr(DATADONE, organizerPubKey58, toString(randFrom), toString(randTo), randsCountStr, randsCountStr, toString(dataKeysCount), toBase58String(i.transactionId), "0", "0", "1", "0", "1", "")
238	238		ScriptResult(WriteSet([DataEntry(sessionId, initState)]), TransferSet([ScriptTransfer(SERVER, randsPmt, unit)]))
239	239		}
240	240		}
241	241
242	242
243	243
244	244		@Callable(i)
245	245		func random (sessionId,rsaSign) = {
246	246		let drawParamsList = extractGameDataList(sessionId)
247	247		let drawState = drawParamsList[IdxState]
248	248		let organizerPubKey58 = drawParamsList[IdxOrganizerPub]
249	249		let randsCountStr = drawParamsList[IdxRandsCount]
250	250		let remainRandsCount = parseIntValue(drawParamsList[IdxRemainRandsCount])
251	251		let lastOffsetBytes = parseIntValue(drawParamsList[IdxLastOffset])
252	252		let currRandsStr = drawParamsList[IdxCurrRands]
253	253		let fromStr = drawParamsList[IdxRandFrom]
254	254		let toStr = drawParamsList[IdxRandTo]
255	255		let dataDoneTxId = drawParamsList[IdxDataDoneTxId]
256	256		let slowIdx1 = parseIntValue(drawParamsList[9])
257	257		let slowIdx2 = parseIntValue(drawParamsList[10])
258	258		let fastIdx1 = parseIntValue(drawParamsList[11])
259	259		let fastIdx2 = parseIntValue(drawParamsList[12])
260	260		let from = parseIntValue(fromStr)
261	261		let to = parseIntValue(toStr)
262	262		let organizerPubKey = fromBase58String(organizerPubKey58)
263	263		if ((drawState != DATADONE))
264	264		then throw((sessionId + " draw: it must be in READY state to generate random numbers"))
265	265		else if (false)
266	266		then throw("Invalid RSA signature")
267	267		else {
268	268		let randGenInfo = generateRand(sessionId, from, to, rsaSign, currRandsStr, remainRandsCount, lastOffsetBytes, slowIdx1, slowIdx2, fastIdx1, fastIdx2)
269	269		let newRemainRandsCountStr = randGenInfo[1]
270	270		let newState = if ((newRemainRandsCountStr == "0"))
271	271		then STATEFINISHED
272	272		else DATADONE
273		-	WriteSet([DataEntry(sessionId, ~~formatStateDataStr(~~newState, ~~organizerPubKey58, fromStr,~~ ~~toStr, randsCountStr~~, newRemainRandsCountStr~~, drawParamsList[IdxDataKeysCount], dataDoneTxId, randGenInfo[2], randGenInfo[3], randGenInfo[4], randGenInfo[5], randGenInfo[6], randGenInfo[0])~~)])
	273	+	WriteSet([DataEntry((sessionId + "test-1"), newState), DataEntry((sessionId + "test-2"), newRemainRandsCountStr)])
274	274		}
275	275		}
276	276
277	277

github/deemru/w8io/3ef1775 
64.86 ms ◑