tx · DN7jhGs21wgMBEH7XJMegDU6v1WdtCuPm2SnXkVY747P

3N4Kzbxu521DHPxcgrmZ4XUqN2kF6TqLTzs:  -0.01000000 Waves

2023.09.03 15:49 [2739209] smart account 3N4Kzbxu521DHPxcgrmZ4XUqN2kF6TqLTzs > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DN7jhGs21wgMBEH7XJMegDU6v1WdtCuPm2SnXkVY747P",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1693745388836,
    "version": 2,
    "chainId": 84,
    "sender": "3N4Kzbxu521DHPxcgrmZ4XUqN2kF6TqLTzs",
    "senderPublicKey": "8yQuxvQ2qLzXJrgbKZHbsfnNNjuU5wfHheyVujdALGsF",
    "proofs": [
        "4MVwunSJGepxsq4hKiMbNxMk2E1ahLj4ygvNhb8GFrM5vZUJphaPTQVXZt7edWjsELArNFmvedQEQa2qxY5xHz2M"
    ],
    "script": "base64:BgIfCAISABIECgIIARIGCgQIAQEIEgQKAggBEgUKAwgBCBEADmxvdHRlcnlBc3NldElEASAi1eE3pAm1kH7yDd2K/R2HDGQ6c8cmK+ceUzFNVsLOiQEQZ2V0SW50ZWdlck9yRWxzZQIDa2V5A3ZhbAkBC3ZhbHVlT3JFbHNlAgkAnwgBBQNrZXkFA3ZhbAEPZ2V0U3RyaW5nT3JFbHNlAgNrZXkDdmFsCQELdmFsdWVPckVsc2UCCQCiCAEFA2tleQUDdmFsAQ9zdHJpbmdLZXlFeGlzdHMBA2tleQMJAQlpc0RlZmluZWQBCQCiCAEFA2tleQYHAQJtawEBeAkAuQkCBQF4AgFfARVrZXlMb3R0ZXJ5VG90YWxTdGFrZWQBC2xvdHRlcnlOYW1lCQECbWsBCQDMCAICB2xvdHRlcnkJAMwIAgULbG90dGVyeU5hbWUJAMwIAgILdG90YWxTdGFrZWQFA25pbAETa2V5TG90dGVyeUFkclN0YWtlZAILbG90dGVyeU5hbWUDYWRyCQECbWsBCQDMCAICB2xvdHRlcnkJAMwIAgULbG90dGVyeU5hbWUJAMwIAgIDYWRyCQDMCAIFA2FkcgkAzAgCAgZzdGFrZWQFA25pbAETa2V5TG90dGVyeUFkckxvY2tlZAILbG90dGVyeU5hbWUDYWRyCQECbWsBCQDMCAICB2xvdHRlcnkJAMwIAgULbG90dGVyeU5hbWUJAMwIAgIDYWRyCQDMCAIFA2FkcgkAzAgCAgZsb2NrZWQFA25pbAEVa2V5TG90dGVyeUZpbmFsSGVpZ2h0AQtsb3R0ZXJ5TmFtZQkBAm1rAQkAzAgCAgdsb3R0ZXJ5CQDMCAIFC2xvdHRlcnlOYW1lCQDMCAICC2ZpbmFsSGVpZ2h0BQNuaWwBFGtleUxvdHRlcnlQcml6ZVZhbHVlAgtsb3R0ZXJ5TmFtZQdwcml6ZUlECQECbWsBCQDMCAICB2xvdHRlcnkJAMwIAgULbG90dGVyeU5hbWUJAMwIAgIFcHJpemUJAMwIAgkApAMBBQdwcml6ZUlECQDMCAICBXZhbHVlBQNuaWwBGGtleUxvdHRlcnlQcml6ZVRocmVzaG9sZAILbG90dGVyeU5hbWUHcHJpemVJRAkBAm1rAQkAzAgCAgdsb3R0ZXJ5CQDMCAIFC2xvdHRlcnlOYW1lCQDMCAICBXByaXplCQDMCAIJAKQDAQUHcHJpemVJRAkAzAgCAgl0aHJlc2hvbGQFA25pbAEVa2V5TG90dGVyeVByaXplUmFuZG9tAgtsb3R0ZXJ5TmFtZQdwcml6ZUlECQECbWsBCQDMCAICB2xvdHRlcnkJAMwIAgULbG90dGVyeU5hbWUJAMwIAgIFcHJpemUJAMwIAgkApAMBBQdwcml6ZUlECQDMCAICBnJhbmRvbQUDbmlsARVrZXlMb3R0ZXJ5UHJpemVXaW5uZXICC2xvdHRlcnlOYW1lB3ByaXplSUQJAQJtawEJAMwIAgIHbG90dGVyeQkAzAgCBQtsb3R0ZXJ5TmFtZQkAzAgCAgVwcml6ZQkAzAgCCQCkAwEFB3ByaXplSUQJAMwIAgIGd2lubmVyBQNuaWwBFmtleUxvdHRlcnlUaWNrZXRzT3duZXIDC2xvdHRlcnlOYW1lBGZyb20CdG8JAQJtawEJAMwIAgIHbG90dGVyeQkAzAgCBQtsb3R0ZXJ5TmFtZQkAzAgCAgRmcm9tCQDMCAIJAKQDAQUEZnJvbQkAzAgCAgJ0bwkAzAgCCQCkAwEFAnRvCQDMCAICBW93bmVyBQNuaWwAEl9hY3RpdmVMb3R0ZXJ5TmFtZQkBAm1rAQkAzAgCAgVwYXJhbQkAzAgCAhFhY3RpdmVMb3R0ZXJ5TmFtZQUDbmlsABJfZ2xvYmFsVG90YWxTdGFrZWQJAQJtawEJAMwIAgIFcGFyYW0JAMwIAgIRZ2xvYmFsVG90YWxTdGFrZWQFA25pbAERYWN0aXZlTG90dGVyeU5hbWUABAtsb3R0ZXJ5TmFtZQkBD2dldFN0cmluZ09yRWxzZQIFEl9hY3RpdmVMb3R0ZXJ5TmFtZQIAAwkAAAIFC2xvdHRlcnlOYW1lAgACAAQSbG90dGVyeUZpbmFsSGVpZ2h0CQERQGV4dHJOYXRpdmUoMTA1NSkBCQEVa2V5TG90dGVyeUZpbmFsSGVpZ2h0AQULbG90dGVyeU5hbWUDCQBnAgUGaGVpZ2h0BRJsb3R0ZXJ5RmluYWxIZWlnaHQCAAULbG90dGVyeU5hbWUFAWkBBXN0YWtlAAQLbG90dGVyeU5hbWUJARFhY3RpdmVMb3R0ZXJ5TmFtZQADCQAAAgULbG90dGVyeU5hbWUCAAkAAgECEkxvdHRlcnkgbm90IGFjdGl2ZQMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAj9ObyBwYXltZW50IGFkZGVkLiBZb3UgbXVzdCBhdHRhY2ggYSBwYXltZW50IGluIERvZGxsbm9kZSB0b2tlbnMDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAkBUb28gbWFueSBwYXltZW50cyBhZGRlZC4gVGhlcmUgbXVzdCBiZSBvbmx5IG9uZSBhdHRhY2hlZCBwYXltZW50AwkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQ5sb3R0ZXJ5QXNzZXRJRAkAAgECRFdyb25nIHBheW1lbnQgYXNzZXRJRC4gWW91IG11c3QgYXR0YWNoIGEgcGF5bWVudCBpbiBEb2RsbG5vZGUgdG9rZW5zBAZhbW91bnQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BA1jYWxsZXJBZGRyZXNzCQClCAEIBQFpBmNhbGxlcgQTX2xvdHRlcnlUb3RhbFN0YWtlZAkBFWtleUxvdHRlcnlUb3RhbFN0YWtlZAEFC2xvdHRlcnlOYW1lBBJsb3R0ZXJ5VG90YWxTdGFrZWQJARBnZXRJbnRlZ2VyT3JFbHNlAgUTX2xvdHRlcnlUb3RhbFN0YWtlZAAABBFfbG90dGVyeUFkclN0YWtlZAkBE2tleUxvdHRlcnlBZHJTdGFrZWQCBQtsb3R0ZXJ5TmFtZQUNY2FsbGVyQWRkcmVzcwQQbG90dGVyeUFkclN0YWtlZAkBEGdldEludGVnZXJPckVsc2UCBRFfbG90dGVyeUFkclN0YWtlZAAABAZfb3duZXIJARZrZXlMb3R0ZXJ5VGlja2V0c093bmVyAwULbG90dGVyeU5hbWUFEmxvdHRlcnlUb3RhbFN0YWtlZAkAZQIJAGQCBRJsb3R0ZXJ5VG90YWxTdGFrZWQFBmFtb3VudAABCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRNfbG90dGVyeVRvdGFsU3Rha2VkCQBkAgUSbG90dGVyeVRvdGFsU3Rha2VkBQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFEV9sb3R0ZXJ5QWRyU3Rha2VkCQBkAgUQbG90dGVyeUFkclN0YWtlZAUGYW1vdW50CQDMCAIJAQtTdHJpbmdFbnRyeQIFBl9vd25lcgUNY2FsbGVyQWRkcmVzcwUDbmlsAWkBDHN0YXJ0TG90dGVyeQILbG90dGVyeU5hbWUSbG90dGVyeUZpbmFsSGVpZ2h0AwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIKQWRtaW4gb25seQkAzAgCCQELU3RyaW5nRW50cnkCBRJfYWN0aXZlTG90dGVyeU5hbWUFC2xvdHRlcnlOYW1lCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEVa2V5TG90dGVyeUZpbmFsSGVpZ2h0AQULbG90dGVyeU5hbWUFEmxvdHRlcnlGaW5hbEhlaWdodAUDbmlsAWkBDGRlY2xhcmVQcml6ZQQLbG90dGVyeU5hbWUHcHJpemVJZA5wcml6ZVRocmVzaG9sZApwcml6ZVZhbHVlAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIKQWRtaW4gb25seQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGGtleUxvdHRlcnlQcml6ZVRocmVzaG9sZAIFC2xvdHRlcnlOYW1lBQdwcml6ZUlkBQ5wcml6ZVRocmVzaG9sZAkAzAgCCQELU3RyaW5nRW50cnkCCQEUa2V5TG90dGVyeVByaXplVmFsdWUCBQtsb3R0ZXJ5TmFtZQUHcHJpemVJZAUKcHJpemVWYWx1ZQUDbmlsAWkBFGZpbmFsYWl6ZVByaXplUmFuZG9tAgtsb3R0ZXJ5TmFtZQdwcml6ZUlkAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIKQWRtaW4gb25seQQSbG90dGVyeUZpbmFsSGVpZ2h0CQERQGV4dHJOYXRpdmUoMTA1NSkBCQEVa2V5TG90dGVyeUZpbmFsSGVpZ2h0AQULbG90dGVyeU5hbWUDCQBmAgkAZAIFEmxvdHRlcnlGaW5hbEhlaWdodAABBQZoZWlnaHQJAAIBAhdMb3R0ZXJ5IGlzIG5vdCBvdmVyIHlldAQRbG90dGVyeVByaXplVmFsdWUJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEUa2V5TG90dGVyeVByaXplVmFsdWUCBQtsb3R0ZXJ5TmFtZQUHcHJpemVJZAIUUHJpemUgZG9lcyBub3QgZXhpc3QEE19sb3R0ZXJ5UHJpemVSYW5kb20JARVrZXlMb3R0ZXJ5UHJpemVSYW5kb20CBQtsb3R0ZXJ5TmFtZQUHcHJpemVJZAMJAQ9zdHJpbmdLZXlFeGlzdHMBBRNfbG90dGVyeVByaXplUmFuZG9tCQACAQIsVGhlIHByaXplIHJhbmRvbSBoYXMgYWxyZWFkeSBiZWVuIGZpbmFsYWl6ZWQEC2ZpbmFsQmxvY2swCQEFdmFsdWUBCQDtBwEFEmxvdHRlcnlGaW5hbEhlaWdodAQLZmluYWxCbG9jazEJAQV2YWx1ZQEJAO0HAQkAZAIFEmxvdHRlcnlGaW5hbEhlaWdodAABBA5wcml6ZVJhbmRvbVJhdwkAngMBCQD3AwEJAMsBAgkAywECCQDLAQIBCXaHZZZaLbXq8gkAmgMBBQdwcml6ZUlkCQEFdmFsdWUBCAULZmluYWxCbG9jazADdnJmCQEFdmFsdWUBCAULZmluYWxCbG9jazEDdnJmBAtwcml6ZVJhbmRvbQMJAL8CAgkAtgIBAAAFDnByaXplUmFuZG9tUmF3CQC+AgEFDnByaXplUmFuZG9tUmF3BQ5wcml6ZVJhbmRvbVJhdwkAzAgCCQELU3RyaW5nRW50cnkCBRNfbG90dGVyeVByaXplUmFuZG9tCQCmAwEFC3ByaXplUmFuZG9tBQNuaWwBaQEUZmluYWxhaXplUHJpemVXaW5uZXIDC2xvdHRlcnlOYW1lB3ByaXplSWQJd2lubmVyQWRyAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIKQWRtaW4gb25seQQTX2xvdHRlcnlQcml6ZVdpbm5lcgkBFWtleUxvdHRlcnlQcml6ZVdpbm5lcgIFC2xvdHRlcnlOYW1lBQdwcml6ZUlkAwkBD3N0cmluZ0tleUV4aXN0cwEFE19sb3R0ZXJ5UHJpemVXaW5uZXIJAAIBAixUaGUgcHJpemUgd2lubmVyIGhhcyBhbHJlYWR5IGJlZW4gZmluYWxhaXplZAQRX2xvdHRlcnlBZHJTdGFrZWQJARNrZXlMb3R0ZXJ5QWRyU3Rha2VkAgULbG90dGVyeU5hbWUFCXdpbm5lckFkcgQQbG90dGVyeUFkclN0YWtlZAkBEGdldEludGVnZXJPckVsc2UCBRFfbG90dGVyeUFkclN0YWtlZAAABBFfbG90dGVyeUFkckxvY2tlZAkBE2tleUxvdHRlcnlBZHJMb2NrZWQCBQtsb3R0ZXJ5TmFtZQUJd2lubmVyQWRyBBBsb3R0ZXJ5QWRyTG9ja2VkCQEQZ2V0SW50ZWdlck9yRWxzZQIFEV9sb3R0ZXJ5QWRyTG9ja2VkAAAJAMwIAgkBDEludGVnZXJFbnRyeQIFEV9sb3R0ZXJ5QWRyU3Rha2VkAAAJAMwIAgkBDEludGVnZXJFbnRyeQIFEV9sb3R0ZXJ5QWRyTG9ja2VkCQBkAgUQbG90dGVyeUFkckxvY2tlZAUQbG90dGVyeUFkclN0YWtlZAkAzAgCCQELU3RyaW5nRW50cnkCBRNfbG90dGVyeVByaXplV2lubmVyBQl3aW5uZXJBZHIFA25pbAECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXmvpWzk",
    "height": 2739209,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 8SW79yERkseQURvtRNdZpXn41YYvGyR7r9wgcsRYQe8h
