tx · DxnMfjvnroe6WCyLmeEwXi3LxxsJdTAgcoUW9vay7pWu

3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk:  -0.00300000 Waves

2022.07.11 23:53 [2135582] smart account 3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DxnMfjvnroe6WCyLmeEwXi3LxxsJdTAgcoUW9vay7pWu",
    "fee": 300000,
    "feeAssetId": null,
    "timestamp": 1657572803354,
    "version": 2,
    "chainId": 84,
    "sender": "3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk",
    "senderPublicKey": "AR4BeE6hYADMvKxgRQs4ADN3krEqb2j8WE3WfJxzL3zE",
    "proofs": [
        "5q4uFDzJE3rxkQmSEzNWWXw5zbe1J1GeuDYjQHmbBwcS5vYxPZVckuDrbCynR99Rsgt4G522Jy4E64z1JhEHkpPS"
    ],
    "script": "base64:BgINCAISBQoDCAgIEgASAAsABXdhdmVzAIDC1y8ADnRpY2tldFByaWNlSW50AMCEPQALdGlja2V0UHJpY2UFDnRpY2tldFByaWNlSW50AAZpbnZGZWUA0IYDABJ3aXRoZHJhd0ZlZVBlcmNlbnQABQENdHJ5R2V0SW50ZWdlcgEDa2V5BAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAESZ2V0VGlja2V0c0NvdW50S2V5AQ1hZGRyZXNzU3RyaW5nCQCsAgIFDWFkZHJlc3NTdHJpbmcCDV90aWNrZXRzQ291bnQBDWdhbWVXaW5uZXJLZXkBBmdhbWVJZAkArAICBQZnYW1lSWQCB193aW5uZXIBGmFkZHJlc3NBdmFpbGFibGVSZXdhcmRzS2V5AQdhZGRyZXNzCQCsAgIFB2FkZHJlc3MCEV9hdmFpbGFibGVSZXdhcmRzAQ9nZXRUaWNrZXRzQ291bnQBDWFkZHJlc3NTdHJpbmcJAQ10cnlHZXRJbnRlZ2VyAQkBEmdldFRpY2tldHNDb3VudEtleQEFDWFkZHJlc3NTdHJpbmcBDWNvbnN1bWVUaWNrZXQBCnBsYXllckFkZHIEEmN1cnJlbnRUaWNrZXRDb3VudAkBD2dldFRpY2tldHNDb3VudAEFCnBsYXllckFkZHIEFW5ld0N1cnJlbnRUaWNrZXRDb3VudAkAZQIFEmN1cnJlbnRUaWNrZXRDb3VudAABAwkAZgIAAAUVbmV3Q3VycmVudFRpY2tldENvdW50AAAFFW5ld0N1cnJlbnRUaWNrZXRDb3VudAMBaQEQc2V0V2lubmVySGVhZHNVcAMGZ2FtZUlkDXdpbm5lckFkZHJTdHIPb3RoZXJQbGF5ZXJBZGRyAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIKQWRtaW4gT25seQQTYXZhaWxhYmxlUmV3YXJkc0tleQkBGmFkZHJlc3NBdmFpbGFibGVSZXdhcmRzS2V5AQUNd2lubmVyQWRkclN0cgQXY3VycmVudEF2YWlsYWJsZVJld2FyZHMJAQ10cnlHZXRJbnRlZ2VyAQUTYXZhaWxhYmxlUmV3YXJkc0tleQQUbmV3VGlja2V0Q291bnRXaW5uZXIJAQ1jb25zdW1lVGlja2V0AQUNd2lubmVyQWRkclN0cgQZbmV3VGlja2V0Q291bnRPdGhlclBsYXllcgkBDWNvbnN1bWVUaWNrZXQBBQ9vdGhlclBsYXllckFkZHIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBDWdhbWVXaW5uZXJLZXkBBQZnYW1lSWQFDXdpbm5lckFkZHJTdHIJAMwIAgkBDEludGVnZXJFbnRyeQIFE2F2YWlsYWJsZVJld2FyZHNLZXkJAGQCBRdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwkAaAIFC3RpY2tldFByaWNlAAIJAMwIAgkBDEludGVnZXJFbnRyeQIJARJnZXRUaWNrZXRzQ291bnRLZXkBBQ13aW5uZXJBZGRyU3RyBRRuZXdUaWNrZXRDb3VudFdpbm5lcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmdldFRpY2tldHNDb3VudEtleQEFD290aGVyUGxheWVyQWRkcgUZbmV3VGlja2V0Q291bnRPdGhlclBsYXllcgUDbmlsAWkBD3dpdGhkcmF3UmV3YXJkcwAEDWNhbGxlckFkZHJTdHIJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQXY3VycmVudEF2YWlsYWJsZVJld2FyZHMJAQ10cnlHZXRJbnRlZ2VyAQkBGmFkZHJlc3NBdmFpbGFibGVSZXdhcmRzS2V5AQUNY2FsbGVyQWRkclN0cgQWYWN0dWFsQXZhaWxhYmxlUmV3YXJkcwkAZQIJAGUCBRdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwUGaW52RmVlCQBrAwUXY3VycmVudEF2YWlsYWJsZVJld2FyZHMFEndpdGhkcmF3RmVlUGVyY2VudABkAwkAZwIAAAUXY3VycmVudEF2YWlsYWJsZVJld2FyZHMJAAIBAiBObyBhdmFpbGFibGUgcmV3YXJkcyB0byB3aXRoZHJhdwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGmFkZHJlc3NBdmFpbGFibGVSZXdhcmRzS2V5AQUNY2FsbGVyQWRkclN0cgAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUWYWN0dWFsQXZhaWxhYmxlUmV3YXJkcwUEdW5pdAUDbmlsAWkBCmJ1eVRpY2tldHMABANwbXQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABCQCRAwIIBQFpCHBheW1lbnRzAAAJAAIBAiFQbGVhc2UgYXR0YWNoIGV4YWN0bHkgb25lIHBheW1lbnQDCQEJaXNEZWZpbmVkAQgFA3BtdAdhc3NldElkCQACAQInVGlja2V0cyBjYW4gb25seSBpYmUgcHVyY2hhc2VkIGluIFdhdmVzAwkBAiE9AggFA3BtdAZhbW91bnQFC3RpY2tldFByaWNlCQACAQkArAICCQCsAgICH1RoZSBwYXltZW50IG11c3QgYmUgb2YgZXhhY3RseSAJAKQDAQUOdGlja2V0UHJpY2VJbnQCBiB3YXZlcwQNY2FsbGVyQWRkclN0cgkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBBNjdXJyZW50VGlja2V0c0NvdW50CQENdHJ5R2V0SW50ZWdlcgEJARJnZXRUaWNrZXRzQ291bnRLZXkBBQ1jYWxsZXJBZGRyU3RyCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJARJnZXRUaWNrZXRzQ291bnRLZXkBBQ1jYWxsZXJBZGRyU3RyCQBkAgUTY3VycmVudFRpY2tldHNDb3VudAABBQNuaWwAAQECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXlhFQ9x",
    "height": 2135582,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: H2gj8zVDn1KJSbgJtZTJivuHsRany5dwvfSFyZSjEg8a
