w8 · tx · BaM···G3Q

tx · BaMHGgyYutk5LidMNg6G4uZh3bPp4Cyzjpe7yHU34G3Q

3N8M61KCm8G72mK8PjacFbnnxdbFsyqQDeT:  -0.01400000 Waves

2019.07.01 17:48 [566458] smart account 3N8M61KCm8G72mK8PjacFbnnxdbFsyqQDeT > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BaMHGgyYutk5LidMNg6G4uZh3bPp4Cyzjpe7yHU34G3Q",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1561992563194,
    "version": 1,
    "sender": "3N8M61KCm8G72mK8PjacFbnnxdbFsyqQDeT",
    "senderPublicKey": "Bhyvkx4xdbEi4KPJNZSzx9gZgzgyLEsavuj2kYSt7SST",
    "proofs": [
        "5C63osX3ouFtUwLAnynu3ndvp5mzwbDFXrDUNLUvAx71s1VsYTD9jECY4Xt13jSj7YwHueiaSjsdKyNGgGdmJ63t"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAAlAAAAAA9TZXJ2ZXJQdWJsaWNLZXkBAAAAIL79hxhmqWX34iA/RS9p36FY3qCJjLclClmAz4vj6GlBAAAAAA1TZXJ2ZXJBZGRyZXNzCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAECAAAAIzNNdThvS1NjV0N3UjMzWW9tVDV1a1U3M1A3akxyeVpUazRzAAAAABBSb3VsZXR0ZVNlY3Rpb25zAAAAAAAAAAAVAAAAABFEYXRhR2FtZU51bWJlcktleQIAAAALQVBQX0dBTUVfSUQAAAAADURhdGFBbW91bnRLZXkCAAAABkFNT1VOVAAAAAAORGF0YVNlY3Rpb25LZXkCAAAAB1NFQ1RJT04AAAAADURhdGFTdGF0dXNLZXkCAAAABlNUQVRVUwAAAAANRGF0YVJlc3VsdEtleQIAAAAGUkVTVUxUAAAAAA1EYXRhU3RhdHVzTmV3AgAAAANORVcAAAAADURhdGFTdGF0dXNXaW4CAAAAA1dJTgAAAAAPRGF0YVN0YXR1c0xvb3NlAgAAAAVMT09TRQAAAAAHV0FWRUxFVAkAAGgAAAACCQAAaAAAAAIAAAAAAAAAAGQAAAAAAAAAA+gAAAAAAAAAA+gAAAAACkNPTU1JU1NJT04JAABpAAAAAgkAAGgAAAACAAAAAAAAAAAFBQAAAAdXQVZFTEVUAAAAAAAAAAPoAAAAAARCRVQxCQAAaAAAAAIAAAAAAAAAAAEFAAAAB1dBVkVMRVQAAAAABEJFVDIJAABoAAAAAgAAAAAAAAAAAgUAAAAHV0FWRUxFVAAAAAAEQkVUNAkAAGgAAAACAAAAAAAAAAAEBQAAAAdXQVZFTEVUAAAAAARCRVQ4CQAAaAAAAAIAAAAAAAAAAAgFAAAAB1dBVkVMRVQAAAAABUJFVDE0CQAAaAAAAAIAAAAAAAAAAA4FAAAAB1dBVkVMRVQAAAAACFNlY3Rpb25zCQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgAAAAAAAAAAAgkABEwAAAACAAAAAAAAAAAUCQAETAAAAAIAAAAAAAAAAAIJAARMAAAAAgAAAAAAAAAABQkABEwAAAACAAAAAAAAAAACCQAETAAAAAIAAAAAAAAAAAoJAARMAAAAAgAAAAAAAAAAAgkABEwAAAACAAAAAAAAAAAGCQAETAAAAAIAAAAAAAAAAAIJAARMAAAAAgAAAAAAAAAABQkABEwAAAACAAAAAAAAAAACCQAETAAAAAIAAAAAAAAAAAYJAARMAAAAAgAAAAAAAAAAAgkABEwAAAACAAAAAAAAAAAFCQAETAAAAAIAAAAAAAAAAAIJAARMAAAAAgAAAAAAAAAACgkABEwAAAACAAAAAAAAAAACCQAETAAAAAIAAAAAAAAAAAUJAARMAAAAAgAAAAAAAAAAAgkABEwAAAACAAAAAAAAAAAGBQAAAANuaWwAAAAAFkVycm9yT25seVdhdmVzQWNjZXB0ZWQCAAAAE09ubHkgd2F2ZXMgYWNjZXB0ZWQAAAAAFUVycm9yTXVzdEdyZWF0ZXJUaGFuMAIAAAAlUGFyYW1ldGVyIHNpemUgbXVzdCBiZSBncmVhdGVyIHRoYW4gMAAAAAAURXJyb3JNdXN0TGVzc1RoYW4xMDACAAAAJFBhcmFtZXRlciBzaXplIG11c3QgYmUgbGVzcyB0aGFuIDEwMAAAAAAVRXJyb3JCZXRNdXN0QmVJbldhdmVzAgAAABtCZXQgYW1vdW50IG11c3QgYmUgaW4gV2F2ZXMAAAAAHUVycm9yVHJhbnNhY3Rpb25NdXN0QmVJbldhdmVzAgAAACJUcmFuc2FjdGlvbidzIGZlZSBtdXN0IGJlIGluIFdhdmVzAAAAABRFcnJvclRyYW5zYWN0aW9uVXNlZAIAAAAvUGFzc2VkIHR4SWQgaGFkIGJlZW4gdXNlZCBiZWZvcmUuIEdhbWUgYWJvcnRlZC4AAAAAEEVycm9yS2V5Tm90Rm91bmQCAAAAD0tleSBub3QgZm91bmQ6IAAAAAANRXJyb3JHYW1lT3ZlcgIAAAAUR2FtZSBhbHJlYWR5IGlzIG92ZXIAAAAAG0Vycm9ySW5jb3JyZWN0U2VjdGlvblJlc3VsdAIAAAAYSW5jb3JyZWN0IHNlY3Rpb24gcmVzdWx0AAAAABhFcnJvckJldEFtb3VudE5vdEluUmFuZ2UCAAAAGkJldCBhbW91bnQgaXMgbm90IGluIHJhbmdlAQAAAAlTdG9yZURhdGEAAAADAAAADXRyYW5zYWN0aW9uSWQAAAADa2V5AAAABXZhbHVlCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIFAAAADXRyYW5zYWN0aW9uSWQCAAAAAV8FAAAAA2tleQUAAAAFdmFsdWUBAAAADFN0b3JlRGF0YUludAAAAAMAAAANdHJhbnNhY3Rpb25JZAAAAANrZXkAAAAFdmFsdWUJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgUAAAANdHJhbnNhY3Rpb25JZAIAAAABXwUAAAADa2V5BQAAAAV2YWx1ZQEAAAANR2V0RGF0YVN0cmluZwAAAAIAAAANdHJhbnNhY3Rpb25JZAAAAANrZXkEAAAAB2Z1bGxLZXkJAAEsAAAAAgkAASwAAAACBQAAAA10cmFuc2FjdGlvbklkAgAAAAFfBQAAAANrZXkEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwUAAAAHZnVsbEtleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAANzdHIFAAAAByRtYXRjaDAFAAAAA3N0cgkAAAIAAAABCQABLAAAAAIFAAAAEEVycm9yS2V5Tm90Rm91bmQFAAAAB2Z1bGxLZXkBAAAACkdldERhdGFJbnQAAAACAAAADXRyYW5zYWN0aW9uSWQAAAADa2V5BAAAAAdmdWxsS2V5CQABLAAAAAIJAAEsAAAAAgUAAAANdHJhbnNhY3Rpb25JZAIAAAABXwUAAAADa2V5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAB2Z1bGxLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAADc3RyBQAAAAckbWF0Y2gwBQAAAANzdHIJAAACAAAAAQkAASwAAAACBQAAABBFcnJvcktleU5vdEZvdW5kBQAAAAdmdWxsS2V5AQAAAAlOZXdHYW1lSWQAAAAABAAAAAdnYW1lTnVtBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAEURhdGFHYW1lTnVtYmVyS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAA251bQUAAAAHJG1hdGNoMAUAAAADbnVtAAAAAAAAAAAACQAAZAAAAAIFAAAAB2dhbWVOdW0AAAAAAAAAAAEBAAAAD0dlbmVyYXRlUmFuZEludAAAAAIAAAAGZ2FtZUlkAAAAB3JzYVNpZ24EAAAAC3JzYVNpZ1ZhbGlkCQAB9AAAAAMJAAJZAAAAAQUAAAAGZ2FtZUlkCQACWQAAAAEFAAAAB3JzYVNpZ24FAAAAD1NlcnZlclB1YmxpY0tleQMFAAAAC3JzYVNpZ1ZhbGlkBAAAAARyYW5kCQAAagAAAAIJAASxAAAAAQkAAfcAAAABCQABmwAAAAEFAAAAB3JzYVNpZ24FAAAAEFJvdWxldHRlU2VjdGlvbnMDCQAAZgAAAAIAAAAAAAAAAAAFAAAABHJhbmQJAABoAAAAAgD//////////wUAAAAEcmFuZAUAAAAEcmFuZAkAAAIAAAABAgAAABVJbnZhbGlkIFJTQSBzaWduYXR1cmUBAAAACUdldFN0YXR1cwAAAAEAAAAGcmVzdWx0AwUAAAAGcmVzdWx0BQAAAA1EYXRhU3RhdHVzV2luBQAAAA9EYXRhU3RhdHVzTG9vc2UBAAAADlZhbGlkYXRlQW1vdW50AAAAAQAAAAZiZXRBbXQEAAAAC2JldEFtdFZhbGlkAwMDAwkAAAAAAAACBQAAAAZiZXRBbXQJAABkAAAAAgUAAAAEQkVUMQUAAAAKQ09NTUlTU0lPTgYJAAAAAAAAAgUAAAAGYmV0QW10CQAAZAAAAAIFAAAABEJFVDIFAAAACkNPTU1JU1NJT04GCQAAAAAAAAIFAAAABmJldEFtdAkAAGQAAAACBQAAAARCRVQ0BQAAAApDT01NSVNTSU9OBgkAAAAAAAACBQAAAAZiZXRBbXQJAABkAAAAAgUAAAAEQkVUOAUAAAAKQ09NTUlTU0lPTgYJAAAAAAAAAgUAAAAGYmV0QW10CQAAZAAAAAIFAAAABUJFVDE0BQAAAApDT01NSVNTSU9OAwUAAAALYmV0QW10VmFsaWQJAAACAAAAAQIAAAAFb2sgb2sJAAACAAAAAQIAAAAJbm90IG9rb2tvAAAAAgAAAAFpAQAAAANiZXQAAAABAAAADmV4cGVjdGVkUmVzdWx0BAAAABFpc0luY29ycmVjdFJlc3VsdAMJAABnAAAAAgAAAAAAAAAAAAUAAAAOZXhwZWN0ZWRSZXN1bHQGCQAAZgAAAAIFAAAADmV4cGVjdGVkUmVzdWx0AAAAAAAAAAAUBAAAAApnYW1lTnVtYmVyCQEAAAAJTmV3R2FtZUlkAAAAAAQAAAARZ2FtZVRyYW5zYWN0aW9uSWQJAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAQAAAAHYWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAQAAAAIdHhJZFVzZWQJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABHRoaXMFAAAAEWdhbWVUcmFuc2FjdGlvbklkBAAAAA1iZXROb3RJbldhdmVzCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkBAAAAA1mZWVOb3RJbldhdmVzCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkBAAAAAZhbW91bnQIBQAAAANwbXQAAAAGYW1vdW50BAAAAAZ3aW5BbXQJAQAAAA5WYWxpZGF0ZUFtb3VudAAAAAEIBQAAAANwbXQAAAAGYW1vdW50AwMFAAAAEWlzSW5jb3JyZWN0UmVzdWx0BgUAAAAGd2luQW10CQAAAgAAAAEFAAAAG0Vycm9ySW5jb3JyZWN0U2VjdGlvblJlc3VsdAMFAAAADWJldE5vdEluV2F2ZXMJAAACAAAAAQUAAAAVRXJyb3JCZXRNdXN0QmVJbldhdmVzAwUAAAANZmVlTm90SW5XYXZlcwkAAAIAAAABBQAAAB1FcnJvclRyYW5zYWN0aW9uTXVzdEJlSW5XYXZlcwMFAAAACHR4SWRVc2VkCQAAAgAAAAEFAAAAFEVycm9yVHJhbnNhY3Rpb25Vc2VkCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAARZ2FtZVRyYW5zYWN0aW9uSWQFAAAAB2FkZHJlc3MJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAAEURhdGFHYW1lTnVtYmVyS2V5BQAAAApnYW1lTnVtYmVyCQAETAAAAAIJAQAAAAxTdG9yZURhdGFJbnQAAAADBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAANRGF0YUFtb3VudEtleQUAAAAGYW1vdW50CQAETAAAAAIJAQAAAAxTdG9yZURhdGFJbnQAAAADBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAAORGF0YVNlY3Rpb25LZXkFAAAADmV4cGVjdGVkUmVzdWx0CQAETAAAAAIJAQAAAAlTdG9yZURhdGEAAAADBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAANRGF0YVN0YXR1c0tleQUAAAANRGF0YVN0YXR1c05ldwUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAADVNlcnZlckFkZHJlc3MFAAAACkNPTU1JU1NJT04FAAAABHVuaXQFAAAAA25pbAAAAAFpAQAAAAZyZXN1bHQAAAACAAAAEWdhbWVUcmFuc2FjdGlvbklkAAAAA3JzYQQAAAAEcmFuZAkBAAAAD0dlbmVyYXRlUmFuZEludAAAAAIFAAAAEWdhbWVUcmFuc2FjdGlvbklkBQAAAANyc2EEAAAAD3NlbGVjdGVkU2VjdGlvbgkBAAAACkdldERhdGFJbnQAAAACBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAAORGF0YVNlY3Rpb25LZXkEAAAABnN0YXR1cwkBAAAADUdldERhdGFTdHJpbmcAAAACBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAANRGF0YVN0YXR1c0tleQMJAAAAAAAAAgUAAAAGc3RhdHVzBQAAAA1EYXRhU3RhdHVzTmV3BAAAAAVpc1dpbgkAAAAAAAACBQAAAARyYW5kBQAAAA9zZWxlY3RlZFNlY3Rpb24EAAAACHdyaXRlU2V0CQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlTdG9yZURhdGEAAAADBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAANRGF0YVN0YXR1c0tleQkBAAAACUdldFN0YXR1cwAAAAEFAAAABWlzV2luCQAETAAAAAIJAQAAAAxTdG9yZURhdGFJbnQAAAADBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAANRGF0YVJlc3VsdEtleQUAAAAEcmFuZAUAAAADbmlsAwUAAAAFaXNXaW4JAQAAAAxTY3JpcHRSZXN1bHQAAAACBQAAAAh3cml0ZVNldAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAA1TZXJ2ZXJBZGRyZXNzBQAAAApDT01NSVNTSU9OBQAAAAR1bml0BQAAAANuaWwFAAAACHdyaXRlU2V0CQAAAgAAAAEJAAEsAAAAAgUAAAANRXJyb3JHYW1lT3ZlcgUAAAAGc3RhdHVzAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAMJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5BAAAAAckbWF0Y2gwBQAAAAJ0eAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAAAAA3N0eAUAAAAHJG1hdGNoMAYHBwpUYDY=",
    "chainId": 84,
    "height": 566458,
    "spentComplexity": 0
}

