tx · 91VKoXSyhqh5QXKt1y3yKbjXZQhM2XM1t8S5onyAdTRE

3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk:  -0.00400000 Waves

2022.07.31 00:57 [2163125] smart account 3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "91VKoXSyhqh5QXKt1y3yKbjXZQhM2XM1t8S5onyAdTRE",
    "fee": 400000,
    "feeAssetId": null,
    "timestamp": 1659218277302,
    "version": 2,
    "chainId": 84,
    "sender": "3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk",
    "senderPublicKey": "AR4BeE6hYADMvKxgRQs4ADN3krEqb2j8WE3WfJxzL3zE",
    "proofs": [
        "5jvHB5DDar99cMEbSmefhbSuL6Zhk7ihDnFfAu8BaUSkNh6yVMYaPUmEtsBwmT5aJcTxbgT8xZcHcfmHPQ28LH9v"
    ],
    "script": "base64:BgIUCAISAwoBCBIAEgUKAwgICBIAEgANAAV3YXZlcwCAwtcvAA50aWNrZXRQcmljZUludADAhD0AC3RpY2tldFByaWNlBQ50aWNrZXRQcmljZUludAAGaW52RmVlAKDCHgASd2l0aGRyYXdGZWVQZXJjZW50AAUAFmZlZUNvbGxlY3RvckFkZHJlc3NLZXkCE2ZlZUNvbGxlY3RvckFkZHJlc3MBDXRyeUdldEludGVnZXIBA2tleQQHJG1hdGNoMAkAmggCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABEmdldFRpY2tldHNDb3VudEtleQENYWRkcmVzc1N0cmluZwkArAICBQ1hZGRyZXNzU3RyaW5nAg1fdGlja2V0c0NvdW50AQ1nYW1lV2lubmVyS2V5AQZnYW1lSWQJAKwCAgUGZ2FtZUlkAgdfd2lubmVyARhhZGRyZXNzQXZhaWxhYmxlRnVuZHNLZXkBB2FkZHJlc3MJAKwCAgUHYWRkcmVzcwIPX2F2YWlsYWJsZUZ1bmRzARphZGRyZXNzQXZhaWxhYmxlUmV3YXJkc0tleQEHYWRkcmVzcwkArAICBQdhZGRyZXNzAhFfYXZhaWxhYmxlUmV3YXJkcwEPZ2V0VGlja2V0c0NvdW50AQ1hZGRyZXNzU3RyaW5nCQENdHJ5R2V0SW50ZWdlcgEJARJnZXRUaWNrZXRzQ291bnRLZXkBBQ1hZGRyZXNzU3RyaW5nAQ1jb25zdW1lVGlja2V0AQpwbGF5ZXJBZGRyBBJjdXJyZW50VGlja2V0Q291bnQJAQ9nZXRUaWNrZXRzQ291bnQBBQpwbGF5ZXJBZGRyBBVuZXdDdXJyZW50VGlja2V0Q291bnQJAGUCBRJjdXJyZW50VGlja2V0Q291bnQAAQMJAGYCAAAFFW5ld0N1cnJlbnRUaWNrZXRDb3VudAAABRVuZXdDdXJyZW50VGlja2V0Q291bnQFAWkBFnNldEZlZUNvbGxlY3RvckFkZHJlc3MBDWNvbGxlY3RvckFkZHIDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAgpBZG1pbiBPbmx5CQDMCAIJAQtTdHJpbmdFbnRyeQIFFmZlZUNvbGxlY3RvckFkZHJlc3NLZXkFDWNvbGxlY3RvckFkZHIFA25pbAFpAQxkZXBvc2l0RnVuZHMABANwbXQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABCQCRAwIIBQFpCHBheW1lbnRzAAAJAAIBAiFQbGVhc2UgYXR0YWNoIGV4YWN0bHkgb25lIHBheW1lbnQDCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkCQACAQIZWW91IGNhbiBvbmx5IGRlcG9zaXQgVVNETgQNY2FsbGVyQWRkclN0cgkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJARhhZGRyZXNzQXZhaWxhYmxlRnVuZHNLZXkBBQ1jYWxsZXJBZGRyU3RyCAUDcG10BmFtb3VudAUDbmlsAAEBaQEQc2V0V2lubmVySGVhZHNVcAMGZ2FtZUlkDXdpbm5lckFkZHJTdHIPb3RoZXJQbGF5ZXJBZGRyAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIKQWRtaW4gT25seQQTYXZhaWxhYmxlUmV3YXJkc0tleQkBGmFkZHJlc3NBdmFpbGFibGVSZXdhcmRzS2V5AQUNd2lubmVyQWRkclN0cgQXY3VycmVudEF2YWlsYWJsZVJld2FyZHMJAQ10cnlHZXRJbnRlZ2VyAQUTYXZhaWxhYmxlUmV3YXJkc0tleQQUbmV3VGlja2V0Q291bnRXaW5uZXIJAQ1jb25zdW1lVGlja2V0AQUNd2lubmVyQWRkclN0cgQZbmV3VGlja2V0Q291bnRPdGhlclBsYXllcgkBDWNvbnN1bWVUaWNrZXQBBQ9vdGhlclBsYXllckFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBDWdhbWVXaW5uZXJLZXkBBQZnYW1lSWQFDXdpbm5lckFkZHJTdHIJAMwIAgkBDEludGVnZXJFbnRyeQIFE2F2YWlsYWJsZVJld2FyZHNLZXkJAGQCBRdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwkAaAIFC3RpY2tldFByaWNlAAIJAMwIAgkBDEludGVnZXJFbnRyeQIJARJnZXRUaWNrZXRzQ291bnRLZXkBBQ13aW5uZXJBZGRyU3RyBRRuZXdUaWNrZXRDb3VudFdpbm5lcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmdldFRpY2tldHNDb3VudEtleQEFD290aGVyUGxheWVyQWRkcgUZbmV3VGlja2V0Q291bnRPdGhlclBsYXllcgUDbmlsAWkBD3dpdGhkcmF3UmV3YXJkcwAEDWNhbGxlckFkZHJTdHIJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQQZmVlQ29sbGVjdG9yQWRkcgkBEUBleHRyTmF0aXZlKDEwNjIpAQkBEUBleHRyTmF0aXZlKDEwNTgpAQUWZmVlQ29sbGVjdG9yQWRkcmVzc0tleQQXY3VycmVudEF2YWlsYWJsZVJld2FyZHMJAQ10cnlHZXRJbnRlZ2VyAQkBGmFkZHJlc3NBdmFpbGFibGVSZXdhcmRzS2V5AQUNY2FsbGVyQWRkclN0cgQLd2l0aGRyYXdGZWUJAGsDBRdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwUSd2l0aGRyYXdGZWVQZXJjZW50AGQEFmFjdHVhbEF2YWlsYWJsZVJld2FyZHMJAGUCCQBlAgUXY3VycmVudEF2YWlsYWJsZVJld2FyZHMFBmludkZlZQULd2l0aGRyYXdGZWUDCQBnAgAABRdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwkAAgECIE5vIGF2YWlsYWJsZSByZXdhcmRzIHRvIHdpdGhkcmF3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEaYWRkcmVzc0F2YWlsYWJsZVJld2FyZHNLZXkBBQ1jYWxsZXJBZGRyU3RyAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBRZhY3R1YWxBdmFpbGFibGVSZXdhcmRzBQR1bml0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFEGZlZUNvbGxlY3RvckFkZHIFC3dpdGhkcmF3RmVlBQR1bml0BQNuaWwBaQEKYnV5VGlja2V0cwAEA3BtdAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAJEDAggFAWkIcGF5bWVudHMAAAkAAgECIVBsZWFzZSBhdHRhY2ggZXhhY3RseSBvbmUgcGF5bWVudAMJAQlpc0RlZmluZWQBCAUDcG10B2Fzc2V0SWQJAAIBAidUaWNrZXRzIGNhbiBvbmx5IGliZSBwdXJjaGFzZWQgaW4gV2F2ZXMDCQECIT0CCAUDcG10BmFtb3VudAULdGlja2V0UHJpY2UJAAIBCQCsAgIJAKwCAgIfVGhlIHBheW1lbnQgbXVzdCBiZSBvZiBleGFjdGx5IAkApAMBBQ50aWNrZXRQcmljZUludAIGIHdhdmVzBA1jYWxsZXJBZGRyU3RyCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEE2N1cnJlbnRUaWNrZXRzQ291bnQJAQ10cnlHZXRJbnRlZ2VyAQkBEmdldFRpY2tldHNDb3VudEtleQEFDWNhbGxlckFkZHJTdHIJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmdldFRpY2tldHNDb3VudEtleQEFDWNhbGxlckFkZHJTdHIJAGQCBRNjdXJyZW50VGlja2V0c0NvdW50AAEFA25pbAABAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleascQtQ=",
    "height": 2163125,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 96q9tLcqzXgeP58DkXszr1ejzF7jhHkWZeXNHS8FJon2
