tx · 5R3PAq1S7aCGzFBFj17zh26xLfDc5kiVU6X6DhbQVXkd

3P8M8XGF2uzDazV5fzdKNxrbC3YqCWScKxw:  -0.01500000 Waves

2020.04.29 20:25 [2039591] smart account 3P8M8XGF2uzDazV5fzdKNxrbC3YqCWScKxw > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5R3PAq1S7aCGzFBFj17zh26xLfDc5kiVU6X6DhbQVXkd",
    "fee": 1500000,
    "feeAssetId": null,
    "timestamp": 1588181164123,
    "version": 1,
    "sender": "3P8M8XGF2uzDazV5fzdKNxrbC3YqCWScKxw",
    "senderPublicKey": "DiwodVekfMsCm2FZ9njd5wMTeyJSGfLM4jNxaNTDkEXG",
    "proofs": [
        "55SpnAjxjFHaxBpabVCzJMKeggbRx1KEYT4ozBLtno76CZsDaNumKoahYiZ98JbwYF1FJzJ1gS5VHce55jMFNePp"
    ],
    "script": "base64:AAIDAAAAAAAAAA0IARIDCgEIEgQKAggCAAAALgAAAAAGV0FWRVNEAAAAAAAF9eEAAAAAAAVVU0RORAAAAAAAAA9CQAAAAAAIREVDSU1BTFMJAARMAAAAAgUAAAAGV0FWRVNECQAETAAAAAIFAAAABVVTRE5EBQAAAANuaWwAAAAABkFTU0VUUwkABEwAAAACBQAAAAR1bml0CQAETAAAAAIJAAJZAAAAAQIAAAAsREcyeEZrUGREd0tVb0JrekdBaFF0THBTR3pmWExpQ1lQRXplS0gyQWQyNHAFAAAAA25pbAAAAAAKQ09NTUlTU0lPTgkABEwAAAACCQAAaQAAAAIJAABoAAAAAgAAAAAAAAAABQUAAAAGV0FWRVNEAAAAAAAAAAPoCQAETAAAAAIJAABoAAAAAgkAAGkAAAACCQAAaAAAAAIAAAAAAAAAAAUFAAAABVVTRE5EAAAAAAAAAAPoAAAAAAAAAAAKBQAAAANuaWwBAAAADWdldENvbW1pc3Npb24AAAABAAAAB2Fzc2V0SWQJAAGRAAAAAgUAAAAKQ09NTUlTU0lPTgUAAAAHYXNzZXRJZAAAAAAJUlNBUFVCTElDCQACWwAAAAECAAABj2Jhc2U2NDpNSUlCSWpBTkJna3Foa2lHOXcwQkFRRUZBQU9DQVE4QU1JSUJDZ0tDQVFFQWxlbXI5NUoxalpVczdjSm1ybW1sTjR6bzdZVnNCSnpJZUpkazhMREZHaFVLU0k2eWZzMjBaeUplMjErNkdKd05uS1VVMVV5b2MxN3dTV01La3JaME1NdllFK1o1QWlpanZCSzRzU0ozSWdHamRVOC9OaEk4Q0JEdTBGK3hSTTlxM1RCM0xMYkR5NXNCZHVkWWZIZnNVT2MrTVR2QUQ2OW4yN2RiMlJoOCt5WlFNdHVia3VUUU5wODlzcGhIUWFMR3lRRmFObEsvTmEzbEZ4Nm9tcXphYTFnam9wbFVyNnJ2WUtnZkFJQ1VCM3pWbUpTaGlFaTd3N1IwaFdsTlJEM3FjWmpDVU9OU3BGbzRXYnprbkdPYXp3ODRCK0lNSUZuSXBYV3pRTDhSWDB2TmNmc0J2TERmTTZrMlphY3F3eU1LYUxMcWlnZEJpR2RKN1crMGxPU3RPUUlEQVFBQgAAAAAGU0VSVkVSCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAECAAAAIzNQTVQ5d3VuN0JCN0pBQlN1aFRKcEZnSm9lZ1JmWXcyZTZkAAAAABNSQU5ET1JBQ0xFVElNRUZSQU1FAAAAAAAAABwgAAAAAARCRVQxAAAAAAAAAAABAAAAAARCRVQyAAAAAAAAAAACAAAAAARCRVQ0AAAAAAAAAAAEAAAAAARCRVQ4AAAAAAAAAAAIAAAAAAVCRVQxNAAAAAAAAAAADgAAAAAIUkFURU1VTFQAAAAAAAAAJxAAAAAABVJBVEUxAAAAAAAAAJrnAAAAAAVSQVRFMgAAAAAAAABgGAAAAAAFUkFURTMAAAAAAAAASjgAAAAABVJBVEU0AAAAAAAAADd4AAAAAAVSQVRFNQAAAAAAAAAsiAAAAAAFUkFURVMJAARMAAAAAgUAAAAFUkFURTEJAARMAAAAAgUAAAAFUkFURTIJAARMAAAAAgUAAAAFUkFURTMJAARMAAAAAgUAAAAFUkFURTQJAARMAAAAAgUAAAAFUkFURTUFAAAAA25pbAAAAAAEQkVUUwkABEwAAAACBQAAAARCRVQxCQAETAAAAAIFAAAABEJFVDIJAARMAAAAAgUAAAAEQkVUNAkABEwAAAACBQAAAARCRVQ4CQAETAAAAAIFAAAABUJFVDE0BQAAAANuaWwAAAAADElkeEdhbWVTdGF0ZQAAAAAAAAAAAAAAAAAPSWR4UGxheWVyQ2hvaWNlAAAAAAAAAAABAAAAABFJZHhQbGF5ZXJQdWJLZXk1OAAAAAAAAAAAAgAAAAAQSWR4U3RhcnRlZEhlaWdodAAAAAAAAAAAAwAAAAAMSWR4V2luQW1vdW50AAAAAAAAAAAEAAAAAApJZHhBc3NldElkAAAAAAAAAAAFAAAAAA5SRVNFUlZBVElPTktFWQkABEwAAAACAgAAABYkUkVTRVJWRURfQU1PVU5UX1dBVkVTCQAETAAAAAICAAAAFSRSRVNFUlZFRF9BTU9VTlRfVVNETgUAAAADbmlsAAAAAA9HQU1FU0NPVU5URVJLRVkCAAAACSRHQU1FX05VTQAAAAAOU1RBVEVTVUJNSVRURUQCAAAACVNVQk1JVFRFRAAAAAAIU1RBVEVXT04CAAAAA1dPTgAAAAAJU1RBVEVMT1NUAgAAAARMT1NUAQAAAAhnZXRJbnRPcgAAAAIAAAADa2V5AAAAB2RlZmF1bHQDCQEAAAAJaXNEZWZpbmVkAAAAAQkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMFAAAAA2tleQUAAAAHZGVmYXVsdAEAAAAGc2V0SW50AAAAAgAAAANrZXkAAAAFdmFsdWUJAQAAAAlEYXRhRW50cnkAAAACBQAAAANrZXkFAAAABXZhbHVlAQAAAAxpbmNyZW1lbnRJbnQAAAABAAAAA2tleQkBAAAABnNldEludAAAAAIFAAAAA2tleQkAAGQAAAACCQEAAAAIZ2V0SW50T3IAAAACBQAAAANrZXkA//////////8AAAAAAAAAAAEBAAAACWNoYW5nZUludAAAAAIAAAADa2V5AAAAAmJ5CQEAAAAGc2V0SW50AAAAAgUAAAADa2V5CQAAZAAAAAIJAQAAAAhnZXRJbnRPcgAAAAIFAAAAA2tleQAAAAAAAAAAAAUAAAACYnkBAAAAFWluY3JlYXNlUmVzZXJ2ZUFtb3VudAAAAAIAAAAJd2luQW1vdW50AAAAB2Fzc2V0SWQEAAAAEW5ld1Jlc2VydmVkQW1vdW50CQAAZAAAAAIJAQAAAAhnZXRJbnRPcgAAAAIJAAGRAAAAAgUAAAAOUkVTRVJWQVRJT05LRVkFAAAAB2Fzc2V0SWQAAAAAAAAAAAAFAAAACXdpbkFtb3VudAMJAABmAAAAAgUAAAARbmV3UmVzZXJ2ZWRBbW91bnQJAQAAAAx3YXZlc0JhbGFuY2UAAAABBQAAAAR0aGlzCQAAAgAAAAECAAAAVEluc3VmZmljaWVudCBmdW5kcyBvbiBEaWNlIFJvbGxlciBhY2NvdW50LiBUcmFuc2FjdGlvbiB3YXMgcmVqZWN0ZWQgZm9yIHlvdXIgc2FmZXR5LgUAAAARbmV3UmVzZXJ2ZWRBbW91bnQBAAAAFmRlY3JlYXNlUmVzZXJ2ZWRBbW91bnQAAAADAAAABmdhbWVJZAAAAAdhc3NldElkAAAACXdpbkFtb3VudAMJAABmAAAAAgAAAAAAAAAAAAkAAGUAAAACCQEAAAAIZ2V0SW50T3IAAAACCQABkQAAAAIFAAAADlJFU0VSVkFUSU9OS0VZBQAAAAdhc3NldElkAAAAAAAAAAAABQAAAAl3aW5BbW91bnQJAAACAAAAAQIAAABCSW52YWxpZCBEaWNlIFJvbGxlciBhY2NvdW50IHN0YXRlIC0gcmVzZXJ2ZWQgYW1vdW50IGlzIGxlc3MgdGhhbiAwCQEAAAAJY2hhbmdlSW50AAAAAgkAAZEAAAACBQAAAA5SRVNFUlZBVElPTktFWQUAAAAHYXNzZXRJZAkBAAAAAS0AAAABBQAAAAl3aW5BbW91bnQBAAAAFXZhbGlkYXRlQW5kR2V0QXNzZXRJZAAAAAEAAAAHYXNzZXRJZAMJAAAAAAAAAgUAAAAHYXNzZXRJZAkAAZEAAAACBQAAAAZBU1NFVFMAAAAAAAAAAAAAAAAAAAAAAAADCQAAAAAAAAIFAAAAB2Fzc2V0SWQJAAGRAAAAAgUAAAAGQVNTRVRTAAAAAAAAAAABAAAAAAAAAAABCQAAAgAAAAECAAAAFUludmFsaWQgcGF5bWVudCBhc3NldAEAAAAadmFsaWRhdGVCZXRBbmRHZXRXaW5BbW91bnQAAAADAAAACWJldEFtb3VudAAAAAdhc3NldElkAAAADHBsYXllckNob2ljZQQAAAAKZGljZXNDb3VudAkAATEAAAABBQAAAAxwbGF5ZXJDaG9pY2UEAAAACmNvbW1pc3Npb24JAQAAAA1nZXRDb21taXNzaW9uAAAAAQUAAAAHYXNzZXRJZAoBAAAAC2NoZWNrQW1vdW50AAAAAgAAAAFhAAAAAXgDBQAAAAFhBgkAAAAAAAACBQAAAAliZXRBbW91bnQJAABkAAAAAgkAAGgAAAACBQAAAAF4CQABkQAAAAIFAAAACERFQ0lNQUxTBQAAAAdhc3NldElkBQAAAApjb21taXNzaW9uAwkBAAAAASEAAAABBAAAAA0kbGlzdDQ2NDk0NjgyBQAAAARCRVRTBAAAAA0kc2l6ZTQ2NDk0NjgyCQABkAAAAAEFAAAADSRsaXN0NDY0OTQ2ODIEAAAADSRhY2MwNDY0OTQ2ODIHAwkAAAAAAAACBQAAAA0kc2l6ZTQ2NDk0NjgyAAAAAAAAAAAABQAAAA0kYWNjMDQ2NDk0NjgyBAAAAA0kYWNjMTQ2NDk0NjgyCQEAAAALY2hlY2tBbW91bnQAAAACBQAAAA0kYWNjMDQ2NDk0NjgyCQABkQAAAAIFAAAADSRsaXN0NDY0OTQ2ODIAAAAAAAAAAAADCQAAAAAAAAIFAAAADSRzaXplNDY0OTQ2ODIAAAAAAAAAAAEFAAAADSRhY2MxNDY0OTQ2ODIEAAAADSRhY2MyNDY0OTQ2ODIJAQAAAAtjaGVja0Ftb3VudAAAAAIFAAAADSRhY2MxNDY0OTQ2ODIJAAGRAAAAAgUAAAANJGxpc3Q0NjQ5NDY4MgAAAAAAAAAAAQMJAAAAAAAAAgUAAAANJHNpemU0NjQ5NDY4MgAAAAAAAAAAAgUAAAANJGFjYzI0NjQ5NDY4MgQAAAANJGFjYzM0NjQ5NDY4MgkBAAAAC2NoZWNrQW1vdW50AAAAAgUAAAANJGFjYzI0NjQ5NDY4MgkAAZEAAAACBQAAAA0kbGlzdDQ2NDk0NjgyAAAAAAAAAAACAwkAAAAAAAACBQAAAA0kc2l6ZTQ2NDk0NjgyAAAAAAAAAAADBQAAAA0kYWNjMzQ2NDk0NjgyBAAAAA0kYWNjNDQ2NDk0NjgyCQEAAAALY2hlY2tBbW91bnQAAAACBQAAAA0kYWNjMzQ2NDk0NjgyCQABkQAAAAIFAAAADSRsaXN0NDY0OTQ2ODIAAAAAAAAAAAMDCQAAAAAAAAIFAAAADSRzaXplNDY0OTQ2ODIAAAAAAAAAAAQFAAAADSRhY2M0NDY0OTQ2ODIEAAAADSRhY2M1NDY0OTQ2ODIJAQAAAAtjaGVja0Ftb3VudAAAAAIFAAAADSRhY2M0NDY0OTQ2ODIJAAGRAAAAAgUAAAANJGxpc3Q0NjQ5NDY4MgAAAAAAAAAABAMJAAAAAAAAAgUAAAANJHNpemU0NjQ5NDY4MgAAAAAAAAAABQUAAAANJGFjYzU0NjQ5NDY4MgQAAAANJGFjYzY0NjQ5NDY4MgkBAAAAC2NoZWNrQW1vdW50AAAAAgUAAAANJGFjYzU0NjQ5NDY4MgkAAZEAAAACBQAAAA0kbGlzdDQ2NDk0NjgyAAAAAAAAAAAFCQAAAgAAAAECAAAAEkxpc3Qgc2l6ZSBleGNlZWQgNQkAAAIAAAABAgAAABdCZXQgYW1vdW50IGlzIG5vdCB2YWxpZAMJAAAAAAAAAgkABLYAAAABBQAAAAxwbGF5ZXJDaG9pY2UFAAAABHVuaXQJAAACAAAAAQIAAAAXSW52YWxpZCBwbGF5ZXIncyBjaG9pY2UDAwkAAGYAAAACAAAAAAAAAAABBQAAAApkaWNlc0NvdW50BgkAAGYAAAACBQAAAApkaWNlc0NvdW50AAAAAAAAAAAFCQAAAgAAAAECAAAAJkludmFsaWQgZGljZXMgY291bnQgaW4gcGxheWVyJ3MgY2hvaWNlBAAAAANiZXQJAABlAAAAAgUAAAAJYmV0QW1vdW50BQAAAApjb21taXNzaW9uCQAAaQAAAAIJAABoAAAAAgUAAAADYmV0CQABkQAAAAIFAAAABVJBVEVTCQAAZQAAAAIFAAAACmRpY2VzQ291bnQAAAAAAAAAAAEFAAAACFJBVEVNVUxUAQAAABJnZW5lcmF0ZVJhbmRDaG9pc2UAAAACAAAABmdhbWVJZAAAAAdyc2FTaWduBAAAAAtyc2FTaWdWYWxpZAkAAfgAAAAEBQAAAAZTSEEyNTYJAAGbAAAAAQUAAAAGZ2FtZUlkBQAAAAdyc2FTaWduBQAAAAlSU0FQVUJMSUMDCQEAAAABIQAAAAEFAAAAC3JzYVNpZ1ZhbGlkCQAAAgAAAAECAAAAFUludmFsaWQgUlNBIHNpZ25hdHVyZQQAAAAEcmFuZAkAAGoAAAACCQAEsQAAAAEJAAH3AAAAAQUAAAAHcnNhU2lnbgAAAAAAAAAABgQAAAAGcmVzdWx0AwkAAGYAAAACAAAAAAAAAAAABQAAAARyYW5kCQAAaAAAAAIA//////////8FAAAABHJhbmQFAAAABHJhbmQJAAGkAAAAAQkAAGQAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAEBAAAAC2lzUGxheWVyV2luAAAAAgAAAAxwbGF5ZXJDaG9pY2UAAAAKcmFuZENob2lzZQQAAAABcwkAATEAAAABBQAAAAxwbGF5ZXJDaG9pY2UKAQAAAAVjaGVjawAAAAIAAAABYQAAAAF4AwUAAAABYQYDCQAAZwAAAAIFAAAAAXMFAAAAAXgJAAAAAAAAAgkAAS8AAAACCQABMAAAAAIFAAAADHBsYXllckNob2ljZQkAAGUAAAACBQAAAAF4AAAAAAAAAAABAAAAAAAAAAABBQAAAApyYW5kQ2hvaXNlBwQAAAANJGxpc3Q1NTYzNTU5NwkABEwAAAACAAAAAAAAAAABCQAETAAAAAIAAAAAAAAAAAIJAARMAAAAAgAAAAAAAAAAAwkABEwAAAACAAAAAAAAAAAECQAETAAAAAIAAAAAAAAAAAUFAAAAA25pbAQAAAANJHNpemU1NTYzNTU5NwkAAZAAAAABBQAAAA0kbGlzdDU1NjM1NTk3BAAAAA0kYWNjMDU1NjM1NTk3BwMJAAAAAAAAAgUAAAANJHNpemU1NTYzNTU5NwAAAAAAAAAAAAUAAAANJGFjYzA1NTYzNTU5NwQAAAANJGFjYzE1NTYzNTU5NwkBAAAABWNoZWNrAAAAAgUAAAANJGFjYzA1NTYzNTU5NwkAAZEAAAACBQAAAA0kbGlzdDU1NjM1NTk3AAAAAAAAAAAAAwkAAAAAAAACBQAAAA0kc2l6ZTU1NjM1NTk3AAAAAAAAAAABBQAAAA0kYWNjMTU1NjM1NTk3BAAAAA0kYWNjMjU1NjM1NTk3CQEAAAAFY2hlY2sAAAACBQAAAA0kYWNjMTU1NjM1NTk3CQABkQAAAAIFAAAADSRsaXN0NTU2MzU1OTcAAAAAAAAAAAEDCQAAAAAAAAIFAAAADSRzaXplNTU2MzU1OTcAAAAAAAAAAAIFAAAADSRhY2MyNTU2MzU1OTcEAAAADSRhY2MzNTU2MzU1OTcJAQAAAAVjaGVjawAAAAIFAAAADSRhY2MyNTU2MzU1OTcJAAGRAAAAAgUAAAANJGxpc3Q1NTYzNTU5NwAAAAAAAAAAAgMJAAAAAAAAAgUAAAANJHNpemU1NTYzNTU5NwAAAAAAAAAAAwUAAAANJGFjYzM1NTYzNTU5NwQAAAANJGFjYzQ1NTYzNTU5NwkBAAAABWNoZWNrAAAAAgUAAAANJGFjYzM1NTYzNTU5NwkAAZEAAAACBQAAAA0kbGlzdDU1NjM1NTk3AAAAAAAAAAADAwkAAAAAAAACBQAAAA0kc2l6ZTU1NjM1NTk3AAAAAAAAAAAEBQAAAA0kYWNjNDU1NjM1NTk3BAAAAA0kYWNjNTU1NjM1NTk3CQEAAAAFY2hlY2sAAAACBQAAAA0kYWNjNDU1NjM1NTk3CQABkQAAAAIFAAAADSRsaXN0NTU2MzU1OTcAAAAAAAAAAAQDCQAAAAAAAAIFAAAADSRzaXplNTU2MzU1OTcAAAAAAAAAAAUFAAAADSRhY2M1NTU2MzU1OTcEAAAADSRhY2M2NTU2MzU1OTcJAQAAAAVjaGVjawAAAAIFAAAADSRhY2M1NTU2MzU1OTcJAAGRAAAAAgUAAAANJGxpc3Q1NTYzNTU5NwAAAAAAAAAABQkAAAIAAAABAgAAABJMaXN0IHNpemUgZXhjZWVkIDUBAAAADmZvcm1hdEdhbWVEYXRhAAAABwAAAAlnYW1lU3RhdGUAAAAMcGxheWVyQ2hvaWNlAAAADnBsYXllclB1YktleTU4AAAADXN0YXJ0ZWRIZWlnaHQAAAAJd2luQW1vdW50AAAAB2Fzc2V0SWQAAAALcmFuZE9yRW1wdHkJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAlnYW1lU3RhdGUCAAAAAV8FAAAADHBsYXllckNob2ljZQIAAAABXwUAAAAOcGxheWVyUHViS2V5NTgCAAAAAV8JAAGkAAAAAQUAAAANc3RhcnRlZEhlaWdodAIAAAABXwkAAaQAAAABBQAAAAl3aW5BbW91bnQCAAAAAV8JAAGkAAAAAQUAAAAHYXNzZXRJZAMJAAAAAAAAAgUAAAALcmFuZE9yRW1wdHkCAAAAAAIAAAAACQABLAAAAAICAAAAAV8FAAAAC3JhbmRPckVtcHR5AQAAAA9leHRyYWN0R2FtZURhdGEAAAABAAAABmdhbWVJZAkABLUAAAACBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAABmdhbWVJZAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAANzdHIFAAAAByRtYXRjaDAFAAAAA3N0cgkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAGR2FtZTogBQAAAAZnYW1lSWQCAAAACyBub3QgZm91bmQuAgAAAAFfAQAAAAx3aW5TY3JpcHRTZXQAAAAHAAAABmdhbWVJZAAAAA1wbGF5ZXJBZGRyZXNzAAAACXdpbkFtb3VudAAAAAdhc3NldElkAAAAC25ld2dhbWVEYXRhAAAADHdpbkJ5VGltZW91dAAAABFkZWNyZWFzZWRSZXNlcnZlcwQAAAAOd1NldENvbW1vbkRhdGEJAARMAAAAAgUAAAARZGVjcmVhc2VkUmVzZXJ2ZXMFAAAAA25pbAQAAAAOdFNldENvbW1vbkRhdGEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAANcGxheWVyQWRkcmVzcwUAAAAJd2luQW1vdW50CQABkQAAAAIFAAAABkFTU0VUUwUAAAAHYXNzZXRJZAUAAAADbmlsAwUAAAAMd2luQnlUaW1lb3V0BAAAABNuZXdnYW1lRGF0YUFkanVzdGVkCQABLAAAAAIFAAAAC25ld2dhbWVEYXRhAgAAAAhfVElNRU9VVAQAAAAIZ2FtZURhdGEJAQAAAAlEYXRhRW50cnkAAAACBQAAAAZnYW1lSWQFAAAAE25ld2dhbWVEYXRhQWRqdXN0ZWQJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIFAAAACGdhbWVEYXRhBQAAAA53U2V0Q29tbW9uRGF0YQkBAAAAC1RyYW5zZmVyU2V0AAAAAQUAAAAOdFNldENvbW1vbkRhdGEEAAAACGdhbWVEYXRhCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAGZ2FtZUlkBQAAAAtuZXdnYW1lRGF0YQkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgUAAAAIZ2FtZURhdGEFAAAADndTZXRDb21tb25EYXRhCQEAAAALVHJhbnNmZXJTZXQAAAABBQAAAA50U2V0Q29tbW9uRGF0YQAAAAIAAAABaQEAAAADYmV0AAAAAQAAAAxwbGF5ZXJDaG9pY2UEAAAABmdhbWVJZAkAAlgAAAABCAUAAAABaQAAAA10cmFuc2FjdGlvbklkAwkAAAAAAAACCAUAAAABaQAAAAdwYXltZW50BQAAAAR1bml0CQAAAgAAAAECAAAACk5vIHBheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAR0aGlzBQAAAAZnYW1lSWQJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAACUJldCBmb3I6IAUAAAAGZ2FtZUlkAgAAABIgd2FzIGFscmVhZHkgbWFkZS4EAAAAAXAJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAQAAAAHYXNzZXRJZAkBAAAAFXZhbGlkYXRlQW5kR2V0QXNzZXRJZAAAAAEIBQAAAAFwAAAAB2Fzc2V0SWQEAAAACmNvbW1pc3Npb24JAQAAAA1nZXRDb21taXNzaW9uAAAAAQUAAAAHYXNzZXRJZAQAAAAJd2luQW1vdW50CQEAAAAadmFsaWRhdGVCZXRBbmRHZXRXaW5BbW91bnQAAAADCAUAAAABcAAAAAZhbW91bnQFAAAAB2Fzc2V0SWQFAAAADHBsYXllckNob2ljZQQAAAAOcGxheWVyUHViS2V5NTgJAAJYAAAAAQgFAAAAAWkAAAAPY2FsbGVyUHVibGljS2V5BAAAAAhnYW1lRGF0YQkBAAAADmZvcm1hdEdhbWVEYXRhAAAABwUAAAAOU1RBVEVTVUJNSVRURUQFAAAADHBsYXllckNob2ljZQUAAAAOcGxheWVyUHViS2V5NTgFAAAABmhlaWdodAUAAAAJd2luQW1vdW50BQAAAAdhc3NldElkAgAAAAAJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABkQAAAAIFAAAADlJFU0VSVkFUSU9OS0VZBQAAAAdhc3NldElkCQEAAAAVaW5jcmVhc2VSZXNlcnZlQW1vdW50AAAAAgUAAAAJd2luQW1vdW50BQAAAAdhc3NldElkCQAETAAAAAIJAQAAAAxpbmNyZW1lbnRJbnQAAAABBQAAAA9HQU1FU0NPVU5URVJLRVkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAABmdhbWVJZAUAAAAIZ2FtZURhdGEFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAZTRVJWRVIFAAAACmNvbW1pc3Npb24IBQAAAAFwAAAAB2Fzc2V0SWQFAAAAA25pbAAAAAFpAQAAAAh3aXRoZHJhdwAAAAIAAAAGZ2FtZUlkAAAAB3JzYVNpZ24EAAAACGdhbWVEYXRhCQEAAAAPZXh0cmFjdEdhbWVEYXRhAAAAAQUAAAAGZ2FtZUlkBAAAAAlnYW1lU3RhdGUJAAGRAAAAAgUAAAAIZ2FtZURhdGEFAAAADElkeEdhbWVTdGF0ZQQAAAAMcGxheWVyQ2hvaWNlCQABkQAAAAIFAAAACGdhbWVEYXRhBQAAAA9JZHhQbGF5ZXJDaG9pY2UEAAAADXN0YXJ0ZWRIZWlnaHQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAhnYW1lRGF0YQUAAAAQSWR4U3RhcnRlZEhlaWdodAQAAAAJd2luQW1vdW50CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAIZ2FtZURhdGEFAAAADElkeFdpbkFtb3VudAQAAAAHYXNzZXRJZAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAACGdhbWVEYXRhBQAAAApJZHhBc3NldElkBAAAAA5wbGF5ZXJQdWJLZXk1OAkAAZEAAAACBQAAAAhnYW1lRGF0YQUAAAARSWR4UGxheWVyUHViS2V5NTgEAAAADXBsYXllckFkZHJlc3MJAQAAABRhZGRyZXNzRnJvbVB1YmxpY0tleQAAAAEJAAJZAAAAAQUAAAAOcGxheWVyUHViS2V5NTgEAAAADHdpbkJ5VGltZW91dAkAAGYAAAACCQAAZQAAAAIFAAAABmhlaWdodAUAAAANc3RhcnRlZEhlaWdodAUAAAATUkFORE9SQUNMRVRJTUVGUkFNRQQAAAARZGVjcmVhc2VkUmVzZXJ2ZXMJAQAAABZkZWNyZWFzZVJlc2VydmVkQW1vdW50AAAAAwUAAAAGZ2FtZUlkBQAAAAdhc3NldElkBQAAAAl3aW5BbW91bnQDCQEAAAACIT0AAAACBQAAAAlnYW1lU3RhdGUFAAAADlNUQVRFU1VCTUlUVEVECQAAAgAAAAECAAAAJEludmFsaWQgZ2FtZSBzdGF0ZSBmb3IgcGFzc2VkIGdhbWVJZAMFAAAADHdpbkJ5VGltZW91dAQAAAAKcmFuZENob2lzZQkAAS8AAAACBQAAAAxwbGF5ZXJDaG9pY2UAAAAAAAAAAAEEAAAAC25ld2dhbWVEYXRhCQEAAAAOZm9ybWF0R2FtZURhdGEAAAAHBQAAAAhTVEFURVdPTgUAAAAMcGxheWVyQ2hvaWNlBQAAAA5wbGF5ZXJQdWJLZXk1OAUAAAANc3RhcnRlZEhlaWdodAUAAAAJd2luQW1vdW50BQAAAAdhc3NldElkBQAAAApyYW5kQ2hvaXNlCQEAAAAMd2luU2NyaXB0U2V0AAAABwUAAAAGZ2FtZUlkBQAAAA1wbGF5ZXJBZGRyZXNzBQAAAAl3aW5BbW91bnQFAAAAB2Fzc2V0SWQFAAAAC25ld2dhbWVEYXRhBQAAAAx3aW5CeVRpbWVvdXQFAAAAEWRlY3JlYXNlZFJlc2VydmVzBAAAAApyYW5kQ2hvaXNlCQEAAAASZ2VuZXJhdGVSYW5kQ2hvaXNlAAAAAgUAAAAGZ2FtZUlkBQAAAAdyc2FTaWduAwkBAAAAAiE9AAAAAggFAAAAAWkAAAAGY2FsbGVyBQAAAAZTRVJWRVIJAAACAAAAAQIAAAArUmVndWxhciB3aXRoZHJhdyBjYW4gYmUgZG9uZSBieSBzZXJ2ZXIgb25seQMJAQAAAAtpc1BsYXllcldpbgAAAAIFAAAADHBsYXllckNob2ljZQUAAAAKcmFuZENob2lzZQQAAAALbmV3Z2FtZURhdGEJAQAAAA5mb3JtYXRHYW1lRGF0YQAAAAcFAAAACFNUQVRFV09OBQAAAAxwbGF5ZXJDaG9pY2UFAAAADnBsYXllclB1YktleTU4BQAAAA1zdGFydGVkSGVpZ2h0BQAAAAl3aW5BbW91bnQFAAAAB2Fzc2V0SWQFAAAACnJhbmRDaG9pc2UJAQAAAAx3aW5TY3JpcHRTZXQAAAAHBQAAAAZnYW1lSWQFAAAADXBsYXllckFkZHJlc3MFAAAACXdpbkFtb3VudAUAAAAHYXNzZXRJZAUAAAALbmV3Z2FtZURhdGEFAAAADHdpbkJ5VGltZW91dAUAAAARZGVjcmVhc2VkUmVzZXJ2ZXMEAAAAC25ld2dhbWVEYXRhCQEAAAAOZm9ybWF0R2FtZURhdGEAAAAHBQAAAAlTVEFURUxPU1QFAAAADHBsYXllckNob2ljZQUAAAAOcGxheWVyUHViS2V5NTgFAAAADXN0YXJ0ZWRIZWlnaHQFAAAACXdpbkFtb3VudAUAAAAHYXNzZXRJZAUAAAAKcmFuZENob2lzZQkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAGZ2FtZUlkBQAAAAtuZXdnYW1lRGF0YQkABEwAAAACBQAAABFkZWNyZWFzZWRSZXNlcnZlcwUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAMJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5BAAAAAckbWF0Y2gwBQAAAAJ0eAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAATVHJhbnNmZXJUcmFuc2FjdGlvbgQAAAADdHR4BQAAAAckbWF0Y2gwBAAAAAdhc3NldElkCQEAAAAVdmFsaWRhdGVBbmRHZXRBc3NldElkAAAAAQgFAAAAA3R0eAAAAAdhc3NldElkCQAAZwAAAAIJAABlAAAAAgkAA+sAAAACBQAAAAR0aGlzCAUAAAADdHR4AAAAB2Fzc2V0SWQIBQAAAAN0dHgAAAAGYW1vdW50CQEAAAAIZ2V0SW50T3IAAAACCQABkQAAAAIFAAAADlJFU0VSVkFUSU9OS0VZBQAAAAdhc3NldElkAAAAAAAAAAAAAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAADc3R4BQAAAAckbWF0Y2gwAwkAAAAAAAACCQEAAAAIZ2V0SW50T3IAAAACCQABkQAAAAIFAAAADlJFU0VSVkFUSU9OS0VZAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACQAAAAAAAAIJAQAAAAhnZXRJbnRPcgAAAAIJAAGRAAAAAgUAAAAOUkVTRVJWQVRJT05LRVkAAAAAAAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAHBwcA6VCd",
    "chainId": 87,
    "height": 2039591,
    "spentComplexity": 0
}

