tx · 96q9tLcqzXgeP58DkXszr1ejzF7jhHkWZeXNHS8FJon2

3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk:  -0.00300000 Waves

2022.07.12 00:47 [2135635] smart account 3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "96q9tLcqzXgeP58DkXszr1ejzF7jhHkWZeXNHS8FJon2",
    "fee": 300000,
    "feeAssetId": null,
    "timestamp": 1657576061290,
    "version": 2,
    "chainId": 84,
    "sender": "3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk",
    "senderPublicKey": "AR4BeE6hYADMvKxgRQs4ADN3krEqb2j8WE3WfJxzL3zE",
    "proofs": [
        "X3R6guMSff6T8YTRuGHh2aWNeWuhJenDs7nXx9FwdZkNMEhVRso5UGHLcCvsmnAidYZmrTnB2ozP56NkSsRVzrG"
    ],
    "script": "base64:BgISCAISAwoBCBIFCgMICAgSABIADAAFd2F2ZXMAgMLXLwAOdGlja2V0UHJpY2VJbnQAwIQ9AAt0aWNrZXRQcmljZQUOdGlja2V0UHJpY2VJbnQABmludkZlZQCgwh4AEndpdGhkcmF3RmVlUGVyY2VudAAFABZmZWVDb2xsZWN0b3JBZGRyZXNzS2V5AhNmZWVDb2xsZWN0b3JBZGRyZXNzAQ10cnlHZXRJbnRlZ2VyAQNrZXkEByRtYXRjaDAJAJoIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAAARJnZXRUaWNrZXRzQ291bnRLZXkBDWFkZHJlc3NTdHJpbmcJAKwCAgUNYWRkcmVzc1N0cmluZwINX3RpY2tldHNDb3VudAENZ2FtZVdpbm5lcktleQEGZ2FtZUlkCQCsAgIFBmdhbWVJZAIHX3dpbm5lcgEaYWRkcmVzc0F2YWlsYWJsZVJld2FyZHNLZXkBB2FkZHJlc3MJAKwCAgUHYWRkcmVzcwIRX2F2YWlsYWJsZVJld2FyZHMBD2dldFRpY2tldHNDb3VudAENYWRkcmVzc1N0cmluZwkBDXRyeUdldEludGVnZXIBCQESZ2V0VGlja2V0c0NvdW50S2V5AQUNYWRkcmVzc1N0cmluZwENY29uc3VtZVRpY2tldAEKcGxheWVyQWRkcgQSY3VycmVudFRpY2tldENvdW50CQEPZ2V0VGlja2V0c0NvdW50AQUKcGxheWVyQWRkcgQVbmV3Q3VycmVudFRpY2tldENvdW50CQBlAgUSY3VycmVudFRpY2tldENvdW50AAEDCQBmAgAABRVuZXdDdXJyZW50VGlja2V0Q291bnQAAAUVbmV3Q3VycmVudFRpY2tldENvdW50BAFpARZzZXRGZWVDb2xsZWN0b3JBZGRyZXNzAQ1jb2xsZWN0b3JBZGRyAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIKQWRtaW4gT25seQkAzAgCCQELU3RyaW5nRW50cnkCBRZmZWVDb2xsZWN0b3JBZGRyZXNzS2V5BQ1jb2xsZWN0b3JBZGRyBQNuaWwBaQEQc2V0V2lubmVySGVhZHNVcAMGZ2FtZUlkDXdpbm5lckFkZHJTdHIPb3RoZXJQbGF5ZXJBZGRyAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIKQWRtaW4gT25seQQTYXZhaWxhYmxlUmV3YXJkc0tleQkBGmFkZHJlc3NBdmFpbGFibGVSZXdhcmRzS2V5AQUNd2lubmVyQWRkclN0cgQXY3VycmVudEF2YWlsYWJsZVJld2FyZHMJAQ10cnlHZXRJbnRlZ2VyAQUTYXZhaWxhYmxlUmV3YXJkc0tleQQUbmV3VGlja2V0Q291bnRXaW5uZXIJAQ1jb25zdW1lVGlja2V0AQUNd2lubmVyQWRkclN0cgQZbmV3VGlja2V0Q291bnRPdGhlclBsYXllcgkBDWNvbnN1bWVUaWNrZXQBBQ9vdGhlclBsYXllckFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBDWdhbWVXaW5uZXJLZXkBBQZnYW1lSWQFDXdpbm5lckFkZHJTdHIJAMwIAgkBDEludGVnZXJFbnRyeQIFE2F2YWlsYWJsZVJld2FyZHNLZXkJAGQCBRdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwkAaAIFC3RpY2tldFByaWNlAAIJAMwIAgkBDEludGVnZXJFbnRyeQIJARJnZXRUaWNrZXRzQ291bnRLZXkBBQ13aW5uZXJBZGRyU3RyBRRuZXdUaWNrZXRDb3VudFdpbm5lcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmdldFRpY2tldHNDb3VudEtleQEFD290aGVyUGxheWVyQWRkcgUZbmV3VGlja2V0Q291bnRPdGhlclBsYXllcgUDbmlsAWkBD3dpdGhkcmF3UmV3YXJkcwAEDWNhbGxlckFkZHJTdHIJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQQZmVlQ29sbGVjdG9yQWRkcgkBEUBleHRyTmF0aXZlKDEwNjIpAQkBEUBleHRyTmF0aXZlKDEwNTgpAQUWZmVlQ29sbGVjdG9yQWRkcmVzc0tleQQXY3VycmVudEF2YWlsYWJsZVJld2FyZHMJAQ10cnlHZXRJbnRlZ2VyAQkBGmFkZHJlc3NBdmFpbGFibGVSZXdhcmRzS2V5AQUNY2FsbGVyQWRkclN0cgQLd2l0aGRyYXdGZWUJAGsDBRdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwUSd2l0aGRyYXdGZWVQZXJjZW50AGQEFmFjdHVhbEF2YWlsYWJsZVJld2FyZHMJAGUCCQBlAgUXY3VycmVudEF2YWlsYWJsZVJld2FyZHMFBmludkZlZQULd2l0aGRyYXdGZWUDCQBnAgAABRdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwkAAgECIE5vIGF2YWlsYWJsZSByZXdhcmRzIHRvIHdpdGhkcmF3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEaYWRkcmVzc0F2YWlsYWJsZVJld2FyZHNLZXkBBQ1jYWxsZXJBZGRyU3RyAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBRZhY3R1YWxBdmFpbGFibGVSZXdhcmRzBQR1bml0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFEGZlZUNvbGxlY3RvckFkZHIFC3dpdGhkcmF3RmVlBQR1bml0BQNuaWwBaQEKYnV5VGlja2V0cwAEA3BtdAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAJEDAggFAWkIcGF5bWVudHMAAAkAAgECIVBsZWFzZSBhdHRhY2ggZXhhY3RseSBvbmUgcGF5bWVudAMJAQlpc0RlZmluZWQBCAUDcG10B2Fzc2V0SWQJAAIBAidUaWNrZXRzIGNhbiBvbmx5IGliZSBwdXJjaGFzZWQgaW4gV2F2ZXMDCQECIT0CCAUDcG10BmFtb3VudAULdGlja2V0UHJpY2UJAAIBCQCsAgIJAKwCAgIfVGhlIHBheW1lbnQgbXVzdCBiZSBvZiBleGFjdGx5IAkApAMBBQ50aWNrZXRQcmljZUludAIGIHdhdmVzBA1jYWxsZXJBZGRyU3RyCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEE2N1cnJlbnRUaWNrZXRzQ291bnQJAQ10cnlHZXRJbnRlZ2VyAQkBEmdldFRpY2tldHNDb3VudEtleQEFDWNhbGxlckFkZHJTdHIJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmdldFRpY2tldHNDb3VudEtleQEFDWNhbGxlckFkZHJTdHIJAGQCBRNjdXJyZW50VGlja2V0c0NvdW50AAEFA25pbAABAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tlefgRmbA=",
    "height": 2135635,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BDrp6kfmtDErqeTgAwUZMtJFEuxuThcewtCmA1qkfTaR
