w8 · tx · 7jv···Yws

tx · 7jva7skW5epsJogD9GoPFSUNF927WVomMRhBWbsn6Yws

3N8M61KCm8G72mK8PjacFbnnxdbFsyqQDeT:  -0.01400000 Waves

2019.07.03 11:55 [569019] smart account 3N8M61KCm8G72mK8PjacFbnnxdbFsyqQDeT > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7jva7skW5epsJogD9GoPFSUNF927WVomMRhBWbsn6Yws",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1562144189564,
    "version": 1,
    "sender": "3N8M61KCm8G72mK8PjacFbnnxdbFsyqQDeT",
    "senderPublicKey": "Bhyvkx4xdbEi4KPJNZSzx9gZgzgyLEsavuj2kYSt7SST",
    "proofs": [
        "2tUywCyJWa5wy7e3JVrRweL3yt7KbhZXQ7Sjv1H1ufALLgrEyG3YHzPQNawEbWCpvntwfUJa4g3FL1YoxMjiPSdP"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAAnAAAAAA9TZXJ2ZXJQdWJsaWNLZXkBAAAAIAsoHUeLtZkyzNPc+1+ktrvkEUCDQsYcz7NPlRQhjeYWAAAAAA1TZXJ2ZXJBZGRyZXNzCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAECAAAAIzNNdUptQ1NFVWdCTnkxUjJnZXNrNTl4RGJXY3VUS3d3aXhXAAAAABBSb3VsZXR0ZVNlY3Rpb25zAAAAAAAAAAAVAAAAABFEYXRhR2FtZU51bWJlcktleQIAAAALQVBQX0dBTUVfSUQAAAAADURhdGFBbW91bnRLZXkCAAAABkFNT1VOVAAAAAAORGF0YVNlY3Rpb25LZXkCAAAAB1NFQ1RJT04AAAAADURhdGFTdGF0dXNLZXkCAAAABlNUQVRVUwAAAAANRGF0YVJlc3VsdEtleQIAAAAGUkVTVUxUAAAAABBEYXRhV2luQW1vdW50S2V5AgAAAApXSU5fQU1PVU5UAAAAAA1EYXRhU3RhdHVzTmV3AgAAAANORVcAAAAADURhdGFTdGF0dXNXaW4CAAAAA1dJTgAAAAAPRGF0YVN0YXR1c0xvb3NlAgAAAAVMT09TRQAAAAAHV0FWRUxFVAkAAGgAAAACCQAAaAAAAAIAAAAAAAAAAGQAAAAAAAAAA+gAAAAAAAAAA+gAAAAACkNPTU1JU1NJT04JAABpAAAAAgkAAGgAAAACAAAAAAAAAAAFBQAAAAdXQVZFTEVUAAAAAAAAAAPoAAAAAARCRVQxCQAAaAAAAAIAAAAAAAAAAAEFAAAAB1dBVkVMRVQAAAAABEJFVDIJAABoAAAAAgAAAAAAAAAAAgUAAAAHV0FWRUxFVAAAAAAEQkVUNAkAAGgAAAACAAAAAAAAAAAEBQAAAAdXQVZFTEVUAAAAAARCRVQ4CQAAaAAAAAIAAAAAAAAAAAgFAAAAB1dBVkVMRVQAAAAABUJFVDE0CQAAaAAAAAIAAAAAAAAAAA4FAAAAB1dBVkVMRVQAAAAACFNlY3Rpb25zCQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgAAAAAAAAAAAgkABEwAAAACAAAAAAAAAAAUCQAETAAAAAIAAAAAAAAAAAIJAARMAAAAAgAAAAAAAAAABQkABEwAAAACAAAAAAAAAAACCQAETAAAAAIAAAAAAAAAAAoJAARMAAAAAgAAAAAAAAAAAgkABEwAAAACAAAAAAAAAAAGCQAETAAAAAIAAAAAAAAAAAIJAARMAAAAAgAAAAAAAAAABQkABEwAAAACAAAAAAAAAAACCQAETAAAAAIAAAAAAAAAAAYJAARMAAAAAgAAAAAAAAAAAgkABEwAAAACAAAAAAAAAAAFCQAETAAAAAIAAAAAAAAAAAIJAARMAAAAAgAAAAAAAAAACgkABEwAAAACAAAAAAAAAAACCQAETAAAAAIAAAAAAAAAAAUJAARMAAAAAgAAAAAAAAAAAgkABEwAAAACAAAAAAAAAAAGBQAAAANuaWwAAAAAFkVycm9yT25seVdhdmVzQWNjZXB0ZWQCAAAAE09ubHkgd2F2ZXMgYWNjZXB0ZWQAAAAAFUVycm9yTXVzdEdyZWF0ZXJUaGFuMAIAAAAlUGFyYW1ldGVyIHNpemUgbXVzdCBiZSBncmVhdGVyIHRoYW4gMAAAAAAURXJyb3JNdXN0TGVzc1RoYW4xMDACAAAAJFBhcmFtZXRlciBzaXplIG11c3QgYmUgbGVzcyB0aGFuIDEwMAAAAAAVRXJyb3JCZXRNdXN0QmVJbldhdmVzAgAAABtCZXQgYW1vdW50IG11c3QgYmUgaW4gV2F2ZXMAAAAAHUVycm9yVHJhbnNhY3Rpb25NdXN0QmVJbldhdmVzAgAAACJUcmFuc2FjdGlvbidzIGZlZSBtdXN0IGJlIGluIFdhdmVzAAAAABRFcnJvclRyYW5zYWN0aW9uVXNlZAIAAAAvUGFzc2VkIHR4SWQgaGFkIGJlZW4gdXNlZCBiZWZvcmUuIEdhbWUgYWJvcnRlZC4AAAAAEEVycm9yS2V5Tm90Rm91bmQCAAAAD0tleSBub3QgZm91bmQ6IAAAAAANRXJyb3JHYW1lT3ZlcgIAAAAVR2FtZSBhbHJlYWR5IGlzIG92ZXIgAAAAABtFcnJvckluY29ycmVjdFNlY3Rpb25SZXN1bHQCAAAAGEluY29ycmVjdCBzZWN0aW9uIHJlc3VsdAAAAAAYRXJyb3JCZXRBbW91bnROb3RJblJhbmdlAgAAABpCZXQgYW1vdW50IGlzIG5vdCBpbiByYW5nZQEAAAAJU3RvcmVEYXRhAAAAAwAAAA10cmFuc2FjdGlvbklkAAAAA2tleQAAAAV2YWx1ZQkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACBQAAAA10cmFuc2FjdGlvbklkAgAAAAFfBQAAAANrZXkFAAAABXZhbHVlAQAAAAxTdG9yZURhdGFJbnQAAAADAAAADXRyYW5zYWN0aW9uSWQAAAADa2V5AAAABXZhbHVlCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIFAAAADXRyYW5zYWN0aW9uSWQCAAAAAV8FAAAAA2tleQUAAAAFdmFsdWUBAAAAB0dldERhdGEAAAABAAAAA2tleQQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAADc3RyBQAAAAckbWF0Y2gwBQAAAANzdHIJAAACAAAAAQkAASwAAAACBQAAABBFcnJvcktleU5vdEZvdW5kBQAAAANrZXkBAAAADUdldERhdGFTdHJpbmcAAAACAAAADXRyYW5zYWN0aW9uSWQAAAADa2V5BAAAAAdmdWxsS2V5CQABLAAAAAIJAAEsAAAAAgUAAAANdHJhbnNhY3Rpb25JZAIAAAABXwUAAAADa2V5BAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAAB2Z1bGxLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAADc3RyBQAAAAckbWF0Y2gwBQAAAANzdHIJAAACAAAAAQkAASwAAAACBQAAABBFcnJvcktleU5vdEZvdW5kBQAAAAdmdWxsS2V5AQAAAApHZXREYXRhSW50AAAAAgAAAA10cmFuc2FjdGlvbklkAAAAA2tleQQAAAAHZnVsbEtleQkAASwAAAACCQABLAAAAAIFAAAADXRyYW5zYWN0aW9uSWQCAAAAAV8FAAAAA2tleQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAAdmdWxsS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAA3N0cgUAAAAHJG1hdGNoMAUAAAADc3RyCQAAAgAAAAEJAAEsAAAAAgUAAAAQRXJyb3JLZXlOb3RGb3VuZAUAAAAHZnVsbEtleQEAAAAJTmV3R2FtZUlkAAAAAAQAAAAHZ2FtZU51bQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAABFEYXRhR2FtZU51bWJlcktleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAANudW0FAAAAByRtYXRjaDAFAAAAA251bQAAAAAAAAAAAAkAAGQAAAACBQAAAAdnYW1lTnVtAAAAAAAAAAABAQAAAA9HZW5lcmF0ZVJhbmRJbnQAAAACAAAABmdhbWVJZAAAAAdyc2FTaWduBAAAAAtyc2FTaWdWYWxpZAkAAfQAAAADCQACWQAAAAEFAAAABmdhbWVJZAkAAlkAAAABBQAAAAdyc2FTaWduBQAAAA9TZXJ2ZXJQdWJsaWNLZXkDBQAAAAtyc2FTaWdWYWxpZAQAAAAEcmFuZAkAAGoAAAACCQAEsQAAAAEJAAH3AAAAAQkAAZsAAAABBQAAAAdyc2FTaWduBQAAABBSb3VsZXR0ZVNlY3Rpb25zAwkAAGYAAAACAAAAAAAAAAAABQAAAARyYW5kCQAAaAAAAAIA//////////8FAAAABHJhbmQFAAAABHJhbmQJAAACAAAAAQIAAAAVSW52YWxpZCBSU0Egc2lnbmF0dXJlAQAAAAlHZXRTdGF0dXMAAAABAAAABnJlc3VsdAMFAAAABnJlc3VsdAUAAAANRGF0YVN0YXR1c1dpbgUAAAAPRGF0YVN0YXR1c0xvb3NlAQAAAAxHZXRXaW5BbW91bnQAAAACAAAABmJldEFtdAAAAAdzZWN0aW9uBAAAAA9pc0NvcnJlY3RSZXN1bHQDAwMDCQAAAAAAAAIFAAAAB3NlY3Rpb24AAAAAAAAAAAIGCQAAAAAAAAIFAAAAB3NlY3Rpb24AAAAAAAAAAAUGCQAAAAAAAAIFAAAAB3NlY3Rpb24AAAAAAAAAAAYGCQAAAAAAAAIFAAAAB3NlY3Rpb24AAAAAAAAAAAoGCQAAAAAAAAIFAAAAB3NlY3Rpb24AAAAAAAAAABQEAAAAC2JldEFtdFZhbGlkAwMDAwkAAAAAAAACBQAAAAZiZXRBbXQJAABkAAAAAgUAAAAEQkVUMQUAAAAKQ09NTUlTU0lPTgYJAAAAAAAAAgUAAAAGYmV0QW10CQAAZAAAAAIFAAAABEJFVDIFAAAACkNPTU1JU1NJT04GCQAAAAAAAAIFAAAABmJldEFtdAkAAGQAAAACBQAAAARCRVQ0BQAAAApDT01NSVNTSU9OBgkAAAAAAAACBQAAAAZiZXRBbXQJAABkAAAAAgUAAAAEQkVUOAUAAAAKQ09NTUlTU0lPTgYJAAAAAAAAAgUAAAAGYmV0QW10CQAAZAAAAAIFAAAABUJFVDE0BQAAAApDT01NSVNTSU9OAwkBAAAAASEAAAABBQAAAA9pc0NvcnJlY3RSZXN1bHQJAAACAAAAAQUAAAAbRXJyb3JJbmNvcnJlY3RTZWN0aW9uUmVzdWx0AwUAAAALYmV0QW10VmFsaWQJAABoAAAAAgkAAGUAAAACBQAAAAZiZXRBbXQFAAAACkNPTU1JU1NJT04FAAAAB3NlY3Rpb24JAAACAAAAAQUAAAAYRXJyb3JCZXRBbW91bnROb3RJblJhbmdlAAAAAgAAAAFpAQAAAANiZXQAAAABAAAADmV4cGVjdGVkUmVzdWx0BAAAAApnYW1lTnVtYmVyCQEAAAAJTmV3R2FtZUlkAAAAAAQAAAARZ2FtZVRyYW5zYWN0aW9uSWQJAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAQAAAAHYWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAQAAAAIdHhJZFVzZWQJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABHRoaXMFAAAAEWdhbWVUcmFuc2FjdGlvbklkBAAAAA1iZXROb3RJbldhdmVzCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkBAAAAA1mZWVOb3RJbldhdmVzCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkBAAAAAZhbW91bnQIBQAAAANwbXQAAAAGYW1vdW50BAAAAAZ3aW5BbXQJAQAAAAxHZXRXaW5BbW91bnQAAAACCAUAAAADcG10AAAABmFtb3VudAUAAAAOZXhwZWN0ZWRSZXN1bHQDBQAAAA1iZXROb3RJbldhdmVzCQAAAgAAAAEFAAAAFUVycm9yQmV0TXVzdEJlSW5XYXZlcwMFAAAADWZlZU5vdEluV2F2ZXMJAAACAAAAAQUAAAAdRXJyb3JUcmFuc2FjdGlvbk11c3RCZUluV2F2ZXMDBQAAAAh0eElkVXNlZAkAAAIAAAABBQAAABRFcnJvclRyYW5zYWN0aW9uVXNlZAkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAAEWdhbWVUcmFuc2FjdGlvbklkBQAAAAdhZGRyZXNzCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAABFEYXRhR2FtZU51bWJlcktleQUAAAAKZ2FtZU51bWJlcgkABEwAAAACCQEAAAAMU3RvcmVEYXRhSW50AAAAAwUAAAARZ2FtZVRyYW5zYWN0aW9uSWQFAAAADURhdGFBbW91bnRLZXkFAAAABmFtb3VudAkABEwAAAACCQEAAAAMU3RvcmVEYXRhSW50AAAAAwUAAAARZ2FtZVRyYW5zYWN0aW9uSWQFAAAADkRhdGFTZWN0aW9uS2V5BQAAAA5leHBlY3RlZFJlc3VsdAkABEwAAAACCQEAAAAJU3RvcmVEYXRhAAAAAwUAAAARZ2FtZVRyYW5zYWN0aW9uSWQFAAAADURhdGFTdGF0dXNLZXkFAAAADURhdGFTdGF0dXNOZXcJAARMAAAAAgkBAAAADFN0b3JlRGF0YUludAAAAAMFAAAAEWdhbWVUcmFuc2FjdGlvbklkBQAAABBEYXRhV2luQW1vdW50S2V5BQAAAAZ3aW5BbXQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAA1TZXJ2ZXJBZGRyZXNzBQAAAApDT01NSVNTSU9OBQAAAAR1bml0BQAAAANuaWwAAAABaQEAAAAGcmVzdWx0AAAAAgAAABFnYW1lVHJhbnNhY3Rpb25JZAAAAANyc2EEAAAACXJhbmRJbmRleAkBAAAAD0dlbmVyYXRlUmFuZEludAAAAAIFAAAAEWdhbWVUcmFuc2FjdGlvbklkBQAAAANyc2EEAAAAD3NlbGVjdGVkU2VjdGlvbgkBAAAACkdldERhdGFJbnQAAAACBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAAORGF0YVNlY3Rpb25LZXkEAAAABnN0YXR1cwkBAAAADUdldERhdGFTdHJpbmcAAAACBQAAABFnYW1lVHJhbnNhY3Rpb25JZAUAAAANRGF0YVN0YXR1c0tleQMJAAAAAAAAAgUAAAAGc3RhdHVzBQAAAA1EYXRhU3RhdHVzTmV3BAAAAAtyYW5kU2VjdGlvbgkAAZEAAAACBQAAAAhTZWN0aW9ucwUAAAAJcmFuZEluZGV4BAAAAAVpc1dpbgkAAAAAAAACBQAAAAtyYW5kU2VjdGlvbgUAAAAPc2VsZWN0ZWRTZWN0aW9uBAAAAAh3cml0ZVNldAkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJU3RvcmVEYXRhAAAAAwUAAAARZ2FtZVRyYW5zYWN0aW9uSWQFAAAADURhdGFTdGF0dXNLZXkJAQAAAAlHZXRTdGF0dXMAAAABBQAAAAVpc1dpbgkABEwAAAACCQEAAAAMU3RvcmVEYXRhSW50AAAAAwUAAAARZ2FtZVRyYW5zYWN0aW9uSWQFAAAADURhdGFSZXN1bHRLZXkFAAAAC3JhbmRTZWN0aW9uBQAAAANuaWwDBQAAAAVpc1dpbgQAAAAGd2FsbGV0CQEAAAAHR2V0RGF0YQAAAAEFAAAAEWdhbWVUcmFuc2FjdGlvbklkBAAAAAl3aW5BbW91bnQJAQAAAApHZXREYXRhSW50AAAAAgUAAAARZ2FtZVRyYW5zYWN0aW9uSWQFAAAAEERhdGFXaW5BbW91bnRLZXkJAQAAAAxTY3JpcHRSZXN1bHQAAAACBQAAAAh3cml0ZVNldAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEFAAAABndhbGxldAUAAAAJd2luQW1vdW50BQAAAAR1bml0BQAAAANuaWwFAAAACHdyaXRlU2V0CQAAAgAAAAEJAAEsAAAAAgUAAAANRXJyb3JHYW1lT3ZlcgUAAAAGc3RhdHVzAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAMJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5BAAAAAckbWF0Y2gwBQAAAAJ0eAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAATVHJhbnNmZXJUcmFuc2FjdGlvbgQAAAADdHR4BQAAAAckbWF0Y2gwBgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAAAAA3N0eAUAAAAHJG1hdGNoMAYHB+w8+9Y=",
    "chainId": 84,
    "height": 569019,
    "spentComplexity": 0
}

View: original | compacted
Prev: E7zsPvNftnxEDGuGRo4k5ByPHWyJcqpxc6XHfAsz1HgP
Next: HT2LnpcGMhANGRihkKaobu5i8sV2DbRTgXgcpzD3Mfn2

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

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let ServerPublicKey = base58'~~DrYgfD7j6AKD1iXtn9uhMka95ATZB42B1kGKCUATP2UG~~'
	4	+	let ServerPublicKey = base58'kYxoGdY4mv5zMYWYJTq3Pp3uLDuLphTYfT8epjYEJvy'
5	5
6		-	let ServerAddress = addressFromStringValue("~~3Mu8oKScWCwR33YomT5ukU73P7jLryZTk4s~~")
	6	+	let ServerAddress = addressFromStringValue("3MuJmCSEUgBNy1R2gesk59xDbWcuTKwwixW")
7	7
8	8		let RouletteSections = 21
9	9

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

github/deemru/w8io/873ac7e 
31.09 ms ◑