Next: GKCL5iBWBeTaduHTMLGS9LwgiGYf8cbVMyc1Peum3dqQ

Diff: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
let lotteryAssetID = fromBase58String("3Lz23mSUvT1EswcBn2sURYJG2at8rG5aFuUrTAwaPM6Q")
5
-
6
-
let ticketSize = 1
4
+
let lotteryAssetID = base58'3Lz23mSUvT1EswcBn2sURYJG2at8rG5aFuUrTAwaPM6Q'
7
5
 
8
6
 
func getIntegerOrElse (key,val) = valueOrElse(getInteger(key), val)
9
7
 
11
9
 
func getStringOrElse (key,val) = valueOrElse(getString(key), val)
12
10
 
13
11
 
14
-
func mk (x) = makeString(x, "_")
12
+
func stringKeyExists (key) = if (isDefined(getString(key)))
13
+
    then true
14
+
    else false
15
15
 
16
16
 
17
-
func keyAdrTotalStaked (adr) = mk(["adr", adr, "totalStaked"])
17
+
func mk (x) = makeString(x, "_")
18
18
 
19
19
 
20
20
 
func keyLotteryTotalStaked (lotteryName) = mk(["lottery", lotteryName, "totalStaked"])
35
35
 
func keyLotteryPrizeThreshold (lotteryName,prizeID) = mk(["lottery", lotteryName, "prize", toString(prizeID), "threshold"])
36
36
 