Next: 4Epa9AYhpPMabzj5ykacNmtWg7kEAPRgS1XgfRA5kHMo

Diff: 
Old
New
Differences
27
27
 
func gameWinnerKey (gameId) = (gameId + "_winner")
28
28
 
29
29
 
30
+
func addressAvailableFundsKey (address) = (address + "_availableFunds")
31
+
32
+
30
33
 
func addressAvailableRewardsKey (address) = (address + "_availableRewards")
31
34
 
32
35
 
46
49
 
func setFeeCollectorAddress (collectorAddr) = if ((i.caller != this))
47
50
 
    then throw("Admin Only")
48
51
 
    else [StringEntry(feeCollectorAddressKey, collectorAddr)]
52
+
53
+
54
+
55
+
@Callable(i)
56
+
func depositFunds () = {
57
+
    let pmt = if ((size(i.payments) == 1))
58
+
        then i.payments[0]
59
+
        else throw("Please attach exactly one payment")
60
+
    if (isDefined(pmt.assetId))
61
+
        then throw("You can only deposit USDN")
62
+
        else {
63
+
            let callerAddrStr = toBase58String(i.caller.bytes)
64
+
            $Tuple2([IntegerEntry(addressAvailableFundsKey(callerAddrStr), pmt.amount)], 1)
65
+
            }
66
+
    }
