tx · DgwParyWMXzWJmSQxmDSPSYto3bfbotMZMz3zgBdWmKd

3N2Z6EjzrzaCpD8ypDYLWDKe2PPVU8y9dJs:  -0.01400000 Waves

2019.09.08 04:27 [666446] smart account 3N2Z6EjzrzaCpD8ypDYLWDKe2PPVU8y9dJs > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DgwParyWMXzWJmSQxmDSPSYto3bfbotMZMz3zgBdWmKd",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1567906053615,
    "version": 1,
    "sender": "3N2Z6EjzrzaCpD8ypDYLWDKe2PPVU8y9dJs",
    "senderPublicKey": "HSTmdhPrJF81ozDBaqVn8QVtV76oD7gzDfcHPQRdxdwW",
    "proofs": [
        "2RMyPCA4jaWgHoq5TbSYRDfDZsCd8fZAzKPA6iK2oD6yootkA3aj1cRygmBzEWDhZdKrxJ2GJgCVBD6o6yoDSrKi"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAANAAAAAAlXaW5TZXJ2ZXIJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQIAAAAjM045WG55UHBXeFlvaEtIN3o1ZEV1cThycG5vYnB5elByekUAAAAAB1dBVkVMRVQJAABoAAAAAgkAAGgAAAACAAAAAAAAAABkAAAAAAAAAAPoAAAAAAAAAAPoAAAAAApDT01NSVNTSU9OCQAAaQAAAAIJAABoAAAAAgAAAAAAAAAABQUAAAAHV0FWRUxFVAAAAAAAAAAD6AAAAAAOVGlja2V0c1BlcldhdmUAAAAAAAAAAGQAAAAAC0NVUlJFTlRHQU1FAgAAAA0kQ1VSUkVOVF9HQU1FAAAAAA9HQU1FU0NPVU5URVJLRVkCAAAACSRHQU1FX05VTQAAAAAKTEFTVFRJQ0tFVAIAAAAMJExBU1RfVElDS0VUAQAAAA5nZXRQbGF5ZXJzTGlzdAAAAAIAAAAGZ2FtZUlkAAAADWN1cnJlbnRQbGF5ZXIEAAAAEHBsYXllcnNQcmVzZW50ZWQJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAGZ2FtZUlkAgAAAAhfcGxheWVycwMJAQAAAAEhAAAAAQUAAAAQcGxheWVyc1ByZXNlbnRlZAUAAAANY3VycmVudFBsYXllcgMJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABmdhbWVJZAIAAAABXwUAAAANY3VycmVudFBsYXllcgIAAAAIX3RpY2tldHMJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAGZ2FtZUlkAgAAAAhfcGxheWVycwkAASwAAAACCQABLAAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAGZ2FtZUlkAgAAAAhfcGxheWVycwIAAAABXwUAAAANY3VycmVudFBsYXllcgEAAAATRm9ybWF0R2FtZURhdGFQYXJhbQAAAAEAAAABcAQAAAABcwkAATEAAAABBQAAAAFwAwkAAAAAAAACBQAAAAFzAAAAAAAAAAAACQAAAgAAAAECAAAAJVBhcmFtZXRlciBzaXplIG11c3QgYmUgZ3JlYXRlciB0aGVuIDADCQAAZgAAAAIFAAAAAXMAAAAAAAAAAGMJAAACAAAAAQIAAAAkUGFyYW1ldGVyIHNpemUgbXVzdCBiZSBsZXNzIHRoZW4gMTAwAwkAAGYAAAACAAAAAAAAAAAKBQAAAAFzCQABLAAAAAIJAAEsAAAAAgIAAAABMAkAAaQAAAABBQAAAAFzBQAAAAFwCQABLAAAAAIJAAGkAAAAAQUAAAABcwUAAAABcAEAAAAKZ2V0VGlja2V0cwAAAAMAAAAGZ2FtZUlkAAAAEHBsYXllckFkZHJlc3NTdHIAAAAKcGF5bWVudEFtdAQAAAAKbGFzdFRpY2tldAkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwUAAAAKTEFTVFRJQ0tFVAQAAAAMd2F2ZXNQYXltZW50CQAAaQAAAAIFAAAACnBheW1lbnRBbXQFAAAAB1dBVkVMRVQEAAAADmZpcnN0TmV3VGlja2V0CQAAZAAAAAIFAAAACmxhc3RUaWNrZXQAAAAAAAAAAAEEAAAADWxhc3ROZXdUaWNrZXQJAABkAAAAAgUAAAAOZmlyc3ROZXdUaWNrZXQJAABoAAAAAgUAAAAMd2F2ZXNQYXltZW50BQAAAA5UaWNrZXRzUGVyV2F2ZQQAAAAKbmV3VGlja2V0cwkAASwAAAACCQABLAAAAAIJAQAAABNGb3JtYXRHYW1lRGF0YVBhcmFtAAAAAQkAAaQAAAABBQAAAA5maXJzdE5ld1RpY2tldAIAAAABXwkBAAAAE0Zvcm1hdEdhbWVEYXRhUGFyYW0AAAABCQABpAAAAAEFAAAADWxhc3ROZXdUaWNrZXQEAAAACnRpY2tldHNTdHIJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABmdhbWVJZAIAAAABXwUAAAAQcGxheWVyQWRkcmVzc1N0cgIAAAAIX3RpY2tldHMDBQAAAAp0aWNrZXRzU3RyBAAAAA5jdXJyZW50VGlja2V0cwkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAGZ2FtZUlkAgAAAAFfBQAAABBwbGF5ZXJBZGRyZXNzU3RyAgAAAAhfdGlja2V0cwkAASwAAAACCQABLAAAAAIFAAAADmN1cnJlbnRUaWNrZXRzAgAAAAEgBQAAAApuZXdUaWNrZXRzBQAAAApuZXdUaWNrZXRzAQAAAA1nZXRMYXN0VGlja2V0AAAAAQAAAApwYXltZW50QW10BAAAAApsYXN0VGlja2V0CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAApMQVNUVElDS0VUBAAAAAx3YXZlc1BheW1lbnQJAABpAAAAAgUAAAAKcGF5bWVudEFtdAUAAAAHV0FWRUxFVAkAAGQAAAACBQAAAApsYXN0VGlja2V0CQAAaAAAAAIFAAAADHdhdmVzUGF5bWVudAUAAAAOVGlja2V0c1BlcldhdmUBAAAAEEluY3JlbWVudEdhbWVOdW0AAAACAAAABmdhbWVJZAAAAAR0eElkAwkAAAAAAAACBQAAAAZnYW1lSWQFAAAABHR4SWQEAAAAB2dhbWVOdW0EAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAPR0FNRVNDT1VOVEVSS0VZAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAA251bQUAAAAHJG1hdGNoMAUAAAADbnVtAAAAAAAAAAAACQABpAAAAAEJAABkAAAAAgUAAAAHZ2FtZU51bQAAAAAAAAAAAQkAAaQAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAA9HQU1FU0NPVU5URVJLRVkBAAAADmdldEN1cnJlbnRHYW1lAAAAAQAAAAR0eElkBAAAAAZnYW1lSWQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAAC0NVUlJFTlRHQU1FBAAAAA1nYW1lU3RpbGxPcGVuCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABmdhbWVJZAIAAAAHX3Jlc3VsdAMFAAAADWdhbWVTdGlsbE9wZW4FAAAABmdhbWVJZAUAAAAEdHhJZAAAAAEAAAABaQEAAAADYmV0AAAAAAQAAAAEdHhJZAkAAlgAAAABCAUAAAABaQAAAA10cmFuc2FjdGlvbklkBAAAAAZnYW1lSWQJAQAAAA5nZXRDdXJyZW50R2FtZQAAAAEFAAAABHR4SWQEAAAAB2dhbWVOdW0JAQAAABBJbmNyZW1lbnRHYW1lTnVtAAAAAgUAAAAGZ2FtZUlkBQAAAAR0eElkBAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAQAAAAKcGF5bWVudEFtdAgFAAAAA3BtdAAAAAZhbW91bnQEAAAADWJldE5vdEluV2F2ZXMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQEAAAADWZlZU5vdEluV2F2ZXMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQEAAAADnBsYXllclB1YktleTU4CQACWAAAAAEIBQAAAAFpAAAAD2NhbGxlclB1YmxpY0tleQQAAAANcGxheWVyQWRkcmVzcwkBAAAAFGFkZHJlc3NGcm9tUHVibGljS2V5AAAAAQkAAlkAAAABBQAAAA5wbGF5ZXJQdWJLZXk1OAMFAAAADWJldE5vdEluV2F2ZXMJAAACAAAAAQIAAAAbQmV0IGFtb3VudCBtdXN0IGJlIGluIFdhdmVzAwUAAAANZmVlTm90SW5XYXZlcwkAAAIAAAABAgAAACJUcmFuc2FjdGlvbidzIGZlZSBtdXN0IGJlIGluIFdhdmVzBAAAABBwbGF5ZXJBZGRyZXNzU3RyCQAEJQAAAAEFAAAADXBsYXllckFkZHJlc3MEAAAAB2JldERhdGEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAAC0NVUlJFTlRHQU1FBQAAAAZnYW1lSWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAAD0dBTUVTQ09VTlRFUktFWQUAAAAHZ2FtZU51bQUAAAADbmlsBAAAAAt0b1dpblNlcnZlcgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAlXaW5TZXJ2ZXIFAAAACnBheW1lbnRBbXQFAAAABHVuaXQFAAAAA25pbAkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEFAAAAB2JldERhdGEJAQAAAAtUcmFuc2ZlclNldAAAAAEFAAAAC3RvV2luU2VydmVyAAAAAIiPCCY=",
    "chainId": 84,
    "height": 666446,
    "spentComplexity": 0
}