37
37
 
38
-
func keyLotteryPrizeChoice (lotteryName,prizeID) = mk(["lottery", lotteryName, "prize", toString(prizeID), "choice"])
38
+
func keyLotteryPrizeRandom (lotteryName,prizeID) = mk(["lottery", lotteryName, "prize", toString(prizeID), "random"])
39
39
 
40
40
 
41
-
func keyLotteryPrizeRandom (lotteryName,prizeID) = mk(["lottery", lotteryName, "prize", toString(prizeID), "random"])
41
+
func keyLotteryPrizeWinner (lotteryName,prizeID) = mk(["lottery", lotteryName, "prize", toString(prizeID), "winner"])
42
42
 
43
43
 
44
44
 
func keyLotteryTicketsOwner (lotteryName,from,to) = mk(["lottery", lotteryName, "from", toString(from), "to", toString(to), "owner"])
67
67
 
    if ((lotteryName == ""))
68
68
 
        then throw("Lottery not active")
69
69
 
        else if ((size(i.payments) == 0))
70
-
            then throw("No payment added")
70
+
            then throw("No payment added. You must attach a payment in Dodllnode tokens")
71
71
 
            else if ((size(i.payments) != 1))
72
-
                then throw("Too many payments added")
72
+
                then throw("Too many payments added. There must be only one attached payment")