View: original | compacted
Prev: AWDSXRnfFiVGQSHkXhw7yCsjyavBDrhBtYUnHyd12LFZ
Next: 661xnQFwLLtWvJQ9wvNdtYYcPXPoDWrG6xSADu3HzKtS

Diff: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 3 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
+
let WAVESD = 100000000
5
+
6
+
let USDND = 1000000
7
+
8
+
let DECIMALS = [WAVESD, USDND]
9
+
10
+
let ASSETS = [unit, fromBase58String("DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p")]
11
+
12
+
let COMMISSION = [((5 * WAVESD) / 1000), (((5 * USDND) / 1000) * 10)]
13
+
14
+
func getCommission (assetId) = COMMISSION[assetId]
15
+
16
+
4
17
 
let RSAPUBLIC = fromBase64String("base64:MIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAlemr95J1jZUs7cJmrmmlN4zo7YVsBJzIeJdk8LDFGhUKSI6yfs20ZyJe21+6GJwNnKUU1Uyoc17wSWMKkrZ0MMvYE+Z5AiijvBK4sSJ3IgGjdU8/NhI8CBDu0F+xRM9q3TB3LLbDy5sBdudYfHfsUOc+MTvAD69n27db2Rh8+yZQMtubkuTQNp89sphHQaLGyQFaNlK/Na3lFx6omqzaa1gjoplUr6rvYKgfAICUB3zVmJShiEi7w7R0hWlNRD3qcZjCUONSpFo4WbzknGOazw84B+IMIFnIpXWzQL8RX0vNcfsBvLDfM6k2ZacqwyMKaLLqigdBiGdJ7W+0lOStOQIDAQAB")
5
18
 