View: original | compacted
Prev: 2CZ7UFXYCrbK4y5hjcr5eUcotxt42ci8foTcBbXDQf7H
Next: DYJDQozRVgGREyCMJgLw9Ac4hK9ji5tsjw3quXw6PVti

Diff: 
Old New Differences
146 146      let feeNotInWaves = isDefined(pmt.assetId)
147 147      let amount = pmt.amount
148 148      let winAmt = ValidateAmount(pmt.amount)
149 -     if (isIncorrectResult)
149 +     if (if (isIncorrectResult)
150 +         then true
151 +         else winAmt)
150 152          then throw(ErrorIncorrectSectionResult)
151 153          else if (betNotInWaves)
152 154              then throw(ErrorBetMustBeInWaves)
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let ServerPublicKey = base58'DrYgfD7j6AKD1iXtn9uhMka95ATZB42B1kGKCUATP2UG'
5 5  
6 6  let ServerAddress = addressFromStringValue("3Mu8oKScWCwR33YomT5ukU73P7jLryZTk4s")
7 7  
8 8  let RouletteSections = 21
9 9  
10 10  let DataGameNumberKey = "APP_GAME_ID"
11 11  
12 12  let DataAmountKey = "AMOUNT"
13 13  
14 14  let DataSectionKey = "SECTION"
15 15  
16 16  let DataStatusKey = "STATUS"
17 17  
18 18  let DataResultKey = "RESULT"
19 19  
20 20  let DataStatusNew = "NEW"
21 21  
22 22  let DataStatusWin = "WIN"
23 23  
24 24  let DataStatusLoose = "LOOSE"
25 25  
26 26  let WAVELET = ((100 * 1000) * 1000)
27 27  
28 28  let COMMISSION = ((5 * WAVELET) / 1000)
29 29  
30 30  let BET1 = (1 * WAVELET)
31 31  
32 32  let BET2 = (2 * WAVELET)
33 33  
34 34  let BET4 = (4 * WAVELET)
35 35  
36 36  let BET8 = (8 * WAVELET)
37 37  
38 38  let BET14 = (14 * WAVELET)
39 39  
40 40  let Sections = [0, 2, 20, 2, 5, 2, 10, 2, 6, 2, 5, 2, 6, 2, 5, 2, 10, 2, 5, 2, 6]
41 41  
42 42  let ErrorOnlyWavesAccepted = "Only waves accepted"
43 43  
44 44  let ErrorMustGreaterThan0 = "Parameter size must be greater than 0"
45 45  
46 46  let ErrorMustLessThan100 = "Parameter size must be less than 100"
47 47  
48 48  let ErrorBetMustBeInWaves = "Bet amount must be in Waves"
49 49  
50 50  let ErrorTransactionMustBeInWaves = "Transaction's fee must be in Waves"
51 51  
52 52  let ErrorTransactionUsed = "Passed txId had been used before. Game aborted."
53 53  
54 54  let ErrorKeyNotFound = "Key not found: "
55 55  
56 56  let ErrorGameOver = "Game already is over"
57 57  
58 58  let ErrorIncorrectSectionResult = "Incorrect section result"
59 59  
60 60  let ErrorBetAmountNotInRange = "Bet amount is not in range"
61 61  
62 62  func StoreData (transactionId,key,value) = DataEntry(((transactionId + "_") + key), value)
63 63  
64 64  
65 65  func StoreDataInt (transactionId,key,value) = DataEntry(((transactionId + "_") + key), value)
66 66  
67 67  
68 68  func GetDataString (transactionId,key) = {
69 69      let fullKey = ((transactionId + "_") + key)
70 70      match getString(this, fullKey) {
71 71          case str: String => 
72 72              str
73 73          case _ => 
74 74              throw((ErrorKeyNotFound + fullKey))
75 75      }
76 76      }
77 77  
78 78  
79 79  func GetDataInt (transactionId,key) = {
80 80      let fullKey = ((transactionId + "_") + key)
81 81      match getInteger(this, fullKey) {
82 82          case str: Int => 
83 83              str
84 84          case _ => 
85 85              throw((ErrorKeyNotFound + fullKey))
86 86      }
87 87      }
88 88  
89 89  
90 90  func NewGameId () = {
91 91      let gameNum =     match getInteger(this, DataGameNumberKey) {
92 92          case num: Int => 
93 93              num
94 94          case _ => 
95 95              0
96 96      }
97 97      (gameNum + 1)
98 98      }
99 99  
100 100  
101 101  func GenerateRandInt (gameId,rsaSign) = {
102 102      let rsaSigValid = sigVerify(fromBase58String(gameId), fromBase58String(rsaSign), ServerPublicKey)
103 103      if (rsaSigValid)
104 104          then {
105 105              let rand = (toInt(sha256(toBytes(rsaSign))) % RouletteSections)
106 106              if ((0 > rand))
107 107                  then (-1 * rand)
108 108                  else rand
109 109              }
110 110          else throw("Invalid RSA signature")
111 111      }
112 112  
113 113  
114 114  func GetStatus (result) = if (result)
115 115      then DataStatusWin
116 116      else DataStatusLoose
117 117  
118 118  
119 119  func ValidateAmount (betAmt) = {
120 120      let betAmtValid = if (if (if (if ((betAmt == (BET1 + COMMISSION)))
121 121          then true
122 122          else (betAmt == (BET2 + COMMISSION)))
123 123          then true
124 124          else (betAmt == (BET4 + COMMISSION)))
125 125          then true
126 126          else (betAmt == (BET8 + COMMISSION)))
127 127          then true
128 128          else (betAmt == (BET14 + COMMISSION))
129 129      if (betAmtValid)
130 130          then throw("ok ok")
131 131          else throw("not okoko")
132 132      }
133 133  
134 134  
135 135  @Callable(i)
136 136  func bet (expectedResult) = {
137 137      let isIncorrectResult = if ((0 >= expectedResult))
138 138          then true
139 139          else (expectedResult > 20)
140 140      let gameNumber = NewGameId()
141 141      let gameTransactionId = toBase58String(i.transactionId)
142 142      let address = toBase58String(i.caller.bytes)
143 143      let pmt = extract(i.payment)
144 144      let txIdUsed = isDefined(getString(this, gameTransactionId))
145 145      let betNotInWaves = isDefined(pmt.assetId)
146 146      let feeNotInWaves = isDefined(pmt.assetId)
147 147      let amount = pmt.amount
148 148      let winAmt = ValidateAmount(pmt.amount)
149 -     if (isIncorrectResult)
149 +     if (if (isIncorrectResult)
150 +         then true
151 +         else winAmt)
150 152          then throw(ErrorIncorrectSectionResult)
151 153          else if (betNotInWaves)
152 154              then throw(ErrorBetMustBeInWaves)
153 155              else if (feeNotInWaves)
154 156                  then throw(ErrorTransactionMustBeInWaves)
155 157                  else if (txIdUsed)
156 158                      then throw(ErrorTransactionUsed)
157 159                      else ScriptResult(WriteSet([DataEntry(gameTransactionId, address), DataEntry(DataGameNumberKey, gameNumber), StoreDataInt(gameTransactionId, DataAmountKey, amount), StoreDataInt(gameTransactionId, DataSectionKey, expectedResult), StoreData(gameTransactionId, DataStatusKey, DataStatusNew)]), TransferSet([ScriptTransfer(ServerAddress, COMMISSION, unit)]))
158 160      }
159 161  
160 162  
161 163  
162 164  @Callable(i)
163 165  func result (gameTransactionId,rsa) = {
164 166      let rand = GenerateRandInt(gameTransactionId, rsa)
165 167      let selectedSection = GetDataInt(gameTransactionId, DataSectionKey)
166 168      let status = GetDataString(gameTransactionId, DataStatusKey)
167 169      if ((status == DataStatusNew))
168 170          then {
169 171              let isWin = (rand == selectedSection)
170 172              let writeSet = WriteSet([StoreData(gameTransactionId, DataStatusKey, GetStatus(isWin)), StoreDataInt(gameTransactionId, DataResultKey, rand)])
171 173              if (isWin)
172 174                  then ScriptResult(writeSet, TransferSet([ScriptTransfer(ServerAddress, COMMISSION, unit)]))
173 175                  else writeSet
174 176              }
175 177          else throw((ErrorGameOver + status))
176 178      }
177 179  
178 180  
179 181  @Verifier(tx)
180 182  func verify () = if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
181 183      then     match tx {
182 184          case stx: SetScriptTransaction => 
183 185              true
184 186          case _ => 
185 187              false
186 188      }
187 189      else false
188 190