73
73
 
                else if ((i.payments[0].assetId != lotteryAssetID))
74
-
                    then throw("Wrong payment assetId")
74
+
                    then throw("Wrong payment assetID. You must attach a payment in Dodllnode tokens")
75
75
 
                    else {
76
76
 
                        let amount = i.payments[0].amount
77
-
                        let ticketAmount = (amount / ticketSize)
78
-
                        if ((ticketAmount == 0))
79
-
                            then throw("Not enough to buy at least one ticket")
80
-
                            else {
81
-
                                let callerAddress = toString(i.caller)
82
-
                                let _lotteryTotalStaked = keyLotteryTotalStaked(lotteryName)
83
-
                                let lotteryTotalStaked = getIntegerOrElse(_lotteryTotalStaked, 0)
84
-
                                let _owner = keyLotteryTicketsOwner(lotteryName, lotteryTotalStaked, ((lotteryTotalStaked + ticketAmount) - 1))
85
-
                                let _adrTotalStaked = keyAdrTotalStaked(callerAddress)
86
-
                                let adrTotalStaked = getIntegerOrElse(_adrTotalStaked, 0)
87
-
                                let _lotteryAdrStaked = keyLotteryAdrStaked(lotteryName, callerAddress)
88
-
                                let adrLotteryTotalStaked = getIntegerOrElse(_lotteryAdrStaked, 0)
89
-
                                let change = (amount - (ticketAmount * ticketSize))
90
-
                                let globalTotalStaked = getIntegerOrElse(_globalTotalStaked, 0)
91
-
[ScriptTransfer(i.caller, change, lotteryAssetID), StringEntry(_owner, callerAddress), IntegerEntry(_globalTotalStaked, (globalTotalStaked + ticketAmount)), IntegerEntry(_lotteryTotalStaked, (lotteryTotalStaked + ticketAmount)), IntegerEntry(_adrTotalStaked, (adrTotalStaked + ticketAmount)), IntegerEntry(_lotteryAdrStaked, (adrLotteryTotalStaked + ticketAmount))]
92
-
                                }
77
+
                        let callerAddress = toString(i.caller)
78
+
                        let _lotteryTotalStaked = keyLotteryTotalStaked(lotteryName)
79
+
                        let lotteryTotalStaked = getIntegerOrElse(_lotteryTotalStaked, 0)
80
+
                        let _lotteryAdrStaked = keyLotteryAdrStaked(lotteryName, callerAddress)
81
+
                        let lotteryAdrStaked = getIntegerOrElse(_lotteryAdrStaked, 0)
82
+
                        let _owner = keyLotteryTicketsOwner(lotteryName, lotteryTotalStaked, ((lotteryTotalStaked + amount) - 1))
83
+
[IntegerEntry(_lotteryTotalStaked, (lotteryTotalStaked + amount)), IntegerEntry(_lotteryAdrStaked, (lotteryAdrStaked + amount)), StringEntry(_owner, callerAddress)]
93
84
 
                        }