View: original | compacted
Prev: MVUGPZee1RjcpRG2xhWt1aemYQJ6jp5AQ43ksEuGa4z
Next: DDSQWoYuEzcbQ2WZqy2SiQ7u2DV8RRYjDZdchZUxCMz4

Diff: 
Old
New
Differences
99
99
 
            then throw("Transaction's fee must be in Waves")
100
100
 
            else {
101
101
 
                let playerAddressStr = toString(playerAddress)
102
-
                let dbData = [DataEntry("$Player_Address", playerAddressStr)]
103
-
                WriteSet(dbData)
102
+
                let betData = [DataEntry(CURRENTGAME, gameId), DataEntry(GAMESCOUNTERKEY, gameNum)]
103
+
                let toWinServer = [ScriptTransfer(WinServer, paymentAmt, unit)]
104
+
                ScriptResult(WriteSet(betData), TransferSet(toWinServer))
104
105
 
                }
105
106
 
    }
106
107
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 3 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let WinServer = addressFromStringValue("3N9XnyPpWxYohKH7z5dEuq8rpnobpyzPrzE")
5
5
 
6
6
 
let WAVELET = ((100 * 1000) * 1000)
7
7
 
8
8
 
let COMMISSION = ((5 * WAVELET) / 1000)
9
9
 