6
19
 
let SERVER = addressFromStringValue("3PMT9wun7BB7JABSuhTJpFgJoegRfYw2e6d")
7
20
 
8
-
let RANDORACLETIMEFRAME = 4320
21
+
let RANDORACLETIMEFRAME = 7200
9
22
 
10
-
let WAVELET = ((100 * 1000) * 1000)
23
+
let BET1 = 1
11
24
 
12
-
let COMMISSION = ((5 * WAVELET) / 1000)
25
+
let BET2 = 2
13
26
 
14
-
let BET1 = (1 * WAVELET)
27
+
let BET4 = 4
15
28
 
16
-
let BET2 = (2 * WAVELET)
29
+
let BET8 = 8
17
30
 
18
-
let BET4 = (4 * WAVELET)
19
-
20
-
let BET8 = (8 * WAVELET)
21
-
22
-
let BET14 = (14 * WAVELET)
31
+
let BET14 = 14
23
32
 
24
33
 
let RATEMULT = 10000
25
34
 
33
42
 
34
43
 
let RATE5 = 11400
35
44
 
45
+
let RATES = [RATE1, RATE2, RATE3, RATE4, RATE5]
46
+
47
+
let BETS = [BET1, BET2, BET4, BET8, BET14]
48
+
36
49
 