94
85
 
    }
95
86
 
118
109
 
            then throw("Lottery is not over yet")
119
110
 
            else {
120
111
 
                let lotteryPrizeValue = valueOrErrorMessage(getString(keyLotteryPrizeValue(lotteryName, prizeId)), "Prize does not exist")
121
-
                let finalBlock0 = value(blockInfoByHeight(lotteryFinalHeight))
122
-
                let finalBlock1 = value(blockInfoByHeight((lotteryFinalHeight + 1)))
123
-
                let prizeRandomRaw = toBigInt(sha256((((base58'2WWKxchwx7zBB' + toBytes(prizeId)) + value(finalBlock0.vrf)) + value(finalBlock1.vrf))))
124
-
                let prizeRandom = if ((toBigInt(0) > prizeRandomRaw))
125
-
                    then -(prizeRandomRaw)
126
-
                    else prizeRandomRaw
127
-
[StringEntry(keyLotteryPrizeRandom(lotteryName, prizeId), toString(prizeRandom))]
112
+
                let _lotteryPrizeRandom = keyLotteryPrizeRandom(lotteryName, prizeId)
113
+
                if (stringKeyExists(_lotteryPrizeRandom))
114
+
                    then throw("The prize random has already been finalaized")
115
+
                    else {
116
+
                        let finalBlock0 = value(blockInfoByHeight(lotteryFinalHeight))
117
+
                        let finalBlock1 = value(blockInfoByHeight((lotteryFinalHeight + 1)))
118
+
                        let prizeRandomRaw = toBigInt(sha256((((base58'2WWKxchwx7zBB' + toBytes(prizeId)) + value(finalBlock0.vrf)) + value(finalBlock1.vrf))))
119
+
                        let prizeRandom = if ((toBigInt(0) > prizeRandomRaw))
120
+
                            then -(prizeRandomRaw)
121
+
                            else prizeRandomRaw
122
+
[StringEntry(_lotteryPrizeRandom, toString(prizeRandom))]
123
+
                        }
128
124
 
                }
