w8 · tx · F9w···Ysw

tx · F9w48K21fa3otxZJshCRvRwCF3pzYPSaizHvpDHDQYsw

3MtKQXaiKQxSTRPpa8GjJ5zE7mE992eBrGu:  -0.05000000 Waves

2020.01.05 15:07 [840561] smart account 3MtKQXaiKQxSTRPpa8GjJ5zE7mE992eBrGu > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "F9w48K21fa3otxZJshCRvRwCF3pzYPSaizHvpDHDQYsw",
    "fee": 5000000,
    "feeAssetId": null,
    "timestamp": 1578226009303,
    "version": 1,
    "sender": "3MtKQXaiKQxSTRPpa8GjJ5zE7mE992eBrGu",
    "senderPublicKey": "2vmjFmSn7wGYrffwrNFgTN6j9CATDKwa8t8KAXWe2HVW",
    "proofs": [
        "2xwkKiMjkPXqYFkVhWVJXQNM4QqYVNmwVzTmnJ36Rdz7HaLH8o4M1HxZbrjwWgWYagT1pHWkpE7b9gnSMjCvnGS7"
    ],
    "script": "base64:AAIDAAAAAAAAABIIARIDCgEIEgQKAggCEgMKAQgAAAAmAAAAAAlSU0FQVUJMSUMJAAJbAAAAAQIAAAGPYmFzZTY0Ok1JSUJJakFOQmdrcWhraUc5dzBCQVFFRkFBT0NBUThBTUlJQkNnS0NBUUVBZzRkQVI2WGJCREFTOWhyL0VqM2RKdjZGZmM0NjZ4L21PR01XVTNsckFCczNxYThCSG11Skdua2ZicEVmMnZBd1lUT1dQdnZ6Zk0xME9CYmZsb1N5cTNjOU1LdnlUZTFsdUJMR3FXNHZaVVhJeXZTZ3oxbGl5VVZlZklReTNkeUY5amJlVFpiQzBiYmNULzdPM0RFTCswMXo2QStyRENhY1NaMGxHb2xTUTZBbmhMeHpJa1ZwT1FKYnJCbUMreCtadVpQQ01Xekp5bmQ1YWVPbjdqYWovbWtSVnl4ZTZnLzBPaFd6NE5paVpYZXVNUkIrOG1LeTBmV0QvVWxJbFpXSHNBUzJabXJrWEtxakxxMC8wd3I4SUxKa3pualNxZG5JNUliamczdVFyai80QU4raTlyMjhhUTczL1prUHRZNVNidzBBT2lBQkJ1N2dIbXE5YXlWeFpRSURBUUFCAAAAAA9HQU1FU0NPVU5URVJLRVkCAAAACSRHQU1FX05VTQAAAAAEV0JFVAEAAAAghrQ2qHjTDszY8BetSy4sBB8Hn7rKuRapStdvJa2b0HYAAAAAD1dBTExFVENPTU1VTklUWQkBAAAAB0FkZHJlc3MAAAABAQAAABoBVC8R8HhOr9aTn6luIitmtR+yU9d4zzto+wAAAAAOV0FMTEVUV0FWRVNCRVQJAQAAAAdBZGRyZXNzAAAAAQEAAAAaAVRcFp18IEcoG8Po9K1+bJP+/kJJi7RloewAAAAADFdBTExFVE1DQUZFRQkBAAAAB0FkZHJlc3MAAAABAQAAABoBVFwWnXwgRygbw+j0rX5sk/7+QkmLtGWh7AAAAAAHV0FWRUxFVAAAAAAABfXhAAAAAAAMRkVFQ09NTVVOSVRZAAAAAAAAAAABAAAAAAtGRUVXQVZFU0JFVAAAAAAAAAAAAwAAAAAJRkVFTUNBRkVFAAAAAAAAAAACAAAAAA5TVEFURVNVQk1JVFRFRAIAAAAJU1VCTUlUVEVEAAAAAA1TVEFURUFDQ0VQVEVEAgAAAAhBQ0NFUFRFRAAAAAANU1RBVEVGSU5JU0hFRAIAAAAIRklOSVNIRUQAAAAADVNUQVRFQ0FOQ0VMRUQCAAAACENBTkNFTEVEAAAAAAdDT0lOUkVEAgAAAANSRUQAAAAACENPSU5CTFVFAgAAAARCTFVFAAAAAAtCRVRNSU5XQVZFUwkAAGkAAAACCQAAaAAAAAIAAAAAAAAAAAEFAAAAB1dBVkVMRVQAAAAAAAAAAAQAAAAACkJFVE1JTldCRVQJAABoAAAAAgAAAAAAAAAAZAUAAAAHV0FWRUxFVAAAAAAMSWR4R2FtZVN0YXRlAAAAAAAAAAAAAAAAAA5JZHhQbGF5ZXJBQ29pbgAAAAAAAAAAAQAAAAASSWR4UGxheWVyQVB1YktleTU4AAAAAAAAAAACAAAAAApJZHhQYXlUeXBlAAAAAAAAAAADAAAAAAlJZHhQYXlBbXQAAAAAAAAAAAQAAAAACUlkeFdpbkFtdAAAAAAAAAAABQAAAAAOSWR4UGxheWVyQkNvaW4AAAAAAAAAAAYAAAAAEklkeFBsYXllckJQdWJLZXk1OAAAAAAAAAAABwAAAAAMSWR4THVja3lDb2luAAAAAAAAAAAIAQAAABBJbmNyZW1lbnRHYW1lTnVtAAAAAAQAAAAHZ2FtZU51bQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAA9HQU1FU0NPVU5URVJLRVkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAADbnVtBQAAAAckbWF0Y2gwBQAAAANudW0AAAAAAAAAAAAJAABkAAAAAgUAAAAHZ2FtZU51bQAAAAAAAAAAAQEAAAAPR2VuZXJhdGVSYW5kSW50AAAAAgAAAAZnYW1lSWQAAAAHcnNhU2lnbgQAAAALcnNhU2lnVmFsaWQJAAH4AAAABAUAAAAGU0hBMjU2CQABmwAAAAEFAAAABmdhbWVJZAUAAAAHcnNhU2lnbgUAAAAJUlNBUFVCTElDAwUAAAALcnNhU2lnVmFsaWQEAAAABHJhbmQJAABqAAAAAgkABLEAAAABCQAB9wAAAAEFAAAAB3JzYVNpZ24AAAAAAAAAAGQDCQAAZgAAAAIAAAAAAAAAAAAFAAAABHJhbmQJAABkAAAAAgkAAGgAAAACAP//////////BQAAAARyYW5kAAAAAAAAAAABCQAAZAAAAAIFAAAABHJhbmQAAAAAAAAAAAEJAAACAAAAAQIAAAAVSW52YWxpZCBSU0Egc2lnbmF0dXJlAQAAAAtwYXltZW50VHlwZQAAAAEAAAAHcGF5bWVudAMJAAAAAAAAAggFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAUAAAAEV0JFVAIAAAAEV0JFVAIAAAAFV0FWRVMBAAAACXRva2VuVHlwZQAAAAEAAAAFdG9rZW4DCQAAAAAAAAIFAAAABXRva2VuAgAAAARXQkVUBQAAAARXQkVUBQAAAAR1bml0AQAAABNGb3JtYXRHYW1lRGF0YVBhcmFtAAAAAQAAAAFwBAAAAAFzCQABMQAAAAEFAAAAAXADCQAAAAAAAAIFAAAAAXMAAAAAAAAAAAAJAAACAAAAAQIAAAAlUGFyYW1ldGVyIHNpemUgbXVzdCBiZSBncmVhdGVyIHRoZW4gMAMJAABmAAAAAgUAAAABcwAAAAAAAAAAYwkAAAIAAAABAgAAACRQYXJhbWV0ZXIgc2l6ZSBtdXN0IGJlIGxlc3MgdGhlbiAxMDADCQAAZgAAAAIAAAAAAAAAAAoFAAAAAXMJAAEsAAAAAgkAASwAAAACAgAAAAEwCQABpAAAAAEFAAAAAXMFAAAAAXAJAAEsAAAAAgkAAaQAAAABBQAAAAFzBQAAAAFwAQAAABFGb3JtYXRHYW1lRGF0YVN0cgAAAAkAAAAJZ2FtZVN0YXRlAAAAC3BsYXllckFDb2luAAAAD3BsYXllckFQdWJLZXk1OAAAAAdwYXlUeXBlAAAACXBheUFtb3VudAAAAAZ3aW5BbXQAAAALcGxheWVyQkNvaW4AAAAPcGxheWVyQlB1YktleTU4AAAACWx1Y2t5Q29pbgQAAAAMZnVsbFN0YXRlU3RyCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAQAAABNGb3JtYXRHYW1lRGF0YVBhcmFtAAAAAQUAAAAJZ2FtZVN0YXRlAgAAAAFfCQEAAAATRm9ybWF0R2FtZURhdGFQYXJhbQAAAAEFAAAAC3BsYXllckFDb2luAgAAAAFfCQEAAAATRm9ybWF0R2FtZURhdGFQYXJhbQAAAAEFAAAAD3BsYXllckFQdWJLZXk1OAIAAAABXwkBAAAAE0Zvcm1hdEdhbWVEYXRhUGFyYW0AAAABBQAAAAdwYXlUeXBlAgAAAAFfCQEAAAATRm9ybWF0R2FtZURhdGFQYXJhbQAAAAEJAAGkAAAAAQUAAAAJcGF5QW1vdW50AgAAAAFfCQEAAAATRm9ybWF0R2FtZURhdGFQYXJhbQAAAAEJAAGkAAAAAQUAAAAGd2luQW10AwMDCQAAAAAAAAIFAAAAC3BsYXllckJDb2luAgAAAAAGCQAAAAAAAAIFAAAAD3BsYXllckJQdWJLZXk1OAIAAAAABgkAAAAAAAACBQAAAAlsdWNreUNvaW4CAAAAAAUAAAAMZnVsbFN0YXRlU3RyCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAxmdWxsU3RhdGVTdHICAAAAAV8JAQAAABNGb3JtYXRHYW1lRGF0YVBhcmFtAAAAAQUAAAALcGxheWVyQkNvaW4CAAAAAV8JAQAAABNGb3JtYXRHYW1lRGF0YVBhcmFtAAAAAQUAAAAPcGxheWVyQlB1YktleTU4AgAAAAFfCQEAAAATRm9ybWF0R2FtZURhdGFQYXJhbQAAAAEFAAAACWx1Y2t5Q29pbgEAAAAZUmVtb3ZlVW5kZXJzY29yZUlmUHJlc2VudAAAAAEAAAAJcmVtYWluaW5nAwkAAGYAAAACCQABMQAAAAEFAAAACXJlbWFpbmluZwAAAAAAAAAAAAkAATAAAAACBQAAAAlyZW1haW5pbmcAAAAAAAAAAAEFAAAACXJlbWFpbmluZwEAAAASUGFyc2VOZXh0QXR0cmlidXRlAAAAAQAAAAlyZW1haW5pbmcEAAAAAXMJAAExAAAAAQUAAAAJcmVtYWluaW5nAwkAAGYAAAACBQAAAAFzAAAAAAAAAAAABAAAAAJubgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABLwAAAAIFAAAACXJlbWFpbmluZwAAAAAAAAAAAgQAAAABdgkAAS8AAAACCQABMAAAAAIFAAAACXJlbWFpbmluZwAAAAAAAAAAAgUAAAACbm4EAAAADHRtcFJlbWFpbmluZwkAATAAAAACBQAAAAlyZW1haW5pbmcJAABkAAAAAgUAAAACbm4AAAAAAAAAAAIEAAAADnJlbWFpbmluZ1N0YXRlCQEAAAAZUmVtb3ZlVW5kZXJzY29yZUlmUHJlc2VudAAAAAEFAAAADHRtcFJlbWFpbmluZwkABEwAAAACBQAAAAF2CQAETAAAAAIFAAAADnJlbWFpbmluZ1N0YXRlBQAAAANuaWwJAAACAAAAAQIAAAA0RW1wdHkgc3RyaW5nIHdhcyBwYXNzZWQgaW50byBwYXJzZU5leHRBdHRyaWJ1dGUgZnVuYwEAAAATUGFyc2VHYW1lUmF3RGF0YVN0cgAAAAEAAAALcmF3U3RhdGVTdHIEAAAACWdhbWVTdGF0ZQkBAAAAElBhcnNlTmV4dEF0dHJpYnV0ZQAAAAEFAAAAC3Jhd1N0YXRlU3RyBAAAAAZwYUNvaW4JAQAAABJQYXJzZU5leHRBdHRyaWJ1dGUAAAABCQABkQAAAAIFAAAACWdhbWVTdGF0ZQAAAAAAAAAAAQQAAAAKcGFQdWJLZXk1OAkBAAAAElBhcnNlTmV4dEF0dHJpYnV0ZQAAAAEJAAGRAAAAAgUAAAAGcGFDb2luAAAAAAAAAAABBAAAAAdwYXlUeXBlCQEAAAASUGFyc2VOZXh0QXR0cmlidXRlAAAAAQkAAZEAAAACBQAAAApwYVB1YktleTU4AAAAAAAAAAABBAAAAAZwYXlBbXQJAQAAABJQYXJzZU5leHRBdHRyaWJ1dGUAAAABCQABkQAAAAIFAAAAB3BheVR5cGUAAAAAAAAAAAEEAAAABndpbkFtdAkBAAAAElBhcnNlTmV4dEF0dHJpYnV0ZQAAAAEJAAGRAAAAAgUAAAAGcGF5QW10AAAAAAAAAAABCQAETAAAAAIJAAGRAAAAAgUAAAAJZ2FtZVN0YXRlAAAAAAAAAAAACQAETAAAAAIJAAGRAAAAAgUAAAAGcGFDb2luAAAAAAAAAAAACQAETAAAAAIJAAGRAAAAAgUAAAAKcGFQdWJLZXk1OAAAAAAAAAAAAAkABEwAAAACCQABkQAAAAIFAAAAB3BheVR5cGUAAAAAAAAAAAAJAARMAAAAAgkAAZEAAAACBQAAAAZwYXlBbXQAAAAAAAAAAAAJAARMAAAAAgkAAZEAAAACBQAAAAZ3aW5BbXQAAAAAAAAAAAAFAAAAA25pbAEAAAATRXh0cmFjdEdhbWVEYXRhTGlzdAAAAAEAAAAGZ2FtZUlkBAAAAApyYXdEYXRhU3RyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAABmdhbWVJZAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAANzdHIFAAAAByRtYXRjaDAFAAAAA3N0cgkAAAIAAAABCQABLAAAAAICAAAAFkNvdWxkbid0IGZpbmQgZ2FtZSBieSAFAAAABmdhbWVJZAkBAAAAE1BhcnNlR2FtZVJhd0RhdGFTdHIAAAABBQAAAApyYXdEYXRhU3RyAQAAABpWYWxpZGF0ZUJldEFuZERlZmluZVdpbkFtdAAAAAMAAAAGYW1vdW50AAAACnBsYXllckNvaW4AAAALcGF5bWVudFR5cGUDAwkBAAAAAiE9AAAAAgUAAAAKcGxheWVyQ29pbgUAAAAHQ09JTlJFRAkBAAAAAiE9AAAAAgUAAAAKcGxheWVyQ29pbgUAAAAIQ09JTkJMVUUHCQAAAgAAAAECAAAAQEludmFsaWQgcGxheSwgY2hhbmdlIHlvdXIgYmV0IHRvIFJFRCBvciBCTFVFIGNvaW4uIEdhbWUgYWJvcnRlZC4DAwkAAAAAAAACBQAAAAtwYXltZW50VHlwZQIAAAAEV0JFVAkAAGYAAAACBQAAAApCRVRNSU5XQkVUBQAAAAZhbW91bnQHCQAAAgAAAAEJAAEsAAAAAgIAAAAbVGhlIG1pbmltdW0gYmV0IG9uIFdiZXQgaXMgCQABpAAAAAEJAABpAAAAAgUAAAAKQkVUTUlOV0JFVAUAAAAHV0FWRUxFVAMDCQAAAAAAAAIFAAAAC3BheW1lbnRUeXBlAgAAAAVXQVZFUwkAAGYAAAACBQAAAAtCRVRNSU5XQVZFUwUAAAAGYW1vdW50BwkAAAIAAAABCQABLAAAAAICAAAAHFRoZSBtaW5pbXVtIGJldCBvbiBXYXZlcyBpcyAJAAGkAAAAAQkAAGkAAAACBQAAAAtCRVRNSU5XQVZFUwUAAAAHV0FWRUxFVAkAAGsAAAADCQAAaAAAAAIFAAAABmFtb3VudAAAAAAAAAAAAgkAAGUAAAACCQAAZQAAAAIJAABlAAAAAgAAAAAAAAAAZAUAAAALRkVFV0FWRVNCRVQFAAAACUZFRU1DQUZFRQUAAAAMRkVFQ09NTVVOSVRZAAAAAAAAAABkAAAAAwAAAAFpAQAAAAxwbGF5Q29pbmZsaXAAAAABAAAABnBhQ29pbgQAAAAGZ2FtZUlkCQACWAAAAAEIBQAAAAFpAAAADXRyYW5zYWN0aW9uSWQEAAAACmdhbWVJZFVzZWQJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABHRoaXMFAAAABmdhbWVJZAQAAAAHcGF5bWVudAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50BAAAAApmZWVBc3NldElkCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAAWkAAAAKZmVlQXNzZXRJZAMDCQEAAAACIT0AAAACCAUAAAAHcGF5bWVudAAAAAdhc3NldElkCQAD7AAAAAEBAAAABBOr2TMJAQAAAAIhPQAAAAIIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQFAAAABFdCRVQHCQAAAgAAAAECAAAAMVBheW1lbnQgc2hvdWxkIGJlIGluIFdiZXQgb3IgV2F2ZXMuIEdhbWUgYWJvcnRlZC4DBQAAAApmZWVBc3NldElkCQAAAgAAAAECAAAAMVRyYW5zYWN0aW9uJ3MgZmVlIG11c3QgYmUgaW4gV2F2ZXMuIEdhbWUgYWJvcnRlZC4DBQAAAApnYW1lSWRVc2VkCQAAAgAAAAECAAAAMVBhc3NlZCBHYW1lSWQgaGFkIGJlZW4gdXNlZCBiZWZvcmUuIEdhbWUgYWJvcnRlZC4EAAAACm5ld0dhbWVOdW0JAQAAABBJbmNyZW1lbnRHYW1lTnVtAAAAAAQAAAAPcGxheWVyQVB1YktleTU4CQACWAAAAAEIBQAAAAFpAAAAD2NhbGxlclB1YmxpY0tleQQAAAAHcGF5VHlwZQkBAAAAC3BheW1lbnRUeXBlAAAAAQUAAAAHcGF5bWVudAQAAAAGd2luQW10CQEAAAAaVmFsaWRhdGVCZXRBbmREZWZpbmVXaW5BbXQAAAADCAUAAAAHcGF5bWVudAAAAAZhbW91bnQFAAAABnBhQ29pbgUAAAAHcGF5VHlwZQQAAAALZ2FtZURhdGFTdHIJAQAAABFGb3JtYXRHYW1lRGF0YVN0cgAAAAkFAAAADlNUQVRFU1VCTUlUVEVEBQAAAAZwYUNvaW4FAAAAD3BsYXllckFQdWJLZXk1OAUAAAAHcGF5VHlwZQgFAAAAB3BheW1lbnQAAAAGYW1vdW50BQAAAAZ3aW5BbXQCAAAAAAIAAAAAAgAAAAAJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAA9HQU1FU0NPVU5URVJLRVkFAAAACm5ld0dhbWVOdW0JAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAABmdhbWVJZAUAAAALZ2FtZURhdGFTdHIFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQUAAAADbmlsAAAAAWkBAAAAE2FjY2VwdENvaW5DaGFsbGVuZ2UAAAACAAAABmdhbWVJZAAAAAZyc2FTaWcEAAAADGdhbWVEYXRhTGlzdAkBAAAAE0V4dHJhY3RHYW1lRGF0YUxpc3QAAAABBQAAAAZnYW1lSWQEAAAACWdhbWVTdGF0ZQkAAZEAAAACBQAAAAxnYW1lRGF0YUxpc3QFAAAADElkeEdhbWVTdGF0ZQQAAAAGcGFDb2luCQABkQAAAAIFAAAADGdhbWVEYXRhTGlzdAUAAAAOSWR4UGxheWVyQUNvaW4EAAAACnBhUHViS2V5NTgJAAGRAAAAAgUAAAAMZ2FtZURhdGFMaXN0BQAAABJJZHhQbGF5ZXJBUHViS2V5NTgEAAAAB3BheVR5cGUJAAGRAAAAAgUAAAAMZ2FtZURhdGFMaXN0BQAAAApJZHhQYXlUeXBlBAAAAAZwYXlBbXQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAxnYW1lRGF0YUxpc3QFAAAACUlkeFBheUFtdAQAAAAGd2luQW10CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAMZ2FtZURhdGFMaXN0BQAAAAlJZHhXaW5BbXQEAAAAB3BheW1lbnQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAQAAAAKZmVlQXNzZXRJZAkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAFpAAAACmZlZUFzc2V0SWQEAAAACnBiUHViS2V5NTgJAAJYAAAAAQgFAAAAAWkAAAAPY2FsbGVyUHVibGljS2V5BAAAAAhwYXlUeXBlQgkBAAAAC3BheW1lbnRUeXBlAAAAAQUAAAAHcGF5bWVudAMDCQEAAAACIT0AAAACCAUAAAAHcGF5bWVudAAAAAdhc3NldElkCQAD7AAAAAEBAAAABBOr2TMJAQAAAAIhPQAAAAIIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQFAAAABFdCRVQHCQAAAgAAAAECAAAAMVBheW1lbnQgc2hvdWxkIGJlIGluIFdiZXQgb3IgV2F2ZXMuIEdhbWUgYWJvcnRlZC4DBQAAAApmZWVBc3NldElkCQAAAgAAAAECAAAAMVRyYW5zYWN0aW9uJ3MgZmVlIG11c3QgYmUgaW4gV2F2ZXMuIEdhbWUgYWJvcnRlZC4DCQAAAAAAAAIFAAAACnBhUHViS2V5NTgFAAAACnBiUHViS2V5NTgJAAACAAAAAQIAAAA/WW91IGNhbid0IGFjY2VwdCBhIGNoYWxsZW5nZSBjcmVhdGVkIGJ5IHlvdXJzZWxmLiBHYW1lIGFib3J0ZWQuAwkBAAAAAiE9AAAAAgUAAAAHcGF5VHlwZQUAAAAIcGF5VHlwZUIJAAACAAAAAQIAAABPUGF5bWVudCBtdXN0IGJlIG1hZGUgaW4gdGhlIHNhbWUgdG9rZW4sIFdCRVQvV0JFVCBvciBXQVZFUy9XQVZFUy4gR2FtZSBhYm9ydGVkLgMJAQAAAAIhPQAAAAIFAAAABnBheUFtdAgFAAAAB3BheW1lbnQAAAAGYW1vdW50CQAAAgAAAAECAAAAQFBheW91dCBtdXN0IGJlIGVxdWFsIHRvIHRoZSBjaGFsbGVuZ2VyIGJldCBhbW91bnQuIEdhbWUgYWJvcnRlZC4DCQEAAAACIT0AAAACBQAAAAlnYW1lU3RhdGUFAAAADlNUQVRFU1VCTUlUVEVECQAAAgAAAAECAAAAM0ludmFsaWQgZ2FtZSBzdGF0ZSBmb3IgcGFzc2VkIGdhbWVJZC4gR2FtZSBhYm9ydGVkLgQAAAAEcmFuZAkBAAAAD0dlbmVyYXRlUmFuZEludAAAAAIFAAAABmdhbWVJZAUAAAAGcnNhU2lnBAAAAAlsdWNreUNvaW4DCQAAZgAAAAIFAAAABHJhbmQAAAAAAAAAADIFAAAAB0NPSU5SRUQFAAAACENPSU5CTFVFBAAAAAZwYkNvaW4DCQAAAAAAAAIFAAAABnBhQ29pbgUAAAAHQ09JTlJFRAUAAAAIQ09JTkJMVUUFAAAAB0NPSU5SRUQEAAAADHRva2VuQXNzZXRJZAkBAAAACXRva2VuVHlwZQAAAAEFAAAAB3BheVR5cGUEAAAADm5ld0dhbWVEYXRhU3RyCQEAAAARRm9ybWF0R2FtZURhdGFTdHIAAAAJBQAAAA1TVEFURUZJTklTSEVEBQAAAAZwYUNvaW4FAAAACnBhUHViS2V5NTgFAAAAB3BheVR5cGUFAAAABnBheUFtdAUAAAAGd2luQW10BQAAAAZwYkNvaW4FAAAACnBiUHViS2V5NTgFAAAACWx1Y2t5Q29pbgQAAAAHd2luQWRkcgMJAAAAAAAAAgUAAAAGcGFDb2luBQAAAAlsdWNreUNvaW4JAQAAABRhZGRyZXNzRnJvbVB1YmxpY0tleQAAAAEJAAJZAAAAAQUAAAAKcGFQdWJLZXk1OAgFAAAAAWkAAAAGY2FsbGVyBAAAAAZmZWVBbXQJAABpAAAAAgkAAGUAAAACCQAAaAAAAAIFAAAABnBheUFtdAAAAAAAAAAAAgUAAAAGd2luQW10CQAAZAAAAAIJAABkAAAAAgUAAAAMRkVFQ09NTVVOSVRZBQAAAAtGRUVXQVZFU0JFVAUAAAAJRkVFTUNBRkVFCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAGZ2FtZUlkBQAAAA5uZXdHYW1lRGF0YVN0cgUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAD1dBTExFVENPTU1VTklUWQkAAGgAAAACBQAAAAZmZWVBbXQFAAAADEZFRUNPTU1VTklUWQUAAAAMdG9rZW5Bc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAADldBTExFVFdBVkVTQkVUCQAAaAAAAAIFAAAABmZlZUFtdAUAAAALRkVFV0FWRVNCRVQFAAAADHRva2VuQXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAxXQUxMRVRNQ0FGRUUJAABoAAAAAgUAAAAGZmVlQW10BQAAAAlGRUVNQ0FGRUUFAAAADHRva2VuQXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAd3aW5BZGRyBQAAAAZ3aW5BbXQFAAAADHRva2VuQXNzZXRJZAUAAAADbmlsAAAAAWkBAAAAE2NhbmNlbENvaW5DaGFsbGVuZ2UAAAABAAAABmdhbWVJZAQAAAAMZ2FtZURhdGFMaXN0CQEAAAATRXh0cmFjdEdhbWVEYXRhTGlzdAAAAAEFAAAABmdhbWVJZAQAAAAJZ2FtZVN0YXRlCQABkQAAAAIFAAAADGdhbWVEYXRhTGlzdAUAAAAMSWR4R2FtZVN0YXRlBAAAAAZwYUNvaW4JAAGRAAAAAgUAAAAMZ2FtZURhdGFMaXN0BQAAAA5JZHhQbGF5ZXJBQ29pbgQAAAAKcGFQdWJLZXk1OAkAAZEAAAACBQAAAAxnYW1lRGF0YUxpc3QFAAAAEklkeFBsYXllckFQdWJLZXk1OAQAAAAHcGF5VHlwZQkAAZEAAAACBQAAAAxnYW1lRGF0YUxpc3QFAAAACklkeFBheVR5cGUEAAAABnBheUFtdAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAADGdhbWVEYXRhTGlzdAUAAAAJSWR4UGF5QW10BAAAAAZ3aW5BbXQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAxnYW1lRGF0YUxpc3QFAAAACUlkeFdpbkFtdAQAAAAIcHViS2V5NTgJAAJYAAAAAQgFAAAAAWkAAAAPY2FsbGVyUHVibGljS2V5BAAAAApmZWVBc3NldElkCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAAWkAAAAKZmVlQXNzZXRJZAMFAAAACmZlZUFzc2V0SWQJAAACAAAAAQIAAAAxVHJhbnNhY3Rpb24ncyBmZWUgbXVzdCBiZSBpbiBXYXZlcy4gR2FtZSBhYm9ydGVkLgMJAQAAAAIhPQAAAAIFAAAACWdhbWVTdGF0ZQUAAAAOU1RBVEVTVUJNSVRURUQJAAACAAAAAQIAAAAzSW52YWxpZCBnYW1lIHN0YXRlIGZvciBwYXNzZWQgZ2FtZUlkLiBHYW1lIGFib3J0ZWQuAwkBAAAAAiE9AAAAAgUAAAAKcGFQdWJLZXk1OAUAAAAIcHViS2V5NTgJAAACAAAAAQIAAABBWW91IGNhbm5vdCBjYW5jZWwgYSBnYW1lIGNyZWF0ZWQgYnkgYW5vdGhlciBwbGF5ZXIuIEdhbWUgYWJvcnRlZC4EAAAADm5ld0dhbWVEYXRhU3RyCQEAAAARRm9ybWF0R2FtZURhdGFTdHIAAAAJBQAAAA1TVEFURUNBTkNFTEVEBQAAAAZwYUNvaW4FAAAACnBhUHViS2V5NTgFAAAAB3BheVR5cGUFAAAABnBheUFtdAUAAAAGd2luQW10AgAAAAACAAAAAAIAAAAABAAAAAlyZWZ1bmRBbXQJAABrAAAAAwUAAAAGcGF5QW10CQAAZQAAAAIJAABlAAAAAgkAAGUAAAACAAAAAAAAAABkBQAAAAtGRUVXQVZFU0JFVAUAAAAJRkVFTUNBRkVFBQAAAAxGRUVDT01NVU5JVFkAAAAAAAAAAGQEAAAADHJlZnVuZFdhbGxldAkBAAAAFGFkZHJlc3NGcm9tUHVibGljS2V5AAAAAQkAAlkAAAABBQAAAApwYVB1YktleTU4BAAAAAtyZWZ1bmRUb2tlbgkBAAAACXRva2VuVHlwZQAAAAEFAAAAB3BheVR5cGUJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAAZnYW1lSWQFAAAADm5ld0dhbWVEYXRhU3RyBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAPV0FMTEVUQ09NTVVOSVRZCQAAawAAAAMFAAAABnBheUFtdAUAAAAMRkVFQ09NTVVOSVRZAAAAAAAAAABkBQAAAAtyZWZ1bmRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAA5XQUxMRVRXQVZFU0JFVAkAAGsAAAADBQAAAAZwYXlBbXQFAAAAC0ZFRVdBVkVTQkVUAAAAAAAAAABkBQAAAAtyZWZ1bmRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAxXQUxMRVRNQ0FGRUUJAABrAAAAAwUAAAAGcGF5QW10BQAAAAlGRUVNQ0FGRUUAAAAAAAAAAGQFAAAAC3JlZnVuZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAADHJlZnVuZFdhbGxldAUAAAAJcmVmdW5kQW10BQAAAAtyZWZ1bmRUb2tlbgUAAAADbmlsAAAAAHfLvI0=",
    "chainId": 84,
    "height": 840561,
    "spentComplexity": 0
}