10
10
 
let TicketsPerWave = 100
11
11
 
12
12
 
let CURRENTGAME = "$CURRENT_GAME"
13
13
 
14
14
 
let GAMESCOUNTERKEY = "$GAME_NUM"
15
15
 
16
16
 
let LASTTICKET = "$LAST_TICKET"
17
17
 
18
18
 
func getPlayersList (gameId,currentPlayer) = {
19
19
 
    let playersPresented = isDefined(getString(this, (gameId + "_players")))
20
20
 
    if (!(playersPresented))
21
21
 
        then currentPlayer
22
22
 
        else if (isDefined(getString(this, (((gameId + "_") + currentPlayer) + "_tickets"))))
23
23
 
            then getStringValue(this, (gameId + "_players"))
24
24
 
            else ((getStringValue(this, (gameId + "_players")) + "_") + currentPlayer)
25
25
 
    }
26
26
 
27
27
 
28
28
 
func FormatGameDataParam (p) = {
29
29
 
    let s = size(p)
30
30
 
    if ((s == 0))
31
31
 
        then throw("Parameter size must be greater then 0")
32
32
 
        else if ((s > 99))
33
33
 
            then throw("Parameter size must be less then 100")
34
34
 
            else if ((10 > s))
35
35
 
                then (("0" + toString(s)) + p)
36
36
 
                else (toString(s) + p)
37
37
 
    }