129
125
 
        }
130
126
 
131
127
 
132
128
 
133
129
 
@Callable(i)
134
-
func declarePrizeWinner (lotteryName,prizeId,winnerAdr) = if ((i.caller != this))
130
+
func finalaizePrizeWinner (lotteryName,prizeId,winnerAdr) = if ((i.caller != this))
135
131
 
    then throw("Admin only")
136
-
    else [StringEntry("", "")]
132
+
    else {
133
+
        let _lotteryPrizeWinner = keyLotteryPrizeWinner(lotteryName, prizeId)
134
+
        if (stringKeyExists(_lotteryPrizeWinner))
135
+
            then throw("The prize winner has already been finalaized")
136
+
            else {
137
+
                let _lotteryAdrStaked = keyLotteryAdrStaked(lotteryName, winnerAdr)
138
+
                let lotteryAdrStaked = getIntegerOrElse(_lotteryAdrStaked, 0)
139
+
                let _lotteryAdrLocked = keyLotteryAdrLocked(lotteryName, winnerAdr)
140
+
                let lotteryAdrLocked = getIntegerOrElse(_lotteryAdrLocked, 0)
141
+
[IntegerEntry(_lotteryAdrStaked, 0), IntegerEntry(_lotteryAdrLocked, (lotteryAdrLocked + lotteryAdrStaked)), StringEntry(_lotteryPrizeWinner, winnerAdr)]
142
+
                }
143
+
        }
137
144
 
138
145
 
139
146
 
@Verifier(tx)
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
let lotteryAssetID = fromBase58String("3Lz23mSUvT1EswcBn2sURYJG2at8rG5aFuUrTAwaPM6Q")
5
-
6
-
let ticketSize = 1
4
+
let lotteryAssetID = base58'3Lz23mSUvT1EswcBn2sURYJG2at8rG5aFuUrTAwaPM6Q'
7
5
 
8
6
 
func getIntegerOrElse (key,val) = valueOrElse(getInteger(key), val)
9
7
 
10
8
 
11
9
 
func getStringOrElse (key,val) = valueOrElse(getString(key), val)
12
10
 
13
11
 
14
-
func mk (x) = makeString(x, "_")
12
+
func stringKeyExists (key) = if (isDefined(getString(key)))
13
+
    then true
14
+
    else false
15
15
 
16
16
 
17
-
func keyAdrTotalStaked (adr) = mk(["adr", adr, "totalStaked"])
17
+
func mk (x) = makeString(x, "_")
18
18
 
19
19
 
20
20
 
func keyLotteryTotalStaked (lotteryName) = mk(["lottery", lotteryName, "totalStaked"])
21
21
 
22
22
 
23
23
 
func keyLotteryAdrStaked (lotteryName,adr) = mk(["lottery", lotteryName, "adr", adr, "staked"])
24
24
 
25
25
 
26
26
 
func keyLotteryAdrLocked (lotteryName,adr) = mk(["lottery", lotteryName, "adr", adr, "locked"])
27
27
 
28
28
 
29
29
 
func keyLotteryFinalHeight (lotteryName) = mk(["lottery", lotteryName, "finalHeight"])
30
30
 
31
31
 
32
32
 
func keyLotteryPrizeValue (lotteryName,prizeID) = mk(["lottery", lotteryName, "prize", toString(prizeID), "value"])
33
33
 
34
34
 
35
35
 
func keyLotteryPrizeThreshold (lotteryName,prizeID) = mk(["lottery", lotteryName, "prize", toString(prizeID), "threshold"])
36
36
 
37
37
 
38
-
func keyLotteryPrizeChoice (lotteryName,prizeID) = mk(["lottery", lotteryName, "prize", toString(prizeID), "choice"])
38
+
func keyLotteryPrizeRandom (lotteryName,prizeID) = mk(["lottery", lotteryName, "prize", toString(prizeID), "random"])
39
39
 
40
40
 
41
-
func keyLotteryPrizeRandom (lotteryName,prizeID) = mk(["lottery", lotteryName, "prize", toString(prizeID), "random"])
41
+
func keyLotteryPrizeWinner (lotteryName,prizeID) = mk(["lottery", lotteryName, "prize", toString(prizeID), "winner"])
42
42
 
43
43
 
44
44
 
func keyLotteryTicketsOwner (lotteryName,from,to) = mk(["lottery", lotteryName, "from", toString(from), "to", toString(to), "owner"])
45
45
 
