w8 · tx · DMy···WM5

tx · DMyUSMcfdFyiN2L3Kt2jfbpWHJY2dv41CcPNir6gtWM5

3N8M61KCm8G72mK8PjacFbnnxdbFsyqQDeT:  -0.01400000 Waves

2019.07.01 14:54 [566282] smart account 3N8M61KCm8G72mK8PjacFbnnxdbFsyqQDeT > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DMyUSMcfdFyiN2L3Kt2jfbpWHJY2dv41CcPNir6gtWM5",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1561982069952,
    "version": 1,
    "sender": "3N8M61KCm8G72mK8PjacFbnnxdbFsyqQDeT",
    "senderPublicKey": "Bhyvkx4xdbEi4KPJNZSzx9gZgzgyLEsavuj2kYSt7SST",
    "proofs": [
        "yDTxqsBQZU68NKFQB8p6G8E8Kp58FghFRr4QYbnNQHjUB7evjeD8AyXedPyuwCWpDVfoCfQSrGjFT481jVF8rtQ"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAAlAAAAAA9TZXJ2ZXJQdWJsaWNLZXkBAAAAIL79hxhmqWX34iA/RS9p36FY3qCJjLclClmAz4vj6GlBAAAAAA1TZXJ2ZXJBZGRyZXNzCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAECAAAAIzNNdThvS1NjV0N3UjMzWW9tVDV1a1U3M1A3akxyeVpUazRzAAAAABBSb3VsZXR0ZVNlY3Rpb25zAAAAAAAAAAAVAAAAABFEYXRhR2FtZU51bWJlcktleQIAAAALQVBQX0dBTUVfSUQAAAAADURhdGFBbW91bnRLZXkCAAAABkFNT1VOVAAAAAAORGF0YVNlY3Rpb25LZXkCAAAAB1NFQ1RJT04AAAAADURhdGFTdGF0dXNLZXkCAAAABlNUQVRVUwAAAAANRGF0YVJlc3VsdEtleQIAAAAGUkVTVUxUAAAAAA1EYXRhU3RhdHVzTmV3AgAAAANORVcAAAAADURhdGFTdGF0dXNXaW4CAAAAA1dJTgAAAAAPRGF0YVN0YXR1c0xvb3NlAgAAAAVMT09TRQAAAAAHV0FWRUxFVAkAAGgAAAACCQAAaAAAAAIAAAAAAAAAAGQAAAAAAAAAA+gAAAAAAAAAA+gAAAAACkNPTU1JU1NJT04JAABpAAAAAgkAAGgAAAACAAAAAAAAAAAFBQAAAAdXQVZFTEVUAAAAAAAAAAPoAAAAAARCRVQxCQAAaAAAAAIAAAAAAAAAAAEFAAAAB1dBVkVMRVQAAAAABEJFVDIJAABoAAAAAgAAAAAAAAAAAgUAAAAHV0FWRUxFVAAAAAAEQkVUNAkAAGgAAAACAAAAAAAAAAAEBQAAAAdXQVZFTEVUAAAAAARCRVQ4CQAAaAAAAAIAAAAAAAAAAAgFAAAAB1dBVkVMRVQAAAAABUJFVDE0CQAAaAAAAAIAAAAAAAAAAA4FAAAAB1dBVkVMRVQAAAAACFNlY3Rpb25zCQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgAAAAAAAAAAAgkABEwAAAACAAAAAAAAAAAUCQAETAAAAAIAAAAAAAAAAAIJAARMAAAAAgAAAAAAAAAABQkABEwAAAACAAAAAAAAAAACCQAETAAAAAIAAAAAAAAAAAoJAARMAAAAAgAAAAAAAAAAAgkABEwAAAACAAAAAAAAAAAGCQAETAAAAAIAAAAAAAAAAAIJAARMAAAAAgAAAAAAAAAABQkABEwAAAACAAAAAAAAAAACCQAETAAAAAIAAAAAAAAAAAYJAARMAAAAAgAAAAAAAAAAAgkABEwAAAACAAAAAAAAAAAFCQAETAAAAAIAAAAAAAAAAAIJAARMAAAAAgAAAAAAAAAACgkABEwAAAACAAAAAAAAAAACCQAETAAAAAIAAAAAAAAAAAUJAARMAAAAAgAAAAAAAAAAAgkABEwAAAACAAAAAAAAAAAGBQAAAANuaWwAAAAAFkVycm9yT25seVdhdmVzQWNjZXB0ZWQCAAAAE09ubHkgd2F2ZXMgYWNjZXB0ZWQAAAAAFUVycm9yTXVzdEdyZWF0ZXJUaGFuMAIAAAAlUGFyYW1ldGVyIHNpemUgbXVzdCBiZSBncmVhdGVyIHRoYW4gMAAAAAAURXJyb3JNdXN0TGVzc1RoYW4xMDACAAAAJFBhcmFtZXRlciBzaXplIG11c3QgYmUgbGVzcyB0aGFuIDEwMAAAAAAVRXJyb3JCZXRNdXN0QmVJbldhdmVzAgAAABtCZXQgYW1vdW50IG11c3QgYmUgaW4gV2F2ZXMAAAAAHUVycm9yVHJhbnNhY3Rpb25NdXN0QmVJbldhdmVzAgAAACJUcmFuc2FjdGlvbidzIGZlZSBtdXN0IGJlIGluIFdhdmVzAAAAABRFcnJvclRyYW5zYWN0aW9uVXNlZAIAAAAvUGFzc2VkIHR4SWQgaGFkIGJlZW4gdXNlZCBiZWZvcmUuIEdhbWUgYWJvcnRlZC4AAAAAEEVycm9yS2V5Tm90Rm91bmQCAAAAD0tleSBub3QgZm91bmQ6IAAAAAANRXJyb3JHYW1lT3ZlcgIAAAAUR2FtZSBhbHJlYWR5IGlzIG92ZXIAAAAAG0Vycm9ySW5jb3JyZWN0U2VjdGlvblJlc3VsdAIAAAAYSW5jb3JyZWN0IHNlY3Rpb24gcmVzdWx0AAAAABhFcnJvckJldEFtb3VudE5vdEluUmFuZ2UCAAAAGkJldCBhbW91bnQgaXMgbm90IGluIHJhbmdlAQAAAAlTdG9yZURhdGEAAAADAAAADXRyYW5zYWN0aW9uSWQAAAADa2V5AAAABXZhbHVlCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIFAAAADXRyYW5zYWN0aW9uSWQCAAAAAV8FAAAAA2tleQUAAAAFdmFsdWUBAAAADFN0b3JlRGF0YUludAAAAAMAAAANdHJhbnNhY3Rpb25JZAAAAANrZXkAAAAFdmFsdWUJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgUAAAANdHJhbnNhY3Rpb25JZAIAAAABXwUAAAADa2V5BQAAAAV2YWx1ZQEAAAANR2V0RGF0YVN0cmluZwAAAAIAAAANdHJhbnNhY3Rpb25JZAAAAANrZXkEAAAAB2Z1bGxLZXkJAAEsAAAAAgkAASwAAAACBQAAAA10cmFuc2FjdGlvbklkAgAAAAFfBQAAAANrZXkEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwUAAAAHZnVsbEtleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAANzdHIFAAAAByRtYXRjaDAFAAAAA3N0cgkAAAIAAAABCQABLAAAAAIFAAAAEEVycm9yS2V5Tm90Rm91bmQFAAAAB2Z1bGxLZXkBAAAACkdldERhdGFJbnQAAAACAAAADXRyYW5zYWN0aW9uSWQAAAADa2V5BAAAAAdmdWxsS2V5CQABLAAAAAIJAAEsAAAAAgUAAAANdHJhbnNhY3Rpb25JZAIAAAABXwUAAAADa2V5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAB2Z1bGxLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAADc3RyBQAAAAckbWF0Y2gwBQAAAANzdHIJAAACAAAAAQkAASwAAAACBQAAABBFcnJvcktleU5vdEZvdW5kBQAAAAdmdWxsS2V5AQAAAAlOZXdHYW1lSWQAAAAABAAAAAdnYW1lTnVtBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAEURhdGFHYW1lTnVtYmVyS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAA251bQUAAAAHJG1hdGNoMAUAAAADbnVtAAAAAAAAAAAACQAAZAAAAAIFAAAAB2dhbWVOdW0AAAAAAAAAAAEBAAAAD0dlbmVyYXRlUmFuZEludAAAAAIAAAAGZ2FtZUlkAAAAB3JzYVNpZ24EAAAAC3JzYVNpZ1ZhbGlkCQAB9AAAAAMJAAJZAAAAAQUAAAAGZ2FtZUlkCQACWQAAAAEFAAAAB3JzYVNpZ24FAAAAD1NlcnZlclB1YmxpY0tleQMFAAAAC3JzYVNpZ1ZhbGlkBAAAAARyYW5kCQAAagAAAAIJAASxAAAAAQkAAfcAAAABCQABmwAAAAEFAAAAB3JzYVNpZ24FAAAAEFJvdWxldHRlU2VjdGlvbnMDCQAAZgAAAAIAAAAAAAAAAAAFAAAABHJhbmQJAABoAAAAAgD//////////wUAAAAEcmFuZAUAAAAEcmFuZAkAAAIAAAABAgAAABVJbnZhbGlkIFJTQSBzaWduYXR1cmUBAAAACUdldFN0YXR1cwAAAAEAAAAGcmVzdWx0AwUAAAAGcmVzdWx0BQAAAA1EYXRhU3RhdHVzV2luBQAAAA9EYXRhU3RhdHVzTG9vc2UBAAAADlZhbGlkYXRlQW1vdW50AAAAAQAAAAZiZXRBbXQEAAAAC2JldEFtdFZhbGlkAwMDAwkAAAAAAAACBQAAAAZiZXRBbXQJAABkAAAAAgUAAAAEQkVUMQUAAAAKQ09NTUlTU0lPTgYJAAAAAAAAAgUAAAAGYmV0QW10CQAAZAAAAAIFAAAABEJFVDIFAAAACkNPTU1JU1NJT04GCQAAAAAAAAIFAAAABmJldEFtdAkAAGQAAAACBQAAAARCRVQ0BQAAAApDT01NSVNTSU9OBgkAAAAAAAACBQAAAAZiZXRBbXQJAABkAAAAAgUAAAAEQkVUOAUAAAAKQ09NTUlTU0lPTgYJAAAAAAAAAgUAAAAGYmV0QW10CQAAZAAAAAIFAAAABUJFVDE0BQAAAApDT01NSVNTSU9OAwUAAAALYmV0QW10VmFsaWQGCQAAAgAAAAEFAAAAGEVycm9yQmV0QW1vdW50Tm90SW5SYW5nZQAAAAIAAAABaQEAAAADYmV0AAAAAQAAAA5leHBlY3RlZFJlc3VsdAQAAAARaXNJbmNvcnJlY3RSZXN1bHQDCQAAZwAAAAIAAAAAAAAAAAAFAAAADmV4cGVjdGVkUmVzdWx0BgkAAGYAAAACBQAAAA5leHBlY3RlZFJlc3VsdAAAAAAAAAAAFAQAAAAKZ2FtZU51bWJlcgkBAAAACU5ld0dhbWVJZAAAAAAEAAAAEWdhbWVUcmFuc2FjdGlvbklkCQACWAAAAAEIBQAAAAFpAAAADXRyYW5zYWN0aW9uSWQEAAAAB2FkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQEAAAACHR4SWRVc2VkCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAR0aGlzBQAAABFnYW1lVHJhbnNhY3Rpb25JZAQAAAANYmV0Tm90SW5XYXZlcwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAQAAAANZmVlTm90SW5XYXZlcwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAQAAAAGYW1vdW50CAUAAAADcG10AAAABmFtb3VudAQAAAAGd2luQW10CQEAAAAOVmFsaWRhdGVBbW91bnQAAAABCAUAAAADcG10AAAABmFtb3VudAMFAAAAEWlzSW5jb3JyZWN0UmVzdWx0CQAAAgAAAAEFAAAAG0Vycm9ySW5jb3JyZWN0U2VjdGlvblJlc3VsdAMFAAAADWJldE5vdEluV2F2ZXMJAAACAAAAAQUAAAAVRXJyb3JCZXRNdXN0QmVJbldhdmVzAwUAAAANZmVlTm90SW5XYXZlcwkAAAIAAAABBQAAAB1FcnJvclRyYW5zYWN0aW9uTXVzdEJlSW5XYXZlcwMFAAAACHR4SWRVc2VkCQAAAgAAAAEFAAAAFEVycm9yVHJhbnNhY3Rpb25Vc2VkCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAARZ2FtZVRyYW5zYWN0aW9uSWQFAAAAB2FkZHJlc3MJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAAEURhdGFHYW1lTnVtYmVyS2V5BQAAAApnYW1lTnVtYmVyCQAETAAAAAIJAQAAAAxTdG9yZURhdGFJbnQAAAADBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAANRGF0YUFtb3VudEtleQUAAAAGYW1vdW50CQAETAAAAAIJAQAAAAxTdG9yZURhdGFJbnQAAAADBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAAORGF0YVNlY3Rpb25LZXkFAAAADmV4cGVjdGVkUmVzdWx0CQAETAAAAAIJAQAAAAlTdG9yZURhdGEAAAADBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAANRGF0YVN0YXR1c0tleQUAAAANRGF0YVN0YXR1c05ldwUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAADVNlcnZlckFkZHJlc3MFAAAACkNPTU1JU1NJT04FAAAABHVuaXQFAAAAA25pbAAAAAFpAQAAAAZyZXN1bHQAAAACAAAAEWdhbWVUcmFuc2FjdGlvbklkAAAAA3JzYQQAAAAEcmFuZAkBAAAAD0dlbmVyYXRlUmFuZEludAAAAAIFAAAAEWdhbWVUcmFuc2FjdGlvbklkBQAAAANyc2EEAAAAD3NlbGVjdGVkU2VjdGlvbgkBAAAACkdldERhdGFJbnQAAAACBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAAORGF0YVNlY3Rpb25LZXkEAAAABnN0YXR1cwkBAAAADUdldERhdGFTdHJpbmcAAAACBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAANRGF0YVN0YXR1c0tleQMJAAAAAAAAAgUAAAAGc3RhdHVzBQAAAA1EYXRhU3RhdHVzTmV3BAAAAAVpc1dpbgkAAAAAAAACBQAAAARyYW5kBQAAAA9zZWxlY3RlZFNlY3Rpb24EAAAACHdyaXRlU2V0CQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlTdG9yZURhdGEAAAADBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAANRGF0YVN0YXR1c0tleQkBAAAACUdldFN0YXR1cwAAAAEFAAAABWlzV2luCQAETAAAAAIJAQAAAAxTdG9yZURhdGFJbnQAAAADBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAANRGF0YVJlc3VsdEtleQUAAAAEcmFuZAUAAAADbmlsAwUAAAAFaXNXaW4JAQAAAAxTY3JpcHRSZXN1bHQAAAACBQAAAAh3cml0ZVNldAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAA1TZXJ2ZXJBZGRyZXNzBQAAAApDT01NSVNTSU9OBQAAAAR1bml0BQAAAANuaWwFAAAACHdyaXRlU2V0CQAAAgAAAAEJAAEsAAAAAgUAAAANRXJyb3JHYW1lT3ZlcgUAAAAGc3RhdHVzAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAMJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5BAAAAAckbWF0Y2gwBQAAAAJ0eAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAAAAA3N0eAUAAAAHJG1hdGNoMAYHB7vtkbI=",
    "chainId": 84,
    "height": 566282,
    "spentComplexity": 0
}