View: original | compacted
Prev: 31DSDoGhxVxPrdQDCeY35ub8ThZRSZjiZvmR8J7tgKYq
Next: none

Diff: 
Old New Differences
235 235                                  let winAddr = if ((paCoin == luckyCoin))
236 236                                      then addressFromPublicKey(fromBase58String(paPubKey58))
237 237                                      else i.caller
238 -                                 let feeAmt = ((payAmt * 2) - winAmt)
239 -                                 ScriptResult(WriteSet([DataEntry(gameId, newGameDataStr)]), TransferSet([ScriptTransfer(WALLETCOMMUNITY, fraction(feeAmt, (FEECOMMUNITY * 10), 100), tokenAssetId), ScriptTransfer(WALLETWAVESBET, fraction(feeAmt, (FEEWAVESBET * 10), 100), tokenAssetId), ScriptTransfer(WALLETMCAFEE, fraction(feeAmt, (FEEMCAFEE * 10), 100), tokenAssetId), ScriptTransfer(winAddr, winAmt, tokenAssetId)]))
238 +                                 let feeAmt = (((payAmt * 2) - winAmt) / ((FEECOMMUNITY + FEEWAVESBET) + FEEMCAFEE))
239 +                                 ScriptResult(WriteSet([DataEntry(gameId, newGameDataStr)]), TransferSet([ScriptTransfer(WALLETCOMMUNITY, (feeAmt * FEECOMMUNITY), tokenAssetId), ScriptTransfer(WALLETWAVESBET, (feeAmt * FEEWAVESBET), tokenAssetId), ScriptTransfer(WALLETMCAFEE, (feeAmt * FEEMCAFEE), tokenAssetId), ScriptTransfer(winAddr, winAmt, tokenAssetId)]))
240 240                                  }
241 241      }
242 242  
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:MIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAg4dAR6XbBDAS9hr/Ej3dJv6Ffc466x/mOGMWU3lrABs3qa8BHmuJGnkfbpEf2vAwYTOWPvvzfM10OBbfloSyq3c9MKvyTe1luBLGqW4vZUXIyvSgz1liyUVefIQy3dyF9jbeTZbC0bbcT/7O3DEL+01z6A+rDCacSZ0lGolSQ6AnhLxzIkVpOQJbrBmC+x+ZuZPCMWzJynd5aeOn7jaj/mkRVyxe6g/0OhWz4NiiZXeuMRB+8mKy0fWD/UlIlZWHsAS2ZmrkXKqjLq0/0wr8ILJkznjSqdnI5Ibjg3uQrj/4AN+i9r28aQ73/ZkPtY5Sbw0AOiABBu7gHmq9ayVxZQIDAQAB")
5 5  
6 6  let GAMESCOUNTERKEY = "$GAME_NUM"
7 7  
8 8  let WBET = base58'A4q1mYKo11yuH9gmvDodeJoksagcyQzeFE9JtphMWddw'
9 9  
10 10  let WALLETCOMMUNITY = Address(base58'3MtCy2PCFPyu8A9SRNL4qUo1V17SGLHftD8')
11 11  
12 12  let WALLETWAVESBET = Address(base58'3MxK12u62zsu9xh3hU7p5iJncCLANd3zhTZ')
13 13  
14 14  let WALLETMCAFEE = Address(base58'3MxK12u62zsu9xh3hU7p5iJncCLANd3zhTZ')
15 15  
16 16  let WAVELET = 100000000
17 17  
18 18  let FEECOMMUNITY = 1
19 19  
20 20  let FEEWAVESBET = 3
21 21  
22 22  let FEEMCAFEE = 2
23 23  
24 24  let STATESUBMITTED = "SUBMITTED"
25 25  
26 26  let STATEACCEPTED = "ACCEPTED"
27 27  
28 28  let STATEFINISHED = "FINISHED"
29 29  
30 30  let STATECANCELED = "CANCELED"
31 31  
32 32  let COINRED = "RED"
33 33  
34 34  let COINBLUE = "BLUE"
35 35  
36 36  let BETMINWAVES = ((1 * WAVELET) / 4)
37 37  
38 38  let BETMINWBET = (100 * WAVELET)
39 39  
40 40  let IdxGameState = 0
41 41  
42 42  let IdxPlayerACoin = 1
43 43  
44 44  let IdxPlayerAPubKey58 = 2
45 45  
46 46  let IdxPayType = 3
47 47  
48 48  let IdxPayAmt = 4
49 49  
50 50  let IdxWinAmt = 5
51 51  
52 52  let IdxPlayerBCoin = 6
53 53  
54 54  let IdxPlayerBPubKey58 = 7
55 55  
56 56  let IdxLuckyCoin = 8
57 57  
58 58  func IncrementGameNum () = {
59 59      let gameNum =     match getInteger(this, GAMESCOUNTERKEY) {
60 60          case num: Int => 
61 61              num
62 62          case _ => 
63 63              0
64 64      }
65 65      (gameNum + 1)
66 66      }
67 67  
68 68  
69 69  func GenerateRandInt (gameId,rsaSign) = {
70 70      let rsaSigValid = rsaVerify(SHA256, toBytes(gameId), rsaSign, RSAPUBLIC)
71 71      if (rsaSigValid)
72 72          then {
73 73              let rand = (toInt(sha256(rsaSign)) % 100)
74 74              if ((0 > rand))
75 75                  then ((-1 * rand) + 1)
76 76                  else (rand + 1)
77 77              }
78 78          else throw("Invalid RSA signature")
79 79      }
80 80  
81 81  
82 82  func paymentType (payment) = if ((payment.assetId == WBET))
83 83      then "WBET"
84 84      else "WAVES"
85 85  
86 86  
87 87  func tokenType (token) = if ((token == "WBET"))
88 88      then WBET
89 89      else unit
90 90  
91 91  
92 92  func FormatGameDataParam (p) = {
93 93      let s = size(p)
94 94      if ((s == 0))
95 95          then throw("Parameter size must be greater then 0")
96 96          else if ((s > 99))
97 97              then throw("Parameter size must be less then 100")
98 98              else if ((10 > s))
99 99                  then (("0" + toString(s)) + p)
100 100                  else (toString(s) + p)
101 101      }
102 102  
103 103  
104 104  func FormatGameDataStr (gameState,playerACoin,playerAPubKey58,payType,payAmount,winAmt,playerBCoin,playerBPubKey58,luckyCoin) = {
105 105      let fullStateStr = ((((((((((FormatGameDataParam(gameState) + "_") + FormatGameDataParam(playerACoin)) + "_") + FormatGameDataParam(playerAPubKey58)) + "_") + FormatGameDataParam(payType)) + "_") + FormatGameDataParam(toString(payAmount))) + "_") + FormatGameDataParam(toString(winAmt)))
106 106      if (if (if ((playerBCoin == ""))
107 107          then true
108 108          else (playerBPubKey58 == ""))
109 109          then true
110 110          else (luckyCoin == ""))
111 111          then fullStateStr
112 112          else ((((((fullStateStr + "_") + FormatGameDataParam(playerBCoin)) + "_") + FormatGameDataParam(playerBPubKey58)) + "_") + FormatGameDataParam(luckyCoin))
113 113      }
114 114  
115 115  
116 116  func RemoveUnderscoreIfPresent (remaining) = if ((size(remaining) > 0))
117 117      then drop(remaining, 1)
118 118      else remaining
119 119  
120 120  
121 121  func ParseNextAttribute (remaining) = {
122 122      let s = size(remaining)
123 123      if ((s > 0))
124 124          then {
125 125              let nn = parseIntValue(take(remaining, 2))
126 126              let v = take(drop(remaining, 2), nn)
127 127              let tmpRemaining = drop(remaining, (nn + 2))
128 128              let remainingState = RemoveUnderscoreIfPresent(tmpRemaining)
129 129  [v, remainingState]
130 130              }
131 131          else throw("Empty string was passed into parseNextAttribute func")
132 132      }
133 133  
134 134  
135 135  func ParseGameRawDataStr (rawStateStr) = {
136 136      let gameState = ParseNextAttribute(rawStateStr)
137 137      let paCoin = ParseNextAttribute(gameState[1])
138 138      let paPubKey58 = ParseNextAttribute(paCoin[1])
139 139      let payType = ParseNextAttribute(paPubKey58[1])
140 140      let payAmt = ParseNextAttribute(payType[1])
141 141      let winAmt = ParseNextAttribute(payAmt[1])
142 142  [gameState[0], paCoin[0], paPubKey58[0], payType[0], payAmt[0], winAmt[0]]
143 143      }
144 144  
145 145  
146 146  func ExtractGameDataList (gameId) = {
147 147      let rawDataStr =     match getString(this, gameId) {
148 148          case str: String => 
149 149              str
150 150          case _ => 
151 151              throw(("Couldn't find game by " + gameId))
152 152      }
153 153      ParseGameRawDataStr(rawDataStr)
154 154      }
155 155  
156 156  
157 157  func ValidateBetAndDefineWinAmt (amount,playerCoin,paymentType) = if (if ((playerCoin != COINRED))
158 158      then (playerCoin != COINBLUE)
159 159      else false)
160 160      then throw("Invalid play, change your bet to RED or BLUE coin. Game aborted.")
161 161      else if (if ((paymentType == "WBET"))
162 162          then (BETMINWBET > amount)
163 163          else false)
164 164          then throw(("The minimum bet on Wbet is " + toString((BETMINWBET / WAVELET))))
165 165          else if (if ((paymentType == "WAVES"))
166 166              then (BETMINWAVES > amount)
167 167              else false)
168 168              then throw(("The minimum bet on Waves is " + toString((BETMINWAVES / WAVELET))))
169 169              else fraction((amount * 2), (((100 - FEEWAVESBET) - FEEMCAFEE) - FEECOMMUNITY), 100)
170 170  
171 171  
172 172  @Callable(i)
173 173  func playCoinflip (paCoin) = {
174 174      let gameId = toBase58String(i.transactionId)
175 175      let gameIdUsed = isDefined(getString(this, gameId))
176 176      let payment = extract(i.payment)
177 177      let feeAssetId = isDefined(i.feeAssetId)
178 178      if (if ((payment.assetId != assetInfo(base58'WAVES')))
179 179          then (payment.assetId != WBET)
180 180          else false)
181 181          then throw("Payment should be in Wbet or Waves. Game aborted.")
182 182          else if (feeAssetId)
183 183              then throw("Transaction's fee must be in Waves. Game aborted.")
184 184              else if (gameIdUsed)
185 185                  then throw("Passed GameId had been used before. Game aborted.")
186 186                  else {
187 187                      let newGameNum = IncrementGameNum()
188 188                      let playerAPubKey58 = toBase58String(i.callerPublicKey)
189 189                      let payType = paymentType(payment)
190 190                      let winAmt = ValidateBetAndDefineWinAmt(payment.amount, paCoin, payType)
191 191                      let gameDataStr = FormatGameDataStr(STATESUBMITTED, paCoin, playerAPubKey58, payType, payment.amount, winAmt, "", "", "")
192 192                      ScriptResult(WriteSet([DataEntry(GAMESCOUNTERKEY, newGameNum), DataEntry(gameId, gameDataStr)]), TransferSet(nil))
193 193                      }
194 194      }
195 195  
196 196  
197 197  
198 198  @Callable(i)
199 199  func acceptCoinChallenge (gameId,rsaSig) = {
200 200      let gameDataList = ExtractGameDataList(gameId)
201 201      let gameState = gameDataList[IdxGameState]
202 202      let paCoin = gameDataList[IdxPlayerACoin]
203 203      let paPubKey58 = gameDataList[IdxPlayerAPubKey58]
204 204      let payType = gameDataList[IdxPayType]
205 205      let payAmt = parseIntValue(gameDataList[IdxPayAmt])
206 206      let winAmt = parseIntValue(gameDataList[IdxWinAmt])
207 207      let payment = extract(i.payment)
208 208      let feeAssetId = isDefined(i.feeAssetId)
209 209      let pbPubKey58 = toBase58String(i.callerPublicKey)
210 210      let payTypeB = paymentType(payment)
211 211      if (if ((payment.assetId != assetInfo(base58'WAVES')))
212 212          then (payment.assetId != WBET)
213 213          else false)
214 214          then throw("Payment should be in Wbet or Waves. Game aborted.")
215 215          else if (feeAssetId)
216 216              then throw("Transaction's fee must be in Waves. Game aborted.")
217 217              else if ((paPubKey58 == pbPubKey58))
218 218                  then throw("You can't accept a challenge created by yourself. Game aborted.")
219 219                  else if ((payType != payTypeB))
220 220                      then throw("Payment must be made in the same token, WBET/WBET or WAVES/WAVES. Game aborted.")
221 221                      else if ((payAmt != payment.amount))
222 222                          then throw("Payout must be equal to the challenger bet amount. Game aborted.")
223 223                          else if ((gameState != STATESUBMITTED))
224 224                              then throw("Invalid game state for passed gameId. Game aborted.")
225 225                              else {
226 226                                  let rand = GenerateRandInt(gameId, rsaSig)
227 227                                  let luckyCoin = if ((rand > 50))
228 228                                      then COINRED
229 229                                      else COINBLUE
230 230                                  let pbCoin = if ((paCoin == COINRED))
231 231                                      then COINBLUE
232 232                                      else COINRED
233 233                                  let tokenAssetId = tokenType(payType)
234 234                                  let newGameDataStr = FormatGameDataStr(STATEFINISHED, paCoin, paPubKey58, payType, payAmt, winAmt, pbCoin, pbPubKey58, luckyCoin)
235 235                                  let winAddr = if ((paCoin == luckyCoin))
236 236                                      then addressFromPublicKey(fromBase58String(paPubKey58))
237 237                                      else i.caller
238 -                                 let feeAmt = ((payAmt * 2) - winAmt)
239 -                                 ScriptResult(WriteSet([DataEntry(gameId, newGameDataStr)]), TransferSet([ScriptTransfer(WALLETCOMMUNITY, fraction(feeAmt, (FEECOMMUNITY * 10), 100), tokenAssetId), ScriptTransfer(WALLETWAVESBET, fraction(feeAmt, (FEEWAVESBET * 10), 100), tokenAssetId), ScriptTransfer(WALLETMCAFEE, fraction(feeAmt, (FEEMCAFEE * 10), 100), tokenAssetId), ScriptTransfer(winAddr, winAmt, tokenAssetId)]))
238 +                                 let feeAmt = (((payAmt * 2) - winAmt) / ((FEECOMMUNITY + FEEWAVESBET) + FEEMCAFEE))
239 +                                 ScriptResult(WriteSet([DataEntry(gameId, newGameDataStr)]), TransferSet([ScriptTransfer(WALLETCOMMUNITY, (feeAmt * FEECOMMUNITY), tokenAssetId), ScriptTransfer(WALLETWAVESBET, (feeAmt * FEEWAVESBET), tokenAssetId), ScriptTransfer(WALLETMCAFEE, (feeAmt * FEEMCAFEE), tokenAssetId), ScriptTransfer(winAddr, winAmt, tokenAssetId)]))
240 240                                  }
241 241      }
242 242  
243 243  
244 244  
245 245  @Callable(i)
246 246  func cancelCoinChallenge (gameId) = {
247 247      let gameDataList = ExtractGameDataList(gameId)
248 248      let gameState = gameDataList[IdxGameState]
249 249      let paCoin = gameDataList[IdxPlayerACoin]
250 250      let paPubKey58 = gameDataList[IdxPlayerAPubKey58]
251 251      let payType = gameDataList[IdxPayType]
252 252      let payAmt = parseIntValue(gameDataList[IdxPayAmt])
253 253      let winAmt = parseIntValue(gameDataList[IdxWinAmt])
254 254      let pubKey58 = toBase58String(i.callerPublicKey)
255 255      let feeAssetId = isDefined(i.feeAssetId)
256 256      if (feeAssetId)
257 257          then throw("Transaction's fee must be in Waves. Game aborted.")
258 258          else if ((gameState != STATESUBMITTED))
259 259              then throw("Invalid game state for passed gameId. Game aborted.")
260 260              else if ((paPubKey58 != pubKey58))
261 261                  then throw("You cannot cancel a game created by another player. Game aborted.")
262 262                  else {
263 263                      let newGameDataStr = FormatGameDataStr(STATECANCELED, paCoin, paPubKey58, payType, payAmt, winAmt, "", "", "")
264 264                      let refundAmt = fraction(payAmt, (((100 - FEEWAVESBET) - FEEMCAFEE) - FEECOMMUNITY), 100)
265 265                      let refundWallet = addressFromPublicKey(fromBase58String(paPubKey58))
266 266                      let refundToken = tokenType(payType)
267 267                      ScriptResult(WriteSet([DataEntry(gameId, newGameDataStr)]), TransferSet([ScriptTransfer(WALLETCOMMUNITY, fraction(payAmt, FEECOMMUNITY, 100), refundToken), ScriptTransfer(WALLETWAVESBET, fraction(payAmt, FEEWAVESBET, 100), refundToken), ScriptTransfer(WALLETMCAFEE, fraction(payAmt, FEEMCAFEE, 100), refundToken), ScriptTransfer(refundWallet, refundAmt, refundToken)]))
268 268                      }
269 269      }
270 270  
271 271

