tx · 6aw6r82gE6Axhs7pbgCQ3gHy48uh1BnJ6UywRz7UepqP

3N6jFne1rcA1JF5CpauzemnNQmCxgeu3Y2C:  -0.01400000 Waves

2020.04.08 10:55 [945035] smart account 3N6jFne1rcA1JF5CpauzemnNQmCxgeu3Y2C > SELF 0.00000000 Waves

{ "type": 13, "id": "6aw6r82gE6Axhs7pbgCQ3gHy48uh1BnJ6UywRz7UepqP", "fee": 1400000, "feeAssetId": null, "timestamp": 1586332540915, "version": 1, "sender": "3N6jFne1rcA1JF5CpauzemnNQmCxgeu3Y2C", "senderPublicKey": "pweMkajEKq8krLUKBH3CenZLv4LzyRmZ6nrcHneHX7W", "proofs": [ "vNynZHWvfN3GL8acrtGzbwpjmnUncS7csvdsBXGEYaA5eXkB9TrT1eD5uFr9thDK5TW4RrHsURZ4a5cyq6LL9hQ" ], "script": "base64:AAIDAAAAAAAAABIIARIDCgEEEgMKAQgSBAoCCAIAAAAyAAAAAAZXQVZFU0QAAAAAAAX14QAAAAAABVVTRE5EAAAAAAAAD0JAAAAAAAhERUNJTUFMUwkABEwAAAACBQAAAAZXQVZFU0QJAARMAAAAAgUAAAAFVVNETkQFAAAAA25pbAAAAAAGQVNTRVRTCQAETAAAAAIFAAAABHVuaXQJAARMAAAAAgkAAlkAAAABAgAAAAgkVVNETl9JRAUAAAADbmlsAQAAAA1nZXRDb21taXNzaW9uAAAAAQAAAAdhc3NldElkCQAAaQAAAAIJAABoAAAAAgAAAAAAAAAABQkAAZEAAAACBQAAAAhERUNJTUFMUwUAAAAHYXNzZXRJZAAAAAAAAAAD6AAAAAAJUlNBUFVCTElDCQACWwAAAAECAAABj2Jhc2U2NDpNSUlCSWpBTkJna3Foa2lHOXcwQkFRRUZBQU9DQVE4QU1JSUJDZ0tDQVFFQW1wdVhjSS9vNHBJQjV5d3Y5RE9PR2FwVEJVd1JWbE0vNitINmhGZWxPWHRrcndZL1lJdG1QeEVEcHo3ckFlclFQUWU5dERQRWFBdi9HbmxFenR5Yk9GWGd1OUR6RGU4WW9NUkQxdmFrZ29BY29nbWJZNThRRDZLTWo1SGtvVmoveVROSWM5c3pqNXFoSWxyQWRtYjNLTEw2aFFVN3k4K0pqNjlCV1ZQc2FRZ2tzcFNkZVl0YjF0SFFjN3Q5NW43T1o1NnIyQTdHMytiUWY2blNNa1BrQWhJckVwYkNtNThvaUdCY3pkVGQvTHFGU1ZvdFpzYkw3WWg2U0hMZm5IZUQrUWdjZkpybmFtOE9ITUdKRUpUUlhqSUxlSEdqbFJDUDhvVnBpb0hyeTFTMnhQeDVzVnpJbTJNTStDelllbkFHbG8wajI2YXRCaGlVTG9UdWx3RDNwUUlEQVFBQgAAAAAGU0VSVkVSCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAECAAAAIzNOQ2lHMjhMbVd5VGlnV0cxM0U1UW52ZEhCc1pGWVhTUzJqAAAAABNSQU5ET1JBQ0xFVElNRUZSQU1FAAAAAAAAABDgAAAAAA5NQVhCQUxBTkNFRElGRgAAAAAAO5rKAAAAAAAEQkVUMQAAAAAAAAAAAQAAAAAEQkVUMgAAAAAAAAAAAgAAAAAEQkVUNAAAAAAAAAAABAAAAAAEQkVUOAAAAAAAAAAACAAAAAAFQkVUMTQAAAAAAAAAAA4AAAAACFJBVEVNVUxUAAAAAAAAACcQAAAAAAVSQVRFMQAAAAAAAACa5wAAAAAFUkFURTIAAAAAAAAAYBgAAAAABVJBVEUzAAAAAAAAAEo4AAAAAAVSQVRFNAAAAAAAAAA3eAAAAAAFUkFURTUAAAAAAAAALIgAAAAABVJBVEVTCQAETAAAAAIFAAAABVJBVEUxCQAETAAAAAIFAAAABVJBVEUyCQAETAAAAAIFAAAABVJBVEUzCQAETAAAAAIFAAAABVJBVEU0CQAETAAAAAIFAAAABVJBVEU1BQAAAANuaWwAAAAABEJFVFMJAARMAAAAAgUAAAAEQkVUMQkABEwAAAACBQAAAARCRVQyCQAETAAAAAIFAAAABEJFVDQJAARMAAAAAgUAAAAEQkVUOAkABEwAAAACBQAAAAVCRVQxNAUAAAADbmlsAAAAAAxJZHhHYW1lU3RhdGUAAAAAAAAAAAAAAAAAD0lkeFBsYXllckNob2ljZQAAAAAAAAAAAQAAAAARSWR4UGxheWVyUHViS2V5NTgAAAAAAAAAAAIAAAAAEElkeFN0YXJ0ZWRIZWlnaHQAAAAAAAAAAAMAAAAADElkeFdpbkFtb3VudAAAAAAAAAAABAAAAAAKSWR4QXNzZXRJZAAAAAAAAAAABQAAAAAOUkVTRVJWQVRJT05LRVkJAARMAAAAAgIAAAAWJFJFU0VSVkVEX0FNT1VOVF9XQVZFUwkABEwAAAACAgAAABUkUkVTRVJWRURfQU1PVU5UX1VTRE4FAAAAA25pbAAAAAAPR0FNRVNDT1VOVEVSS0VZAgAAAAkkR0FNRV9OVU0AAAAACURBUFBVUEtFWQIAAAAIJERBUFBfVVAAAAAADU1BWEJBTEFOQ0VLRVkCAAAADCRNQVhfQkFMQU5DRQAAAAAOU1RBVEVTVUJNSVRURUQCAAAACVNVQk1JVFRFRAAAAAAIU1RBVEVXT04CAAAAA1dPTgAAAAAJU1RBVEVMT1NUAgAAAARMT1NUAQAAAAhnZXRJbnRPcgAAAAIAAAADa2V5AAAAB2RlZmF1bHQDCQEAAAAJaXNEZWZpbmVkAAAAAQkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMFAAAAA2tleQUAAAAHZGVmYXVsdAEAAAAGc2V0SW50AAAAAgAAAANrZXkAAAAFdmFsdWUJAQAAAAlEYXRhRW50cnkAAAACBQAAAANrZXkFAAAABXZhbHVlAQAAAAxpbmNyZW1lbnRJbnQAAAABAAAAA2tleQkBAAAABnNldEludAAAAAIFAAAAA2tleQkAAGQAAAACCQEAAAAIZ2V0SW50T3IAAAACBQAAAANrZXkA//////////8AAAAAAAAAAAEBAAAACWNoYW5nZUludAAAAAIAAAADa2V5AAAAAmJ5CQEAAAAGc2V0SW50AAAAAgUAAAADa2V5CQAAZAAAAAIJAQAAAAhnZXRJbnRPcgAAAAIFAAAAA2tleQAAAAAAAAAAAAUAAAACYnkBAAAAFWluY3JlYXNlUmVzZXJ2ZUFtb3VudAAAAAIAAAAJd2luQW1vdW50AAAAB2Fzc2V0SWQEAAAAEW5ld1Jlc2VydmVkQW1vdW50CQAAZAAAAAIJAQAAAAhnZXRJbnRPcgAAAAIJAAGRAAAAAgUAAAAOUkVTRVJWQVRJT05LRVkFAAAAB2Fzc2V0SWQAAAAAAAAAAAAFAAAACXdpbkFtb3VudAMJAABmAAAAAgUAAAARbmV3UmVzZXJ2ZWRBbW91bnQJAQAAAAx3YXZlc0JhbGFuY2UAAAABBQAAAAR0aGlzCQAAAgAAAAECAAAAVEluc3VmZmljaWVudCBmdW5kcyBvbiBEaWNlIFJvbGxlciBhY2NvdW50LiBUcmFuc2FjdGlvbiB3YXMgcmVqZWN0ZWQgZm9yIHlvdXIgc2FmZXR5LgUAAAARbmV3UmVzZXJ2ZWRBbW91bnQBAAAAFmRlY3JlYXNlUmVzZXJ2ZWRBbW91bnQAAAADAAAABmdhbWVJZAAAAAdhc3NldElkAAAACXdpbkFtb3VudAMJAABmAAAAAgAAAAAAAAAAAAkAAGUAAAACCQEAAAAIZ2V0SW50T3IAAAACCQABkQAAAAIFAAAADlJFU0VSVkFUSU9OS0VZBQAAAAdhc3NldElkAAAAAAAAAAAABQAAAAl3aW5BbW91bnQJAAACAAAAAQIAAABCSW52YWxpZCBEaWNlIFJvbGxlciBhY2NvdW50IHN0YXRlIC0gcmVzZXJ2ZWQgYW1vdW50IGlzIGxlc3MgdGhhbiAwCQEAAAAJY2hhbmdlSW50AAAAAgkAAZEAAAACBQAAAA5SRVNFUlZBVElPTktFWQUAAAAHYXNzZXRJZAkBAAAAAS0AAAABBQAAAAl3aW5BbW91bnQBAAAAFXZhbGlkYXRlQW5kR2V0QXNzZXRJZAAAAAEAAAAHYXNzZXRJZAMJAAAAAAAAAgUAAAAHYXNzZXRJZAkAAZEAAAACBQAAAAZBU1NFVFMAAAAAAAAAAAAAAAAAAAAAAAADCQAAAAAAAAIFAAAAB2Fzc2V0SWQJAAGRAAAAAgUAAAAGQVNTRVRTAAAAAAAAAAABAAAAAAAAAAABCQAAAgAAAAECAAAAFUludmFsaWQgcGF5bWVudCBhc3NldAEAAAAadmFsaWRhdGVCZXRBbmRHZXRXaW5BbW91bnQAAAADAAAACWJldEFtb3VudAAAAAdhc3NldElkAAAADHBsYXllckNob2ljZQQAAAAKZGljZXNDb3VudAkAATEAAAABBQAAAAxwbGF5ZXJDaG9pY2UEAAAACmNvbW1pc3Npb24JAQAAAA1nZXRDb21taXNzaW9uAAAAAQUAAAAHYXNzZXRJZAoBAAAAC2NoZWNrQW1vdW50AAAAAgAAAAFhAAAAAXgDBQAAAAFhBgkAAAAAAAACBQAAAAliZXRBbW91bnQJAABkAAAAAgkAAGgAAAACBQAAAAF4CQABkQAAAAIFAAAACERFQ0lNQUxTBQAAAAdhc3NldElkBQAAAApjb21taXNzaW9uAwkBAAAAASEAAAABBAAAAA0kbGlzdDQ2ODY0NzE5BQAAAARCRVRTBAAAAA0kc2l6ZTQ2ODY0NzE5CQABkAAAAAEFAAAADSRsaXN0NDY4NjQ3MTkEAAAADSRhY2MwNDY4NjQ3MTkHAwkAAAAAAAACBQAAAA0kc2l6ZTQ2ODY0NzE5AAAAAAAAAAAABQAAAA0kYWNjMDQ2ODY0NzE5BAAAAA0kYWNjMTQ2ODY0NzE5CQEAAAALY2hlY2tBbW91bnQAAAACBQAAAA0kYWNjMDQ2ODY0NzE5CQABkQAAAAIFAAAADSRsaXN0NDY4NjQ3MTkAAAAAAAAAAAADCQAAAAAAAAIFAAAADSRzaXplNDY4NjQ3MTkAAAAAAAAAAAEFAAAADSRhY2MxNDY4NjQ3MTkEAAAADSRhY2MyNDY4NjQ3MTkJAQAAAAtjaGVja0Ftb3VudAAAAAIFAAAADSRhY2MxNDY4NjQ3MTkJAAGRAAAAAgUAAAANJGxpc3Q0Njg2NDcxOQAAAAAAAAAAAQMJAAAAAAAAAgUAAAANJHNpemU0Njg2NDcxOQAAAAAAAAAAAgUAAAANJGFjYzI0Njg2NDcxOQQAAAANJGFjYzM0Njg2NDcxOQkBAAAAC2NoZWNrQW1vdW50AAAAAgUAAAANJGFjYzI0Njg2NDcxOQkAAZEAAAACBQAAAA0kbGlzdDQ2ODY0NzE5AAAAAAAAAAACAwkAAAAAAAACBQAAAA0kc2l6ZTQ2ODY0NzE5AAAAAAAAAAADBQAAAA0kYWNjMzQ2ODY0NzE5BAAAAA0kYWNjNDQ2ODY0NzE5CQEAAAALY2hlY2tBbW91bnQAAAACBQAAAA0kYWNjMzQ2ODY0NzE5CQABkQAAAAIFAAAADSRsaXN0NDY4NjQ3MTkAAAAAAAAAAAMDCQAAAAAAAAIFAAAADSRzaXplNDY4NjQ3MTkAAAAAAAAAAAQFAAAADSRhY2M0NDY4NjQ3MTkEAAAADSRhY2M1NDY4NjQ3MTkJAQAAAAtjaGVja0Ftb3VudAAAAAIFAAAADSRhY2M0NDY4NjQ3MTkJAAGRAAAAAgUAAAANJGxpc3Q0Njg2NDcxOQAAAAAAAAAABAMJAAAAAAAAAgUAAAANJHNpemU0Njg2NDcxOQAAAAAAAAAABQUAAAANJGFjYzU0Njg2NDcxOQQAAAANJGFjYzY0Njg2NDcxOQkBAAAAC2NoZWNrQW1vdW50AAAAAgUAAAANJGFjYzU0Njg2NDcxOQkAAZEAAAACBQAAAA0kbGlzdDQ2ODY0NzE5AAAAAAAAAAAFCQAAAgAAAAECAAAAEkxpc3Qgc2l6ZSBleGNlZWQgNQkAAAIAAAABAgAAABdCZXQgYW1vdW50IGlzIG5vdCB2YWxpZAMJAAAAAAAAAgkABLYAAAABBQAAAAxwbGF5ZXJDaG9pY2UFAAAABHVuaXQJAAACAAAAAQIAAAAXSW52YWxpZCBwbGF5ZXIncyBjaG9pY2UDAwkAAGYAAAACAAAAAAAAAAABBQAAAApkaWNlc0NvdW50BgkAAGYAAAACBQAAAApkaWNlc0NvdW50AAAAAAAAAAAFCQAAAgAAAAECAAAAJkludmFsaWQgZGljZXMgY291bnQgaW4gcGxheWVyJ3MgY2hvaWNlBAAAAANiZXQJAABlAAAAAgUAAAAJYmV0QW1vdW50BQAAAApjb21taXNzaW9uCQAAaQAAAAIJAABoAAAAAgUAAAADYmV0CQABkQAAAAIFAAAABVJBVEVTCQAAZQAAAAIFAAAACmRpY2VzQ291bnQAAAAAAAAAAAEFAAAACFJBVEVNVUxUAQAAABJnZW5lcmF0ZVJhbmRDaG9pc2UAAAACAAAABmdhbWVJZAAAAAdyc2FTaWduBAAAAAtyc2FTaWdWYWxpZAkAAfgAAAAEBQAAAAZTSEEyNTYJAAGbAAAAAQUAAAAGZ2FtZUlkBQAAAAdyc2FTaWduBQAAAAlSU0FQVUJMSUMDCQEAAAABIQAAAAEFAAAAC3JzYVNpZ1ZhbGlkCQAAAgAAAAECAAAAFUludmFsaWQgUlNBIHNpZ25hdHVyZQQAAAAEcmFuZAkAAGoAAAACCQAEsQAAAAEJAAH3AAAAAQUAAAAHcnNhU2lnbgAAAAAAAAAABgQAAAAGcmVzdWx0AwkAAGYAAAACAAAAAAAAAAAABQAAAARyYW5kCQAAaAAAAAIA//////////8FAAAABHJhbmQFAAAABHJhbmQJAAGkAAAAAQUAAAAGcmVzdWx0AQAAAAtpc1BsYXllcldpbgAAAAIAAAAMcGxheWVyQ2hvaWNlAAAACnJhbmRDaG9pc2UEAAAAAXMJAAExAAAAAQUAAAAMcGxheWVyQ2hvaWNlCgEAAAAFY2hlY2sAAAACAAAAAWEAAAABeAMFAAAAAWEGAwkAAGcAAAACBQAAAAFzBQAAAAF4CQAAAAAAAAIJAAEvAAAAAgkAATAAAAACBQAAAAxwbGF5ZXJDaG9pY2UJAABlAAAAAgUAAAABeAAAAAAAAAAAAQAAAAAAAAAAAQUAAAAKcmFuZENob2lzZQcEAAAADSRsaXN0NTYwMzU2MzcJAARMAAAAAgAAAAAAAAAAAQkABEwAAAACAAAAAAAAAAACCQAETAAAAAIAAAAAAAAAAAMJAARMAAAAAgAAAAAAAAAABAkABEwAAAACAAAAAAAAAAAFBQAAAANuaWwEAAAADSRzaXplNTYwMzU2MzcJAAGQAAAAAQUAAAANJGxpc3Q1NjAzNTYzNwQAAAANJGFjYzA1NjAzNTYzNwcDCQAAAAAAAAIFAAAADSRzaXplNTYwMzU2MzcAAAAAAAAAAAAFAAAADSRhY2MwNTYwMzU2MzcEAAAADSRhY2MxNTYwMzU2MzcJAQAAAAVjaGVjawAAAAIFAAAADSRhY2MwNTYwMzU2MzcJAAGRAAAAAgUAAAANJGxpc3Q1NjAzNTYzNwAAAAAAAAAAAAMJAAAAAAAAAgUAAAANJHNpemU1NjAzNTYzNwAAAAAAAAAAAQUAAAANJGFjYzE1NjAzNTYzNwQAAAANJGFjYzI1NjAzNTYzNwkBAAAABWNoZWNrAAAAAgUAAAANJGFjYzE1NjAzNTYzNwkAAZEAAAACBQAAAA0kbGlzdDU2MDM1NjM3AAAAAAAAAAABAwkAAAAAAAACBQAAAA0kc2l6ZTU2MDM1NjM3AAAAAAAAAAACBQAAAA0kYWNjMjU2MDM1NjM3BAAAAA0kYWNjMzU2MDM1NjM3CQEAAAAFY2hlY2sAAAACBQAAAA0kYWNjMjU2MDM1NjM3CQABkQAAAAIFAAAADSRsaXN0NTYwMzU2MzcAAAAAAAAAAAIDCQAAAAAAAAIFAAAADSRzaXplNTYwMzU2MzcAAAAAAAAAAAMFAAAADSRhY2MzNTYwMzU2MzcEAAAADSRhY2M0NTYwMzU2MzcJAQAAAAVjaGVjawAAAAIFAAAADSRhY2MzNTYwMzU2MzcJAAGRAAAAAgUAAAANJGxpc3Q1NjAzNTYzNwAAAAAAAAAAAwMJAAAAAAAAAgUAAAANJHNpemU1NjAzNTYzNwAAAAAAAAAABAUAAAANJGFjYzQ1NjAzNTYzNwQAAAANJGFjYzU1NjAzNTYzNwkBAAAABWNoZWNrAAAAAgUAAAANJGFjYzQ1NjAzNTYzNwkAAZEAAAACBQAAAA0kbGlzdDU2MDM1NjM3AAAAAAAAAAAEAwkAAAAAAAACBQAAAA0kc2l6ZTU2MDM1NjM3AAAAAAAAAAAFBQAAAA0kYWNjNTU2MDM1NjM3BAAAAA0kYWNjNjU2MDM1NjM3CQEAAAAFY2hlY2sAAAACBQAAAA0kYWNjNTU2MDM1NjM3CQABkQAAAAIFAAAADSRsaXN0NTYwMzU2MzcAAAAAAAAAAAUJAAACAAAAAQIAAAASTGlzdCBzaXplIGV4Y2VlZCA1AQAAAA5mb3JtYXRHYW1lRGF0YQAAAAcAAAAJZ2FtZVN0YXRlAAAADHBsYXllckNob2ljZQAAAA5wbGF5ZXJQdWJLZXk1OAAAAA1zdGFydGVkSGVpZ2h0AAAACXdpbkFtb3VudAAAAAdhc3NldElkAAAAC3JhbmRPckVtcHR5CQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAJZ2FtZVN0YXRlAgAAAAFfBQAAAAxwbGF5ZXJDaG9pY2UCAAAAAV8FAAAADnBsYXllclB1YktleTU4AgAAAAFfCQABpAAAAAEFAAAADXN0YXJ0ZWRIZWlnaHQCAAAAAV8JAAGkAAAAAQUAAAAJd2luQW1vdW50AgAAAAFfCQABpAAAAAEFAAAAB2Fzc2V0SWQDCQAAAAAAAAIFAAAAC3JhbmRPckVtcHR5AgAAAAACAAAAAAkAASwAAAACAgAAAAFfBQAAAAtyYW5kT3JFbXB0eQEAAAAPZXh0cmFjdEdhbWVEYXRhAAAAAQAAAAZnYW1lSWQJAAS1AAAAAgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAAZnYW1lSWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAADc3RyBQAAAAckbWF0Y2gwBQAAAANzdHIJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAABkdhbWU6IAUAAAAGZ2FtZUlkAgAAAAsgbm90IGZvdW5kLgIAAAABXwEAAAAMd2luU2NyaXB0U2V0AAAABwAAAAZnYW1lSWQAAAANcGxheWVyQWRkcmVzcwAAAAl3aW5BbW91bnQAAAAHYXNzZXRJZAAAAAtuZXdnYW1lRGF0YQAAAAx3aW5CeVRpbWVvdXQAAAARZGVjcmVhc2VkUmVzZXJ2ZXMEAAAADndTZXRDb21tb25EYXRhCQAETAAAAAIFAAAAEWRlY3JlYXNlZFJlc2VydmVzBQAAAANuaWwEAAAADnRTZXRDb21tb25EYXRhCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAADXBsYXllckFkZHJlc3MFAAAACXdpbkFtb3VudAkAAZEAAAACBQAAAAZBU1NFVFMFAAAAB2Fzc2V0SWQFAAAAA25pbAMFAAAADHdpbkJ5VGltZW91dAQAAAATbmV3Z2FtZURhdGFBZGp1c3RlZAkAASwAAAACCQABLAAAAAIFAAAAC25ld2dhbWVEYXRhAgAAAAFfAgAAAAdUSU1FT1VUBAAAAAhnYW1lRGF0YQkBAAAACURhdGFFbnRyeQAAAAIFAAAABmdhbWVJZAUAAAATbmV3Z2FtZURhdGFBZGp1c3RlZAkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgUAAAAIZ2FtZURhdGEFAAAADndTZXRDb21tb25EYXRhCQEAAAALVHJhbnNmZXJTZXQAAAABBQAAAA50U2V0Q29tbW9uRGF0YQQAAAAIZ2FtZURhdGEJAQAAAAlEYXRhRW50cnkAAAACBQAAAAZnYW1lSWQFAAAAC25ld2dhbWVEYXRhCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACBQAAAAhnYW1lRGF0YQUAAAAOd1NldENvbW1vbkRhdGEJAQAAAAtUcmFuc2ZlclNldAAAAAEFAAAADnRTZXRDb21tb25EYXRhAQAAAAhpc0RBcHBVcAAAAAAEAAAACWRBcHBVcE9wdAkABBsAAAACBQAAAAR0aGlzBQAAAAlEQVBQVVBLRVkDCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAAJZEFwcFVwT3B0CQEAAAAHZXh0cmFjdAAAAAEFAAAACWRBcHBVcE9wdAcBAAAAEW1vbml0b3JNYXhCYWxhbmNlAAAAAAQAAAANbWF4QmFsYW5jZU9wdAkABBoAAAACBQAAAAR0aGlzBQAAAA1NQVhCQUxBTkNFS0VZBAAAAAptYXhCYWxhbmNlAwkBAAAACWlzRGVmaW5lZAAAAAEFAAAADW1heEJhbGFuY2VPcHQJAQAAAAdleHRyYWN0AAAAAQUAAAANbWF4QmFsYW5jZU9wdAAAAAAAAAAAAAQAAAALY3VyckJhbGFuY2UJAQAAAAx3YXZlc0JhbGFuY2UAAAABBQAAAAR0aGlzAwkAAGYAAAACBQAAAAtjdXJyQmFsYW5jZQUAAAAKbWF4QmFsYW5jZQUAAAALY3VyckJhbGFuY2UEAAAABGRpZmYJAABlAAAAAgUAAAAKbWF4QmFsYW5jZQUAAAALY3VyckJhbGFuY2UDCQAAZgAAAAIFAAAABGRpZmYFAAAADk1BWEJBTEFOQ0VESUZGCQAAAgAAAAECAAAAGmRBcHAgaXMgdGVtcG9yYXJ5IGRpc2FibGVkBQAAAAptYXhCYWxhbmNlAAAAAwAAAAFpAQAAAAZkQXBwVXAAAAABAAAABmRBcHBVcAMJAQAAAAIhPQAAAAIIBQAAAAFpAAAABmNhbGxlcgUAAAAGU0VSVkVSCQAAAgAAAAECAAAAJ09ubHkgU2VydmVyIGNhbiBtYW5hZ2UgZEFwcFVwIGF0dHJpYnV0ZQMJAAAAAAAAAgkBAAAACGlzREFwcFVwAAAAAAUAAAAGZEFwcFVwCQAAAgAAAAECAAAAKmRBcHBVcCBtdXN0IGJlIGRpZmZlcmVudCB3aXRoIGFjdHVhbCB2YWx1ZQkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAJREFQUFVQS0VZBQAAAAZkQXBwVXAFAAAAA25pbAAAAAFpAQAAAANiZXQAAAABAAAADHBsYXllckNob2ljZQQAAAAGZ2FtZUlkCQACWAAAAAEIBQAAAAFpAAAADXRyYW5zYWN0aW9uSWQDCQEAAAABIQAAAAEJAQAAAAhpc0RBcHBVcAAAAAAJAAACAAAAAQIAAAAZREFwcCBpcyB1bmRlciBtYWludGVuYW5jZQMJAAAAAAAAAggFAAAAAWkAAAAHcGF5bWVudAUAAAAEdW5pdAkAAAIAAAABAgAAAApObyBwYXltZW50AwkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAAEdGhpcwUAAAAGZ2FtZUlkCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAlCZXQgZm9yOiAFAAAABmdhbWVJZAIAAAASIHdhcyBhbHJlYWR5IG1hZGUuBAAAAAFwCQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQEAAAAB2Fzc2V0SWQJAQAAABV2YWxpZGF0ZUFuZEdldEFzc2V0SWQAAAABCAUAAAABcAAAAAdhc3NldElkBAAAAApjb21taXNzaW9uCQEAAAANZ2V0Q29tbWlzc2lvbgAAAAEFAAAAB2Fzc2V0SWQEAAAACXdpbkFtb3VudAkBAAAAGnZhbGlkYXRlQmV0QW5kR2V0V2luQW1vdW50AAAAAwgFAAAAAXAAAAAGYW1vdW50BQAAAAdhc3NldElkBQAAAAxwbGF5ZXJDaG9pY2UEAAAADnBsYXllclB1YktleTU4CQACWAAAAAEIBQAAAAFpAAAAD2NhbGxlclB1YmxpY0tleQQAAAAIZ2FtZURhdGEJAQAAAA5mb3JtYXRHYW1lRGF0YQAAAAcFAAAADlNUQVRFU1VCTUlUVEVEBQAAAAxwbGF5ZXJDaG9pY2UFAAAADnBsYXllclB1YktleTU4BQAAAAZoZWlnaHQFAAAACXdpbkFtb3VudAUAAAAHYXNzZXRJZAIAAAAACQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAAZEAAAACBQAAAA5SRVNFUlZBVElPTktFWQUAAAAHYXNzZXRJZAkBAAAAFWluY3JlYXNlUmVzZXJ2ZUFtb3VudAAAAAIFAAAACXdpbkFtb3VudAUAAAAHYXNzZXRJZAkABEwAAAACCQEAAAAMaW5jcmVtZW50SW50AAAAAQUAAAAPR0FNRVNDT1VOVEVSS0VZCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAA1NQVhCQUxBTkNFS0VZCQEAAAARbW9uaXRvck1heEJhbGFuY2UAAAAACQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAAZnYW1lSWQFAAAACGdhbWVEYXRhBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAGU0VSVkVSBQAAAApjb21taXNzaW9uCAUAAAABcAAAAAdhc3NldElkBQAAAANuaWwAAAABaQEAAAAId2l0aGRyYXcAAAACAAAABmdhbWVJZAAAAAdyc2FTaWduBAAAAAhnYW1lRGF0YQkBAAAAD2V4dHJhY3RHYW1lRGF0YQAAAAEFAAAABmdhbWVJZAQAAAAJZ2FtZVN0YXRlCQABkQAAAAIFAAAACGdhbWVEYXRhBQAAAAxJZHhHYW1lU3RhdGUEAAAADHBsYXllckNob2ljZQkAAZEAAAACBQAAAAhnYW1lRGF0YQUAAAAPSWR4UGxheWVyQ2hvaWNlBAAAAA1zdGFydGVkSGVpZ2h0CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAIZ2FtZURhdGEFAAAAEElkeFN0YXJ0ZWRIZWlnaHQEAAAACXdpbkFtb3VudAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAACGdhbWVEYXRhBQAAAAxJZHhXaW5BbW91bnQEAAAADnBsYXllclB1YktleTU4CQABkQAAAAIFAAAACGdhbWVEYXRhBQAAABFJZHhQbGF5ZXJQdWJLZXk1OAQAAAAHYXNzZXRJZAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAACGdhbWVEYXRhBQAAAApJZHhBc3NldElkBAAAAA1wbGF5ZXJBZGRyZXNzCQEAAAAUYWRkcmVzc0Zyb21QdWJsaWNLZXkAAAABCQACWQAAAAEFAAAADnBsYXllclB1YktleTU4BAAAAAx3aW5CeVRpbWVvdXQJAABmAAAAAgkAAGUAAAACBQAAAAZoZWlnaHQFAAAADXN0YXJ0ZWRIZWlnaHQFAAAAE1JBTkRPUkFDTEVUSU1FRlJBTUUEAAAAEWRlY3JlYXNlZFJlc2VydmVzCQEAAAAWZGVjcmVhc2VSZXNlcnZlZEFtb3VudAAAAAMFAAAABmdhbWVJZAUAAAAHYXNzZXRJZAUAAAAJd2luQW1vdW50AwkBAAAAAiE9AAAAAgUAAAAJZ2FtZVN0YXRlBQAAAA5TVEFURVNVQk1JVFRFRAkAAAIAAAABAgAAACRJbnZhbGlkIGdhbWUgc3RhdGUgZm9yIHBhc3NlZCBnYW1lSWQDBQAAAAx3aW5CeVRpbWVvdXQEAAAACnJhbmRDaG9pc2UJAAEvAAAAAgUAAAAMcGxheWVyQ2hvaWNlAAAAAAAAAAABBAAAAAtuZXdnYW1lRGF0YQkBAAAADmZvcm1hdEdhbWVEYXRhAAAABwUAAAAIU1RBVEVXT04FAAAADHBsYXllckNob2ljZQUAAAAOcGxheWVyUHViS2V5NTgFAAAADXN0YXJ0ZWRIZWlnaHQFAAAACXdpbkFtb3VudAUAAAAHYXNzZXRJZAUAAAAKcmFuZENob2lzZQkBAAAADHdpblNjcmlwdFNldAAAAAcFAAAABmdhbWVJZAUAAAANcGxheWVyQWRkcmVzcwUAAAAJd2luQW1vdW50BQAAAAdhc3NldElkBQAAAAtuZXdnYW1lRGF0YQUAAAAMd2luQnlUaW1lb3V0BQAAABFkZWNyZWFzZWRSZXNlcnZlcwQAAAAKcmFuZENob2lzZQkBAAAAEmdlbmVyYXRlUmFuZENob2lzZQAAAAIFAAAABmdhbWVJZAUAAAAHcnNhU2lnbgMJAQAAAAIhPQAAAAIIBQAAAAFpAAAABmNhbGxlcgUAAAAGU0VSVkVSCQAAAgAAAAECAAAAK1JlZ3VsYXIgd2l0aGRyYXcgY2FuIGJlIGRvbmUgYnkgc2VydmVyIG9ubHkDCQEAAAALaXNQbGF5ZXJXaW4AAAACBQAAAAxwbGF5ZXJDaG9pY2UFAAAACnJhbmRDaG9pc2UEAAAAC25ld2dhbWVEYXRhCQEAAAAOZm9ybWF0R2FtZURhdGEAAAAHBQAAAAhTVEFURVdPTgUAAAAMcGxheWVyQ2hvaWNlBQAAAA5wbGF5ZXJQdWJLZXk1OAUAAAANc3RhcnRlZEhlaWdodAUAAAAJd2luQW1vdW50BQAAAAdhc3NldElkBQAAAApyYW5kQ2hvaXNlCQEAAAAMd2luU2NyaXB0U2V0AAAABwUAAAAGZ2FtZUlkBQAAAA1wbGF5ZXJBZGRyZXNzBQAAAAl3aW5BbW91bnQFAAAAB2Fzc2V0SWQFAAAAC25ld2dhbWVEYXRhBQAAAAx3aW5CeVRpbWVvdXQFAAAAEWRlY3JlYXNlZFJlc2VydmVzBAAAAAtuZXdnYW1lRGF0YQkBAAAADmZvcm1hdEdhbWVEYXRhAAAABwUAAAAJU1RBVEVMT1NUBQAAAAxwbGF5ZXJDaG9pY2UFAAAADnBsYXllclB1YktleTU4BQAAAA1zdGFydGVkSGVpZ2h0BQAAAAl3aW5BbW91bnQFAAAAB2Fzc2V0SWQFAAAACnJhbmRDaG9pc2UJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAABmdhbWVJZAUAAAALbmV3Z2FtZURhdGEJAARMAAAAAgUAAAARZGVjcmVhc2VkUmVzZXJ2ZXMFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAADCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAAAnR4AAAAD3NlbmRlclB1YmxpY0tleQQAAAAHJG1hdGNoMAUAAAACdHgDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAAA3R0eAUAAAAHJG1hdGNoMAQAAAAHYXNzZXRJZAkBAAAAFXZhbGlkYXRlQW5kR2V0QXNzZXRJZAAAAAEIBQAAAAN0dHgAAAAHYXNzZXRJZAkAAGcAAAACCQAAZQAAAAIJAQAAAAx3YXZlc0JhbGFuY2UAAAABBQAAAAR0aGlzCAUAAAADdHR4AAAABmFtb3VudAkBAAAACGdldEludE9yAAAAAgkAAZEAAAACBQAAAA5SRVNFUlZBVElPTktFWQUAAAAHYXNzZXRJZAAAAAAAAAAAAAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAAAAA3N0eAUAAAAHJG1hdGNoMAMDCQAAAAAAAAIJAQAAAAhpc0RBcHBVcAAAAAAHCQAAAAAAAAIJAQAAAAhnZXRJbnRPcgAAAAIJAAGRAAAAAgUAAAAOUkVTRVJWQVRJT05LRVkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHCQAAAAAAAAIJAQAAAAhnZXRJbnRPcgAAAAIJAAGRAAAAAgUAAAAOUkVTRVJWQVRJT05LRVkAAAAAAAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAHBgdC3CJW", "chainId": 84, "height": 945035, "spentComplexity": 0 } View: original | compacted Prev: none Next: DB3p1bSghr3bhses9JD4Lnref9UVAH9F27wdTa5C4R9R Full:
OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 3 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
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("$USDN_ID")]
11+
12+func getCommission (assetId) = ((5 * DECIMALS[assetId]) / 1000)
13+
14+
15+let RSAPUBLIC = fromBase64String("base64:MIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAmpuXcI/o4pIB5ywv9DOOGapTBUwRVlM/6+H6hFelOXtkrwY/YItmPxEDpz7rAerQPQe9tDPEaAv/GnlEztybOFXgu9DzDe8YoMRD1vakgoAcogmbY58QD6KMj5HkoVj/yTNIc9szj5qhIlrAdmb3KLL6hQU7y8+Jj69BWVPsaQgkspSdeYtb1tHQc7t95n7OZ56r2A7G3+bQf6nSMkPkAhIrEpbCm58oiGBczdTd/LqFSVotZsbL7Yh6SHLfnHeD+QgcfJrnam8OHMGJEJTRXjILeHGjlRCP8oVpioHry1S2xPx5sVzIm2MM+CzYenAGlo0j26atBhiULoTulwD3pQIDAQAB")
16+
17+let SERVER = addressFromStringValue("3NCiG28LmWyTigWG13E5QnvdHBsZFYXSS2j")
18+
19+let RANDORACLETIMEFRAME = 4320
20+
21+let MAXBALANCEDIFF = 1000000000
22+
23+let BET1 = 1
24+
25+let BET2 = 2
26+
27+let BET4 = 4
28+
29+let BET8 = 8
30+
31+let BET14 = 14
32+
33+let RATEMULT = 10000
34+
35+let RATE1 = 39655
36+
37+let RATE2 = 24600
38+
39+let RATE3 = 19000
40+
41+let RATE4 = 14200
42+
43+let RATE5 = 11400
44+
45+let RATES = [RATE1, RATE2, RATE3, RATE4, RATE5]
46+
47+let BETS = [BET1, BET2, BET4, BET8, BET14]
48+
49+let IdxGameState = 0
50+
51+let IdxPlayerChoice = 1
52+
53+let IdxPlayerPubKey58 = 2
54+
55+let IdxStartedHeight = 3
56+
57+let IdxWinAmount = 4
58+
59+let IdxAssetId = 5
60+
61+let RESERVATIONKEY = ["$RESERVED_AMOUNT_WAVES", "$RESERVED_AMOUNT_USDN"]
62+
63+let GAMESCOUNTERKEY = "$GAME_NUM"
64+
65+let DAPPUPKEY = "$DAPP_UP"
66+
67+let MAXBALANCEKEY = "$MAX_BALANCE"
68+
69+let STATESUBMITTED = "SUBMITTED"
70+
71+let STATEWON = "WON"
72+
73+let STATELOST = "LOST"
74+
75+func getIntOr (key,default) = if (isDefined(getInteger(this, key)))
76+ then getIntegerValue(this, key)
77+ else default
78+
79+
80+func setInt (key,value) = DataEntry(key, value)
81+
82+
83+func incrementInt (key) = setInt(key, (getIntOr(key, -1) + 1))
84+
85+
86+func changeInt (key,by) = setInt(key, (getIntOr(key, 0) + by))
87+
88+
89+func increaseReserveAmount (winAmount,assetId) = {
90+ let newReservedAmount = (getIntOr(RESERVATIONKEY[assetId], 0) + winAmount)
91+ if ((newReservedAmount > wavesBalance(this)))
92+ then throw("Insufficient funds on Dice Roller account. Transaction was rejected for your safety.")
93+ else newReservedAmount
94+ }
95+
96+
97+func decreaseReservedAmount (gameId,assetId,winAmount) = if ((0 > (getIntOr(RESERVATIONKEY[assetId], 0) - winAmount)))
98+ then throw("Invalid Dice Roller account state - reserved amount is less than 0")
99+ else changeInt(RESERVATIONKEY[assetId], -(winAmount))
100+
101+
102+func validateAndGetAssetId (assetId) = if ((assetId == ASSETS[0]))
103+ then 0
104+ else if ((assetId == ASSETS[1]))
105+ then 1
106+ else throw("Invalid payment asset")
107+
108+
109+func validateBetAndGetWinAmount (betAmount,assetId,playerChoice) = {
110+ let dicesCount = size(playerChoice)
111+ let commission = getCommission(assetId)
112+ func checkAmount (a,x) = if (a)
113+ then true
114+ else (betAmount == ((x * DECIMALS[assetId]) + commission))
115+
116+ if (!({
117+ let $list46864719 = BETS
118+ let $size46864719 = size($list46864719)
119+ let $acc046864719 = false
120+ if (($size46864719 == 0))
121+ then $acc046864719
122+ else {
123+ let $acc146864719 = checkAmount($acc046864719, $list46864719[0])
124+ if (($size46864719 == 1))
125+ then $acc146864719
126+ else {
127+ let $acc246864719 = checkAmount($acc146864719, $list46864719[1])
128+ if (($size46864719 == 2))
129+ then $acc246864719
130+ else {
131+ let $acc346864719 = checkAmount($acc246864719, $list46864719[2])
132+ if (($size46864719 == 3))
133+ then $acc346864719
134+ else {
135+ let $acc446864719 = checkAmount($acc346864719, $list46864719[3])
136+ if (($size46864719 == 4))
137+ then $acc446864719
138+ else {
139+ let $acc546864719 = checkAmount($acc446864719, $list46864719[4])
140+ if (($size46864719 == 5))
141+ then $acc546864719
142+ else {
143+ let $acc646864719 = checkAmount($acc546864719, $list46864719[5])
144+ throw("List size exceed 5")
145+ }
146+ }
147+ }
148+ }
149+ }
150+ }
151+ }))
152+ then throw("Bet amount is not valid")
153+ else if ((parseInt(playerChoice) == unit))
154+ then throw("Invalid player's choice")
155+ else if (if ((1 > dicesCount))
156+ then true
157+ else (dicesCount > 5))
158+ then throw("Invalid dices count in player's choice")
159+ else {
160+ let bet = (betAmount - commission)
161+ ((bet * RATES[(dicesCount - 1)]) / RATEMULT)
162+ }
163+ }
164+
165+
166+func generateRandChoise (gameId,rsaSign) = {
167+ let rsaSigValid = rsaVerify(SHA256, toBytes(gameId), rsaSign, RSAPUBLIC)
168+ if (!(rsaSigValid))
169+ then throw("Invalid RSA signature")
170+ else {
171+ let rand = (toInt(sha256(rsaSign)) % 6)
172+ let result = if ((0 > rand))
173+ then (-1 * rand)
174+ else rand
175+ toString(result)
176+ }
177+ }
178+
179+
180+func isPlayerWin (playerChoice,randChoise) = {
181+ let s = size(playerChoice)
182+ func check (a,x) = if (a)
183+ then true
184+ else if ((s >= x))
185+ then (take(drop(playerChoice, (x - 1)), 1) == randChoise)
186+ else false
187+
188+ let $list56035637 = [1, 2, 3, 4, 5]
189+ let $size56035637 = size($list56035637)
190+ let $acc056035637 = false
191+ if (($size56035637 == 0))
192+ then $acc056035637
193+ else {
194+ let $acc156035637 = check($acc056035637, $list56035637[0])
195+ if (($size56035637 == 1))
196+ then $acc156035637
197+ else {
198+ let $acc256035637 = check($acc156035637, $list56035637[1])
199+ if (($size56035637 == 2))
200+ then $acc256035637
201+ else {
202+ let $acc356035637 = check($acc256035637, $list56035637[2])
203+ if (($size56035637 == 3))
204+ then $acc356035637
205+ else {
206+ let $acc456035637 = check($acc356035637, $list56035637[3])
207+ if (($size56035637 == 4))
208+ then $acc456035637
209+ else {
210+ let $acc556035637 = check($acc456035637, $list56035637[4])
211+ if (($size56035637 == 5))
212+ then $acc556035637
213+ else {
214+ let $acc656035637 = check($acc556035637, $list56035637[5])
215+ throw("List size exceed 5")
216+ }
217+ }
218+ }
219+ }
220+ }
221+ }
222+ }
223+
224+
225+func formatGameData (gameState,playerChoice,playerPubKey58,startedHeight,winAmount,assetId,randOrEmpty) = (((((((((((gameState + "_") + playerChoice) + "_") + playerPubKey58) + "_") + toString(startedHeight)) + "_") + toString(winAmount)) + "_") + toString(assetId)) + (if ((randOrEmpty == ""))
226+ then ""
227+ else ("_" + randOrEmpty)))
228+
229+
230+func extractGameData (gameId) = split(match getString(this, gameId) {
231+ case str: String =>
232+ str
233+ case _ =>
234+ throw((("Game: " + gameId) + " not found."))
235+}, "_")
236+
237+
238+func winScriptSet (gameId,playerAddress,winAmount,assetId,newgameData,winByTimeout,decreasedReserves) = {
239+ let wSetCommonData = [decreasedReserves]
240+ let tSetCommonData = [ScriptTransfer(playerAddress, winAmount, ASSETS[assetId])]
241+ if (winByTimeout)
242+ then {
243+ let newgameDataAdjusted = ((newgameData + "_") + "TIMEOUT")
244+ let gameData = DataEntry(gameId, newgameDataAdjusted)
245+ ScriptResult(WriteSet(gameData :: wSetCommonData), TransferSet(tSetCommonData))
246+ }
247+ else {
248+ let gameData = DataEntry(gameId, newgameData)
249+ ScriptResult(WriteSet(gameData :: wSetCommonData), TransferSet(tSetCommonData))
250+ }
251+ }
252+
253+
254+func isDAppUp () = {
255+ let dAppUpOpt = getBoolean(this, DAPPUPKEY)
256+ if (isDefined(dAppUpOpt))
257+ then extract(dAppUpOpt)
258+ else false
259+ }
260+
261+
262+func monitorMaxBalance () = {
263+ let maxBalanceOpt = getInteger(this, MAXBALANCEKEY)
264+ let maxBalance = if (isDefined(maxBalanceOpt))
265+ then extract(maxBalanceOpt)
266+ else 0
267+ let currBalance = wavesBalance(this)
268+ if ((currBalance > maxBalance))
269+ then currBalance
270+ else {
271+ let diff = (maxBalance - currBalance)
272+ if ((diff > MAXBALANCEDIFF))
273+ then throw("dApp is temporary disabled")
274+ else maxBalance
275+ }
276+ }
277+
278+
279+@Callable(i)
280+func dAppUp (dAppUp) = if ((i.caller != SERVER))
281+ then throw("Only Server can manage dAppUp attribute")
282+ else if ((isDAppUp() == dAppUp))
283+ then throw("dAppUp must be different with actual value")
284+ else WriteSet([DataEntry(DAPPUPKEY, dAppUp)])
285+
286+
287+
288+@Callable(i)
289+func bet (playerChoice) = {
290+ let gameId = toBase58String(i.transactionId)
291+ if (!(isDAppUp()))
292+ then throw("DApp is under maintenance")
293+ else if ((i.payment == unit))
294+ then throw("No payment")
295+ else if (isDefined(getString(this, gameId)))
296+ then throw((("Bet for: " + gameId) + " was already made."))
297+ else {
298+ let p = extract(i.payment)
299+ let assetId = validateAndGetAssetId(p.assetId)
300+ let commission = getCommission(assetId)
301+ let winAmount = validateBetAndGetWinAmount(p.amount, assetId, playerChoice)
302+ let playerPubKey58 = toBase58String(i.callerPublicKey)
303+ let gameData = formatGameData(STATESUBMITTED, playerChoice, playerPubKey58, height, winAmount, assetId, "")
304+ ScriptResult(WriteSet([DataEntry(RESERVATIONKEY[assetId], increaseReserveAmount(winAmount, assetId)), incrementInt(GAMESCOUNTERKEY), DataEntry(MAXBALANCEKEY, monitorMaxBalance()), DataEntry(gameId, gameData)]), TransferSet([ScriptTransfer(SERVER, commission, p.assetId)]))
305+ }
306+ }
307+
308+
309+
310+@Callable(i)
311+func withdraw (gameId,rsaSign) = {
312+ let gameData = extractGameData(gameId)
313+ let gameState = gameData[IdxGameState]
314+ let playerChoice = gameData[IdxPlayerChoice]
315+ let startedHeight = parseIntValue(gameData[IdxStartedHeight])
316+ let winAmount = parseIntValue(gameData[IdxWinAmount])
317+ let playerPubKey58 = gameData[IdxPlayerPubKey58]
318+ let assetId = parseIntValue(gameData[IdxAssetId])
319+ let playerAddress = addressFromPublicKey(fromBase58String(playerPubKey58))
320+ let winByTimeout = ((height - startedHeight) > RANDORACLETIMEFRAME)
321+ let decreasedReserves = decreaseReservedAmount(gameId, assetId, winAmount)
322+ if ((gameState != STATESUBMITTED))
323+ then throw("Invalid game state for passed gameId")
324+ else if (winByTimeout)
325+ then {
326+ let randChoise = take(playerChoice, 1)
327+ let newgameData = formatGameData(STATEWON, playerChoice, playerPubKey58, startedHeight, winAmount, assetId, randChoise)
328+ winScriptSet(gameId, playerAddress, winAmount, assetId, newgameData, winByTimeout, decreasedReserves)
329+ }
330+ else {
331+ let randChoise = generateRandChoise(gameId, rsaSign)
332+ if ((i.caller != SERVER))
333+ then throw("Regular withdraw can be done by server only")
334+ else if (isPlayerWin(playerChoice, randChoise))
335+ then {
336+ let newgameData = formatGameData(STATEWON, playerChoice, playerPubKey58, startedHeight, winAmount, assetId, randChoise)
337+ winScriptSet(gameId, playerAddress, winAmount, assetId, newgameData, winByTimeout, decreasedReserves)
338+ }
339+ else {
340+ let newgameData = formatGameData(STATELOST, playerChoice, playerPubKey58, startedHeight, winAmount, assetId, randChoise)
341+ WriteSet([DataEntry(gameId, newgameData), decreasedReserves])
342+ }
343+ }
344+ }
345+
346+
347+@Verifier(tx)
348+func verify () = if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
349+ then match tx {
350+ case ttx: TransferTransaction =>
351+ let assetId = validateAndGetAssetId(ttx.assetId)
352+ ((wavesBalance(this) - ttx.amount) >= getIntOr(RESERVATIONKEY[assetId], 0))
353+ case stx: SetScriptTransaction =>
354+ if (if ((isDAppUp() == false))
355+ then (getIntOr(RESERVATIONKEY[0], 0) == 0)
356+ else false)
357+ then (getIntOr(RESERVATIONKEY[1], 0) == 0)
358+ else false
359+ case _ =>
360+ true
361+ }
362+ else false
363+

github/deemru/w8io/873ac7e 
26.37 ms