View: original | compacted
Prev: EwVUvZRsrSG7vs6RhtUGcsVEwjuzurjkbsAdyVTa6KWV
Next: Hk5i5rsc32kDfMoXGPVcrRoDxTkWx7iYqzkems38h65M

Diff: 
Old New Differences
55 55  
56 56  let ErrorGameOver = "Game already is over"
57 57  
58 - let ErrorIncorrectSectionResult = "Incorrect sectionn result"
58 + let ErrorIncorrectSectionResult = "Incorrect section result"
59 59  
60 60  let ErrorBetAmountNotInRange = "Bet amount is not in range"
61 61  
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 - let ErrorIncorrectSectionResult = "Incorrect sectionn result"
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 true
131 131          else throw(ErrorBetAmountNotInRange)
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 149      if (isIncorrectResult)
150 150          then throw(ErrorIncorrectSectionResult)
151 151          else if (betNotInWaves)
152 152              then throw(ErrorBetMustBeInWaves)
153 153              else if (feeNotInWaves)
154 154                  then throw(ErrorTransactionMustBeInWaves)
155 155                  else if (txIdUsed)
156 156                      then throw(ErrorTransactionUsed)
157 157                      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 158      }
159 159  
160 160  
161 161  
162 162  @Callable(i)
163 163  func result (gameTransactionId,rsa) = {
164 164      let rand = GenerateRandInt(gameTransactionId, rsa)
165 165      let selectedSection = GetDataInt(gameTransactionId, DataSectionKey)
166 166      let status = GetDataString(gameTransactionId, DataStatusKey)
167 167      if ((status == DataStatusNew))
168 168          then {
169 169              let isWin = (rand == selectedSection)
170 170              let writeSet = WriteSet([StoreData(gameTransactionId, DataStatusKey, GetStatus(isWin)), StoreDataInt(gameTransactionId, DataResultKey, rand)])
171 171              if (isWin)
172 172                  then ScriptResult(writeSet, TransferSet([ScriptTransfer(ServerAddress, COMMISSION, unit)]))
173 173                  else writeSet
174 174              }
175 175          else throw((ErrorGameOver + status))
176 176      }
177 177  
178 178  
179 179  @Verifier(tx)
180 180  func verify () = if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
181 181      then     match tx {
182 182          case stx: SetScriptTransaction => 
183 183              true
184 184          case _ => 
185 185              false
186 186      }
187 187      else false
188 188