49
67
 
50
68
 
51
69
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let waves = 100000000
5
5
 
6
6
 
let ticketPriceInt = 1000000
7
7
 
8
8
 
let ticketPrice = ticketPriceInt
9
9
 
10
10
 
let invFee = 500000
11
11
 
12
12
 
let withdrawFeePercent = 5
13
13
 
14
14
 
let feeCollectorAddressKey = "feeCollectorAddress"
15
15
 
16
16
 
func tryGetInteger (key) = match getInteger(this, key) {
17
17
 
    case b: Int => 
18
18
 
        b
19
19
 
    case _ => 
20
20
 
        0
21
21
 
}
22
22
 
23
23
 
24
24
 
func getTicketsCountKey (addressString) = (addressString + "_ticketsCount")
25
25
 
26
26
 
27
27
 
func gameWinnerKey (gameId) = (gameId + "_winner")
28
28
 
29
29
 
30
+
func addressAvailableFundsKey (address) = (address + "_availableFunds")
31
+
32
+
30
33
 
func addressAvailableRewardsKey (address) = (address + "_availableRewards")
31
34
 
32
35
 
33
36
 
func getTicketsCount (addressString) = tryGetInteger(getTicketsCountKey(addressString))
34
37
 
35
38
 
36
39
 
func consumeTicket (playerAddr) = {
37
40
 
    let currentTicketCount = getTicketsCount(playerAddr)
38
41
 
    let newCurrentTicketCount = (currentTicketCount - 1)
39
42
 
    if ((0 > newCurrentTicketCount))
40
43
 
        then 0
41
44
 
        else newCurrentTicketCount
42
45
 
    }
43
46
 
44
47
 
45
48
 
@Callable(i)
46
49
 