Old	New		Differences
235	235		let winAddr = if ((paCoin == luckyCoin))
236	236		then addressFromPublicKey(fromBase58String(paPubKey58))
237	237		else i.caller
238		-	let feeAmt = ((payAmt * 2) - winAmt)
239		-	ScriptResult(WriteSet([DataEntry(gameId, newGameDataStr)]), TransferSet([ScriptTransfer(WALLETCOMMUNITY, ~~fraction~~(feeAmt~~, (FEECOMMUNITY~~ * ~~10), 100~~), tokenAssetId), ScriptTransfer(WALLETWAVESBET, ~~fraction~~(feeAmt~~, (FEEWAVESBET~~ * ~~10), 100~~), tokenAssetId), ScriptTransfer(WALLETMCAFEE, ~~fraction~~(feeAmt~~, (FEEMCAFEE~~ * ~~10), 100~~), tokenAssetId), ScriptTransfer(winAddr, winAmt, tokenAssetId)]))
	238	+	let feeAmt = (((payAmt * 2) - winAmt) / ((FEECOMMUNITY + FEEWAVESBET) + FEEMCAFEE))
	239	+	ScriptResult(WriteSet([DataEntry(gameId, newGameDataStr)]), TransferSet([ScriptTransfer(WALLETCOMMUNITY, (feeAmt * FEECOMMUNITY), tokenAssetId), ScriptTransfer(WALLETWAVESBET, (feeAmt * FEEWAVESBET), tokenAssetId), ScriptTransfer(WALLETMCAFEE, (feeAmt * FEEMCAFEE), tokenAssetId), ScriptTransfer(winAddr, winAmt, tokenAssetId)]))