let IdxGameState = 0
37
50
 
38
51
 
let IdxPlayerChoice = 1
41
54
 
42
55
 
let IdxStartedHeight = 3
43
56
 
44
-
let IdxWinAmt = 4
57
+
let IdxWinAmount = 4
45
58
 
46
-
let IdxRandOrEmpty = 5
59
+
let IdxAssetId = 5
47
60
 
48
-
let RESERVATIONKEY = "$RESERVED_AMOUNT"
61
+
let RESERVATIONKEY = ["$RESERVED_AMOUNT_WAVES", "$RESERVED_AMOUNT_USDN"]
49
62
 
50
63
 
let GAMESCOUNTERKEY = "$GAME_NUM"
51
64
 
55
68
 
56
69
 
let STATELOST = "LOST"
57
70
 
58
-
func IncrementGameNum () = {
59
-
    let gameNum =     match getInteger(this, GAMESCOUNTERKEY) {
60
-
        case num: Int => 
61
-
            num
62
-
        case _ => 
63
-
            0
64
-
    }
65
-
    (gameNum + 1)
66
-
    }
71
+
func getIntOr (key,default) = if (isDefined(getInteger(this, key)))
72
+
    then getIntegerValue(this, key)
73
+
    else default
67
74
 
68
75
 
69
-
func ExtractReservedAmt () = match getInteger(this, RESERVATIONKEY) {
70
-
    case a: Int => 
71
-
        a
72
-
    case _ => 
73
-
        0
74
-
}
76
+
func setInt (key,value) = DataEntry(key, value)
75
77
 
76
78
 