46
46
 
47
47
 
let _activeLotteryName = mk(["param", "activeLotteryName"])
48
48
 
49
49
 
let _globalTotalStaked = mk(["param", "globalTotalStaked"])
50
50
 
51
51
 
func activeLotteryName () = {
52
52
 
    let lotteryName = getStringOrElse(_activeLotteryName, "")
53
53
 
    if ((lotteryName == ""))
54
54
 
        then ""
55
55
 
        else {
56
56
 
            let lotteryFinalHeight = getIntegerValue(keyLotteryFinalHeight(lotteryName))
57
57
 
            if ((height >= lotteryFinalHeight))
58
58
 
                then ""
59
59
 
                else lotteryName
60
60
 
            }
61
61
 
    }
62
62
 
63
63
 
64
64
 
@Callable(i)
65
65
 
func stake () = {
66
66
 
    let lotteryName = activeLotteryName()
67
67
 
    if ((lotteryName == ""))
68
68
 
        then throw("Lottery not active")
69
69
 
        else if ((size(i.payments) == 0))
70
-
            then throw("No payment added")
70
+
            then throw("No payment added. You must attach a payment in Dodllnode tokens")
71
71
 
            else if ((size(i.payments) != 1))
72
-
                then throw("Too many payments added")
72
+
                then throw("Too many payments added. There must be only one attached payment")
73
73
 
                else if ((i.payments[0].assetId != lotteryAssetID))
74
-
                    then throw("Wrong payment assetId")
74
+
                    then throw("Wrong payment assetID. You must attach a payment in Dodllnode tokens")
75
75
 
                    else {
76
76
 
                        let amount = i.payments[0].amount
77
-
                        let ticketAmount = (amount / ticketSize)
78
-
                        if ((ticketAmount == 0))
79
-
                            then throw("Not enough to buy at least one ticket")
80
-
                            else {
81
-
                                let callerAddress = toString(i.caller)
82
-
                                let _lotteryTotalStaked = keyLotteryTotalStaked(lotteryName)
83
-
                                let lotteryTotalStaked = getIntegerOrElse(_lotteryTotalStaked, 0)
84
-
                                let _owner = keyLotteryTicketsOwner(lotteryName, lotteryTotalStaked, ((lotteryTotalStaked + ticketAmount) - 1))
85
-
                                let _adrTotalStaked = keyAdrTotalStaked(callerAddress)
86
-
                                let adrTotalStaked = getIntegerOrElse(_adrTotalStaked, 0)
87
-
                                let _lotteryAdrStaked = keyLotteryAdrStaked(lotteryName, callerAddress)
88
-
                                let adrLotteryTotalStaked = getIntegerOrElse(_lotteryAdrStaked, 0)
89
-
                                let change = (amount - (ticketAmount * ticketSize))
90
-
                                let globalTotalStaked = getIntegerOrElse(_globalTotalStaked, 0)
91
-
[ScriptTransfer(i.caller, change, lotteryAssetID), StringEntry(_owner, callerAddress), IntegerEntry(_globalTotalStaked, (globalTotalStaked + ticketAmount)), IntegerEntry(_lotteryTotalStaked, (lotteryTotalStaked + ticketAmount)), IntegerEntry(_adrTotalStaked, (adrTotalStaked + ticketAmount)), IntegerEntry(_lotteryAdrStaked, (adrLotteryTotalStaked + ticketAmount))]
92
-
                                }
77
+
                        let callerAddress = toString(i.caller)
78
+
                        let _lotteryTotalStaked = keyLotteryTotalStaked(lotteryName)
79
+
                        let lotteryTotalStaked = getIntegerOrElse(_lotteryTotalStaked, 0)
80
+
                        let _lotteryAdrStaked = keyLotteryAdrStaked(lotteryName, callerAddress)
81
+
                        let lotteryAdrStaked = getIntegerOrElse(_lotteryAdrStaked, 0)
82
+
                        let _owner = keyLotteryTicketsOwner(lotteryName, lotteryTotalStaked, ((lotteryTotalStaked + amount) - 1))
83
+
[IntegerEntry(_lotteryTotalStaked, (lotteryTotalStaked + amount)), IntegerEntry(_lotteryAdrStaked, (lotteryAdrStaked + amount)), StringEntry(_owner, callerAddress)]
93
84
 
                        }
94
85
 
    }
95
86
 
96
87
 
97
88
 
98
89
 
@Callable(i)
99
90
 
func startLottery (lotteryName,lotteryFinalHeight) = if ((i.caller != this))
100
91
 
    then throw("Admin only")