Next: BDrp6kfmtDErqeTgAwUZMtJFEuxuThcewtCmA1qkfTaR

Diff: 
Old
New
Differences
9
9
 
10
10
 
let invFee = 50000
11
11
 
12
-
let withdrawFeePercent = 10
12
+
let withdrawFeePercent = 5
13
13
 
14
14
 
func tryGetInteger (key) = match getInteger(this, key) {
15
15
 
    case b: Int => 
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 = 50000
11
11
 
12
-
let withdrawFeePercent = 10
12
+
let withdrawFeePercent = 5
13
13
 
14
14
 
func tryGetInteger (key) = match getInteger(this, key) {
15
15
 
    case b: Int => 
16
16
 
        b
17
17
 
    case _ => 
18
18
 
        0
19
19
 
}
20
20
 
21
21
 
22
22
 
func getTicketsCountKey (addressString) = (addressString + "_ticketsCount")
23
23
 
24
24
 
25
25
 
func gameWinnerKey (gameId) = (gameId + "_winner")
26
26
 
27
27
 
28
28
 
func addressAvailableRewardsKey (address) = (address + "_availableRewards")
29
29
 
30
30
 
31
31
 
func getTicketsCount (addressString) = tryGetInteger(getTicketsCountKey(addressString))
32
32
 
33
33
 
34
34
 
func consumeTicket (playerAddr) = {
35
35
 
    let currentTicketCount = getTicketsCount(playerAddr)
36
36
 
    let newCurrentTicketCount = (currentTicketCount - 1)
37
37
 
    if ((0 > newCurrentTicketCount))
38
38
 
        then 0
39
39
 
        else newCurrentTicketCount
40
40
 
    }
41
41
 
42
42
 
43
43
 
@Callable(i)
44
44
 
func setWinnerHeadsUp (gameId,winnerAddrStr,otherPlayerAddr) = if ((i.caller != this))
45
45
 
    then throw("Admin Only")
46
46
 
    else {
47
47
 
        let availableRewardsKey = addressAvailableRewardsKey(winnerAddrStr)
48
48
 
        let currentAvailableRewards = tryGetInteger(availableRewardsKey)
49
49
 
        let newTicketCountWinner = consumeTicket(winnerAddrStr)
50
50
 
        let newTicketCountOtherPlayer = consumeTicket(otherPlayerAddr)
51
51
 
[StringEntry(gameWinnerKey(gameId), winnerAddrStr), IntegerEntry(availableRewardsKey, (currentAvailableRewards + (ticketPrice * 2))), IntegerEntry(getTicketsCountKey(winnerAddrStr), newTicketCountWinner), IntegerEntry(getTicketsCountKey(otherPlayerAddr), newTicketCountOtherPlayer)]
52
52
 
        }
53
53
 
54
54
 
55
55
 
56
56
 
@Callable(i)
57
57
 
func withdrawRewards () = {
58
58
 
    let callerAddrStr = toBase58String(i.caller.bytes)
59
59
 
    let currentAvailableRewards = tryGetInteger(addressAvailableRewardsKey(callerAddrStr))
60
60
 
    let actualAvailableRewards = ((currentAvailableRewards - invFee) - fraction(currentAvailableRewards, withdrawFeePercent, 100))
61
61
 
    if ((0 >= currentAvailableRewards))
62
62
 
        then throw("No available rewards to withdraw")
63
63
 
        else [IntegerEntry(addressAvailableRewardsKey(callerAddrStr), 0), ScriptTransfer(i.caller, actualAvailableRewards, unit)]
64
64
 
    }
65
65
 
66
66
 
67
67
 
68
68
 
@Callable(i)
69
69
 
func buyTickets () = {
70
70
 
    let pmt = if ((size(i.payments) == 1))
71
71
 
        then i.payments[0]
72
72
 
        else throw("Please attach exactly one payment")
73
73
 
    if (isDefined(pmt.assetId))
74
74
 
        then throw("Tickets can only ibe purchased in Waves")
75
75
 
        else if ((pmt.amount != ticketPrice))
76
76
 
            then throw((("The payment must be of exactly " + toString(ticketPriceInt)) + " waves"))
77
77
 
            else {
78
78
 
                let callerAddrStr = toBase58String(i.caller.bytes)
79
79
 
                let currentTicketsCount = tryGetInteger(getTicketsCountKey(callerAddrStr))
80
80
 
                $Tuple2([IntegerEntry(getTicketsCountKey(callerAddrStr), (currentTicketsCount + 1))], 1)
81
81
 
                }
82
82
 
    }
83
83
 
84
84
 
85
85
 
@Verifier(tx)
86
86
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
87
87
 

github/deemru/w8io/3ef1775 
50.30 ms ◑