tx · GpQJHPfxJeAn48zLv3UXjZYKrRWXaJn6rJ2jj3EJKKEw

3My9Kd9gApw3GCoz2KWSZPiTRNzDsNE2eeh:  -0.01400000 Waves

2021.02.15 13:43 [1399171] smart account 3My9Kd9gApw3GCoz2KWSZPiTRNzDsNE2eeh > SELF 0.00000000 Waves

{ "type": 13, "id": "GpQJHPfxJeAn48zLv3UXjZYKrRWXaJn6rJ2jj3EJKKEw", "fee": 1400000, "feeAssetId": null, "timestamp": 1613385793605, "version": 2, "chainId": 84, "sender": "3My9Kd9gApw3GCoz2KWSZPiTRNzDsNE2eeh", "senderPublicKey": "BjjwtwUgZ4s8p9HJuFwyRMR3egd3zMAHGDV2HoZ1J7ho", "proofs": [ "426U3rAHjSq7QDpcWADZPSGnkMar4gQFMiz44xQk4h51JXqHjNhM9XiJg6J85BDVpdGK12KmosjNmWpH8xvVcYCG" ], "script": "base64:AAIDAAAAAAAAAAYIARIAEgAAAAAgAAAAAA1nYW1lUHVibGljS2V5CQACWQAAAAECAAAALEJqand0d1VnWjRzOHA5SEp1Rnd5Uk1SM2VnZDN6TUFIR0RWMkhvWjFKN2hvAAAAAA9zZXJ2ZXJQdWJsaWNLZXkJAAJZAAAAAQIAAAAsNTJEalROeG95ZXNBZExrS3A5VUo3ck4xWDJOUDVubk52a0h3S0wyOXdibloAAAAAFmRpdmlkZW5kUHJvZ3JhbUFkZHJlc3MJAQAAABRhZGRyZXNzRnJvbVB1YmxpY0tleQAAAAEFAAAAD3NlcnZlclB1YmxpY0tleQAAAAANcnNhUHVibGljS2V5MQkAAlsAAAABAgAAAIBNRnd3RFFZSktvWklodmNOQVFFQkJRQURTd0F3U0FKQkFPa2l1ei9CVjRFam94R2hUbU5DYnQyVGdrYlNQSC93NjliM0YxckttRDYxSmlQWHZ2RjhMMnBJOXhPWWNXNEZtb0VaVkhsUlF0QWxhSnlrbDMrcnNyRUNBd0VBQVE9PQAAAAANcnNhUHVibGljS2V5MgkAAlsAAAABAgAAAIBNRnd3RFFZSktvWklodmNOQVFFQkJRQURTd0F3U0FKQkFKblh6Yk0vVjJzRFYxVUxiUFNPbEhrbGRPVFdSckhpNWZ4SWtCbXVldnJDbE1QVkg3cnFjY3dpckROY01kSWR3WEhJOUFkaGo5Rldqd0dJd2ZVL0s2TUNBd0VBQVE9PQAAAAANcnNhUHVibGljS2V5MwkAAlsAAAABAgAAAIBNRnd3RFFZSktvWklodmNOQVFFQkJRQURTd0F3U0FKQkFPUkRldnkwcjRrekxxT3lTbG9CNjNIdXYyZTR6ZUhLSGpDc3k1dnRGS21XWmJYSmE4Z1pZdDQrRWtsRklvMUs5b3F1NUJBUFZmSjNGT3pzMlUxQStnMENBd0VBQVE9PQAAAAAFZHJ1bTEJAARMAAAAAgIAAAABMgkABEwAAAACAgAAAAExCQAETAAAAAICAAAAATMJAARMAAAAAgIAAAABNQkABEwAAAACAgAAAAE3CQAETAAAAAICAAAAATMJAARMAAAAAgIAAAABMwkABEwAAAACAgAAAAExCQAETAAAAAICAAAAATQJAARMAAAAAgIAAAABMQkABEwAAAACAgAAAAEzCQAETAAAAAICAAAAATUJAARMAAAAAgIAAAABMgkABEwAAAACAgAAAAE0CQAETAAAAAICAAAAATIJAARMAAAAAgIAAAABNgkABEwAAAACAgAAAAE1CQAETAAAAAICAAAAATIJAARMAAAAAgIAAAABMQkABEwAAAACAgAAAAE0BQAAAANuaWwAAAAABWRydW0yCQAETAAAAAICAAAAATQJAARMAAAAAgIAAAABMgkABEwAAAACAgAAAAEzCQAETAAAAAICAAAAATEJAARMAAAAAgIAAAABNgkABEwAAAACAgAAAAE0CQAETAAAAAICAAAAATIJAARMAAAAAgIAAAABMQkABEwAAAACAgAAAAE0CQAETAAAAAICAAAAATIJAARMAAAAAgIAAAABMQkABEwAAAACAgAAAAE2CQAETAAAAAICAAAAATMJAARMAAAAAgIAAAABMQkABEwAAAACAgAAAAEyCQAETAAAAAICAAAAATUJAARMAAAAAgIAAAABMQkABEwAAAACAgAAAAE1CQAETAAAAAICAAAAATMJAARMAAAAAgIAAAABNwUAAAADbmlsAAAAAAVkcnVtMwkABEwAAAACAgAAAAEzCQAETAAAAAICAAAAATIJAARMAAAAAgIAAAABNwkABEwAAAACAgAAAAE0CQAETAAAAAICAAAAATEJAARMAAAAAgIAAAABNgkABEwAAAACAgAAAAE0CQAETAAAAAICAAAAATIJAARMAAAAAgIAAAABMwkABEwAAAACAgAAAAExCQAETAAAAAICAAAAATQJAARMAAAAAgIAAAABMQkABEwAAAACAgAAAAE1CQAETAAAAAICAAAAATUJAARMAAAAAgIAAAABMQkABEwAAAACAgAAAAEzCQAETAAAAAICAAAAATcJAARMAAAAAgIAAAABMQkABEwAAAACAgAAAAEyCQAETAAAAAICAAAAATYFAAAAA25pbAAAAAAIc3RhdGVBY2MCAAAACEFjY2VwdGVkAAAAAAhzdGF0ZVdpbgIAAAADV2luAAAAAAlzdGF0ZUxvc2UCAAAABExvc2UAAAAADHN0YXRlVGltZW91dAIAAAAMV2luQnlUaW1lb3V0AAAAAAd3YXZlc0lkBQAAAAR1bml0AAAAAAt3YXZlc01pbkFtdAAAAAAAATEtAAAAAAALd2F2ZXNNYXhBbXQJAABoAAAAAgUAAAALd2F2ZXNNaW5BbXQAAAAAAAAAAAoAAAAACmNvbW1pc3Npb24AAAAAAAAHoSAAAAAADWdhbWVUaW1lRnJhbWUAAAAAAAAAC0ABAAAAC3BtdEFtdENoZWNrAAAAAgAAAApwbXRBc3NldElkAAAACWJldEFtb3VudAMJAAAAAAAAAgUAAAAKcG10QXNzZXRJZAIAAAAFV0FWRVMDAwkAAGcAAAACBQAAAAliZXRBbW91bnQFAAAAC3dhdmVzTWluQW10CQAAZwAAAAIFAAAAC3dhdmVzTWF4QW10BQAAAAliZXRBbW91bnQHBgkAAAIAAAABAgAAABpCZXQgYW1vdW50IGlzIG5vdCBpbiByYW5nZQkAAAIAAAABAgAAAB1QYXltZW50IEFzc2V0IElEIGlzIG5vdCB2YWxpZAEAAAALZ2V0RGF0YUxpc3QAAAABAAAABmdhbWVJZAQAAAANZ2V0RGF0YVN0cmluZwkABB0AAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABmdhbWVJZAIAAAAHX0dhbWVJZAQAAAABYQQAAAAHJG1hdGNoMAUAAAANZ2V0RGF0YVN0cmluZwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhCQAAAgAAAAECAAAAFEdhbWVJZCB3YXMgbm90IGZvdW5kCQAEtQAAAAIFAAAAAWECAAAAAV8BAAAACHJzYVRvSW50AAAAAwAAAAZnYW1lSWQAAAAHcnNhU2lnbgAAAAxyc2FQdWJsaWNLZXkEAAAACHJzYUNoZWNrCQAB+AAAAAQFAAAABlNIQTI1NgkAAZsAAAABBQAAAAZnYW1lSWQFAAAAB3JzYVNpZ24FAAAADHJzYVB1YmxpY0tleQMFAAAACHJzYUNoZWNrCQAAagAAAAIJAASxAAAAAQkAAfcAAAABBQAAAAdyc2FTaWduAAAAAAAAAAATCQAAAgAAAAECAAAAFUludmFsaWQgUlNBIFNpZ25hdHVyZQEAAAAXaW5jcmVhc2VSZXNlcnZlZEJhbGFuY2UAAAACAAAABnBtdEFtdAAAAAlhc3NldElkNTgEAAAAFmN1cnJlbnRSZXNlcnZlZEJhbGFuY2UEAAAAFHZhbHVlUmVzZXJ2ZWRCYWxhbmNlCQAEGgAAAAIFAAAABHRoaXMCAAAADldBVkVTX1Jlc2VydmVkBAAAAAckbWF0Y2gwBQAAABR2YWx1ZVJlc2VydmVkQmFsYW5jZQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAABJuZXdSZXNlcnZlZEJhbGFuY2UJAABkAAAAAgUAAAAWY3VycmVudFJlc2VydmVkQmFsYW5jZQkAAGgAAAACBQAAAAZwbXRBbXQAAAAAAAAAAQQDCQAAZwAAAAIJAAPrAAAAAgUAAAAEdGhpcwUAAAAJYXNzZXRJZDU4BQAAABJuZXdSZXNlcnZlZEJhbGFuY2UFAAAAEm5ld1Jlc2VydmVkQmFsYW5jZQkAAAIAAAABAgAAADVCZXQgd2FzIHJlamVjdGVkLiBJbnN1ZmZpY2llbnQgZnVuZHMgb24gZ2FtZSBhY2NvdW50LgEAAAAXZGVjcmVhc2VSZXNlcnZlZEJhbGFuY2UAAAACAAAABmJldEFtdAAAAAdhc3NldElkBAAAABR2YWx1ZVJlc2VydmVkQmFsYW5jZQkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAAB2Fzc2V0SWQCAAAACV9SZXNlcnZlZAQAAAAWZXh0cmFjdFJlc2VydmVkQmFsYW5jZQQAAAAHJG1hdGNoMAUAAAAUdmFsdWVSZXNlcnZlZEJhbGFuY2UDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAXZGVjcmVhc2VSZXNlcnZlZEJhbGFuY2UJAABlAAAAAgUAAAAWZXh0cmFjdFJlc2VydmVkQmFsYW5jZQkAAGgAAAACBQAAAAZiZXRBbXQAAAAAAAAAAQQDCQAAZwAAAAIFAAAAF2RlY3JlYXNlUmVzZXJ2ZWRCYWxhbmNlAAAAAAAAAAAABQAAABdkZWNyZWFzZVJlc2VydmVkQmFsYW5jZQkAAAIAAAABAgAAAChSZXNlcnZlZCBiYWxhbmNlIGNvdWxkbid0IGJlIGxlc3MgdGhhbiAwAQAAAA9kcnVtSW50VG9TdHJpbmcAAAABAAAAB2RydW1JbnQDCQAAZgAAAAIAAAAAAAAAAAoFAAAAB2RydW1JbnQJAAEsAAAAAgIAAAABMAkAAaQAAAABBQAAAAdkcnVtSW50CQABpAAAAAEFAAAAB2RydW1JbnQBAAAAEGRlZmluZU11bHRpcGxpZXIAAAACAAAAC3RocmVlSW5BUm93AAAACXR3b0luQVJvdwMJAAAAAAAAAgUAAAALdGhyZWVJbkFSb3cCAAAAAzc3NwAAAAAAAAAKKAMJAAAAAAAAAgUAAAALdGhyZWVJbkFSb3cCAAAAAzY2NgAAAAAAAAAFFAMJAAAAAAAAAgUAAAALdGhyZWVJbkFSb3cCAAAAAzU1NQAAAAAAAAABwgMJAAAAAAAAAgUAAAALdGhyZWVJbkFSb3cCAAAAAzQ0NAAAAAAAAAAAyAMJAAAAAAAAAgUAAAALdGhyZWVJbkFSb3cCAAAAAzMzMwAAAAAAAAAAlgMJAAAAAAAAAgUAAAALdGhyZWVJbkFSb3cCAAAAAzIyMgAAAAAAAAAAbgMJAAAAAAAAAgUAAAALdGhyZWVJbkFSb3cCAAAAAzExMQAAAAAAAAAAMgMJAAAAAAAAAgUAAAAJdHdvSW5BUm93AgAAAAI3NwAAAAAAAAABDgMJAAAAAAAAAgUAAAAJdHdvSW5BUm93AgAAAAI2NgAAAAAAAAAAggMJAAAAAAAAAgUAAAAJdHdvSW5BUm93AgAAAAI1NQAAAAAAAAAALQMJAAAAAAAAAgUAAAAJdHdvSW5BUm93AgAAAAI0NAAAAAAAAAAAHgMJAAAAAAAAAgUAAAAJdHdvSW5BUm93AgAAAAIzMwAAAAAAAAAAFAMJAAAAAAAAAgUAAAAJdHdvSW5BUm93AgAAAAIyMgAAAAAAAAAAEQMJAAAAAAAAAgUAAAAJdHdvSW5BUm93AgAAAAIxMQAAAAAAAAAADQAAAAAAAAAAAAEAAAARYXNzZXROYW1lVG9CYXNlNTgAAAABAAAACWFzc2V0TmFtZQMJAAAAAAAAAgUAAAAJYXNzZXROYW1lAgAAAAVXQVZFUwUAAAAHd2F2ZXNJZAkAAAIAAAABAgAAABdBc3NldCBuYW1lIGlzIGluY29ycmVjdAEAAAARYXNzZXRCYXNlNThUb05hbWUAAAABAAAAB2Fzc2V0SWQDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABBQAAAAdhc3NldElkAgAAAAVXQVZFUwkAAAIAAAABAgAAABRBc3NldElkIGlzIGluY29ycmVjdAEAAAAUc2V0TmV3R2FtZXNQbGF5ZWROdW0AAAABAAAAB2FkZHJlc3MEAAAAE3ZhbHVlR2FtZXNQbGF5ZWROdW0JAAQaAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAdhZGRyZXNzAgAAAAxfR2FtZXNQbGF5ZWQEAAAAFWN1cnJlbnRHYW1lc1BsYXllZE51bQQAAAAHJG1hdGNoMAUAAAATdmFsdWVHYW1lc1BsYXllZE51bQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAACQAAZAAAAAIFAAAAFWN1cnJlbnRHYW1lc1BsYXllZE51bQAAAAAAAAAAAQEAAAAPY2hlY2tQZXJtaXNzaW9uAAAAAQAAAA9jYWxsZXJQdWJsaWNLZXkJAQAAAAIhPQAAAAIFAAAAD2NhbGxlclB1YmxpY0tleQUAAAAPc2VydmVyUHVibGljS2V5AQAAABBnZXRDdXJyZW50SW5jb21lAAAAAQAAAAlhc3NldE5hbWUEAAAAA3ZhbAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAACWFzc2V0TmFtZQIAAAAHX0luY29tZQQAAAAHJG1hdGNoMAUAAAADdmFsAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAABAAAAFGNhbGxlcklzRGVwb3NpdE93bmVyAAAAAgAAAAlhc3NldE5hbWUAAAAPY2FsbGVyUHVibGljS2V5BAAAAAxkZXBvc2l0T3duZXIJAAQdAAAAAgUAAAAWZGl2aWRlbmRQcm9ncmFtQWRkcmVzcwkAASwAAAACBQAAAAlhc3NldE5hbWUCAAAADV9EZXBvc2l0T3duZXIDCQAAAAAAAAIFAAAAD2NhbGxlclB1YmxpY0tleQUAAAAMZGVwb3NpdE93bmVyBQAAAA9jYWxsZXJQdWJsaWNLZXkJAAACAAAAAQIAAAApT25seSBkZXBvc2l0IG93bmVyIGNhbiB3aXRoZHJhd2FsIGRlcG9zaXQBAAAADmdldERlcG9zaXREYXRhAAAAAgAAAAlhc3NldE5hbWUAAAAJa2V5U3VmZml4BAAAAANrZXkJAAEsAAAAAgUAAAAJYXNzZXROYW1lBQAAAAlrZXlTdWZmaXgEAAAAA3ZhbAkABBoAAAACBQAAABZkaXZpZGVuZFByb2dyYW1BZGRyZXNzBQAAAANrZXkEAAAAByRtYXRjaDAFAAAAA3ZhbAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhCQAAAgAAAAECAAAAK0NvdWxkbid0IGZpbmQgZGl2aWRlbmQgcHJvZ3JhbSBzdGFydCBoZWlnaHQAAAACAAAAAWkBAAAACGluaXRHYW1lAAAAAAMJAQAAAA9jaGVja1Blcm1pc3Npb24AAAABCAUAAAABaQAAAA9jYWxsZXJQdWJsaWNLZXkJAAACAAAAAQIAAAASaW5pdEdhbWVfRk9SQkJJREVOBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMCAAAADlhfR0FNRVNDT1VOVEVSAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAADEdBTUVTQ09VTlRFUgUAAAAHJG1hdGNoMAkAAAIAAAABAgAAABFJTklUX0FMUkVBRFlfRE9ORQkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAOWF9HQU1FU0NPVU5URVIAAAAAAAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAADldBVkVTX1Jlc2VydmVkBQAAAAt3YXZlc01pbkFtdAUAAAADbmlsAAAAAWkBAAAAB21ha2VCZXQAAAAABAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAQAAAAJYmV0QW1vdW50CQAAZQAAAAIIBQAAAANwbXQAAAAGYW1vdW50BQAAAApjb21taXNzaW9uBAAAAAdhc3NldElkCAUAAAADcG10AAAAB2Fzc2V0SWQEAAAABmdhbWVJZAkAAlgAAAABCAUAAAABaQAAAA10cmFuc2FjdGlvbklkBAAAAA1wbGF5ZXJBZGRyZXNzCQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAASc2V0UmVzZXJ2ZWRCYWxhbmNlCQEAAAAXaW5jcmVhc2VSZXNlcnZlZEJhbGFuY2UAAAACBQAAAAliZXRBbW91bnQIBQAAAANwbXQAAAAHYXNzZXRJZAQAAAANcG10QW10Q29ycmVjdAkBAAAAC3BtdEFtdENoZWNrAAAAAgIAAAAFV0FWRVMFAAAACWJldEFtb3VudAMFAAAADXBtdEFtdENvcnJlY3QEAAAACmRhdGFTdHJpbmcJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAACHN0YXRlQWNjAgAAAAFfCQAEJQAAAAEFAAAADXBsYXllckFkZHJlc3MCAAAAAV8JAAGkAAAAAQUAAAAJYmV0QW1vdW50AgAAAAdfV0FWRVNfCQABpAAAAAEFAAAABmhlaWdodAkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAZnYW1lSWQCAAAAB19HYW1lSWQFAAAACmRhdGFTdHJpbmcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAADldBVkVTX1Jlc2VydmVkBQAAABJzZXRSZXNlcnZlZEJhbGFuY2UFAAAAA25pbAkAAAIAAAABAgAAABRBc3NldElkIGlzIGluY29ycmVjdAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAADCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAUAAAANZ2FtZVB1YmxpY0tleQQAAAAHJG1hdGNoMAUAAAACdHgDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAFFNldFNjcmlwdFRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAYHB3z7OvE=", "height": 1399171, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 3mG3VAiCy8G4PSDEeY9BENCMwDs4an2cMfP1QdA59f5R Next: B35FRY9KNJiD7xt2zYtkNkpoZJ4SNs3Run4Tkq15R2dW Diff:
OldNewDifferences
33 {-# CONTENT_TYPE DAPP #-}
44 let gamePublicKey = fromBase58String("BjjwtwUgZ4s8p9HJuFwyRMR3egd3zMAHGDV2HoZ1J7ho")
55
6-let dividendProgramAddress = addressFromPublicKey(fromBase58String("85WRynF4cwHurmJhYS4baWuSCu1D2Msv8i37g8s8DPFN"))
6+let serverPublicKey = fromBase58String("52DjTNxoyesAdLkKp9UJ7rN1X2NP5nnNvkHwKL29wbnZ")
7+
8+let dividendProgramAddress = addressFromPublicKey(serverPublicKey)
79
810 let rsaPublicKey1 = fromBase64String("MFwwDQYJKoZIhvcNAQEBBQADSwAwSAJBAOkiuz/BV4EjoxGhTmNCbt2TgkbSPH/w69b3F1rKmD61JiPXvvF8L2pI9xOYcW4FmoEZVHlRQtAlaJykl3+rsrECAwEAAQ==")
911
2729
2830 let wavesId = unit
2931
30-let wavesMinAmt = 100000000
32+let wavesMinAmt = 20000000
3133
3234 let wavesMaxAmt = (wavesMinAmt * 10)
3335
6466 }
6567
6668
67-func increaseReservedBalance (pmtAmt,pmtAssetName,assetId58) = {
69+func increaseReservedBalance (pmtAmt,assetId58) = {
6870 let currentReservedBalance = {
69- let valueReservedBalance = getInteger(this, (pmtAssetName + "_Reserved"))
71+ let valueReservedBalance = getInteger(this, "WAVES_Reserved")
7072 match valueReservedBalance {
7173 case a: Int =>
7274 a
154156 }
155157
156158
159+func checkPermission (callerPublicKey) = (callerPublicKey != serverPublicKey)
160+
161+
157162 func getCurrentIncome (assetName) = {
158163 let val = getInteger(this, (assetName + "_Income"))
159164 match val {
186191
187192
188193 @Callable(i)
194+func initGame () = if (checkPermission(i.callerPublicKey))
195+ then throw("initGame_FORBBIDEN")
196+ else match getInteger(this, "X_GAMESCOUNTER") {
197+ case GAMESCOUNTER: Int =>
198+ throw("INIT_ALREADY_DONE")
199+ case _ =>
200+ WriteSet([DataEntry("X_GAMESCOUNTER", 1), DataEntry("WAVES_Reserved", wavesMinAmt)])
201+ }
202+
203+
204+
205+@Callable(i)
189206 func makeBet () = {
190207 let pmt = extract(i.payment)
191208 let betAmount = (pmt.amount - commission)
192209 let assetId = pmt.assetId
193210 let gameId = toBase58String(i.transactionId)
194211 let playerAddress = extract(i.caller)
195- let pmtAssetName = assetBase58ToName(assetId)
196- let setReservedBalance = increaseReservedBalance(betAmount, pmtAssetName, pmt.assetId)
197- let pmtAmtCorrect = pmtAmtCheck(pmtAssetName, betAmount)
212+ let setReservedBalance = increaseReservedBalance(betAmount, pmt.assetId)
213+ let pmtAmtCorrect = pmtAmtCheck("WAVES", betAmount)
198214 if (pmtAmtCorrect)
199215 then {
200- let dataString = ((((((((stateAcc + "_") + toString(playerAddress)) + "_") + toString(betAmount)) + "_") + pmtAssetName) + "_") + toString(height))
201- WriteSet([DataEntry((gameId + "_GameId"), dataString), DataEntry((pmtAssetName + "_Reserved"), setReservedBalance)])
216+ let dataString = ((((((stateAcc + "_") + toString(playerAddress)) + "_") + toString(betAmount)) + "_WAVES_") + toString(height))
217+ WriteSet([DataEntry((gameId + "_GameId"), dataString), DataEntry("WAVES_Reserved", setReservedBalance)])
202218 }
203219 else throw("AssetId is incorrect")
204- }
205-
206-
207-
208-@Callable(i)
209-func playGame (gameId,rsaSign1,rsaSign2,rsaSign3) = {
210- let dataList = getDataList(gameId)
211- let gameState = dataList[0]
212- let playerAddress = dataList[1]
213- let betAmt = parseIntValue(dataList[2])
214- let assetName = dataList[3]
215- let gameStart = parseIntValue(dataList[4])
216- let assetId58 = assetNameToBase58(assetName)
217- let setReservedBalance = decreaseReservedBalance(betAmt, assetName)
218- let drum1Int = rsaToInt(gameId, rsaSign1, rsaPublicKey1)
219- let drum2Int = rsaToInt(gameId, rsaSign2, rsaPublicKey2)
220- let drum3Int = rsaToInt(gameId, rsaSign3, rsaPublicKey3)
221- let twoInARow = (drum1[drum1Int] + drum2[drum2Int])
222- let threeInARow = (twoInARow + drum3[drum3Int])
223- let droppedElementsString = ((drumIntToString(drum1Int) + drumIntToString(drum2Int)) + drumIntToString(drum3Int))
224- let winAmt = ((betAmt * defineMultiplier(threeInARow, twoInARow)) / 10)
225- if ((gameState == stateAcc))
226- then if ((gameTimeFrame > (height - gameStart)))
227- then if ((winAmt == 0))
228- then {
229- let availableDividends = {
230- let dividends = (getCurrentIncome(assetName) + betAmt)
231- if ((dividends > 0))
232- then dividends
233- else 0
234- }
235- let income = {
236- let dividends = (getCurrentIncome(assetName) + betAmt)
237- if ((dividends > 0))
238- then 0
239- else dividends
240- }
241- ScriptResult(WriteSet([DataEntry((gameId + "_GameId"), ((((((((((((((stateLose + "_") + dataList[1]) + "_") + dataList[2]) + "_") + dataList[3]) + "_") + toString(height)) + "_") + toString(winAmt)) + "_") + threeInARow) + "_") + droppedElementsString)), DataEntry((assetName + "_Reserved"), setReservedBalance), DataEntry((assetName + "_Income"), income)]), TransferSet([ScriptTransfer(dividendProgramAddress, availableDividends, assetId58)]))
242- }
243- else ScriptResult(WriteSet([DataEntry((gameId + "_GameId"), ((((((((((((((stateWin + "_") + dataList[1]) + "_") + dataList[2]) + "_") + dataList[3]) + "_") + toString(height)) + "_") + toString(winAmt)) + "_") + threeInARow) + "_") + droppedElementsString)), DataEntry((assetName + "_Reserved"), setReservedBalance), DataEntry((assetName + "_Income"), (getCurrentIncome(assetName) - winAmt))]), TransferSet([ScriptTransfer(addressFromStringValue(playerAddress), winAmt, assetId58)]))
244- else ScriptResult(WriteSet([DataEntry((gameId + "_GameId"), ((((((((((((((stateTimeout + "_") + dataList[1]) + "_") + dataList[2]) + "_") + dataList[3]) + "_") + toString(height)) + "_") + toString((betAmt * 2))) + "_") + "000") + "_") + "000000")), DataEntry((assetName + "_Reserved"), setReservedBalance), DataEntry((assetName + "_Income"), (getCurrentIncome(assetName) - (betAmt * 2)))]), TransferSet([ScriptTransfer(addressFromStringValue(playerAddress), (betAmt * 2), assetId58)]))
245- else throw("Game state is incorrect")
246- }
247-
248-
249-
250-@Callable(i)
251-func withdrawDeposit (assetName) = {
252- let assetId58 = assetNameToBase58(assetName)
253- let callerPub = callerIsDepositOwner(assetName, toBase58String(i.callerPublicKey))
254- let dividendStartHeight = getDepositData(assetName, "_DepositStartBlock")
255- let depositDuration = getDepositData(assetName, "_DepositDurationBlock")
256- let depositAmount = getDepositData(assetName, "_DepositAmount")
257- if (((height - dividendStartHeight) >= depositDuration))
258- then ScriptResult(WriteSet([DataEntry((assetName + "_DepositWithdrawTransactionId"), i.transactionId)]), TransferSet([ScriptTransfer(addressFromPublicKey(fromBase58String(callerPub)), depositAmount, assetId58)]))
259- else throw((("Deposit time is not over. " + toString((height - (dividendStartHeight + depositDuration)))) + " blocks left."))
260220 }
261221
262222
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 3 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let gamePublicKey = fromBase58String("BjjwtwUgZ4s8p9HJuFwyRMR3egd3zMAHGDV2HoZ1J7ho")
55
6-let dividendProgramAddress = addressFromPublicKey(fromBase58String("85WRynF4cwHurmJhYS4baWuSCu1D2Msv8i37g8s8DPFN"))
6+let serverPublicKey = fromBase58String("52DjTNxoyesAdLkKp9UJ7rN1X2NP5nnNvkHwKL29wbnZ")
7+
8+let dividendProgramAddress = addressFromPublicKey(serverPublicKey)
79
810 let rsaPublicKey1 = fromBase64String("MFwwDQYJKoZIhvcNAQEBBQADSwAwSAJBAOkiuz/BV4EjoxGhTmNCbt2TgkbSPH/w69b3F1rKmD61JiPXvvF8L2pI9xOYcW4FmoEZVHlRQtAlaJykl3+rsrECAwEAAQ==")
911
1012 let rsaPublicKey2 = fromBase64String("MFwwDQYJKoZIhvcNAQEBBQADSwAwSAJBAJnXzbM/V2sDV1ULbPSOlHkldOTWRrHi5fxIkBmuevrClMPVH7rqccwirDNcMdIdwXHI9Adhj9FWjwGIwfU/K6MCAwEAAQ==")
1113
1214 let rsaPublicKey3 = fromBase64String("MFwwDQYJKoZIhvcNAQEBBQADSwAwSAJBAORDevy0r4kzLqOySloB63Huv2e4zeHKHjCsy5vtFKmWZbXJa8gZYt4+EklFIo1K9oqu5BAPVfJ3FOzs2U1A+g0CAwEAAQ==")
1315
1416 let drum1 = ["2", "1", "3", "5", "7", "3", "3", "1", "4", "1", "3", "5", "2", "4", "2", "6", "5", "2", "1", "4"]
1517
1618 let drum2 = ["4", "2", "3", "1", "6", "4", "2", "1", "4", "2", "1", "6", "3", "1", "2", "5", "1", "5", "3", "7"]
1719
1820 let drum3 = ["3", "2", "7", "4", "1", "6", "4", "2", "3", "1", "4", "1", "5", "5", "1", "3", "7", "1", "2", "6"]
1921
2022 let stateAcc = "Accepted"
2123
2224 let stateWin = "Win"
2325
2426 let stateLose = "Lose"
2527
2628 let stateTimeout = "WinByTimeout"
2729
2830 let wavesId = unit
2931
30-let wavesMinAmt = 100000000
32+let wavesMinAmt = 20000000
3133
3234 let wavesMaxAmt = (wavesMinAmt * 10)
3335
3436 let commission = 500000
3537
3638 let gameTimeFrame = 2880
3739
3840 func pmtAmtCheck (pmtAssetId,betAmount) = if ((pmtAssetId == "WAVES"))
3941 then if (if ((betAmount >= wavesMinAmt))
4042 then (wavesMaxAmt >= betAmount)
4143 else false)
4244 then true
4345 else throw("Bet amount is not in range")
4446 else throw("Payment Asset ID is not valid")
4547
4648
4749 func getDataList (gameId) = {
4850 let getDataString = getString(this, (gameId + "_GameId"))
4951 let a = match getDataString {
5052 case a: String =>
5153 a
5254 case _ =>
5355 throw("GameId was not found")
5456 }
5557 split(a, "_")
5658 }
5759
5860
5961 func rsaToInt (gameId,rsaSign,rsaPublicKey) = {
6062 let rsaCheck = rsaVerify(SHA256, toBytes(gameId), rsaSign, rsaPublicKey)
6163 if (rsaCheck)
6264 then (toInt(sha256(rsaSign)) % 19)
6365 else throw("Invalid RSA Signature")
6466 }
6567
6668
67-func increaseReservedBalance (pmtAmt,pmtAssetName,assetId58) = {
69+func increaseReservedBalance (pmtAmt,assetId58) = {
6870 let currentReservedBalance = {
69- let valueReservedBalance = getInteger(this, (pmtAssetName + "_Reserved"))
71+ let valueReservedBalance = getInteger(this, "WAVES_Reserved")
7072 match valueReservedBalance {
7173 case a: Int =>
7274 a
7375 case _ =>
7476 0
7577 }
7678 }
7779 let newReservedBalance = (currentReservedBalance + (pmtAmt * 260))
7880 if ((assetBalance(this, assetId58) >= newReservedBalance))
7981 then newReservedBalance
8082 else throw("Bet was rejected. Insufficient funds on game account.")
8183 }
8284
8385
8486 func decreaseReservedBalance (betAmt,assetId) = {
8587 let valueReservedBalance = getInteger(this, (assetId + "_Reserved"))
8688 let extractReservedBalance = match valueReservedBalance {
8789 case a: Int =>
8890 a
8991 case _ =>
9092 0
9193 }
9294 let decreaseReservedBalance = (extractReservedBalance - (betAmt * 260))
9395 if ((decreaseReservedBalance >= 0))
9496 then decreaseReservedBalance
9597 else throw("Reserved balance couldn't be less than 0")
9698 }
9799
98100
99101 func drumIntToString (drumInt) = if ((10 > drumInt))
100102 then ("0" + toString(drumInt))
101103 else toString(drumInt)
102104
103105
104106 func defineMultiplier (threeInARow,twoInARow) = if ((threeInARow == "777"))
105107 then 2600
106108 else if ((threeInARow == "666"))
107109 then 1300
108110 else if ((threeInARow == "555"))
109111 then 450
110112 else if ((threeInARow == "444"))
111113 then 200
112114 else if ((threeInARow == "333"))
113115 then 150
114116 else if ((threeInARow == "222"))
115117 then 110
116118 else if ((threeInARow == "111"))
117119 then 50
118120 else if ((twoInARow == "77"))
119121 then 270
120122 else if ((twoInARow == "66"))
121123 then 130
122124 else if ((twoInARow == "55"))
123125 then 45
124126 else if ((twoInARow == "44"))
125127 then 30
126128 else if ((twoInARow == "33"))
127129 then 20
128130 else if ((twoInARow == "22"))
129131 then 17
130132 else if ((twoInARow == "11"))
131133 then 13
132134 else 0
133135
134136
135137 func assetNameToBase58 (assetName) = if ((assetName == "WAVES"))
136138 then wavesId
137139 else throw("Asset name is incorrect")
138140
139141
140142 func assetBase58ToName (assetId) = if (!(isDefined(assetId)))
141143 then "WAVES"
142144 else throw("AssetId is incorrect")
143145
144146
145147 func setNewGamesPlayedNum (address) = {
146148 let valueGamesPlayedNum = getInteger(this, (address + "_GamesPlayed"))
147149 let currentGamesPlayedNum = match valueGamesPlayedNum {
148150 case a: Int =>
149151 a
150152 case _ =>
151153 0
152154 }
153155 (currentGamesPlayedNum + 1)
154156 }
155157
156158
159+func checkPermission (callerPublicKey) = (callerPublicKey != serverPublicKey)
160+
161+
157162 func getCurrentIncome (assetName) = {
158163 let val = getInteger(this, (assetName + "_Income"))
159164 match val {
160165 case a: Int =>
161166 a
162167 case _ =>
163168 0
164169 }
165170 }
166171
167172
168173 func callerIsDepositOwner (assetName,callerPublicKey) = {
169174 let depositOwner = getString(dividendProgramAddress, (assetName + "_DepositOwner"))
170175 if ((callerPublicKey == depositOwner))
171176 then callerPublicKey
172177 else throw("Only deposit owner can withdrawal deposit")
173178 }
174179
175180
176181 func getDepositData (assetName,keySuffix) = {
177182 let key = (assetName + keySuffix)
178183 let val = getInteger(dividendProgramAddress, key)
179184 match val {
180185 case a: Int =>
181186 a
182187 case _ =>
183188 throw("Couldn't find dividend program start height")
184189 }
185190 }
186191
187192
188193 @Callable(i)
194+func initGame () = if (checkPermission(i.callerPublicKey))
195+ then throw("initGame_FORBBIDEN")
196+ else match getInteger(this, "X_GAMESCOUNTER") {
197+ case GAMESCOUNTER: Int =>
198+ throw("INIT_ALREADY_DONE")
199+ case _ =>
200+ WriteSet([DataEntry("X_GAMESCOUNTER", 1), DataEntry("WAVES_Reserved", wavesMinAmt)])
201+ }
202+
203+
204+
205+@Callable(i)
189206 func makeBet () = {
190207 let pmt = extract(i.payment)
191208 let betAmount = (pmt.amount - commission)
192209 let assetId = pmt.assetId
193210 let gameId = toBase58String(i.transactionId)
194211 let playerAddress = extract(i.caller)
195- let pmtAssetName = assetBase58ToName(assetId)
196- let setReservedBalance = increaseReservedBalance(betAmount, pmtAssetName, pmt.assetId)
197- let pmtAmtCorrect = pmtAmtCheck(pmtAssetName, betAmount)
212+ let setReservedBalance = increaseReservedBalance(betAmount, pmt.assetId)
213+ let pmtAmtCorrect = pmtAmtCheck("WAVES", betAmount)
198214 if (pmtAmtCorrect)
199215 then {
200- let dataString = ((((((((stateAcc + "_") + toString(playerAddress)) + "_") + toString(betAmount)) + "_") + pmtAssetName) + "_") + toString(height))
201- WriteSet([DataEntry((gameId + "_GameId"), dataString), DataEntry((pmtAssetName + "_Reserved"), setReservedBalance)])
216+ let dataString = ((((((stateAcc + "_") + toString(playerAddress)) + "_") + toString(betAmount)) + "_WAVES_") + toString(height))
217+ WriteSet([DataEntry((gameId + "_GameId"), dataString), DataEntry("WAVES_Reserved", setReservedBalance)])
202218 }
203219 else throw("AssetId is incorrect")
204- }
205-
206-
207-
208-@Callable(i)
209-func playGame (gameId,rsaSign1,rsaSign2,rsaSign3) = {
210- let dataList = getDataList(gameId)
211- let gameState = dataList[0]
212- let playerAddress = dataList[1]
213- let betAmt = parseIntValue(dataList[2])
214- let assetName = dataList[3]
215- let gameStart = parseIntValue(dataList[4])
216- let assetId58 = assetNameToBase58(assetName)
217- let setReservedBalance = decreaseReservedBalance(betAmt, assetName)
218- let drum1Int = rsaToInt(gameId, rsaSign1, rsaPublicKey1)
219- let drum2Int = rsaToInt(gameId, rsaSign2, rsaPublicKey2)
220- let drum3Int = rsaToInt(gameId, rsaSign3, rsaPublicKey3)
221- let twoInARow = (drum1[drum1Int] + drum2[drum2Int])
222- let threeInARow = (twoInARow + drum3[drum3Int])
223- let droppedElementsString = ((drumIntToString(drum1Int) + drumIntToString(drum2Int)) + drumIntToString(drum3Int))
224- let winAmt = ((betAmt * defineMultiplier(threeInARow, twoInARow)) / 10)
225- if ((gameState == stateAcc))
226- then if ((gameTimeFrame > (height - gameStart)))
227- then if ((winAmt == 0))
228- then {
229- let availableDividends = {
230- let dividends = (getCurrentIncome(assetName) + betAmt)
231- if ((dividends > 0))
232- then dividends
233- else 0
234- }
235- let income = {
236- let dividends = (getCurrentIncome(assetName) + betAmt)
237- if ((dividends > 0))
238- then 0
239- else dividends
240- }
241- ScriptResult(WriteSet([DataEntry((gameId + "_GameId"), ((((((((((((((stateLose + "_") + dataList[1]) + "_") + dataList[2]) + "_") + dataList[3]) + "_") + toString(height)) + "_") + toString(winAmt)) + "_") + threeInARow) + "_") + droppedElementsString)), DataEntry((assetName + "_Reserved"), setReservedBalance), DataEntry((assetName + "_Income"), income)]), TransferSet([ScriptTransfer(dividendProgramAddress, availableDividends, assetId58)]))
242- }
243- else ScriptResult(WriteSet([DataEntry((gameId + "_GameId"), ((((((((((((((stateWin + "_") + dataList[1]) + "_") + dataList[2]) + "_") + dataList[3]) + "_") + toString(height)) + "_") + toString(winAmt)) + "_") + threeInARow) + "_") + droppedElementsString)), DataEntry((assetName + "_Reserved"), setReservedBalance), DataEntry((assetName + "_Income"), (getCurrentIncome(assetName) - winAmt))]), TransferSet([ScriptTransfer(addressFromStringValue(playerAddress), winAmt, assetId58)]))
244- else ScriptResult(WriteSet([DataEntry((gameId + "_GameId"), ((((((((((((((stateTimeout + "_") + dataList[1]) + "_") + dataList[2]) + "_") + dataList[3]) + "_") + toString(height)) + "_") + toString((betAmt * 2))) + "_") + "000") + "_") + "000000")), DataEntry((assetName + "_Reserved"), setReservedBalance), DataEntry((assetName + "_Income"), (getCurrentIncome(assetName) - (betAmt * 2)))]), TransferSet([ScriptTransfer(addressFromStringValue(playerAddress), (betAmt * 2), assetId58)]))
245- else throw("Game state is incorrect")
246- }
247-
248-
249-
250-@Callable(i)
251-func withdrawDeposit (assetName) = {
252- let assetId58 = assetNameToBase58(assetName)
253- let callerPub = callerIsDepositOwner(assetName, toBase58String(i.callerPublicKey))
254- let dividendStartHeight = getDepositData(assetName, "_DepositStartBlock")
255- let depositDuration = getDepositData(assetName, "_DepositDurationBlock")
256- let depositAmount = getDepositData(assetName, "_DepositAmount")
257- if (((height - dividendStartHeight) >= depositDuration))
258- then ScriptResult(WriteSet([DataEntry((assetName + "_DepositWithdrawTransactionId"), i.transactionId)]), TransferSet([ScriptTransfer(addressFromPublicKey(fromBase58String(callerPub)), depositAmount, assetId58)]))
259- else throw((("Deposit time is not over. " + toString((height - (dividendStartHeight + depositDuration)))) + " blocks left."))
260220 }
261221
262222
263223 @Verifier(tx)
264224 func verify () = if (sigVerify(tx.bodyBytes, tx.proofs[0], gamePublicKey))
265225 then match tx {
266226 case tx: SetScriptTransaction =>
267227 true
268228 case _ =>
269229 false
270230 }
271231 else false
272232

github/deemru/w8io/169f3d6 
34.97 ms