101
92
 
    else [StringEntry(_activeLotteryName, lotteryName), IntegerEntry(keyLotteryFinalHeight(lotteryName), lotteryFinalHeight)]
102
93
 
103
94
 
104
95
 
105
96
 
@Callable(i)
106
97
 
func declarePrize (lotteryName,prizeId,prizeThreshold,prizeValue) = if ((i.caller != this))
107
98
 
    then throw("Admin only")
108
99
 
    else [IntegerEntry(keyLotteryPrizeThreshold(lotteryName, prizeId), prizeThreshold), StringEntry(keyLotteryPrizeValue(lotteryName, prizeId), prizeValue)]
109
100
 
110
101
 
111
102
 
112
103
 
@Callable(i)
113
104
 
func finalaizePrizeRandom (lotteryName,prizeId) = if ((i.caller != this))
114
105
 
    then throw("Admin only")
115
106
 
    else {
116
107
 
        let lotteryFinalHeight = getIntegerValue(keyLotteryFinalHeight(lotteryName))
117
108
 
        if (((lotteryFinalHeight + 1) > height))
118
109
 
            then throw("Lottery is not over yet")
119
110
 
            else {
120
111
 
                let lotteryPrizeValue = valueOrErrorMessage(getString(keyLotteryPrizeValue(lotteryName, prizeId)), "Prize does not exist")
121
-
                let finalBlock0 = value(blockInfoByHeight(lotteryFinalHeight))
122
-
                let finalBlock1 = value(blockInfoByHeight((lotteryFinalHeight + 1)))
123
-
                let prizeRandomRaw = toBigInt(sha256((((base58'2WWKxchwx7zBB' + toBytes(prizeId)) + value(finalBlock0.vrf)) + value(finalBlock1.vrf))))
124
-
                let prizeRandom = if ((toBigInt(0) > prizeRandomRaw))
125
-
                    then -(prizeRandomRaw)
126
-
                    else prizeRandomRaw
127
-
[StringEntry(keyLotteryPrizeRandom(lotteryName, prizeId), toString(prizeRandom))]
112
+
                let _lotteryPrizeRandom = keyLotteryPrizeRandom(lotteryName, prizeId)
113
+
                if (stringKeyExists(_lotteryPrizeRandom))
114
+
                    then throw("The prize random has already been finalaized")
115
+
                    else {
116
+
                        let finalBlock0 = value(blockInfoByHeight(lotteryFinalHeight))
117
+
                        let finalBlock1 = value(blockInfoByHeight((lotteryFinalHeight + 1)))
118
+
                        let prizeRandomRaw = toBigInt(sha256((((base58'2WWKxchwx7zBB' + toBytes(prizeId)) + value(finalBlock0.vrf)) + value(finalBlock1.vrf))))
119
+
                        let prizeRandom = if ((toBigInt(0) > prizeRandomRaw))
120
+
                            then -(prizeRandomRaw)
121
+
                            else prizeRandomRaw
122
+
[StringEntry(_lotteryPrizeRandom, toString(prizeRandom))]
123
+
                        }
128
124
 
                }
129
125
 
        }
130
126
 
131
127
 
132
128
 
133
129
 
@Callable(i)
134
-
func declarePrizeWinner (lotteryName,prizeId,winnerAdr) = if ((i.caller != this))
130
+
func finalaizePrizeWinner (lotteryName,prizeId,winnerAdr) = if ((i.caller != this))
135
131
 
    then throw("Admin only")
136
-
    else [StringEntry("", "")]
132
+
    else {
133
+
        let _lotteryPrizeWinner = keyLotteryPrizeWinner(lotteryName, prizeId)
134
+
        if (stringKeyExists(_lotteryPrizeWinner))
135
+
            then throw("The prize winner has already been finalaized")
136
+
            else {
137
+
                let _lotteryAdrStaked = keyLotteryAdrStaked(lotteryName, winnerAdr)
138
+
                let lotteryAdrStaked = getIntegerOrElse(_lotteryAdrStaked, 0)
139
+
                let _lotteryAdrLocked = keyLotteryAdrLocked(lotteryName, winnerAdr)
140
+
                let lotteryAdrLocked = getIntegerOrElse(_lotteryAdrLocked, 0)
141
+
[IntegerEntry(_lotteryAdrStaked, 0), IntegerEntry(_lotteryAdrLocked, (lotteryAdrLocked + lotteryAdrStaked)), StringEntry(_lotteryPrizeWinner, winnerAdr)]
142
+
                }
143
+
        }
137
144
 
138
145
 
139
146
 
@Verifier(tx)
140
147
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
141
148
 

github/deemru/w8io/169f3d6 
61.16 ms ◑