func setFeeCollectorAddress (collectorAddr) = if ((i.caller != this))
47
50
 
    then throw("Admin Only")
48
51
 
    else [StringEntry(feeCollectorAddressKey, collectorAddr)]
52
+
53
+
54
+
55
+
@Callable(i)
56
+
func depositFunds () = {
57
+
    let pmt = if ((size(i.payments) == 1))
58
+
        then i.payments[0]
59
+
        else throw("Please attach exactly one payment")
60
+
    if (isDefined(pmt.assetId))
61
+
        then throw("You can only deposit USDN")
62
+
        else {
63
+
            let callerAddrStr = toBase58String(i.caller.bytes)
64
+
            $Tuple2([IntegerEntry(addressAvailableFundsKey(callerAddrStr), pmt.amount)], 1)
65
+
            }
66
+
    }
49
67
 
50
68
 
51
69
 
52
70
 
@Callable(i)
53
71
 
func setWinnerHeadsUp (gameId,winnerAddrStr,otherPlayerAddr) = if ((i.caller != this))
54
72
 
    then throw("Admin Only")
55
73
 
    else {
56
74
 
        let availableRewardsKey = addressAvailableRewardsKey(winnerAddrStr)
57
75
 
        let currentAvailableRewards = tryGetInteger(availableRewardsKey)
58
76
 
        let newTicketCountWinner = consumeTicket(winnerAddrStr)
59
77
 
        let newTicketCountOtherPlayer = consumeTicket(otherPlayerAddr)
60
78
 
[StringEntry(gameWinnerKey(gameId), winnerAddrStr), IntegerEntry(availableRewardsKey, (currentAvailableRewards + (ticketPrice * 2))), IntegerEntry(getTicketsCountKey(winnerAddrStr), newTicketCountWinner), IntegerEntry(getTicketsCountKey(otherPlayerAddr), newTicketCountOtherPlayer)]
61
79
 
        }
62
80
 
63
81
 
64
82
 
65
83
 
@Callable(i)
66
84
 
func withdrawRewards () = {
67
85
 
    let callerAddrStr = toBase58String(i.caller.bytes)
68
86
 
    let feeCollectorAddr = addressFromStringValue(getStringValue(feeCollectorAddressKey))
69
87
 
    let currentAvailableRewards = tryGetInteger(addressAvailableRewardsKey(callerAddrStr))
70
88
 
    let withdrawFee = fraction(currentAvailableRewards, withdrawFeePercent, 100)
71
89
 
    let actualAvailableRewards = ((currentAvailableRewards - invFee) - withdrawFee)
72
90
 
    if ((0 >= currentAvailableRewards))
73
91
 
        then throw("No available rewards to withdraw")
74
92
 
        else [IntegerEntry(addressAvailableRewardsKey(callerAddrStr), 0), ScriptTransfer(i.caller, actualAvailableRewards, unit), ScriptTransfer(feeCollectorAddr, withdrawFee, unit)]
75
93
 
    }
76
94
 
77
95
 
78
96
 
79
97
 
@Callable(i)
80
98
 
func buyTickets () = {
81
99
 
    let pmt = if ((size(i.payments) == 1))
82
100
 
        then i.payments[0]
83
101
 
        else throw("Please attach exactly one payment")
84
102
 
    if (isDefined(pmt.assetId))
85
103
 
        then throw("Tickets can only ibe purchased in Waves")
86
104
 
        else if ((pmt.amount != ticketPrice))
87
105
 
            then throw((("The payment must be of exactly " + toString(ticketPriceInt)) + " waves"))
88
106
 
            else {
89
107
 
                let callerAddrStr = toBase58String(i.caller.bytes)
90
108
 
                let currentTicketsCount = tryGetInteger(getTicketsCountKey(callerAddrStr))
91
109
 
                $Tuple2([IntegerEntry(getTicketsCountKey(callerAddrStr), (currentTicketsCount + 1))], 1)
92
110
 
                }
93
111
 
    }
94
112
 
95
113
 
96
114
 
@Verifier(tx)
97
115
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
98
116
 

github/deemru/w8io/873ac7e 
80.89 ms ◑