38
38
 
39
39
 
40
40
 
func getTickets (gameId,playerAddressStr,paymentAmt) = {
41
41
 
    let lastTicket = getIntegerValue(this, LASTTICKET)
42
42
 
    let wavesPayment = (paymentAmt / WAVELET)
43
43
 
    let firstNewTicket = (lastTicket + 1)
44
44
 
    let lastNewTicket = (firstNewTicket + (wavesPayment * TicketsPerWave))
45
45
 
    let newTickets = ((FormatGameDataParam(toString(firstNewTicket)) + "_") + FormatGameDataParam(toString(lastNewTicket)))
46
46
 
    let ticketsStr = isDefined(getString(this, (((gameId + "_") + playerAddressStr) + "_tickets")))
47
47
 
    if (ticketsStr)
48
48
 
        then {
49
49
 
            let currentTickets = getStringValue(this, (((gameId + "_") + playerAddressStr) + "_tickets"))
50
50
 
            ((currentTickets + " ") + newTickets)
51
51
 
            }
52
52
 
        else newTickets
53
53
 
    }
54
54
 
55
55
 
56
56
 
func getLastTicket (paymentAmt) = {
57
57
 
    let lastTicket = getIntegerValue(this, LASTTICKET)
58
58
 
    let wavesPayment = (paymentAmt / WAVELET)
59
59
 
    (lastTicket + (wavesPayment * TicketsPerWave))
60
60
 
    }
61
61
 
62
62
 
63
63
 
func IncrementGameNum (gameId,txId) = if ((gameId == txId))
64
64
 
    then {
65
65
 
        let gameNum =         match getInteger(this, GAMESCOUNTERKEY) {
66
66
 
            case num: Int => 
67
67
 
                num
68
68
 
            case _ => 
69
69
 
                0
70
70
 
        }
71
71
 
        toString((gameNum + 1))
72
72
 
        }
73
73
 
    else toString(getIntegerValue(this, GAMESCOUNTERKEY))
74
74
 
75
75
 
76
76
 
func getCurrentGame (txId) = {
77
77
 
    let gameId = getStringValue(this, CURRENTGAME)
78
78
 
    let gameStillOpen = isDefined(getString(this, (gameId + "_result")))
79
79
 
    if (gameStillOpen)
80
80
 
        then gameId
81
81
 
        else txId
82
82
 
    }
83
83
 
84
84
 
85
85
 
@Callable(i)
86
86
 
func bet () = {
87
87
 
    let txId = toBase58String(i.transactionId)
88
88
 
    let gameId = getCurrentGame(txId)
89
89
 
    let gameNum = IncrementGameNum(gameId, txId)
90
90
 
    let pmt = extract(i.payment)
91
91
 
    let paymentAmt = pmt.amount
92
92
 
    let betNotInWaves = isDefined(pmt.assetId)
93
93
 
    let feeNotInWaves = isDefined(pmt.assetId)
94
94
 
    let playerPubKey58 = toBase58String(i.callerPublicKey)
95
95
 
    let playerAddress = addressFromPublicKey(fromBase58String(playerPubKey58))
96
96
 
    if (betNotInWaves)
97
97
 
        then throw("Bet amount must be in Waves")
98
98
 
        else if (feeNotInWaves)
99
99
 
            then throw("Transaction's fee must be in Waves")
100
100
 
            else {
101
101
 
                let playerAddressStr = toString(playerAddress)
102
-
                let dbData = [DataEntry("$Player_Address", playerAddressStr)]
103
-
                WriteSet(dbData)
102
+
                let betData = [DataEntry(CURRENTGAME, gameId), DataEntry(GAMESCOUNTERKEY, gameNum)]
103
+
                let toWinServer = [ScriptTransfer(WinServer, paymentAmt, unit)]
104
+
                ScriptResult(WriteSet(betData), TransferSet(toWinServer))
104
105
 
                }
105
106
 
    }
106
107
 
107
108
 

github/deemru/w8io/026f985 
38.42 ms ◑