77
-
func ValidateAndIncreaseReservedAmt (winAmt) = {
78
-
    let newReservedAmount = (ExtractReservedAmt() + winAmt)
79
-
    let balance = wavesBalance(this)
80
-
    if ((newReservedAmount > balance))
79
+
func incrementInt (key) = setInt(key, (getIntOr(key, -1) + 1))
80
+
81
+
82
+
func changeInt (key,by) = setInt(key, (getIntOr(key, 0) + by))
83
+
84
+
85
+
func increaseReserveAmount (winAmount,assetId) = {
86
+
    let newReservedAmount = (getIntOr(RESERVATIONKEY[assetId], 0) + winAmount)
87
+
    if ((newReservedAmount > wavesBalance(this)))
81
88
 
        then throw("Insufficient funds on Dice Roller account. Transaction was rejected for your safety.")
82
89
 
        else newReservedAmount
83
90
 
    }
84
91
 
85
92
 
86
-
func DecreaseReservedAmt (gameId,winAmt) = {
87
-
    let newReservedAmount = (ExtractReservedAmt() - winAmt)
88
-
    if ((0 > newReservedAmount))
89
-
        then throw("Invalid Dice Roller account state - reserved amount is less than 0")
90
-
        else DataEntry(RESERVATIONKEY, newReservedAmount)
93
+
func decreaseReservedAmount (gameId,assetId,winAmount) = if ((0 > (getIntOr(RESERVATIONKEY[assetId], 0) - winAmount)))
94
+
    then throw("Invalid Dice Roller account state - reserved amount is less than 0")
95
+
    else changeInt(RESERVATIONKEY[assetId], -(winAmount))
96
+
97
+
98
+
func validateAndGetAssetId (assetId) = if ((assetId == ASSETS[0]))
99
+
    then 0
100
+
    else if ((assetId == ASSETS[1]))
101
+
        then 1
102
+
        else throw("Invalid payment asset")
103
+
104
+
105
+
func validateBetAndGetWinAmount (betAmount,assetId,playerChoice) = {
106
+
    let dicesCount = size(playerChoice)
107
+
    let commission = getCommission(assetId)
108
+
    func checkAmount (a,x) =     if (a)
109
+
        then true
110
+
        else (betAmount == ((x * DECIMALS[assetId]) + commission))
111
+
112
+
    if (!({
113
+
        let $list46494682 = BETS
114
+
        let $size46494682 = size($list46494682)
115
+
        let $acc046494682 = false
116
+
        if (($size46494682 == 0))
117
+
            then $acc046494682
118
+
            else {
119
+
                let $acc146494682 = checkAmount($acc046494682, $list46494682[0])
120
+
                if (($size46494682 == 1))
121
+
                    then $acc146494682
122
+
                    else {
123
+
                        let $acc246494682 = checkAmount($acc146494682, $list46494682[1])
124
+
                        if (($size46494682 == 2))
125
+
                            then $acc246494682
126
+
                            else {
127
+
                                let $acc346494682 = checkAmount($acc246494682, $list46494682[2])
128
+
                                if (($size46494682 == 3))
129
+
                                    then $acc346494682
130
+
                                    else {
131
+
                                        let $acc446494682 = checkAmount($acc346494682, $list46494682[3])
132
+
                                        if (($size46494682 == 4))
133
+
                                            then $acc446494682
134
+
                                            else {
135
+
                                                let $acc546494682 = checkAmount($acc446494682, $list46494682[4])
136
+
                                                if (($size46494682 == 5))
137
+
                                                    then $acc546494682
138
+
                                                    else {
139
+
                                                        let $acc646494682 = checkAmount($acc546494682, $list46494682[5])
140
+
                                                        throw("List size exceed 5")
141
+
                                                        }
142
+
                                                }
143
+
                                        }
144
+
                                }
145
+
                        }
146
+
                }
147
+
        }))
148
+
        then throw("Bet amount is not valid")
149
+
        else if ((parseInt(playerChoice) == unit))
150
+
            then throw("Invalid player's choice")
151
+
            else if (if ((1 > dicesCount))
152
+
                then true
153
+
                else (dicesCount > 5))
154
+
                then throw("Invalid dices count in player's choice")
155
+
                else {
156
+
                    let bet = (betAmount - commission)
157
+
                    ((bet * RATES[(dicesCount - 1)]) / RATEMULT)
158
+
                    }
91
159
 
    }
92
160
 
93
161
 
94
-
func ValidateBetAndDefineWinAmt (betAmt,playerChoice) = {
95
-
    let betAmtValid = if (if (if (if ((betAmt == (BET1 + COMMISSION)))
96
-
        then true
97
-
        else (betAmt == (BET2 + COMMISSION)))
98
-
        then true
99
-
        else (betAmt == (BET4 + COMMISSION)))
100
-
        then true
101
-
        else (betAmt == (BET8 + COMMISSION)))
102
-
        then true
103
-
        else (betAmt == (BET14 + COMMISSION))
104
-
    if (betAmtValid)
105
-
        then {
106
-
            let dicesCount = size(playerChoice)
107
-
            let bet = (betAmt - COMMISSION)
108
-
            if ((dicesCount == 1))
109
-
                then ((bet * RATE1) / RATEMULT)
110
-
                else if ((dicesCount == 2))
111
-
                    then ((bet * RATE2) / RATEMULT)
112
-
                    else if ((dicesCount == 3))
113
-
                        then ((bet * RATE3) / RATEMULT)
114
-
                        else if ((dicesCount == 4))
115
-
                            then ((bet * RATE4) / RATEMULT)
116
-
                            else if ((dicesCount == 5))
117
-
                                then ((bet * RATE5) / RATEMULT)
118
-
                                else throw("Invalid dices count in player's choice")
162
+
func generateRandChoise (gameId,rsaSign) = {
163
+
    let rsaSigValid = rsaVerify(SHA256, toBytes(gameId), rsaSign, RSAPUBLIC)
164
+
    if (!(rsaSigValid))
165
+
        then throw("Invalid RSA signature")
166
+
        else {
167
+
            let rand = (toInt(sha256(rsaSign)) % 6)
168
+
            let result = if ((0 > rand))
169
+
                then (-1 * rand)
170
+
                else rand
171
+
            toString((result + 1))
119
172
 
            }
120
-
        else throw("Bet amount is not in range")
121
173
 
    }
122
174
 
123
175
 
124
-
func RandToStr (r) = if ((r == 0))
125
-
    then "1"
126
-
    else if ((r == 1))
127
-
        then "2"
128
-
        else if ((r == 2))
129
-
            then "3"
130
-
            else if ((r == 3))
131
-
                then "4"
132
-
                else if ((r == 4))
133
-
                    then "5"
134
-
                    else if ((r == 5))
135
-
                        then "6"
136
-
                        else throw(("Unsupported r parameter passed: expected=[0,...,5] actual=" + toString(r)))
176
+
func isPlayerWin (playerChoice,randChoise) = {
177
+
    let s = size(playerChoice)
178
+
    func check (a,x) =     if (a)
179
+
        then true
180
+
        else if ((s >= x))
181
+
            then (take(drop(playerChoice, (x - 1)), 1) == randChoise)
182
+
            else false
137
183
 
138
-
139
-
func GenerateRandInt (gameId,rsaSign) = {
140
-
    let rsaSigValid = rsaVerify(SHA256, toBytes(gameId), rsaSign, RSAPUBLIC)
141
-
    if (rsaSigValid)
142
-
        then {
143
-
            let rand = (toInt(sha256(rsaSign)) % 6)
144
-
            if ((0 > rand))
145
-
                then (-1 * rand)
146
-
                else rand
184
+
    let $list55635597 = [1, 2, 3, 4, 5]
185
+
    let $size55635597 = size($list55635597)
186
+
    let $acc055635597 = false
187
+
    if (($size55635597 == 0))
188
+
        then $acc055635597
189
+
        else {
190
+
            let $acc155635597 = check($acc055635597, $list55635597[0])
191
+
            if (($size55635597 == 1))
192
+
                then $acc155635597
193
+
                else {
194
+
                    let $acc255635597 = check($acc155635597, $list55635597[1])
195
+
                    if (($size55635597 == 2))
196
+
                        then $acc255635597
197
+
                        else {
198
+
                            let $acc355635597 = check($acc255635597, $list55635597[2])
199
+
                            if (($size55635597 == 3))
200
+
                                then $acc355635597
201
+
                                else {
202
+
                                    let $acc455635597 = check($acc355635597, $list55635597[3])
203
+
                                    if (($size55635597 == 4))
204
+
                                        then $acc455635597
205
+
                                        else {
206
+
                                            let $acc555635597 = check($acc455635597, $list55635597[4])
207
+
                                            if (($size55635597 == 5))
208
+
                                                then $acc555635597
209
+
                                                else {
210
+
                                                    let $acc655635597 = check($acc555635597, $list55635597[5])
211
+
                                                    throw("List size exceed 5")
212
+
                                                    }
213
+
                                            }
214
+
                                    }
215
+
                            }
216
+
                    }
147
217
 
            }
148
-
        else throw("Invalid RSA signature")
149
218
 
    }
150
219
 
151
220
 
152
-
func IsPlayerWin (playerChoice,randStr) = {
153
-
    let s = size(playerChoice)
154
-
    if (if (if (if (if (if ((s >= 1))
155
-
        then (take(drop(playerChoice, 0), 1) == randStr)
156
-
        else false)
157
-
        then true
158
-
        else if ((s >= 2))
159
-
            then (take(drop(playerChoice, 1), 1) == randStr)
160
-
            else false)
161
-
        then true
162
-
        else if ((s >= 3))
163
-
            then (take(drop(playerChoice, 2), 1) == randStr)
164
-
            else false)
165
-
        then true
166
-
        else if ((s >= 4))
167
-
            then (take(drop(playerChoice, 3), 1) == randStr)
168
-
            else false)
169
-
        then true
170
-
        else if ((s >= 5))
171
-
            then (take(drop(playerChoice, 4), 1) == randStr)
172
-
            else false)
173
-
        then true
174
-
        else if ((s >= 6))
175
-
            then (take(drop(playerChoice, 5), 1) == randStr)
176
-
            else false
177
-
    }
221
+
func formatGameData (gameState,playerChoice,playerPubKey58,startedHeight,winAmount,assetId,randOrEmpty) = (((((((((((gameState + "_") + playerChoice) + "_") + playerPubKey58) + "_") + toString(startedHeight)) + "_") + toString(winAmount)) + "_") + toString(assetId)) + (if ((randOrEmpty == ""))
222
+
    then ""
223
+
    else ("_" + randOrEmpty)))
178
224
 
179
225
 
180
-
func FormatGameDataParam (p) = {
181
-
    let s = size(p)
182
-
    if ((s == 0))
183
-
        then throw("Parameter size must be greater then 0")
184
-
        else if ((s > 99))
185
-
            then throw("Parameter size must be less then 100")
186
-
            else if ((10 > s))
187
-
                then (("0" + toString(s)) + p)
188
-
                else (toString(s) + p)
189
-
    }
226
+
func extractGameData (gameId) = split(match getString(this, gameId) {
227
+
    case str: String => 
228
+
        str
229
+
    case _ => 
230
+
        throw((("Game: " + gameId) + " not found."))
231
+
}, "_")
190
232
 
191
233
 
192
-
func FormatGameDataStr (gameState,playerChoice,playerPubKey58,startedHeight,winAmt,randOrEmpty) = {
193
-
    let fullStateStr = ((((((((FormatGameDataParam(gameState) + "_") + FormatGameDataParam(playerChoice)) + "_") + FormatGameDataParam(playerPubKey58)) + "_") + FormatGameDataParam(toString(startedHeight))) + "_") + FormatGameDataParam(toString(winAmt)))
194
-
    if ((randOrEmpty == ""))
195
-
        then fullStateStr
196
-
        else ((fullStateStr + "_") + FormatGameDataParam(randOrEmpty))
197
-
    }
198
-
199
-
200
-
func RemoveUnderscoreIfPresent (remaining) = if ((size(remaining) > 0))
201
-
    then drop(remaining, 1)
202
-
    else remaining
203
-
204
-
205
-
func ParseNextAttribute (remaining) = {
206
-
    let s = size(remaining)
207
-
    if ((s > 0))
208
-
        then {
209
-
            let nn = parseIntValue(take(remaining, 2))
210
-
            let v = take(drop(remaining, 2), nn)
211
-
            let tmpRemaining = drop(remaining, (nn + 2))
212
-
            let remainingState = RemoveUnderscoreIfPresent(tmpRemaining)
213
-
[v, remainingState]
214
-
            }
215
-
        else throw("Empty string was passed into parseNextAttribute func")
216
-
    }
217
-
218
-
219
-
func ParseGameRawDataStr (rawStateStr) = {
220
-
    let gameState = ParseNextAttribute(rawStateStr)
221
-
    let playerChoice = ParseNextAttribute(gameState[1])
222
-
    let playerPubKey58 = ParseNextAttribute(playerChoice[1])
223
-
    let startedHeight = ParseNextAttribute(playerPubKey58[1])
224
-
    let winAmt = ParseNextAttribute(startedHeight[1])
225
-
[gameState[0], playerChoice[0], playerPubKey58[0], startedHeight[0], winAmt[0]]
226
-
    }
227
-
228
-
229
-
func ExtractGameDataList (gameId) = {
230
-
    let rawDataStr =     match getString(this, gameId) {
231
-
        case str: String => 
232
-
            str
233
-
        case _ => 
234
-
            throw(("Couldn't find game by " + gameId))
235
-
    }
236
-
    ParseGameRawDataStr(rawDataStr)
237
-
    }
238
-
239
-
240
-
func WinScriptSet (gameId,playerAddress,winAmt,newGameDataStr,winByTimeout,decreasedReserves) = {
234
+
func winScriptSet (gameId,playerAddress,winAmount,assetId,newgameData,winByTimeout,decreasedReserves) = {
241
235
 
    let wSetCommonData = [decreasedReserves]
242
-
    let tSetCommonData = [ScriptTransfer(playerAddress, winAmt, unit)]
236
+
    let tSetCommonData = [ScriptTransfer(playerAddress, winAmount, ASSETS[assetId])]
243
237
 
    if (winByTimeout)
244
238
 
        then {
245
-
            let newGameDataStrAdjusted = ((newGameDataStr + "_") + FormatGameDataParam("TIMEOUT"))
246
-
            let gameData = DataEntry(gameId, newGameDataStrAdjusted)
239
+
            let newgameDataAdjusted = (newgameData + "_TIMEOUT")
240
+
            let gameData = DataEntry(gameId, newgameDataAdjusted)
247
241
 
            ScriptResult(WriteSet(gameData :: wSetCommonData), TransferSet(tSetCommonData))
248
242
 
            }
249
243
 
        else {
250
-
            let gameData = DataEntry(gameId, newGameDataStr)
244
+
            let gameData = DataEntry(gameId, newgameData)
251
245
 
            ScriptResult(WriteSet(gameData :: wSetCommonData), TransferSet(tSetCommonData))
252
246
 
            }
253
247
 
    }
255
249
 
256
250
 
@Callable(i)
257
251
 
func bet (playerChoice) = {
258
-
    let newGameNum = IncrementGameNum()
259
252
 
    let gameId = toBase58String(i.transactionId)
260
-
    let pmt = extract(i.payment)
261
-
    let betNotInWaves = isDefined(pmt.assetId)
262
-
    let feeNotInWaves = isDefined(pmt.assetId)
263
-
    let winAmt = ValidateBetAndDefineWinAmt(pmt.amount, playerChoice)
264
-
    let txIdUsed = isDefined(getString(this, gameId))
265
-
    if (betNotInWaves)
266
-
        then throw("Bet amount must be in Waves")
267
-
        else if (feeNotInWaves)
268
-
            then throw("Transaction's fee must be in Waves")
269
-
            else if (txIdUsed)
270
-
                then throw("Passed txId had been used before. Game aborted.")
271
-
                else {
272
-
                    let playerPubKey58 = toBase58String(i.callerPublicKey)
273
-
                    let gameDataStr = FormatGameDataStr(STATESUBMITTED, playerChoice, playerPubKey58, height, winAmt, "")
274
-
                    ScriptResult(WriteSet([DataEntry(RESERVATIONKEY, ValidateAndIncreaseReservedAmt(winAmt)), DataEntry(GAMESCOUNTERKEY, newGameNum), DataEntry(gameId, gameDataStr)]), TransferSet([ScriptTransfer(SERVER, COMMISSION, unit)]))
275
-
                    }
253
+
    if ((i.payment == unit))
254
+
        then throw("No payment")
255
+
        else if (isDefined(getString(this, gameId)))
256
+
            then throw((("Bet for: " + gameId) + " was already made."))
257
+
            else {
258
+
                let p = extract(i.payment)
259
+
                let assetId = validateAndGetAssetId(p.assetId)
260
+
                let commission = getCommission(assetId)
261
+
                let winAmount = validateBetAndGetWinAmount(p.amount, assetId, playerChoice)
262
+
                let playerPubKey58 = toBase58String(i.callerPublicKey)
263
+
                let gameData = formatGameData(STATESUBMITTED, playerChoice, playerPubKey58, height, winAmount, assetId, "")
264
+
                ScriptResult(WriteSet([DataEntry(RESERVATIONKEY[assetId], increaseReserveAmount(winAmount, assetId)), incrementInt(GAMESCOUNTERKEY), DataEntry(gameId, gameData)]), TransferSet([ScriptTransfer(SERVER, commission, p.assetId)]))
265
+
                }
276
266
 
    }
277
267
 
278
268
 
279
269
 
280
270
 
@Callable(i)
281
271
 
func withdraw (gameId,rsaSign) = {
282
-
    let gameDataList = ExtractGameDataList(gameId)
283
-
    let gameState = gameDataList[IdxGameState]
284
-
    let playerChoice = gameDataList[IdxPlayerChoice]
285
-
    let startedHeight = parseIntValue(gameDataList[IdxStartedHeight])
286
-
    let winAmt = parseIntValue(gameDataList[IdxWinAmt])
287
-
    let playerPubKey58 = gameDataList[IdxPlayerPubKey58]
272
+
    let gameData = extractGameData(gameId)
273
+
    let gameState = gameData[IdxGameState]
274
+
    let playerChoice = gameData[IdxPlayerChoice]
275
+
    let startedHeight = parseIntValue(gameData[IdxStartedHeight])
276
+
    let winAmount = parseIntValue(gameData[IdxWinAmount])
277
+
    let assetId = parseIntValue(gameData[IdxAssetId])
278
+
    let playerPubKey58 = gameData[IdxPlayerPubKey58]
288
279
 
    let playerAddress = addressFromPublicKey(fromBase58String(playerPubKey58))
289
280
 
    let winByTimeout = ((height - startedHeight) > RANDORACLETIMEFRAME)
290
-
    let decreasedReserves = DecreaseReservedAmt(gameId, winAmt)
281
+
    let decreasedReserves = decreaseReservedAmount(gameId, assetId, winAmount)
291
282
 
    if ((gameState != STATESUBMITTED))
292
283
 
        then throw("Invalid game state for passed gameId")
293
284
 
        else if (winByTimeout)
294
285
 
            then {
295
-
                let randStr = take(playerChoice, 1)
296
-
                let newGameDataStr = FormatGameDataStr(STATEWON, playerChoice, playerPubKey58, startedHeight, winAmt, randStr)
297
-
                WinScriptSet(gameId, playerAddress, winAmt, newGameDataStr, winByTimeout, decreasedReserves)
286
+
                let randChoise = take(playerChoice, 1)
287
+
                let newgameData = formatGameData(STATEWON, playerChoice, playerPubKey58, startedHeight, winAmount, assetId, randChoise)
288
+
                winScriptSet(gameId, playerAddress, winAmount, assetId, newgameData, winByTimeout, decreasedReserves)
298
289
 
                }
299
290
 
            else {
300
-
                let randStr = RandToStr(GenerateRandInt(gameId, rsaSign))
301
-
                if (IsPlayerWin(playerChoice, randStr))
302
-
                    then {
303
-
                        let newGameDataStr = FormatGameDataStr(STATEWON, playerChoice, playerPubKey58, startedHeight, winAmt, randStr)
304
-
                        WinScriptSet(gameId, playerAddress, winAmt, newGameDataStr, winByTimeout, decreasedReserves)
305
-
                        }
306
-
                    else {
307
-
                        let newGameDataStr = FormatGameDataStr(STATELOST, playerChoice, playerPubKey58, startedHeight, winAmt, randStr)
308
-
                        WriteSet([DataEntry(gameId, newGameDataStr), decreasedReserves])
309
-
                        }
291
+
                let randChoise = generateRandChoise(gameId, rsaSign)
292
+
                if ((i.caller != SERVER))
293
+
                    then throw("Regular withdraw can be done by server only")
294
+
                    else if (isPlayerWin(playerChoice, randChoise))
295
+
                        then {
296
+
                            let newgameData = formatGameData(STATEWON, playerChoice, playerPubKey58, startedHeight, winAmount, assetId, randChoise)
297
+
                            winScriptSet(gameId, playerAddress, winAmount, assetId, newgameData, winByTimeout, decreasedReserves)
298
+
                            }
299
+
                        else {
300
+
                            let newgameData = formatGameData(STATELOST, playerChoice, playerPubKey58, startedHeight, winAmount, assetId, randChoise)
301
+
                            WriteSet([DataEntry(gameId, newgameData), decreasedReserves])
302
+
                            }
310
303
 
                }
311
304
 
    }
312
305
 
315
308
 
func verify () = if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
316
309
 
    then     match tx {
317
310
 
        case ttx: TransferTransaction => 
318
-
            ((wavesBalance(this) - ttx.amount) >= ExtractReservedAmt())
311
+
            let assetId = validateAndGetAssetId(ttx.assetId)
312
+
            ((assetBalance(this, ttx.assetId) - ttx.amount) >= getIntOr(RESERVATIONKEY[assetId], 0))
319
313
 
        case stx: SetScriptTransaction => 
320
-
            true
314
+
            if ((getIntOr(RESERVATIONKEY[0], 0) == 0))
315
+
                then (getIntOr(RESERVATIONKEY[1], 0) == 0)
316
+
                else false
321
317
 
        case _ => 
322
318
 
            false
323
319
 
    }
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 3 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
+
let WAVESD = 100000000
5
+
6
+
let USDND = 1000000
7
+
8
+
let DECIMALS = [WAVESD, USDND]
9
+
10
+
let ASSETS = [unit, fromBase58String("DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p")]
11
+
12
+
let COMMISSION = [((5 * WAVESD) / 1000), (((5 * USDND) / 1000) * 10)]
13
+
14
+
func getCommission (assetId) = COMMISSION[assetId]
15
+
16
+
4
17
 
let RSAPUBLIC = fromBase64String("base64:MIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAlemr95J1jZUs7cJmrmmlN4zo7YVsBJzIeJdk8LDFGhUKSI6yfs20ZyJe21+6GJwNnKUU1Uyoc17wSWMKkrZ0MMvYE+Z5AiijvBK4sSJ3IgGjdU8/NhI8CBDu0F+xRM9q3TB3LLbDy5sBdudYfHfsUOc+MTvAD69n27db2Rh8+yZQMtubkuTQNp89sphHQaLGyQFaNlK/Na3lFx6omqzaa1gjoplUr6rvYKgfAICUB3zVmJShiEi7w7R0hWlNRD3qcZjCUONSpFo4WbzknGOazw84B+IMIFnIpXWzQL8RX0vNcfsBvLDfM6k2ZacqwyMKaLLqigdBiGdJ7W+0lOStOQIDAQAB")
5
18
 
6
19
 
let SERVER = addressFromStringValue("3PMT9wun7BB7JABSuhTJpFgJoegRfYw2e6d")
7
20
 
8
-
let RANDORACLETIMEFRAME = 4320
21
+
let RANDORACLETIMEFRAME = 7200
9
22
 
10
-
let WAVELET = ((100 * 1000) * 1000)
23
+
let BET1 = 1
11
24
 
12
-
let COMMISSION = ((5 * WAVELET) / 1000)
25
+
let BET2 = 2
13
26
 
14
-
let BET1 = (1 * WAVELET)
27
+
let BET4 = 4
15
28
 
16
-
let BET2 = (2 * WAVELET)
29
+
let BET8 = 8
17
30
 
18
-
let BET4 = (4 * WAVELET)
19
-
20
-
let BET8 = (8 * WAVELET)
21
-
22
-
let BET14 = (14 * WAVELET)
31
+
let BET14 = 14
23
32
 
24
33
 
let RATEMULT = 10000
25
34
 
26
35
 
let RATE1 = 39655
27
36
 
28
37
 
let RATE2 = 24600
29
38
 
30
39
 
let RATE3 = 19000
31
40
 
32
41
 
let RATE4 = 14200
33
42
 
34
43
 
let RATE5 = 11400
35
44
 
45
+
let RATES = [RATE1, RATE2, RATE3, RATE4, RATE5]
46
+
47
+
let BETS = [BET1, BET2, BET4, BET8, BET14]
48
+
36
49
 
let IdxGameState = 0
37
50
 
38
51
 
let IdxPlayerChoice = 1
39
52
 
40
53
 
let IdxPlayerPubKey58 = 2
41
54
 
42
55
 
let IdxStartedHeight = 3
43
56
 
44
-
let IdxWinAmt = 4
57
+
let IdxWinAmount = 4
45
58
 
46
-
let IdxRandOrEmpty = 5
59
+
let IdxAssetId = 5
47
60
 
48
-
let RESERVATIONKEY = "$RESERVED_AMOUNT"
61
+
let RESERVATIONKEY = ["$RESERVED_AMOUNT_WAVES", "$RESERVED_AMOUNT_USDN"]
49
62
 
50
63
 
let GAMESCOUNTERKEY = "$GAME_NUM"
51
64
 
52
65
 
let STATESUBMITTED = "SUBMITTED"
53
66
 
54
67
 
let STATEWON = "WON"
55
68
 
56
69
 
let STATELOST = "LOST"
57
70
 
58
-
func IncrementGameNum () = {
59
-
    let gameNum =     match getInteger(this, GAMESCOUNTERKEY) {
60
-
        case num: Int => 
61
-
            num
62
-
        case _ => 
63
-
            0
64
-
    }
65
-
    (gameNum + 1)
66
-
    }
71
+
func getIntOr (key,default) = if (isDefined(getInteger(this, key)))
72
+
    then getIntegerValue(this, key)
73
+
    else default
67
74
 
68
75
 
69
-
func ExtractReservedAmt () = match getInteger(this, RESERVATIONKEY) {
70
-
    case a: Int => 
71
-
        a
72
-
    case _ => 
73
-
        0
74
-
}
76
+
func setInt (key,value) = DataEntry(key, value)
75
77
 
76
78
 
77
-
func ValidateAndIncreaseReservedAmt (winAmt) = {
78
-
    let newReservedAmount = (ExtractReservedAmt() + winAmt)
79
-
    let balance = wavesBalance(this)
80
-
    if ((newReservedAmount > balance))
79
+
func incrementInt (key) = setInt(key, (getIntOr(key, -1) + 1))
80
+
81
+
82
+
func changeInt (key,by) = setInt(key, (getIntOr(key, 0) + by))
83
+
84
+
85
+
func increaseReserveAmount (winAmount,assetId) = {
86
+
    let newReservedAmount = (getIntOr(RESERVATIONKEY[assetId], 0) + winAmount)
87
+
    if ((newReservedAmount > wavesBalance(this)))
81
88
 
        then throw("Insufficient funds on Dice Roller account. Transaction was rejected for your safety.")
82
89
 
        else newReservedAmount
83
90
 
    }
84
91
 
85
92
 
86
-
func DecreaseReservedAmt (gameId,winAmt) = {
87
-
    let newReservedAmount = (ExtractReservedAmt() - winAmt)
88
-
    if ((0 > newReservedAmount))
89
-
        then throw("Invalid Dice Roller account state - reserved amount is less than 0")
90
-
        else DataEntry(RESERVATIONKEY, newReservedAmount)
93
+
func decreaseReservedAmount (gameId,assetId,winAmount) = if ((0 > (getIntOr(RESERVATIONKEY[assetId], 0) - winAmount)))
94
+
    then throw("Invalid Dice Roller account state - reserved amount is less than 0")
95
+
    else changeInt(RESERVATIONKEY[assetId], -(winAmount))
96
+
97
+
98
+
func validateAndGetAssetId (assetId) = if ((assetId == ASSETS[0]))
99
+
    then 0
100
+
    else if ((assetId == ASSETS[1]))
101
+
        then 1
102
+
        else throw("Invalid payment asset")
103
+
104
+
105
+
func validateBetAndGetWinAmount (betAmount,assetId,playerChoice) = {
106
+
    let dicesCount = size(playerChoice)
107
+
    let commission = getCommission(assetId)
108
+
    func checkAmount (a,x) =     if (a)
109
+
        then true
110
+
        else (betAmount == ((x * DECIMALS[assetId]) + commission))
111
+
112
+
    if (!({
113
+
        let $list46494682 = BETS
114
+
        let $size46494682 = size($list46494682)
115
+
        let $acc046494682 = false
116
+
        if (($size46494682 == 0))
117
+
            then $acc046494682
118
+
            else {
119
+
                let $acc146494682 = checkAmount($acc046494682, $list46494682[0])
120
+
                if (($size46494682 == 1))
121
+
                    then $acc146494682
122
+
                    else {
123
+
                        let $acc246494682 = checkAmount($acc146494682, $list46494682[1])
124
+
                        if (($size46494682 == 2))
125
+
                            then $acc246494682
126
+
                            else {
127
+
                                let $acc346494682 = checkAmount($acc246494682, $list46494682[2])
128
+
                                if (($size46494682 == 3))
129
+
                                    then $acc346494682
130
+
                                    else {
131
+
                                        let $acc446494682 = checkAmount($acc346494682, $list46494682[3])
132
+
                                        if (($size46494682 == 4))
133
+
                                            then $acc446494682
134
+
                                            else {
135
+
                                                let $acc546494682 = checkAmount($acc446494682, $list46494682[4])
136
+
                                                if (($size46494682 == 5))
137
+
                                                    then $acc546494682
138
+
                                                    else {
139
+
                                                        let $acc646494682 = checkAmount($acc546494682, $list46494682[5])
140
+
                                                        throw("List size exceed 5")
141
+
                                                        }
142
+
                                                }
143
+
                                        }
144
+
                                }
145
+
                        }
146
+
                }
147
+
        }))
148
+
        then throw("Bet amount is not valid")
149
+
        else if ((parseInt(playerChoice) == unit))
150
+
            then throw("Invalid player's choice")
151
+
            else if (if ((1 > dicesCount))
152
+
                then true
153
+
                else (dicesCount > 5))
154
+
                then throw("Invalid dices count in player's choice")
155
+
                else {
156
+
                    let bet = (betAmount - commission)
157
+
                    ((bet * RATES[(dicesCount - 1)]) / RATEMULT)
158
+
                    }
91
159
 
    }
92
160
 
93
161
 
94
-
func ValidateBetAndDefineWinAmt (betAmt,playerChoice) = {
95
-
    let betAmtValid = if (if (if (if ((betAmt == (BET1 + COMMISSION)))
96
-
        then true
97
-
        else (betAmt == (BET2 + COMMISSION)))
98
-
        then true
99
-
        else (betAmt == (BET4 + COMMISSION)))
100
-
        then true
101
-
        else (betAmt == (BET8 + COMMISSION)))
102
-
        then true
103
-
        else (betAmt == (BET14 + COMMISSION))
104
-
    if (betAmtValid)
105
-
        then {
106
-
            let dicesCount = size(playerChoice)
107
-
            let bet = (betAmt - COMMISSION)
108
-
            if ((dicesCount == 1))
109
-
                then ((bet * RATE1) / RATEMULT)
110
-
                else if ((dicesCount == 2))
111
-
                    then ((bet * RATE2) / RATEMULT)
112
-
                    else if ((dicesCount == 3))
113
-
                        then ((bet * RATE3) / RATEMULT)
114
-
                        else if ((dicesCount == 4))
115
-
                            then ((bet * RATE4) / RATEMULT)
116
-
                            else if ((dicesCount == 5))
117
-
                                then ((bet * RATE5) / RATEMULT)
118
-
                                else throw("Invalid dices count in player's choice")
162
+
func generateRandChoise (gameId,rsaSign) = {
163
+
    let rsaSigValid = rsaVerify(SHA256, toBytes(gameId), rsaSign, RSAPUBLIC)
164
+
    if (!(rsaSigValid))
165
+
        then throw("Invalid RSA signature")
166
+
        else {
167
+
            let rand = (toInt(sha256(rsaSign)) % 6)
168
+
            let result = if ((0 > rand))
169
+
                then (-1 * rand)
170
+
                else rand
171
+
            toString((result + 1))
119
172
 
            }
120
-
        else throw("Bet amount is not in range")
121
173
 
    }
122
174
 
123
175
 
124
-
func RandToStr (r) = if ((r == 0))
125
-
    then "1"
126
-
    else if ((r == 1))
127
-
        then "2"
128
-
        else if ((r == 2))
129
-
            then "3"
130
-
            else if ((r == 3))
131
-
                then "4"
132
-
                else if ((r == 4))
133
-
                    then "5"
134
-
                    else if ((r == 5))
135
-
                        then "6"
136
-
                        else throw(("Unsupported r parameter passed: expected=[0,...,5] actual=" + toString(r)))
176
+
func isPlayerWin (playerChoice,randChoise) = {
177
+
    let s = size(playerChoice)
178
+
    func check (a,x) =     if (a)
179
+
        then true
180
+
        else if ((s >= x))
181
+
            then (take(drop(playerChoice, (x - 1)), 1) == randChoise)
182
+
            else false
137
183
 
138
-
139
-
func GenerateRandInt (gameId,rsaSign) = {
140
-
    let rsaSigValid = rsaVerify(SHA256, toBytes(gameId), rsaSign, RSAPUBLIC)
141
-
    if (rsaSigValid)
142
-
        then {
143
-
            let rand = (toInt(sha256(rsaSign)) % 6)
144
-
            if ((0 > rand))
145
-
                then (-1 * rand)
146
-
                else rand
184
+
    let $list55635597 = [1, 2, 3, 4, 5]
185
+
    let $size55635597 = size($list55635597)
186
+
    let $acc055635597 = false
187
+
    if (($size55635597 == 0))
188
+
        then $acc055635597
189
+
        else {
190
+
            let $acc155635597 = check($acc055635597, $list55635597[0])
191
+
            if (($size55635597 == 1))
192
+
                then $acc155635597
193
+
                else {
194
+
                    let $acc255635597 = check($acc155635597, $list55635597[1])
195
+
                    if (($size55635597 == 2))
196
+
                        then $acc255635597
197
+
                        else {
198
+
                            let $acc355635597 = check($acc255635597, $list55635597[2])
199
+
                            if (($size55635597 == 3))
200
+
                                then $acc355635597
201
+
                                else {
202
+
                                    let $acc455635597 = check($acc355635597, $list55635597[3])
203
+
                                    if (($size55635597 == 4))
204
+
                                        then $acc455635597
205
+
                                        else {
206
+
                                            let $acc555635597 = check($acc455635597, $list55635597[4])
207
+
                                            if (($size55635597 == 5))
208
+
                                                then $acc555635597
209
+
                                                else {
210
+
                                                    let $acc655635597 = check($acc555635597, $list55635597[5])
211
+
                                                    throw("List size exceed 5")
212
+
                                                    }
213
+
                                            }
214
+
                                    }
215
+
                            }
216
+
                    }
147
217
 
            }
148
-
        else throw("Invalid RSA signature")
149
218
 
    }
150
219
 
151
220
 
152
-
func IsPlayerWin (playerChoice,randStr) = {
153
-
    let s = size(playerChoice)
154
-
    if (if (if (if (if (if ((s >= 1))
155
-
        then (take(drop(playerChoice, 0), 1) == randStr)
156
-
        else false)
157
-
        then true
158
-
        else if ((s >= 2))
159
-
            then (take(drop(playerChoice, 1), 1) == randStr)
160
-
            else false)
161
-
        then true
162
-
        else if ((s >= 3))
163
-
            then (take(drop(playerChoice, 2), 1) == randStr)
164
-
            else false)
165
-
        then true
166
-
        else if ((s >= 4))
167
-
            then (take(drop(playerChoice, 3), 1) == randStr)
168
-
            else false)
169
-
        then true
170
-
        else if ((s >= 5))
171
-
            then (take(drop(playerChoice, 4), 1) == randStr)
172
-
            else false)
173
-
        then true
174
-
        else if ((s >= 6))
175
-
            then (take(drop(playerChoice, 5), 1) == randStr)
176
-
            else false
177
-
    }
221
+
func formatGameData (gameState,playerChoice,playerPubKey58,startedHeight,winAmount,assetId,randOrEmpty) = (((((((((((gameState + "_") + playerChoice) + "_") + playerPubKey58) + "_") + toString(startedHeight)) + "_") + toString(winAmount)) + "_") + toString(assetId)) + (if ((randOrEmpty == ""))
222
+
    then ""
223
+
    else ("_" + randOrEmpty)))
178
224
 
179
225
 
180
-
func FormatGameDataParam (p) = {
181
-
    let s = size(p)
182
-
    if ((s == 0))
183
-
        then throw("Parameter size must be greater then 0")
184
-
        else if ((s > 99))
185
-
            then throw("Parameter size must be less then 100")
186
-
            else if ((10 > s))
187
-
                then (("0" + toString(s)) + p)
188
-
                else (toString(s) + p)
189
-
    }
226
+
func extractGameData (gameId) = split(match getString(this, gameId) {
227
+
    case str: String => 
228
+
        str
229
+
    case _ => 
230
+
        throw((("Game: " + gameId) + " not found."))
231
+
}, "_")
190
232
 
191
233
 
192
-
func FormatGameDataStr (gameState,playerChoice,playerPubKey58,startedHeight,winAmt,randOrEmpty) = {
193
-
    let fullStateStr = ((((((((FormatGameDataParam(gameState) + "_") + FormatGameDataParam(playerChoice)) + "_") + FormatGameDataParam(playerPubKey58)) + "_") + FormatGameDataParam(toString(startedHeight))) + "_") + FormatGameDataParam(toString(winAmt)))
194
-
    if ((randOrEmpty == ""))
195
-
        then fullStateStr
196
-
        else ((fullStateStr + "_") + FormatGameDataParam(randOrEmpty))
197
-
    }
198
-
199
-
200
-
func RemoveUnderscoreIfPresent (remaining) = if ((size(remaining) > 0))
201
-
    then drop(remaining, 1)
202
-
    else remaining
203
-
204
-
205
-
func ParseNextAttribute (remaining) = {
206
-
    let s = size(remaining)
207
-
    if ((s > 0))
208
-
        then {
209
-
            let nn = parseIntValue(take(remaining, 2))
210
-
            let v = take(drop(remaining, 2), nn)
211
-
            let tmpRemaining = drop(remaining, (nn + 2))
212
-
            let remainingState = RemoveUnderscoreIfPresent(tmpRemaining)
213
-
[v, remainingState]
214
-
            }
215
-
        else throw("Empty string was passed into parseNextAttribute func")
216
-
    }
217
-
218
-
219
-
func ParseGameRawDataStr (rawStateStr) = {
220
-
    let gameState = ParseNextAttribute(rawStateStr)
221
-
    let playerChoice = ParseNextAttribute(gameState[1])
222
-
    let playerPubKey58 = ParseNextAttribute(playerChoice[1])
223
-
    let startedHeight = ParseNextAttribute(playerPubKey58[1])
224
-
    let winAmt = ParseNextAttribute(startedHeight[1])
225
-
[gameState[0], playerChoice[0], playerPubKey58[0], startedHeight[0], winAmt[0]]
226
-
    }
227
-
228
-
229
-
func ExtractGameDataList (gameId) = {
230
-
    let rawDataStr =     match getString(this, gameId) {
231
-
        case str: String => 
232
-
            str
233
-
        case _ => 
234
-
            throw(("Couldn't find game by " + gameId))
235
-
    }
236
-
    ParseGameRawDataStr(rawDataStr)
237
-
    }
238
-
239
-
240
-
func WinScriptSet (gameId,playerAddress,winAmt,newGameDataStr,winByTimeout,decreasedReserves) = {
234
+
func winScriptSet (gameId,playerAddress,winAmount,assetId,newgameData,winByTimeout,decreasedReserves) = {
241
235
 
    let wSetCommonData = [decreasedReserves]
242
-
    let tSetCommonData = [ScriptTransfer(playerAddress, winAmt, unit)]
236
+
    let tSetCommonData = [ScriptTransfer(playerAddress, winAmount, ASSETS[assetId])]
243
237
 
    if (winByTimeout)
244
238
 
        then {
245
-
            let newGameDataStrAdjusted = ((newGameDataStr + "_") + FormatGameDataParam("TIMEOUT"))
246
-
            let gameData = DataEntry(gameId, newGameDataStrAdjusted)
239
+
            let newgameDataAdjusted = (newgameData + "_TIMEOUT")
240
+
            let gameData = DataEntry(gameId, newgameDataAdjusted)
247
241
 
            ScriptResult(WriteSet(gameData :: wSetCommonData), TransferSet(tSetCommonData))
248
242
 
            }
249
243
 
        else {
250
-
            let gameData = DataEntry(gameId, newGameDataStr)
244
+
            let gameData = DataEntry(gameId, newgameData)
251
245
 
            ScriptResult(WriteSet(gameData :: wSetCommonData), TransferSet(tSetCommonData))
252
246
 
            }
253
247
 
    }
254
248
 
255
249
 
256
250
 
@Callable(i)
257
251
 
func bet (playerChoice) = {
258
-
    let newGameNum = IncrementGameNum()
259
252
 
    let gameId = toBase58String(i.transactionId)
260
-
    let pmt = extract(i.payment)
261
-
    let betNotInWaves = isDefined(pmt.assetId)
262
-
    let feeNotInWaves = isDefined(pmt.assetId)
263
-
    let winAmt = ValidateBetAndDefineWinAmt(pmt.amount, playerChoice)
264
-
    let txIdUsed = isDefined(getString(this, gameId))
265
-
    if (betNotInWaves)
266
-
        then throw("Bet amount must be in Waves")
267
-
        else if (feeNotInWaves)
268
-
            then throw("Transaction's fee must be in Waves")
269
-
            else if (txIdUsed)
270
-
                then throw("Passed txId had been used before. Game aborted.")
271
-
                else {
272
-
                    let playerPubKey58 = toBase58String(i.callerPublicKey)
273
-
                    let gameDataStr = FormatGameDataStr(STATESUBMITTED, playerChoice, playerPubKey58, height, winAmt, "")
274
-
                    ScriptResult(WriteSet([DataEntry(RESERVATIONKEY, ValidateAndIncreaseReservedAmt(winAmt)), DataEntry(GAMESCOUNTERKEY, newGameNum), DataEntry(gameId, gameDataStr)]), TransferSet([ScriptTransfer(SERVER, COMMISSION, unit)]))
275
-
                    }
253
+
    if ((i.payment == unit))
254
+
        then throw("No payment")
255
+
        else if (isDefined(getString(this, gameId)))
256
+
            then throw((("Bet for: " + gameId) + " was already made."))
257
+
            else {
258
+
                let p = extract(i.payment)
259
+
                let assetId = validateAndGetAssetId(p.assetId)
260
+
                let commission = getCommission(assetId)
261
+
                let winAmount = validateBetAndGetWinAmount(p.amount, assetId, playerChoice)
262
+
                let playerPubKey58 = toBase58String(i.callerPublicKey)
263
+
                let gameData = formatGameData(STATESUBMITTED, playerChoice, playerPubKey58, height, winAmount, assetId, "")
264
+
                ScriptResult(WriteSet([DataEntry(RESERVATIONKEY[assetId], increaseReserveAmount(winAmount, assetId)), incrementInt(GAMESCOUNTERKEY), DataEntry(gameId, gameData)]), TransferSet([ScriptTransfer(SERVER, commission, p.assetId)]))
265
+
                }
276
266
 
    }
277
267
 
278
268
 
279
269
 
280
270
 
@Callable(i)
281
271
 
func withdraw (gameId,rsaSign) = {
282
-
    let gameDataList = ExtractGameDataList(gameId)
283
-
    let gameState = gameDataList[IdxGameState]
284
-
    let playerChoice = gameDataList[IdxPlayerChoice]
285
-
    let startedHeight = parseIntValue(gameDataList[IdxStartedHeight])
286
-
    let winAmt = parseIntValue(gameDataList[IdxWinAmt])
287
-
    let playerPubKey58 = gameDataList[IdxPlayerPubKey58]
272
+
    let gameData = extractGameData(gameId)
273
+
    let gameState = gameData[IdxGameState]
274
+
    let playerChoice = gameData[IdxPlayerChoice]
275
+
    let startedHeight = parseIntValue(gameData[IdxStartedHeight])
276
+
    let winAmount = parseIntValue(gameData[IdxWinAmount])
277
+
    let assetId = parseIntValue(gameData[IdxAssetId])
278
+
    let playerPubKey58 = gameData[IdxPlayerPubKey58]
288
279
 
    let playerAddress = addressFromPublicKey(fromBase58String(playerPubKey58))
289
280
 
    let winByTimeout = ((height - startedHeight) > RANDORACLETIMEFRAME)
290
-
    let decreasedReserves = DecreaseReservedAmt(gameId, winAmt)
281
+
    let decreasedReserves = decreaseReservedAmount(gameId, assetId, winAmount)
291
282
 
    if ((gameState != STATESUBMITTED))
292
283
 
        then throw("Invalid game state for passed gameId")
293
284
 
        else if (winByTimeout)
294
285
 
            then {
295
-
                let randStr = take(playerChoice, 1)
296
-
                let newGameDataStr = FormatGameDataStr(STATEWON, playerChoice, playerPubKey58, startedHeight, winAmt, randStr)
297
-
                WinScriptSet(gameId, playerAddress, winAmt, newGameDataStr, winByTimeout, decreasedReserves)
286
+
                let randChoise = take(playerChoice, 1)
287
+
                let newgameData = formatGameData(STATEWON, playerChoice, playerPubKey58, startedHeight, winAmount, assetId, randChoise)
288
+
                winScriptSet(gameId, playerAddress, winAmount, assetId, newgameData, winByTimeout, decreasedReserves)
298
289
 
                }
299
290
 
            else {
300
-
                let randStr = RandToStr(GenerateRandInt(gameId, rsaSign))
301
-
                if (IsPlayerWin(playerChoice, randStr))
302
-
                    then {
303
-
                        let newGameDataStr = FormatGameDataStr(STATEWON, playerChoice, playerPubKey58, startedHeight, winAmt, randStr)
304
-
                        WinScriptSet(gameId, playerAddress, winAmt, newGameDataStr, winByTimeout, decreasedReserves)
305
-
                        }
306
-
                    else {
307
-
                        let newGameDataStr = FormatGameDataStr(STATELOST, playerChoice, playerPubKey58, startedHeight, winAmt, randStr)
308
-
                        WriteSet([DataEntry(gameId, newGameDataStr), decreasedReserves])
309
-
                        }
291
+
                let randChoise = generateRandChoise(gameId, rsaSign)
292
+
                if ((i.caller != SERVER))
293
+
                    then throw("Regular withdraw can be done by server only")
294
+
                    else if (isPlayerWin(playerChoice, randChoise))
295
+
                        then {
296
+
                            let newgameData = formatGameData(STATEWON, playerChoice, playerPubKey58, startedHeight, winAmount, assetId, randChoise)
297
+
                            winScriptSet(gameId, playerAddress, winAmount, assetId, newgameData, winByTimeout, decreasedReserves)
298
+
                            }
299
+
                        else {
300
+
                            let newgameData = formatGameData(STATELOST, playerChoice, playerPubKey58, startedHeight, winAmount, assetId, randChoise)
301
+
                            WriteSet([DataEntry(gameId, newgameData), decreasedReserves])
302
+
                            }
310
303
 
                }
311
304
 
    }
312
305
 
313
306
 
314
307
 
@Verifier(tx)
315
308
 
func verify () = if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
316
309
 
    then     match tx {
317
310
 
        case ttx: TransferTransaction => 
318
-
            ((wavesBalance(this) - ttx.amount) >= ExtractReservedAmt())
311
+
            let assetId = validateAndGetAssetId(ttx.assetId)
312
+
            ((assetBalance(this, ttx.assetId) - ttx.amount) >= getIntOr(RESERVATIONKEY[assetId], 0))
319
313
 
        case stx: SetScriptTransaction => 
320
-
            true
314
+
            if ((getIntOr(RESERVATIONKEY[0], 0) == 0))
315
+
                then (getIntOr(RESERVATIONKEY[1], 0) == 0)
316
+
                else false
321
317
 
        case _ => 
322
318
 
            false
323
319
 
    }
324
320
 
    else false
325
321
 

github/deemru/w8io/6500d08 
99.40 ms ◑