tx · GwYp5yf9ceAWVDiumB6hFzuAauwQUt7cP5mViVsgczdP

3N8x8jUD8posdAYmm63Vty9Pv3C8G2rQW64:  -0.01000000 Waves

2023.06.13 16:24 [2620961] smart account 3N8x8jUD8posdAYmm63Vty9Pv3C8G2rQW64 > SELF 0.00000000 Waves

{ "type": 13, "id": "GwYp5yf9ceAWVDiumB6hFzuAauwQUt7cP5mViVsgczdP", "fee": 1000000, "feeAssetId": null, "timestamp": 1686662688395, "version": 2, "chainId": 84, "sender": "3N8x8jUD8posdAYmm63Vty9Pv3C8G2rQW64", "senderPublicKey": "GD9kitqwituKWMYmUmDNVtPnaU9E1eWucsijEktNSaKj", "proofs": [ "3WH8xyV3VmeJksQSucs6krpzojzPFvWZmypS4DJua7J4y6tjU5CbrRiTvwD9UHkEdyfrfB5ATC6a19D3NHQHNjVR" ], "script": "base64:BgIGCAISABIAGwEKbnVtVG9XYXZlcwEDbnVtCQBoAgUDbnVtAIDC1y8BC2lzUGF5bWVudE9rAgFpA3N1bQQRYWNjZXB0YWJsZUFzc2V0SWQBBBOr2TMEAXAJAJEDAggFAWkIcGF5bWVudHMAAAMJAGcCCAUBcAZhbW91bnQJAQpudW1Ub1dhdmVzAQUDc3VtCQAAAggFAXAHYXNzZXRJZAUEdW5pdAcBC21hcEludFRvU3RyAgVhY2N1bQRuZXh0CQDMCAIJAKQDAQUEbmV4dAUFYWNjdW0BC21hcFN0clRvSW50AgVhY2N1bQRuZXh0CQDMCAIJAQ1wYXJzZUludFZhbHVlAQUEbmV4dAUFYWNjdW0BC21hcEludFRvU3VtAgVhY2N1bQRuZXh0CQBkAgUFYWNjdW0FBG5leHQBDGxpc3RJbnRUb1N1bQEDYXJyCgACJGwFA2FycgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQELbWFwSW50VG9TdW0CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgETbGlzdEludFRvTGlzdFN0cmluZwEDYXJyCgACJGwFA2FycgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQELbWFwSW50VG9TdHICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgETbGlzdFN0cmluZ1RvTGlzdEluZwEDYXJyCgACJGwFA2FycgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQELbWFwU3RyVG9JbnQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgEabGlzdFN0cmluZ0NvbXByZXNzVG9TdHJpbmcBA2FycgkAuQkCBQNhcnICAXwBHHN0cmluZ0RlY29tcHJlc3NUb0xpc3RTdHJpbmcBA3N0cgkAtQkCBQNzdHICAXwBF2xpc3RJbnRDb21wcmVzc1RvU3RyaW5nAQNhcnIJALkJAgkBE2xpc3RJbnRUb0xpc3RTdHJpbmcBBQNhcnICAXwBGXN0cmluZ0RlY29tcHJlc3NUb0xpc3RJbnQBBmFyclN0cgkBE2xpc3RTdHJpbmdUb0xpc3RJbmcBCQC1CQIFBmFyclN0cgIBfAEJZ2V0UmFuZG9tAQxjb21taXRIZWlnaHQEC3JldmVhbEJsb2NrCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAO0HAQUMY29tbWl0SGVpZ2h0AhF1bmV4Y3BlY3RlZCBlcnJvcgQDdnJmCQETdmFsdWVPckVycm9yTWVzc2FnZQIIBQtyZXZlYWxCbG9jawN2cmYCEXVuZXhjcGVjdGVkIGVycm9yBApyYW5kb21IYXNoCQD3AwEJAQV2YWx1ZQEFA3ZyZgQEaGFzaAkAsgkCBQpyYW5kb21IYXNoABAJAGoCBQRoYXNoACUBD2dldFJhbmRvbVJ1bGxldAEMY29tbWl0SGVpZ2h0BApyYW5kb21IYXNoCQD3AwEJAMsBAgkBBXZhbHVlAQgJAQV2YWx1ZQEJAO0HAQUMY29tbWl0SGVpZ2h0A3ZyZgkAmgMBBQxjb21taXRIZWlnaHQEB2hhc2hJbnQJALIJAgUKcmFuZG9tSGFzaAAYBAtyYW5kb21IYXNoMgkA9wMBCQDLAQIJAQV2YWx1ZQEICQEFdmFsdWUBCQDtBwEFDGNvbW1pdEhlaWdodAN2cmYJAJoDAQkAZQIFDGNvbW1pdEhlaWdodAACBAhoYXNoSW50MgkAsgkCBQtyYW5kb21IYXNoMgAYBAtyYW5kb21IYXNoMwkA9wMBCQDLAQIJAQV2YWx1ZQEICQEFdmFsdWUBCQDtBwEFDGNvbW1pdEhlaWdodAN2cmYJAJoDAQkAZQIFDGNvbW1pdEhlaWdodAAEBAhoYXNoSW50MwkAsgkCBQtyYW5kb21IYXNoMwAYBAxyYW5kb21OdW1iZXIJAGoCBQdoYXNoSW50ACUEDXJhbmRvbU51bWJlcjIJAGoCBQhoYXNoSW50MgAlBA1yYW5kb21OdW1iZXIzCQBqAgUIaGFzaEludDMAJQMJAAACBQxyYW5kb21OdW1iZXIAAAUMcmFuZG9tTnVtYmVyAwMJAGYCBQxyYW5kb21OdW1iZXIADAkBAiE9AgkAagIFDGNvbW1pdEhlaWdodAACAAAHBQxyYW5kb21OdW1iZXIDAwkAZgIAGQUMcmFuZG9tTnVtYmVyCQECIT0CCQBqAgUMY29tbWl0SGVpZ2h0AAIAAAcFDXJhbmRvbU51bWJlcjIFDXJhbmRvbU51bWJlcjMBD1JfV2luQ2FsY3VsYXRvcgQMcmFuZG9tTnVtYmVyCWJldEFtb3VudBJzZWxlY3RlZE51bWJlckJldHMMYmV0RGlyZWN0aW9uBAtSRURfU0VDVE9SUwkAzAgCACAJAMwIAgATCQDMCAIAFQkAzAgCABkJAMwIAgAiCQDMCAIAGwkAzAgCACQJAMwIAgAeCQDMCAIAFwkAzAgCAAUJAMwIAgAQCQDMCAIAAQkAzAgCAA4JAMwIAgAJCQDMCAIAEgkAzAgCAAcJAMwIAgAMCQDMCAIAAwUDbmlsBA1CTEFDS19TRUNUT1JTCQDMCAIAAgkAzAgCAAQJAMwIAgAGCQDMCAIACAkAzAgCAAoJAMwIAgALCQDMCAIADQkAzAgCAA8JAMwIAgARCQDMCAIAFAkAzAgCABYJAMwIAgAYCQDMCAIAGgkAzAgCABwJAMwIAgAdCQDMCAIAHwkAzAgCACEJAMwIAgAjBQNuaWwDCQAAAgUMYmV0RGlyZWN0aW9uAgNyZWQDCQEPY29udGFpbnNFbGVtZW50AgULUkVEX1NFQ1RPUlMFDHJhbmRvbU51bWJlcgkAaAIFCWJldEFtb3VudAACAAADCQAAAgUMYmV0RGlyZWN0aW9uAgVibGFjawMJAQ9jb250YWluc0VsZW1lbnQCBQ1CTEFDS19TRUNUT1JTBQxyYW5kb21OdW1iZXIJAGgCBQliZXRBbW91bnQAAgAAAwkAAAIFDGJldERpcmVjdGlvbgIDb2RkAwMJAAACCQBqAgUMcmFuZG9tTnVtYmVyAAIAAAkBAiE9AgUMcmFuZG9tTnVtYmVyAAAHCQBoAgUJYmV0QW1vdW50AAIAAAMJAAACBQxiZXREaXJlY3Rpb24CBGV2ZW4DAwkBAiE9AgkAagIFDHJhbmRvbU51bWJlcgACAAAJAQIhPQIFDHJhbmRvbU51bWJlcgAABwkAaAIFCWJldEFtb3VudAACAAADAwkAAAIJAJADAQUSc2VsZWN0ZWROdW1iZXJCZXRzAAEJAAACBQxiZXREaXJlY3Rpb24CA251bQcDCQAAAgkAkQMCBRJzZWxlY3RlZE51bWJlckJldHMAAAUMcmFuZG9tTnVtYmVyCQBoAgUJYmV0QW1vdW50ACQAAAMJAAACCQCQAwEFEnNlbGVjdGVkTnVtYmVyQmV0cwACAwkBD2NvbnRhaW5zRWxlbWVudAIFEnNlbGVjdGVkTnVtYmVyQmV0cwUMcmFuZG9tTnVtYmVyCQBoAgUJYmV0QW1vdW50ABIAAAMJAAACCQCQAwEFEnNlbGVjdGVkTnVtYmVyQmV0cwADAwkBD2NvbnRhaW5zRWxlbWVudAIFEnNlbGVjdGVkTnVtYmVyQmV0cwUMcmFuZG9tTnVtYmVyCQBoAgUJYmV0QW1vdW50AAwAAAMJAAACCQCQAwEFEnNlbGVjdGVkTnVtYmVyQmV0cwAEAwkBD2NvbnRhaW5zRWxlbWVudAIFEnNlbGVjdGVkTnVtYmVyQmV0cwUMcmFuZG9tTnVtYmVyCQBoAgUJYmV0QW1vdW50AAkAAAMJAAACCQCQAwEFEnNlbGVjdGVkTnVtYmVyQmV0cwAMAwMJAQ9jb250YWluc0VsZW1lbnQCBRJzZWxlY3RlZE51bWJlckJldHMFDHJhbmRvbU51bWJlcgkBAiE9AgUMcmFuZG9tTnVtYmVyAAAHCQBoAgUJYmV0QW1vdW50AAMAAAMJAAACCQCQAwEFEnNlbGVjdGVkTnVtYmVyQmV0cwASAwMJAQ9jb250YWluc0VsZW1lbnQCBRJzZWxlY3RlZE51bWJlckJldHMFDHJhbmRvbU51bWJlcgkBAiE9AgUMcmFuZG9tTnVtYmVyAAAHCQBoAgUJYmV0QW1vdW50AAIAAAAAAQtSX2dldEJldEtleQEBaQkArAICAg1iZXRfUm91bGV0dGVfCQClCAEIBQFpBmNhbGxlcgERUl9nZXRCZXRBbW91bnRLZXkBAWkJAKwCAgITYmV0QW1vdW50X1JvdWxldHRlXwkApQgBCAUBaQZjYWxsZXIBF1JfZ2V0U2VsZWN0ZWROdW1iZXJzS2V5AQFpCQCsAgICGXNlbGVjdGVkTnVtYmVyc19Sb3VsZXR0ZV8JAKUIAQgFAWkGY2FsbGVyARFSX2dldERpcmVjdGlvbktleQEBaQkArAICAhNkaXJlY3Rpb25fUm91bGV0dGVfCQClCAEIBQFpBmNhbGxlcgELUl9nZXRMb2dLZXkBAWkJAKwCAgkArAICCQCsAgICDWxvZ19Sb3VsZXR0ZV8JAKUIAQgFAWkGY2FsbGVyAgFfCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQBDlJfZ2V0U3RhdHVzS2V5AQFpCQCsAgICEHN0YXR1c19Sb3VsZXR0ZV8JAKUIAQgFAWkGY2FsbGVyAQxMV19nZXRCZXRLZXkBAWkJAKwCAgIPYmV0X0x1Y2t5V2hlZWxfCQClCAEIBQFpBmNhbGxlcgEMTFdfZ2V0V29uS2V5AQFpCQCsAgICD3dvbl9MdWNreVdoZWVsXwkApQgBCAUBaQZjYWxsZXIBFUxXX2dldFJhbmRvbU51bWJlcktleQEBaQkArAICAhhyYW5kb21OdW1iZXJfTHVja3lXaGVlbF8JAKUIAQgFAWkGY2FsbGVyAQxMV19nZXRMb2dLZXkBAWkJAKwCAgkArAICCQCsAgICD2xvZ19MdWNreVdoZWVsXwkApQgBCAUBaQZjYWxsZXICAV8JANgEAQgFAWkNdHJhbnNhY3Rpb25JZAEOTFdfd2hhdFVzZXJXb24BBXZhbHVlBAckbWF0Y2gwBQV2YWx1ZQMJAAACAAEFByRtYXRjaDAJAQpudW1Ub1dhdmVzAQACAwkAAAIAAwUHJG1hdGNoMAkBCm51bVRvV2F2ZXMBAAEDCQAAAgAHBQckbWF0Y2gwCQEKbnVtVG9XYXZlcwEABgMJAAACAAkFByRtYXRjaDAJAQpudW1Ub1dhdmVzAQABAAABD0xXX2dldFN0YXR1c0tleQEBaQkArAICAhBzdGF0dXNfUm91bGV0dGVfCQClCAEIBQFpBmNhbGxlcgIBaQERTHVja3lXaGVlbF9jb21taXQAAwkBASEBCQELaXNQYXltZW50T2sCBQFpAAEJAAIBAh1Xcm9uZyBwYXltZW50IGFtb3VudCBvciBhc3NldAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDExXX2dldEJldEtleQEFAWkJAGQCBQZoZWlnaHQAAQkAzAgCCQELRGVsZXRlRW50cnkBCQEVTFdfZ2V0UmFuZG9tTnVtYmVyS2V5AQUBaQkAzAgCCQELRGVsZXRlRW50cnkBCQEMTFdfZ2V0V29uS2V5AQUBaQkAzAgCCQELU3RyaW5nRW50cnkCCQEPTFdfZ2V0U3RhdHVzS2V5AQUBaQIQfCBzdGF0dXM6IGNvbW1pdAUDbmlsAWkBEUx1Y2t5V2hlZWxfcmV2ZWFsAAQMY29tbWl0SGVpZ2h0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJARFAZXh0ck5hdGl2ZSgxMDU1KQEJAQxMV19nZXRCZXRLZXkBBQFpAg1CZXQgbm90IGZvdW5kAwkAZgIFDGNvbW1pdEhlaWdodAUGaGVpZ2h0CQACAQkArAICCQCsAgICBVdhaXQgCQCkAwEJAGUCBQxjb21taXRIZWlnaHQFBmhlaWdodAIZIGJsb2NrcyB0byByZXZlYWwgdGhpcyBpZAQLcmV2ZWFsQmxvY2sJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7QcBBQxjb21taXRIZWlnaHQCEXVuZXhjcGVjdGVkIGVycm9yBAN2cmYJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAggFC3JldmVhbEJsb2NrA3ZyZgIRdW5leGNwZWN0ZWQgZXJyb3IECnJhbmRvbUhhc2gJAPcDAQkBBXZhbHVlAQUDdnJmBAxyZXZlYWxCbG9jazIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7QcBCQBlAgUMY29tbWl0SGVpZ2h0AAECEXVuZXhjcGVjdGVkIGVycm9yBAR2cmYyCQETdmFsdWVPckVycm9yTWVzc2FnZQIIBQtyZXZlYWxCbG9jawN2cmYCEXVuZXhjcGVjdGVkIGVycm9yBAtyYW5kb21IYXNoMgkA9wMBCQEFdmFsdWUBBQN2cmYEBnJhbmRvbQkAZAIJALIJAgUKcmFuZG9tSGFzaAAQCQBpAgkAsgkCBQpyYW5kb21IYXNoAAoJALIJAgUKcmFuZG9tSGFzaAAFBAxyYW5kb21OdW1iZXIJAGoCBQZyYW5kb20ADAQNd2lubmluZ0Ftb3VudAkBDkxXX3doYXRVc2VyV29uAQUMcmFuZG9tTnVtYmVyBAlzdGF0dXNTdHIJAKwCAgkArAICCQCsAgIJAKwCAgIifCBzdGF0dXM6IHJldmVhbCB8IHdpbm5pbmdBbW91bnQ6IAkApAMBBQ13aW5uaW5nQW1vdW50AhQgfCBzZWxlY3RlZE51bWJlcnM6IAIRIHwgcmFuZG9tTnVtYmVyOiAJAKQDAQUMcmFuZG9tTnVtYmVyAwkAZgIFDXdpbm5pbmdBbW91bnQAAAkAzAgCCQELRGVsZXRlRW50cnkBCQEMTFdfZ2V0QmV0S2V5AQUBaQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFDXdpbm5pbmdBbW91bnQFBHVuaXQJAMwIAgkBDEludGVnZXJFbnRyeQIJAQxMV19nZXRXb25LZXkBBQFpBQ13aW5uaW5nQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEVTFdfZ2V0UmFuZG9tTnVtYmVyS2V5AQUBaQUMcmFuZG9tTnVtYmVyCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ9MV19nZXRTdGF0dXNLZXkBBQFpBQlzdGF0dXNTdHIFA25pbAkAzAgCCQELRGVsZXRlRW50cnkBCQEMTFdfZ2V0QmV0S2V5AQUBaQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDExXX2dldFdvbktleQEFAWkFDXdpbm5pbmdBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJARVMV19nZXRSYW5kb21OdW1iZXJLZXkBBQFpBQxyYW5kb21OdW1iZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBD0xXX2dldFN0YXR1c0tleQEFAWkFCXN0YXR1c1N0cgUDbmlsAPeSKAM=", "height": 2620961, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: none Next: none Full:
OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 6 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+func numToWaves (num) = (num * 100000000)
5+
6+
7+func isPaymentOk (i,sum) = {
8+ let acceptableAssetId = base58'WAVES'
9+ let p = i.payments[0]
10+ if ((p.amount >= numToWaves(sum)))
11+ then (p.assetId == unit)
12+ else false
13+ }
14+
15+
16+func mapIntToStr (accum,next) = toString(next) :: accum
17+
18+
19+func mapStrToInt (accum,next) = parseIntValue(next) :: accum
20+
21+
22+func mapIntToSum (accum,next) = (accum + next)
23+
24+
25+func listIntToSum (arr) = {
26+ let $l = arr
27+ let $s = size($l)
28+ let $acc0 = 0
29+ func $f0_1 ($a,$i) = if (($i >= $s))
30+ then $a
31+ else mapIntToSum($a, $l[$i])
32+
33+ func $f0_2 ($a,$i) = if (($i >= $s))
34+ then $a
35+ else throw("List size exceeds 50")
36+
37+ $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50)
38+ }
39+
40+
41+func listIntToListString (arr) = {
42+ let $l = arr
43+ let $s = size($l)
44+ let $acc0 = nil
45+ func $f0_1 ($a,$i) = if (($i >= $s))
46+ then $a
47+ else mapIntToStr($a, $l[$i])
48+
49+ func $f0_2 ($a,$i) = if (($i >= $s))
50+ then $a
51+ else throw("List size exceeds 50")
52+
53+ $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50)
54+ }
55+
56+
57+func listStringToListIng (arr) = {
58+ let $l = arr
59+ let $s = size($l)
60+ let $acc0 = nil
61+ func $f0_1 ($a,$i) = if (($i >= $s))
62+ then $a
63+ else mapStrToInt($a, $l[$i])
64+
65+ func $f0_2 ($a,$i) = if (($i >= $s))
66+ then $a
67+ else throw("List size exceeds 50")
68+
69+ $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50)
70+ }
71+
72+
73+func listStringCompressToString (arr) = makeString(arr, "|")
74+
75+
76+func stringDecompressToListString (str) = split(str, "|")
77+
78+
79+func listIntCompressToString (arr) = makeString(listIntToListString(arr), "|")
80+
81+
82+func stringDecompressToListInt (arrStr) = listStringToListIng(split(arrStr, "|"))
83+
84+
85+func getRandom (commitHeight) = {
86+ let revealBlock = valueOrErrorMessage(blockInfoByHeight(commitHeight), "unexcpected error")
87+ let vrf = valueOrErrorMessage(revealBlock.vrf, "unexcpected error")
88+ let randomHash = sha256(value(vrf))
89+ let hash = toInt(randomHash, 16)
90+ (hash % 37)
91+ }
92+
93+
94+func getRandomRullet (commitHeight) = {
95+ let randomHash = sha256((value(value(blockInfoByHeight(commitHeight)).vrf) + toBytes(commitHeight)))
96+ let hashInt = toInt(randomHash, 24)
97+ let randomHash2 = sha256((value(value(blockInfoByHeight(commitHeight)).vrf) + toBytes((commitHeight - 2))))
98+ let hashInt2 = toInt(randomHash2, 24)
99+ let randomHash3 = sha256((value(value(blockInfoByHeight(commitHeight)).vrf) + toBytes((commitHeight - 4))))
100+ let hashInt3 = toInt(randomHash3, 24)
101+ let randomNumber = (hashInt % 37)
102+ let randomNumber2 = (hashInt2 % 37)
103+ let randomNumber3 = (hashInt3 % 37)
104+ if ((randomNumber == 0))
105+ then randomNumber
106+ else if (if ((randomNumber > 12))
107+ then ((commitHeight % 2) != 0)
108+ else false)
109+ then randomNumber
110+ else if (if ((25 > randomNumber))
111+ then ((commitHeight % 2) != 0)
112+ else false)
113+ then randomNumber2
114+ else randomNumber3
115+ }
116+
117+
118+func R_WinCalculator (randomNumber,betAmount,selectedNumberBets,betDirection) = {
119+ let RED_SECTORS = [32, 19, 21, 25, 34, 27, 36, 30, 23, 5, 16, 1, 14, 9, 18, 7, 12, 3]
120+ let BLACK_SECTORS = [2, 4, 6, 8, 10, 11, 13, 15, 17, 20, 22, 24, 26, 28, 29, 31, 33, 35]
121+ if ((betDirection == "red"))
122+ then if (containsElement(RED_SECTORS, randomNumber))
123+ then (betAmount * 2)
124+ else 0
125+ else if ((betDirection == "black"))
126+ then if (containsElement(BLACK_SECTORS, randomNumber))
127+ then (betAmount * 2)
128+ else 0
129+ else if ((betDirection == "odd"))
130+ then if (if (((randomNumber % 2) == 0))
131+ then (randomNumber != 0)
132+ else false)
133+ then (betAmount * 2)
134+ else 0
135+ else if ((betDirection == "even"))
136+ then if (if (((randomNumber % 2) != 0))
137+ then (randomNumber != 0)
138+ else false)
139+ then (betAmount * 2)
140+ else 0
141+ else if (if ((size(selectedNumberBets) == 1))
142+ then (betDirection == "num")
143+ else false)
144+ then if ((selectedNumberBets[0] == randomNumber))
145+ then (betAmount * 36)
146+ else 0
147+ else if ((size(selectedNumberBets) == 2))
148+ then if (containsElement(selectedNumberBets, randomNumber))
149+ then (betAmount * 18)
150+ else 0
151+ else if ((size(selectedNumberBets) == 3))
152+ then if (containsElement(selectedNumberBets, randomNumber))
153+ then (betAmount * 12)
154+ else 0
155+ else if ((size(selectedNumberBets) == 4))
156+ then if (containsElement(selectedNumberBets, randomNumber))
157+ then (betAmount * 9)
158+ else 0
159+ else if ((size(selectedNumberBets) == 12))
160+ then if (if (containsElement(selectedNumberBets, randomNumber))
161+ then (randomNumber != 0)
162+ else false)
163+ then (betAmount * 3)
164+ else 0
165+ else if ((size(selectedNumberBets) == 18))
166+ then if (if (containsElement(selectedNumberBets, randomNumber))
167+ then (randomNumber != 0)
168+ else false)
169+ then (betAmount * 2)
170+ else 0
171+ else 0
172+ }
173+
174+
175+func R_getBetKey (i) = ("bet_Roulette_" + toString(i.caller))
176+
177+
178+func R_getBetAmountKey (i) = ("betAmount_Roulette_" + toString(i.caller))
179+
180+
181+func R_getSelectedNumbersKey (i) = ("selectedNumbers_Roulette_" + toString(i.caller))
182+
183+
184+func R_getDirectionKey (i) = ("direction_Roulette_" + toString(i.caller))
185+
186+
187+func R_getLogKey (i) = ((("log_Roulette_" + toString(i.caller)) + "_") + toBase58String(i.transactionId))
188+
189+
190+func R_getStatusKey (i) = ("status_Roulette_" + toString(i.caller))
191+
192+
193+func LW_getBetKey (i) = ("bet_LuckyWheel_" + toString(i.caller))
194+
195+
196+func LW_getWonKey (i) = ("won_LuckyWheel_" + toString(i.caller))
197+
198+
199+func LW_getRandomNumberKey (i) = ("randomNumber_LuckyWheel_" + toString(i.caller))
200+
201+
202+func LW_getLogKey (i) = ((("log_LuckyWheel_" + toString(i.caller)) + "_") + toBase58String(i.transactionId))
203+
204+
205+func LW_whatUserWon (value) = match value {
206+ case _ =>
207+ if ((1 == $match0))
208+ then numToWaves(2)
209+ else if ((3 == $match0))
210+ then numToWaves(1)
211+ else if ((7 == $match0))
212+ then numToWaves(6)
213+ else if ((9 == $match0))
214+ then numToWaves(1)
215+ else 0
216+}
217+
218+
219+func LW_getStatusKey (i) = ("status_Roulette_" + toString(i.caller))
220+
221+
222+@Callable(i)
223+func LuckyWheel_commit () = if (!(isPaymentOk(i, 1)))
224+ then throw("Wrong payment amount or asset")
225+ else [IntegerEntry(LW_getBetKey(i), (height + 1)), DeleteEntry(LW_getRandomNumberKey(i)), DeleteEntry(LW_getWonKey(i)), StringEntry(LW_getStatusKey(i), "| status: commit")]
226+
227+
228+
229+@Callable(i)
230+func LuckyWheel_reveal () = {
231+ let commitHeight = valueOrErrorMessage(getIntegerValue(LW_getBetKey(i)), "Bet not found")
232+ if ((commitHeight > height))
233+ then throw((("Wait " + toString((commitHeight - height))) + " blocks to reveal this id"))
234+ else {
235+ let revealBlock = valueOrErrorMessage(blockInfoByHeight(commitHeight), "unexcpected error")
236+ let vrf = valueOrErrorMessage(revealBlock.vrf, "unexcpected error")
237+ let randomHash = sha256(value(vrf))
238+ let revealBlock2 = valueOrErrorMessage(blockInfoByHeight((commitHeight - 1)), "unexcpected error")
239+ let vrf2 = valueOrErrorMessage(revealBlock.vrf, "unexcpected error")
240+ let randomHash2 = sha256(value(vrf))
241+ let random = (toInt(randomHash, 16) + (toInt(randomHash, 10) / toInt(randomHash, 5)))
242+ let randomNumber = (random % 12)
243+ let winningAmount = LW_whatUserWon(randomNumber)
244+ let statusStr = (((("| status: reveal | winningAmount: " + toString(winningAmount)) + " | selectedNumbers: ") + " | randomNumber: ") + toString(randomNumber))
245+ if ((winningAmount > 0))
246+ then [DeleteEntry(LW_getBetKey(i)), ScriptTransfer(i.caller, winningAmount, unit), IntegerEntry(LW_getWonKey(i), winningAmount), IntegerEntry(LW_getRandomNumberKey(i), randomNumber), StringEntry(LW_getStatusKey(i), statusStr)]
247+ else [DeleteEntry(LW_getBetKey(i)), IntegerEntry(LW_getWonKey(i), winningAmount), IntegerEntry(LW_getRandomNumberKey(i), randomNumber), StringEntry(LW_getStatusKey(i), statusStr)]
248+ }
249+ }
250+
251+

github/deemru/w8io/3ef1775 
34.55 ms