Next: 91VKoXSyhqh5QXKt1y3yKbjXZQhM2XM1t8S5onyAdTRE

Diff: 
Old
New
Differences
7
7
 
8
8
 
let ticketPrice = ticketPriceInt
9
9
 
10
-
let invFee = 50000
10
+
let invFee = 500000
11
11
 
12
12
 
let withdrawFeePercent = 5
13
13
 

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
-
let invFee = 50000
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
30
 
func addressAvailableRewardsKey (address) = (address + "_availableRewards")
31
31
 
32
32
 
33
33
 
func getTicketsCount (addressString) = tryGetInteger(getTicketsCountKey(addressString))
34
34
 
35
35
 
36
36
 
func consumeTicket (playerAddr) = {
37
37
 
    let currentTicketCount = getTicketsCount(playerAddr)
38
38
 
    let newCurrentTicketCount = (currentTicketCount - 1)
39
39
 
    if ((0 > newCurrentTicketCount))
40
40
 
        then 0
41
41
 
        else newCurrentTicketCount
42
42
 
    }
43
43
 
44
44
 
45
45
 
@Callable(i)
46
46
 
func setFeeCollectorAddress (collectorAddr) = if ((i.caller != this))
47
47
 
    then throw("Admin Only")
48
48
 
    else [StringEntry(feeCollectorAddressKey, collectorAddr)]