Old	New		Differences
55	55
56	56		let ErrorGameOver = "Game already is over"
57	57
58		-	let ErrorIncorrectSectionResult = "Incorrect ~~sectionn~~ result"
	58	+	let ErrorIncorrectSectionResult = "Incorrect section result"
59	59
60	60		let ErrorBetAmountNotInRange = "Bet amount is not in range"
61	61

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		-	let ErrorIncorrectSectionResult = "Incorrect ~~sectionn~~ result"
	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 true
131	131		else throw(ErrorBetAmountNotInRange)
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	149		if (isIncorrectResult)
150	150		then throw(ErrorIncorrectSectionResult)
151	151		else if (betNotInWaves)
152	152		then throw(ErrorBetMustBeInWaves)
153	153		else if (feeNotInWaves)
154	154		then throw(ErrorTransactionMustBeInWaves)
155	155		else if (txIdUsed)
156	156		then throw(ErrorTransactionUsed)
157	157		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	158		}
159	159
160	160
161	161
162	162		@Callable(i)
163	163		func result (gameTransactionId,rsa) = {
164	164		let rand = GenerateRandInt(gameTransactionId, rsa)
165	165		let selectedSection = GetDataInt(gameTransactionId, DataSectionKey)
166	166		let status = GetDataString(gameTransactionId, DataStatusKey)
167	167		if ((status == DataStatusNew))
168	168		then {
169	169		let isWin = (rand == selectedSection)
170	170		let writeSet = WriteSet([StoreData(gameTransactionId, DataStatusKey, GetStatus(isWin)), StoreDataInt(gameTransactionId, DataResultKey, rand)])
171	171		if (isWin)
172	172		then ScriptResult(writeSet, TransferSet([ScriptTransfer(ServerAddress, COMMISSION, unit)]))
173	173		else writeSet
174	174		}
175	175		else throw((ErrorGameOver + status))
176	176		}
177	177
178	178
179	179		@Verifier(tx)
180	180		func verify () = if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
181	181		then match tx {
182	182		case stx: SetScriptTransaction =>
183	183		true
184	184		case _ =>
185	185		false
186	186		}
187	187		else false
188	188

github/deemru/w8io/873ac7e 
27.55 ms ◑