240	240		}
241	241		}
242	242

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let RSAPUBLIC = fromBase64String("base64:MIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAg4dAR6XbBDAS9hr/Ej3dJv6Ffc466x/mOGMWU3lrABs3qa8BHmuJGnkfbpEf2vAwYTOWPvvzfM10OBbfloSyq3c9MKvyTe1luBLGqW4vZUXIyvSgz1liyUVefIQy3dyF9jbeTZbC0bbcT/7O3DEL+01z6A+rDCacSZ0lGolSQ6AnhLxzIkVpOQJbrBmC+x+ZuZPCMWzJynd5aeOn7jaj/mkRVyxe6g/0OhWz4NiiZXeuMRB+8mKy0fWD/UlIlZWHsAS2ZmrkXKqjLq0/0wr8ILJkznjSqdnI5Ibjg3uQrj/4AN+i9r28aQ73/ZkPtY5Sbw0AOiABBu7gHmq9ayVxZQIDAQAB")
5	5
6	6		let GAMESCOUNTERKEY = "$GAME_NUM"
7	7
8	8		let WBET = base58'A4q1mYKo11yuH9gmvDodeJoksagcyQzeFE9JtphMWddw'
9	9
10	10		let WALLETCOMMUNITY = Address(base58'3MtCy2PCFPyu8A9SRNL4qUo1V17SGLHftD8')
11	11
12	12		let WALLETWAVESBET = Address(base58'3MxK12u62zsu9xh3hU7p5iJncCLANd3zhTZ')
13	13
14	14		let WALLETMCAFEE = Address(base58'3MxK12u62zsu9xh3hU7p5iJncCLANd3zhTZ')
15	15
16	16		let WAVELET = 100000000
17	17
18	18		let FEECOMMUNITY = 1
19	19
20	20		let FEEWAVESBET = 3
21	21
22	22		let FEEMCAFEE = 2
23	23
24	24		let STATESUBMITTED = "SUBMITTED"
25	25
26	26		let STATEACCEPTED = "ACCEPTED"
27	27
28	28		let STATEFINISHED = "FINISHED"
29	29
30	30		let STATECANCELED = "CANCELED"
31	31
32	32		let COINRED = "RED"
33	33
34	34		let COINBLUE = "BLUE"
35	35
36	36		let BETMINWAVES = ((1 * WAVELET) / 4)
37	37
38	38		let BETMINWBET = (100 * WAVELET)
39	39
40	40		let IdxGameState = 0
41	41
42	42		let IdxPlayerACoin = 1
43	43
44	44		let IdxPlayerAPubKey58 = 2
45	45
46	46		let IdxPayType = 3
47	47
48	48		let IdxPayAmt = 4
49	49
50	50		let IdxWinAmt = 5
51	51
52	52		let IdxPlayerBCoin = 6
53	53
54	54		let IdxPlayerBPubKey58 = 7
55	55
56	56		let IdxLuckyCoin = 8
57	57
58	58		func IncrementGameNum () = {
59	59		let gameNum = match getInteger(this, GAMESCOUNTERKEY) {
60	60		case num: Int =>
61	61		num
62	62		case _ =>
63	63		0
64	64		}
65	65		(gameNum + 1)
66	66		}
67	67
68	68
69	69		func GenerateRandInt (gameId,rsaSign) = {
70	70		let rsaSigValid = rsaVerify(SHA256, toBytes(gameId), rsaSign, RSAPUBLIC)
71	71		if (rsaSigValid)
72	72		then {
73	73		let rand = (toInt(sha256(rsaSign)) % 100)
74	74		if ((0 > rand))
75	75		then ((-1 * rand) + 1)
76	76		else (rand + 1)
77	77		}
78	78		else throw("Invalid RSA signature")
79	79		}
80	80
81	81
82	82		func paymentType (payment) = if ((payment.assetId == WBET))
83	83		then "WBET"
84	84		else "WAVES"
85	85
86	86
87	87		func tokenType (token) = if ((token == "WBET"))
88	88		then WBET
89	89		else unit
90	90
91	91
92	92		func FormatGameDataParam (p) = {
93	93		let s = size(p)
94	94		if ((s == 0))
95	95		then throw("Parameter size must be greater then 0")
96	96		else if ((s > 99))
97	97		then throw("Parameter size must be less then 100")
98	98		else if ((10 > s))
99	99		then (("0" + toString(s)) + p)
100	100		else (toString(s) + p)
101	101		}
102	102
103	103
104	104		func FormatGameDataStr (gameState,playerACoin,playerAPubKey58,payType,payAmount,winAmt,playerBCoin,playerBPubKey58,luckyCoin) = {
105	105		let fullStateStr = ((((((((((FormatGameDataParam(gameState) + "_") + FormatGameDataParam(playerACoin)) + "_") + FormatGameDataParam(playerAPubKey58)) + "_") + FormatGameDataParam(payType)) + "_") + FormatGameDataParam(toString(payAmount))) + "_") + FormatGameDataParam(toString(winAmt)))
106	106		if (if (if ((playerBCoin == ""))
107	107		then true
108	108		else (playerBPubKey58 == ""))
109	109		then true
110	110		else (luckyCoin == ""))
111	111		then fullStateStr
112	112		else ((((((fullStateStr + "_") + FormatGameDataParam(playerBCoin)) + "_") + FormatGameDataParam(playerBPubKey58)) + "_") + FormatGameDataParam(luckyCoin))
113	113		}
114	114
115	115
116	116		func RemoveUnderscoreIfPresent (remaining) = if ((size(remaining) > 0))
117	117		then drop(remaining, 1)
118	118		else remaining
119	119
120	120
121	121		func ParseNextAttribute (remaining) = {
122	122		let s = size(remaining)
123	123		if ((s > 0))
124	124		then {
125	125		let nn = parseIntValue(take(remaining, 2))
126	126		let v = take(drop(remaining, 2), nn)
127	127		let tmpRemaining = drop(remaining, (nn + 2))
128	128		let remainingState = RemoveUnderscoreIfPresent(tmpRemaining)
129	129		[v, remainingState]
130	130		}
131	131		else throw("Empty string was passed into parseNextAttribute func")
132	132		}
133	133
134	134
135	135		func ParseGameRawDataStr (rawStateStr) = {
136	136		let gameState = ParseNextAttribute(rawStateStr)
137	137		let paCoin = ParseNextAttribute(gameState[1])
138	138		let paPubKey58 = ParseNextAttribute(paCoin[1])
139	139		let payType = ParseNextAttribute(paPubKey58[1])
140	140		let payAmt = ParseNextAttribute(payType[1])
141	141		let winAmt = ParseNextAttribute(payAmt[1])
142	142		[gameState[0], paCoin[0], paPubKey58[0], payType[0], payAmt[0], winAmt[0]]
143	143		}
144	144
145	145
146	146		func ExtractGameDataList (gameId) = {
147	147		let rawDataStr = match getString(this, gameId) {
148	148		case str: String =>
149	149		str
150	150		case _ =>
151	151		throw(("Couldn't find game by " + gameId))
152	152		}
153	153		ParseGameRawDataStr(rawDataStr)
154	154		}
155	155
156	156
157	157		func ValidateBetAndDefineWinAmt (amount,playerCoin,paymentType) = if (if ((playerCoin != COINRED))
158	158		then (playerCoin != COINBLUE)
159	159		else false)
160	160		then throw("Invalid play, change your bet to RED or BLUE coin. Game aborted.")
161	161		else if (if ((paymentType == "WBET"))
162	162		then (BETMINWBET > amount)
163	163		else false)
164	164		then throw(("The minimum bet on Wbet is " + toString((BETMINWBET / WAVELET))))
165	165		else if (if ((paymentType == "WAVES"))
166	166		then (BETMINWAVES > amount)
167	167		else false)
168	168		then throw(("The minimum bet on Waves is " + toString((BETMINWAVES / WAVELET))))
169	169		else fraction((amount * 2), (((100 - FEEWAVESBET) - FEEMCAFEE) - FEECOMMUNITY), 100)
170	170
171	171
172	172		@Callable(i)
173	173		func playCoinflip (paCoin) = {
174	174		let gameId = toBase58String(i.transactionId)
175	175		let gameIdUsed = isDefined(getString(this, gameId))
176	176		let payment = extract(i.payment)
177	177		let feeAssetId = isDefined(i.feeAssetId)
178	178		if (if ((payment.assetId != assetInfo(base58'WAVES')))
179	179		then (payment.assetId != WBET)
180	180		else false)
181	181		then throw("Payment should be in Wbet or Waves. Game aborted.")
182	182		else if (feeAssetId)
183	183		then throw("Transaction's fee must be in Waves. Game aborted.")
184	184		else if (gameIdUsed)
185	185		then throw("Passed GameId had been used before. Game aborted.")
186	186		else {
187	187		let newGameNum = IncrementGameNum()
188	188		let playerAPubKey58 = toBase58String(i.callerPublicKey)
189	189		let payType = paymentType(payment)
190	190		let winAmt = ValidateBetAndDefineWinAmt(payment.amount, paCoin, payType)
191	191		let gameDataStr = FormatGameDataStr(STATESUBMITTED, paCoin, playerAPubKey58, payType, payment.amount, winAmt, "", "", "")
192	192		ScriptResult(WriteSet([DataEntry(GAMESCOUNTERKEY, newGameNum), DataEntry(gameId, gameDataStr)]), TransferSet(nil))
193	193		}
194	194		}
195	195
196	196
197	197
198	198		@Callable(i)
199	199		func acceptCoinChallenge (gameId,rsaSig) = {
200	200		let gameDataList = ExtractGameDataList(gameId)
201	201		let gameState = gameDataList[IdxGameState]
202	202		let paCoin = gameDataList[IdxPlayerACoin]
203	203		let paPubKey58 = gameDataList[IdxPlayerAPubKey58]
204	204		let payType = gameDataList[IdxPayType]
205	205		let payAmt = parseIntValue(gameDataList[IdxPayAmt])
206	206		let winAmt = parseIntValue(gameDataList[IdxWinAmt])
207	207		let payment = extract(i.payment)
208	208		let feeAssetId = isDefined(i.feeAssetId)
209	209		let pbPubKey58 = toBase58String(i.callerPublicKey)
210	210		let payTypeB = paymentType(payment)
211	211		if (if ((payment.assetId != assetInfo(base58'WAVES')))
212	212		then (payment.assetId != WBET)
213	213		else false)
214	214		then throw("Payment should be in Wbet or Waves. Game aborted.")
215	215		else if (feeAssetId)
216	216		then throw("Transaction's fee must be in Waves. Game aborted.")
217	217		else if ((paPubKey58 == pbPubKey58))
218	218		then throw("You can't accept a challenge created by yourself. Game aborted.")
219	219		else if ((payType != payTypeB))
220	220		then throw("Payment must be made in the same token, WBET/WBET or WAVES/WAVES. Game aborted.")
221	221		else if ((payAmt != payment.amount))
222	222		then throw("Payout must be equal to the challenger bet amount. Game aborted.")
223	223		else if ((gameState != STATESUBMITTED))
224	224		then throw("Invalid game state for passed gameId. Game aborted.")
225	225		else {
226	226		let rand = GenerateRandInt(gameId, rsaSig)
227	227		let luckyCoin = if ((rand > 50))
228	228		then COINRED
229	229		else COINBLUE
230	230		let pbCoin = if ((paCoin == COINRED))
231	231		then COINBLUE
232	232		else COINRED
233	233		let tokenAssetId = tokenType(payType)
234	234		let newGameDataStr = FormatGameDataStr(STATEFINISHED, paCoin, paPubKey58, payType, payAmt, winAmt, pbCoin, pbPubKey58, luckyCoin)
235	235		let winAddr = if ((paCoin == luckyCoin))
236	236		then addressFromPublicKey(fromBase58String(paPubKey58))
237	237		else i.caller
238		-	let feeAmt = ((payAmt * 2) - winAmt)
239		-	ScriptResult(WriteSet([DataEntry(gameId, newGameDataStr)]), TransferSet([ScriptTransfer(WALLETCOMMUNITY, ~~fraction~~(feeAmt~~, (FEECOMMUNITY~~ * ~~10), 100~~), tokenAssetId), ScriptTransfer(WALLETWAVESBET, ~~fraction~~(feeAmt~~, (FEEWAVESBET~~ * ~~10), 100~~), tokenAssetId), ScriptTransfer(WALLETMCAFEE, ~~fraction~~(feeAmt~~, (FEEMCAFEE~~ * ~~10), 100~~), tokenAssetId), ScriptTransfer(winAddr, winAmt, tokenAssetId)]))
	238	+	let feeAmt = (((payAmt * 2) - winAmt) / ((FEECOMMUNITY + FEEWAVESBET) + FEEMCAFEE))
	239	+	ScriptResult(WriteSet([DataEntry(gameId, newGameDataStr)]), TransferSet([ScriptTransfer(WALLETCOMMUNITY, (feeAmt * FEECOMMUNITY), tokenAssetId), ScriptTransfer(WALLETWAVESBET, (feeAmt * FEEWAVESBET), tokenAssetId), ScriptTransfer(WALLETMCAFEE, (feeAmt * FEEMCAFEE), tokenAssetId), ScriptTransfer(winAddr, winAmt, tokenAssetId)]))
240	240		}
241	241		}
242	242
243	243
244	244
245	245		@Callable(i)
246	246		func cancelCoinChallenge (gameId) = {
247	247		let gameDataList = ExtractGameDataList(gameId)
248	248		let gameState = gameDataList[IdxGameState]
249	249		let paCoin = gameDataList[IdxPlayerACoin]
250	250		let paPubKey58 = gameDataList[IdxPlayerAPubKey58]
251	251		let payType = gameDataList[IdxPayType]
252	252		let payAmt = parseIntValue(gameDataList[IdxPayAmt])
253	253		let winAmt = parseIntValue(gameDataList[IdxWinAmt])
254	254		let pubKey58 = toBase58String(i.callerPublicKey)
255	255		let feeAssetId = isDefined(i.feeAssetId)
256	256		if (feeAssetId)
257	257		then throw("Transaction's fee must be in Waves. Game aborted.")
258	258		else if ((gameState != STATESUBMITTED))
259	259		then throw("Invalid game state for passed gameId. Game aborted.")
260	260		else if ((paPubKey58 != pubKey58))
261	261		then throw("You cannot cancel a game created by another player. Game aborted.")
262	262		else {
263	263		let newGameDataStr = FormatGameDataStr(STATECANCELED, paCoin, paPubKey58, payType, payAmt, winAmt, "", "", "")
264	264		let refundAmt = fraction(payAmt, (((100 - FEEWAVESBET) - FEEMCAFEE) - FEECOMMUNITY), 100)
265	265		let refundWallet = addressFromPublicKey(fromBase58String(paPubKey58))
266	266		let refundToken = tokenType(payType)
267	267		ScriptResult(WriteSet([DataEntry(gameId, newGameDataStr)]), TransferSet([ScriptTransfer(WALLETCOMMUNITY, fraction(payAmt, FEECOMMUNITY, 100), refundToken), ScriptTransfer(WALLETWAVESBET, fraction(payAmt, FEEWAVESBET, 100), refundToken), ScriptTransfer(WALLETMCAFEE, fraction(payAmt, FEEMCAFEE, 100), refundToken), ScriptTransfer(refundWallet, refundAmt, refundToken)]))
268	268		}
269	269		}
270	270
271	271

github/deemru/w8io/c3f4982 
48.66 ms ◑