49
49
 
50
50
 
51
51
 
52
52
 
@Callable(i)
53
53
 
func setWinnerHeadsUp (gameId,winnerAddrStr,otherPlayerAddr) = if ((i.caller != this))
54
54
 
    then throw("Admin Only")
55
55
 
    else {
56
56
 
        let availableRewardsKey = addressAvailableRewardsKey(winnerAddrStr)
57
57
 
        let currentAvailableRewards = tryGetInteger(availableRewardsKey)
58
58
 
        let newTicketCountWinner = consumeTicket(winnerAddrStr)
59
59
 
        let newTicketCountOtherPlayer = consumeTicket(otherPlayerAddr)
60
60
 
[StringEntry(gameWinnerKey(gameId), winnerAddrStr), IntegerEntry(availableRewardsKey, (currentAvailableRewards + (ticketPrice * 2))), IntegerEntry(getTicketsCountKey(winnerAddrStr), newTicketCountWinner), IntegerEntry(getTicketsCountKey(otherPlayerAddr), newTicketCountOtherPlayer)]
61
61
 
        }
62
62
 
63
63
 
64
64
 
65
65
 
@Callable(i)
66
66
 
func withdrawRewards () = {
67
67
 
    let callerAddrStr = toBase58String(i.caller.bytes)
68
68
 
    let feeCollectorAddr = addressFromStringValue(getStringValue(feeCollectorAddressKey))
69
69
 
    let currentAvailableRewards = tryGetInteger(addressAvailableRewardsKey(callerAddrStr))
70
70
 
    let withdrawFee = fraction(currentAvailableRewards, withdrawFeePercent, 100)
71
71
 
    let actualAvailableRewards = ((currentAvailableRewards - invFee) - withdrawFee)
72
72
 
    if ((0 >= currentAvailableRewards))
73
73
 
        then throw("No available rewards to withdraw")
74
74
 
        else [IntegerEntry(addressAvailableRewardsKey(callerAddrStr), 0), ScriptTransfer(i.caller, actualAvailableRewards, unit), ScriptTransfer(feeCollectorAddr, withdrawFee, unit)]
75
75
 
    }
76
76
 
77
77
 
78
78
 
79
79
 
@Callable(i)
80
80
 
func buyTickets () = {
81
81
 
    let pmt = if ((size(i.payments) == 1))
82
82
 
        then i.payments[0]
83
83
 
        else throw("Please attach exactly one payment")
84
84
 
    if (isDefined(pmt.assetId))
85
85
 
        then throw("Tickets can only ibe purchased in Waves")
86
86
 
        else if ((pmt.amount != ticketPrice))
87
87
 
            then throw((("The payment must be of exactly " + toString(ticketPriceInt)) + " waves"))
88
88
 
            else {
89
89
 
                let callerAddrStr = toBase58String(i.caller.bytes)
90
90
 
                let currentTicketsCount = tryGetInteger(getTicketsCountKey(callerAddrStr))
91
91
 
                $Tuple2([IntegerEntry(getTicketsCountKey(callerAddrStr), (currentTicketsCount + 1))], 1)
92
92
 
                }
93
93
 
    }
94
94
 
95
95
 
96
96
 
@Verifier(tx)
97
97
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
98
98
 

github/deemru/w8io/169f3d6 
52.14 ms ◑