Old	New		Differences
146	146		let feeNotInWaves = isDefined(pmt.assetId)
147	147		let amount = pmt.amount
148	148		let winAmt = ValidateAmount(pmt.amount)
149		-	if (isIncorrectResult)
	149	+	if (if (isIncorrectResult)
	150	+	then true
	151	+	else winAmt)
150	152		then throw(ErrorIncorrectSectionResult)
151	153		else if (betNotInWaves)
152	154		then throw(ErrorBetMustBeInWaves)

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let ServerPublicKey = base58'DrYgfD7j6AKD1iXtn9uhMka95ATZB42B1kGKCUATP2UG'
5	5
6	6		let ServerAddress = addressFromStringValue("3Mu8oKScWCwR33YomT5ukU73P7jLryZTk4s")
7	7
8	8		let RouletteSections = 21
9	9
10	10		let DataGameNumberKey = "APP_GAME_ID"
11	11
12	12		let DataAmountKey = "AMOUNT"
13	13
14	14		let DataSectionKey = "SECTION"
15	15
16	16		let DataStatusKey = "STATUS"
17	17
18	18		let DataResultKey = "RESULT"
19	19
20	20		let DataStatusNew = "NEW"
21	21
22	22		let DataStatusWin = "WIN"
23	23
24	24		let DataStatusLoose = "LOOSE"
25	25
26	26		let WAVELET = ((100 * 1000) * 1000)
27	27
28	28		let COMMISSION = ((5 * WAVELET) / 1000)
29	29
30	30		let BET1 = (1 * WAVELET)
31	31
32	32		let BET2 = (2 * WAVELET)
33	33
34	34		let BET4 = (4 * WAVELET)
35	35
36	36		let BET8 = (8 * WAVELET)
37	37
38	38		let BET14 = (14 * WAVELET)
39	39
40	40		let Sections = [0, 2, 20, 2, 5, 2, 10, 2, 6, 2, 5, 2, 6, 2, 5, 2, 10, 2, 5, 2, 6]
41	41
42	42		let ErrorOnlyWavesAccepted = "Only waves accepted"
43	43
44	44		let ErrorMustGreaterThan0 = "Parameter size must be greater than 0"
45	45
46	46		let ErrorMustLessThan100 = "Parameter size must be less than 100"
47	47
48	48		let ErrorBetMustBeInWaves = "Bet amount must be in Waves"
49	49
50	50		let ErrorTransactionMustBeInWaves = "Transaction's fee must be in Waves"
51	51
52	52		let ErrorTransactionUsed = "Passed txId had been used before. Game aborted."
53	53
54	54		let ErrorKeyNotFound = "Key not found: "
55	55
56	56		let ErrorGameOver = "Game already is over"
57	57
58	58		let ErrorIncorrectSectionResult = "Incorrect section result"
59	59
60	60		let ErrorBetAmountNotInRange = "Bet amount is not in range"
61	61
62	62		func StoreData (transactionId,key,value) = DataEntry(((transactionId + "_") + key), value)
63	63
64	64
65	65		func StoreDataInt (transactionId,key,value) = DataEntry(((transactionId + "_") + key), value)
66	66
67	67
68	68		func GetDataString (transactionId,key) = {
69	69		let fullKey = ((transactionId + "_") + key)
70	70		match getString(this, fullKey) {
71	71		case str: String =>
72	72		str
73	73		case _ =>
74	74		throw((ErrorKeyNotFound + fullKey))
75	75		}
76	76		}
77	77
78	78
79	79		func GetDataInt (transactionId,key) = {
80	80		let fullKey = ((transactionId + "_") + key)
81	81		match getInteger(this, fullKey) {
82	82		case str: Int =>
83	83		str
84	84		case _ =>
85	85		throw((ErrorKeyNotFound + fullKey))
86	86		}
87	87		}
88	88
89	89
90	90		func NewGameId () = {
91	91		let gameNum = match getInteger(this, DataGameNumberKey) {
92	92		case num: Int =>
93	93		num
94	94		case _ =>
95	95		0
96	96		}
97	97		(gameNum + 1)
98	98		}
99	99
100	100
101	101		func GenerateRandInt (gameId,rsaSign) = {
102	102		let rsaSigValid = sigVerify(fromBase58String(gameId), fromBase58String(rsaSign), ServerPublicKey)
103	103		if (rsaSigValid)
104	104		then {
105	105		let rand = (toInt(sha256(toBytes(rsaSign))) % RouletteSections)
106	106		if ((0 > rand))
107	107		then (-1 * rand)
108	108		else rand
109	109		}
110	110		else throw("Invalid RSA signature")
111	111		}
112	112
113	113
114	114		func GetStatus (result) = if (result)
115	115		then DataStatusWin
116	116		else DataStatusLoose
117	117
118	118
119	119		func ValidateAmount (betAmt) = {
120	120		let betAmtValid = if (if (if (if ((betAmt == (BET1 + COMMISSION)))
121	121		then true
122	122		else (betAmt == (BET2 + COMMISSION)))
123	123		then true
124	124		else (betAmt == (BET4 + COMMISSION)))
125	125		then true
126	126		else (betAmt == (BET8 + COMMISSION)))
127	127		then true
128	128		else (betAmt == (BET14 + COMMISSION))
129	129		if (betAmtValid)
130	130		then throw("ok ok")
131	131		else throw("not okoko")
132	132		}
133	133
134	134
135	135		@Callable(i)
136	136		func bet (expectedResult) = {
137	137		let isIncorrectResult = if ((0 >= expectedResult))
138	138		then true
139	139		else (expectedResult > 20)
140	140		let gameNumber = NewGameId()
141	141		let gameTransactionId = toBase58String(i.transactionId)
142	142		let address = toBase58String(i.caller.bytes)
143	143		let pmt = extract(i.payment)
144	144		let txIdUsed = isDefined(getString(this, gameTransactionId))
145	145		let betNotInWaves = isDefined(pmt.assetId)
146	146		let feeNotInWaves = isDefined(pmt.assetId)
147	147		let amount = pmt.amount
148	148		let winAmt = ValidateAmount(pmt.amount)
149		-	if (isIncorrectResult)
	149	+	if (if (isIncorrectResult)
	150	+	then true
	151	+	else winAmt)
150	152		then throw(ErrorIncorrectSectionResult)
151	153		else if (betNotInWaves)
152	154		then throw(ErrorBetMustBeInWaves)
153	155		else if (feeNotInWaves)
154	156		then throw(ErrorTransactionMustBeInWaves)
155	157		else if (txIdUsed)
156	158		then throw(ErrorTransactionUsed)
157	159		else ScriptResult(WriteSet([DataEntry(gameTransactionId, address), DataEntry(DataGameNumberKey, gameNumber), StoreDataInt(gameTransactionId, DataAmountKey, amount), StoreDataInt(gameTransactionId, DataSectionKey, expectedResult), StoreData(gameTransactionId, DataStatusKey, DataStatusNew)]), TransferSet([ScriptTransfer(ServerAddress, COMMISSION, unit)]))
158	160		}
159	161
160	162
161	163
162	164		@Callable(i)
163	165		func result (gameTransactionId,rsa) = {
164	166		let rand = GenerateRandInt(gameTransactionId, rsa)
165	167		let selectedSection = GetDataInt(gameTransactionId, DataSectionKey)
166	168		let status = GetDataString(gameTransactionId, DataStatusKey)
167	169		if ((status == DataStatusNew))
168	170		then {
169	171		let isWin = (rand == selectedSection)
170	172		let writeSet = WriteSet([StoreData(gameTransactionId, DataStatusKey, GetStatus(isWin)), StoreDataInt(gameTransactionId, DataResultKey, rand)])
171	173		if (isWin)
172	174		then ScriptResult(writeSet, TransferSet([ScriptTransfer(ServerAddress, COMMISSION, unit)]))
173	175		else writeSet
174	176		}
175	177		else throw((ErrorGameOver + status))
176	178		}
177	179
178	180
179	181		@Verifier(tx)
180	182		func verify () = if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
181	183		then match tx {
182	184		case stx: SetScriptTransaction =>
183	185		true
184	186		case _ =>
185	187		false
186	188		}
187	189		else false
188	190

github/deemru/w8io/169f3d6 
61.79 ms ◑