tx · 2htDoUJasz5csoLv68KfPZ85RG9nrvvzH8Enah568W6N

3MuVxxVfgdoobfADVjpHZXLJ2dNse6zQA8o:  -0.01400000 Waves

2019.08.03 08:22 [614249] smart account 3MuVxxVfgdoobfADVjpHZXLJ2dNse6zQA8o > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2htDoUJasz5csoLv68KfPZ85RG9nrvvzH8Enah568W6N",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1564809790746,
    "version": 1,
    "sender": "3MuVxxVfgdoobfADVjpHZXLJ2dNse6zQA8o",
    "senderPublicKey": "J3FHH7LcE3Xj4yGipA2YSxCnR1RZM9tSNFGXeETQQoMd",
    "proofs": [
        "3oP29oY9gX9uj5f5bThGywqC73UzTWZ7Z5g69ob5wVZh18VkhCHaXbD6PinYGX1NZH6uZteUjPVf2MqooMLN1Dmv"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAACAAAAAAhsYXN0Q2VsbAAAAAAAAAAAGQAAAAAIY2VsbHNLZXkCAAAABWNlbGxzAAAAAgAAAAFpAQAAAAZjcmVhdGUAAAAEAAAABG5hbWUAAAAEZGVzYwAAAAt0aWNrZXRQcmljZQAAAAt0aWNrZXRBc3NldAQAAAAHYXNzZXRJZAMJAQAAAAIhPQAAAAIFAAAAC3RpY2tldEFzc2V0AgAAAAVXQVZFUwQAAAAFYUluZm8JAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkAA+wAAAABCQACWQAAAAEFAAAAC3RpY2tldEFzc2V0AgAAACNUaGVyZSBpcyBubyBhc3NldCB3aXRoIHNwZWNpZmllZCBpZAUAAAALdGlja2V0QXNzZXQCAAAAAAQAAAADcG10CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIIBQAAAAFpAAAAB3BheW1lbnQCAAAAD1doZXJlIGlzIHByaXplPwQAAAAKcHJpemVBc3NldAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAJYAAAAAQkBAAAABXZhbHVlAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkAgAAAAADAwMJAAAAAAAAAgUAAAAEbmFtZQIAAAAABgkAAAAAAAACBQAAAARkZXNjAgAAAAAGCQAAZgAAAAIAAAAAAAAAAAAFAAAAC3RpY2tldFByaWNlCQAAAgAAAAECAAAAKUludmFsaWQgbmFtZSwgZGVzY3JpcHRpb24gb3IgdGlja2V0IHByaWNlBAAAAAlsb3R0ZXJ5SWQJAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAlsb3R0ZXJ5SWQCAAAABV9uYW1lBQAAAARuYW1lCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAACWxvdHRlcnlJZAIAAAAFX2Rlc2MFAAAABGRlc2MJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAJbG90dGVyeUlkAgAAAA1fdGlja2V0X3ByaWNlBQAAAAt0aWNrZXRQcmljZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAlsb3R0ZXJ5SWQCAAAADV90aWNrZXRfYXNzZXQFAAAAB2Fzc2V0SWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAJbG90dGVyeUlkAgAAAA1fcHJpemVfYW1vdW50CAUAAAADcG10AAAABmFtb3VudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAlsb3R0ZXJ5SWQCAAAADF9wcml6ZV9hc3NldAUAAAAKcHJpemVBc3NldAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAlsb3R0ZXJ5SWQCAAAACF9jcmVhdG9yCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAJbG90dGVyeUlkAgAAAAZfY2VsbHMAAAAAAAAAAAAJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAJbG90dGVyeUlkAgAAAAdfc3RhdHVzBgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAlsb3R0ZXJ5SWQCAAAACF9iYWxhbmNlAAAAAAAAAAAABQAAAANuaWwAAAABaQEAAAADYnV5AAAAAgAAAAJpZAAAAARjZWxsBAAAAAVjZWxscwkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGgAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAACaWQCAAAABl9jZWxscwIAAAAcTm8gbG90dGVyeSB3aXRoIHNwZWNpZmllZCBpZAQAAAAGc3RhdHVzCQEAAAARQGV4dHJOYXRpdmUoMTA1MSkAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAAAmlkAgAAAAdfc3RhdHVzAwkBAAAAASEAAAABBQAAAAZzdGF0dXMJAAACAAAAAQIAAAAZU3BlY2lmaWVkIGxvdHRlcnkgaXMgb3ZlcgMDCQAAZgAAAAIAAAAAAAAAAAAFAAAABGNlbGwGCQAAZgAAAAIFAAAABGNlbGwFAAAACGxhc3RDZWxsCQAAAgAAAAECAAAADkludmFsaWQgbnVtYmVyBAAAAAt0aWNrZXRQcmljZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAJpZAIAAAANX3RpY2tldF9wcmljZQQAAAALdGlja2V0QXNzZXQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAACaWQCAAAADV90aWNrZXRfYXNzZXQEAAAAA3BtdAkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCAUAAAABaQAAAAdwYXltZW50AgAAABFXaGVyZSBpcyBwYXltZW50PwQAAAAHYXNzZXRJZAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAJYAAAAAQkBAAAABXZhbHVlAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkAgAAAAADAwkBAAAAAiE9AAAAAgUAAAAHYXNzZXRJZAUAAAALdGlja2V0QXNzZXQGCQEAAAACIT0AAAACCAUAAAADcG10AAAABmFtb3VudAUAAAALdGlja2V0UHJpY2UJAAACAAAAAQIAAAAPSW52YWxpZCBwYXltZW50AwkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAAEdGhpcwkAAaQAAAABBQAAAARjZWxsCQAAAgAAAAECAAAADkFscmVhZHkgYm91Z2h0BAAAAARsYXN0CQAAAAAAAAIFAAAABWNlbGxzBQAAAAhsYXN0Q2VsbAMFAAAABGxhc3QEAAAAB2NyZWF0b3IJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAJpZAIAAAAIX2NyZWF0b3IEAAAAB2JhbGFuY2UJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAACaWQCAAAACF9iYWxhbmNlBAAAAAtwcml6ZUFtb3VudAkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAJpZAIAAAANX3ByaXplX2Ftb3VudAQAAAAKcHJpemVBc3NldAkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAJpZAIAAAAMX3ByaXplX2Fzc2V0CQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAJpZAIAAAAHX3N0YXR1cwIAAAAEb3ZlcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAJpZAIAAAAHX2FsYW5jZQAAAAAAAAAAAAUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIDCQAAAAAAAAIFAAAAC3RpY2tldEFzc2V0AgAAAAAJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAB2NyZWF0b3IFAAAAB2JhbGFuY2UFAAAABHVuaXQJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAB2NyZWF0b3IFAAAAB2JhbGFuY2UJAAJZAAAAAQUAAAALdGlja2V0QXNzZXQJAARMAAAAAgMJAAAAAAAAAgUAAAAKcHJpemVBc3NldAIAAAAACQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAC3ByaXplQW1vdW50BQAAAAR1bml0CQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAC3ByaXplQW1vdW50CQACWQAAAAEFAAAACnByaXplQXNzZXQFAAAAA25pbAkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIFAAAAAmlkAgAAAAZfY2VsbDoJAAGkAAAAAQUAAAAEY2VsbAkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAACaWQCAAAABl9jZWxscwkAAGQAAAACBQAAAAVjZWxscwAAAAAAAAAAAQUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAbIGO+0",
    "chainId": 84,
    "height": 614249,
    "spentComplexity": 0
}

View: original | compacted
Prev: J8LxywmDddtE4Mak7Pf7DAKxi8afdRMfHfkqC3nUqdjq
Next: HcPgHvxYwvmGosQ3XCMgFvQrcVh6H1K1s9HZDzeKeaez

Diff: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 3 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
let adminPublicKey = base58'5584brtd1tLqMNJdCzvPFUEL1ujYRyi4Sy3zEZ5nTPsJ'
5
-
6
-
let wctId = base58'DHgwrRvVyqJsepd32YbBqUeDH4GJ1N984X8QoekjgH8J'
7
-
8
-
let wvsPrice = 100000000
9
-
10
-
let wctPrice = 100
11
-
12
-
let lastCell = 24
13
-
14
-
let roundKey = "round"
4
+
let lastCell = 25
15
5
 
16
6
 
let cellsKey = "cells"
17
7
 
18
-
let lastWinKey = "lastWin"
19
-
20
-
let lastWinWctKey = "lastWinWct"
21
-
22
-
let lastWinWvsKey = "lastWinWvs"
23
-
24
8
 
@Callable(i)
25
-
func create (ticketAsset) = {
26
-
    let aInfo = valueOrErrorMessage(assetInfo(fromBase58String(ticketAsset)), "There is no asset with specified id")
27
-
    throw(toBase58String(aInfo.id))
9
+
func create (name,desc,ticketPrice,ticketAsset) = {
10
+
    let assetId = if ((ticketAsset != "WAVES"))
11
+
        then {
12
+
            let aInfo = valueOrErrorMessage(assetInfo(fromBase58String(ticketAsset)), "There is no asset with specified id")
13
+
            ticketAsset
14
+
            }
15
+
        else ""
16
+
    let pmt = valueOrErrorMessage(i.payment, "Where is prize?")
17
+
    let prizeAsset = if (isDefined(pmt.assetId))
18
+
        then toBase58String(value(pmt.assetId))
19
+
        else ""
20
+
    if (if (if ((name == ""))
21
+
        then true
22
+
        else (desc == ""))
23
+
        then true
24
+
        else (0 > ticketPrice))
25
+
        then throw("Invalid name, description or ticket price")
26
+
        else {
27
+
            let lotteryId = toBase58String(i.transactionId)
28
+
            WriteSet([DataEntry((lotteryId + "_name"), name), DataEntry((lotteryId + "_desc"), desc), DataEntry((lotteryId + "_ticket_price"), ticketPrice), DataEntry((lotteryId + "_ticket_asset"), assetId), DataEntry((lotteryId + "_prize_amount"), pmt.amount), DataEntry((lotteryId + "_prize_asset"), prizeAsset), DataEntry((lotteryId + "_creator"), toBase58String(i.caller.bytes)), DataEntry((lotteryId + "_cells"), 0), DataEntry((lotteryId + "_status"), true), DataEntry((lotteryId + "_balance"), 0)])
29
+
            }
28
30
 
    }
29
31
 
30
32
 
31
33
 
32
34
 
@Callable(i)
33
-
func buy (cell) = {
34
-
    let round = extract(getInteger(this, roundKey))
35
-
    let cells = extract(getInteger(this, cellsKey))
36
-
    if (if ((0 > cell))
37
-
        then true
38
-
        else (cell > lastCell))
39
-
        then throw("Invalid number")
40
-
        else {
41
-
            let pmt = valueOrErrorMessage(i.payment, "Where is payment?")
42
-
            let wvs = !(isDefined(pmt.assetId))
43
-
            let wct = (pmt.assetId == wctId)
44
-
            if (if (if (if (!(wct))
45
-
                then !(wvs)
46
-
                else false)
47
-
                then true
48
-
                else if (wct)
49
-
                    then (pmt.amount != wctPrice)
50
-
                    else false)
51
-
                then true
52
-
                else if (wvs)
53
-
                    then (pmt.amount != wvsPrice)
54
-
                    else false)
55
-
                then throw("Price is 1 WCT or 1 WAVES")
56
-
                else {
57
-
                    let cellData = getString(this, toString(cell))
58
-
                    let bought = if (isDefined(cellData))
59
-
                        then {
60
-
                            let cellRound = split(extract(cellData), "_")[1]
61
-
                            if ((cellRound == toString(round)))
62
-
                                then true
63
-
                                else false
64
-
                            }
65
-
                        else false
66
-
                    if (bought)
35
+
func buy (id,cell) = {
36
+
    let cells = valueOrErrorMessage(getInteger(this, (id + "_cells")), "No lottery with specified id")
37
+
    let status = getBooleanValue(this, (id + "_status"))
38
+
    if (!(status))
39
+
        then throw("Specified lottery is over")
40
+
        else if (if ((0 > cell))
41
+
            then true
42
+
            else (cell > lastCell))
43
+
            then throw("Invalid number")
44
+
            else {
45
+
                let ticketPrice = getIntegerValue(this, (id + "_ticket_price"))
46
+
                let ticketAsset = getStringValue(this, (id + "_ticket_asset"))
47
+
                let pmt = valueOrErrorMessage(i.payment, "Where is payment?")
48
+
                let assetId = if (isDefined(pmt.assetId))
49
+
                    then toBase58String(value(pmt.assetId))
50
+
                    else ""
51
+
                if (if ((assetId != ticketAsset))
52
+
                    then true
53
+
                    else (pmt.amount != ticketPrice))
54
+
                    then throw("Invalid payment")
55
+
                    else if (isDefined(getString(this, toString(cell))))
67
56
 
                        then throw("Already bought")
68
57
 
                        else {
69
58
 
                            let last = (cells == lastCell)
70
59
 
                            if (last)
71
60
 
                                then {
72
-
                                    let wctFlag = if (wct)
73
-
                                        then 1
74
-
                                        else 0
75
-
                                    let wvsFlag = if (wvs)
76
-
                                        then 1
77
-
                                        else 0
78
-
                                    let wctAmount = (assetBalance(this, wctId) + (pmt.amount * wctFlag))
79
-
                                    let wvsAmount = (wavesBalance(this) + (pmt.amount * wvsFlag))
80
-
                                    let wvsAdminShare = (wvsAmount / 100)
81
-
                                    let wvsWinShare = (wvsAmount - wvsAdminShare)
82
-
                                    let wctAdminShare = (wctAmount / 100)
83
-
                                    let wctWinShare = (wctAmount - wctAdminShare)
84
-
                                    let adminAddress = addressFromPublicKey(adminPublicKey)
85
-
                                    let winCell = (toInt(lastBlock.generationSignature) % (lastCell + 1))
86
-
                                    let winData = extract(getString(this, toString(winCell)))
87
-
                                    let winAddress = if ((winCell == cell))
88
-
                                        then i.caller
89
-
                                        else extract(addressFromString(split(winData, "_")[0]))
90
-
                                    ScriptResult(WriteSet([DataEntry(toString(cell), ((toString(i.caller) + "_") + toString(round))), DataEntry(cellsKey, 0), DataEntry(roundKey, (round + 1)), DataEntry(lastWinKey, ((toString(winCell) + "_") + toString(winAddress))), DataEntry(lastWinWvsKey, wvsAmount), DataEntry(lastWinWctKey, wctAmount)]), TransferSet([ScriptTransfer(winAddress, wvsWinShare, unit), ScriptTransfer(adminAddress, wvsAdminShare, unit), ScriptTransfer(winAddress, wctWinShare, wctId), ScriptTransfer(adminAddress, wctAdminShare, wctId)]))
61
+
                                    let creator = addressFromStringValue(getStringValue(this, (id + "_creator")))
62
+
                                    let balance = getIntegerValue(this, (id + "_balance"))
63
+
                                    let prizeAmount = getIntegerValue(this, (id + "_prize_amount"))
64
+
                                    let prizeAsset = getStringValue(this, (id + "_prize_asset"))
65
+
                                    ScriptResult(WriteSet([DataEntry((id + "_status"), "over"), DataEntry((id + "_alance"), 0)]), TransferSet([if ((ticketAsset == ""))
66
+
                                        then ScriptTransfer(creator, balance, unit)
67
+
                                        else ScriptTransfer(creator, balance, fromBase58String(ticketAsset)), if ((prizeAsset == ""))
68
+
                                        then ScriptTransfer(i.caller, prizeAmount, unit)
69
+
                                        else ScriptTransfer(i.caller, prizeAmount, fromBase58String(prizeAsset))]))
91
70
 
                                    }
92
-
                                else WriteSet([DataEntry(toString(cell), ((toString(i.caller) + "_") + toString(round))), DataEntry(cellsKey, (cells + 1))])
71
+
                                else WriteSet([DataEntry(((id + "_cell:") + toString(cell)), toString(i.caller)), DataEntry((id + "_cells"), (cells + 1))])
93
72
 
                            }
94
-
                    }
95
-
            }
73
+
                }
96
74
 
    }
97
75
 
98
76
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 3 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
let adminPublicKey = base58'5584brtd1tLqMNJdCzvPFUEL1ujYRyi4Sy3zEZ5nTPsJ'
5
-
6
-
let wctId = base58'DHgwrRvVyqJsepd32YbBqUeDH4GJ1N984X8QoekjgH8J'
7
-
8
-
let wvsPrice = 100000000
9
-
10
-
let wctPrice = 100
11
-
12
-
let lastCell = 24
13
-
14
-
let roundKey = "round"
4
+
let lastCell = 25
15
5
 
16
6
 
let cellsKey = "cells"
17
7
 
18
-
let lastWinKey = "lastWin"
19
-
20
-
let lastWinWctKey = "lastWinWct"
21
-
22
-
let lastWinWvsKey = "lastWinWvs"
23
-
24
8
 
@Callable(i)
25
-
func create (ticketAsset) = {
26
-
    let aInfo = valueOrErrorMessage(assetInfo(fromBase58String(ticketAsset)), "There is no asset with specified id")
27
-
    throw(toBase58String(aInfo.id))
9
+
func create (name,desc,ticketPrice,ticketAsset) = {
10
+
    let assetId = if ((ticketAsset != "WAVES"))
11
+
        then {
12
+
            let aInfo = valueOrErrorMessage(assetInfo(fromBase58String(ticketAsset)), "There is no asset with specified id")
13
+
            ticketAsset
14
+
            }
15
+
        else ""
16
+
    let pmt = valueOrErrorMessage(i.payment, "Where is prize?")
17
+
    let prizeAsset = if (isDefined(pmt.assetId))
18
+
        then toBase58String(value(pmt.assetId))
19
+
        else ""
20
+
    if (if (if ((name == ""))
21
+
        then true
22
+
        else (desc == ""))
23
+
        then true
24
+
        else (0 > ticketPrice))
25
+
        then throw("Invalid name, description or ticket price")
26
+
        else {
27
+
            let lotteryId = toBase58String(i.transactionId)
28
+
            WriteSet([DataEntry((lotteryId + "_name"), name), DataEntry((lotteryId + "_desc"), desc), DataEntry((lotteryId + "_ticket_price"), ticketPrice), DataEntry((lotteryId + "_ticket_asset"), assetId), DataEntry((lotteryId + "_prize_amount"), pmt.amount), DataEntry((lotteryId + "_prize_asset"), prizeAsset), DataEntry((lotteryId + "_creator"), toBase58String(i.caller.bytes)), DataEntry((lotteryId + "_cells"), 0), DataEntry((lotteryId + "_status"), true), DataEntry((lotteryId + "_balance"), 0)])
29
+
            }
28
30
 
    }
29
31
 
30
32
 
31
33
 
32
34
 
@Callable(i)
33
-
func buy (cell) = {
34
-
    let round = extract(getInteger(this, roundKey))
35
-
    let cells = extract(getInteger(this, cellsKey))
36
-
    if (if ((0 > cell))
37
-
        then true
38
-
        else (cell > lastCell))
39
-
        then throw("Invalid number")
40
-
        else {
41
-
            let pmt = valueOrErrorMessage(i.payment, "Where is payment?")
42
-
            let wvs = !(isDefined(pmt.assetId))
43
-
            let wct = (pmt.assetId == wctId)
44
-
            if (if (if (if (!(wct))
45
-
                then !(wvs)
46
-
                else false)
47
-
                then true
48
-
                else if (wct)
49
-
                    then (pmt.amount != wctPrice)
50
-
                    else false)
51
-
                then true
52
-
                else if (wvs)
53
-
                    then (pmt.amount != wvsPrice)
54
-
                    else false)
55
-
                then throw("Price is 1 WCT or 1 WAVES")
56
-
                else {
57
-
                    let cellData = getString(this, toString(cell))
58
-
                    let bought = if (isDefined(cellData))
59
-
                        then {
60
-
                            let cellRound = split(extract(cellData), "_")[1]
61
-
                            if ((cellRound == toString(round)))
62
-
                                then true
63
-
                                else false
64
-
                            }
65
-
                        else false
66
-
                    if (bought)
35
+
func buy (id,cell) = {
36
+
    let cells = valueOrErrorMessage(getInteger(this, (id + "_cells")), "No lottery with specified id")
37
+
    let status = getBooleanValue(this, (id + "_status"))
38
+
    if (!(status))
39
+
        then throw("Specified lottery is over")
40
+
        else if (if ((0 > cell))
41
+
            then true
42
+
            else (cell > lastCell))
43
+
            then throw("Invalid number")
44
+
            else {
45
+
                let ticketPrice = getIntegerValue(this, (id + "_ticket_price"))
46
+
                let ticketAsset = getStringValue(this, (id + "_ticket_asset"))
47
+
                let pmt = valueOrErrorMessage(i.payment, "Where is payment?")
48
+
                let assetId = if (isDefined(pmt.assetId))
49
+
                    then toBase58String(value(pmt.assetId))
50
+
                    else ""
51
+
                if (if ((assetId != ticketAsset))
52
+
                    then true
53
+
                    else (pmt.amount != ticketPrice))
54
+
                    then throw("Invalid payment")
55
+
                    else if (isDefined(getString(this, toString(cell))))
67
56
 
                        then throw("Already bought")
68
57
 
                        else {
69
58
 
                            let last = (cells == lastCell)
70
59
 
                            if (last)
71
60
 
                                then {
72
-
                                    let wctFlag = if (wct)
73
-
                                        then 1
74
-
                                        else 0
75
-
                                    let wvsFlag = if (wvs)
76
-
                                        then 1
77
-
                                        else 0
78
-
                                    let wctAmount = (assetBalance(this, wctId) + (pmt.amount * wctFlag))
79
-
                                    let wvsAmount = (wavesBalance(this) + (pmt.amount * wvsFlag))
80
-
                                    let wvsAdminShare = (wvsAmount / 100)
81
-
                                    let wvsWinShare = (wvsAmount - wvsAdminShare)
82
-
                                    let wctAdminShare = (wctAmount / 100)
83
-
                                    let wctWinShare = (wctAmount - wctAdminShare)
84
-
                                    let adminAddress = addressFromPublicKey(adminPublicKey)
85
-
                                    let winCell = (toInt(lastBlock.generationSignature) % (lastCell + 1))
86
-
                                    let winData = extract(getString(this, toString(winCell)))
87
-
                                    let winAddress = if ((winCell == cell))
88
-
                                        then i.caller
89
-
                                        else extract(addressFromString(split(winData, "_")[0]))
90
-
                                    ScriptResult(WriteSet([DataEntry(toString(cell), ((toString(i.caller) + "_") + toString(round))), DataEntry(cellsKey, 0), DataEntry(roundKey, (round + 1)), DataEntry(lastWinKey, ((toString(winCell) + "_") + toString(winAddress))), DataEntry(lastWinWvsKey, wvsAmount), DataEntry(lastWinWctKey, wctAmount)]), TransferSet([ScriptTransfer(winAddress, wvsWinShare, unit), ScriptTransfer(adminAddress, wvsAdminShare, unit), ScriptTransfer(winAddress, wctWinShare, wctId), ScriptTransfer(adminAddress, wctAdminShare, wctId)]))
61
+
                                    let creator = addressFromStringValue(getStringValue(this, (id + "_creator")))
62
+
                                    let balance = getIntegerValue(this, (id + "_balance"))
63
+
                                    let prizeAmount = getIntegerValue(this, (id + "_prize_amount"))
64
+
                                    let prizeAsset = getStringValue(this, (id + "_prize_asset"))
65
+
                                    ScriptResult(WriteSet([DataEntry((id + "_status"), "over"), DataEntry((id + "_alance"), 0)]), TransferSet([if ((ticketAsset == ""))
66
+
                                        then ScriptTransfer(creator, balance, unit)
67
+
                                        else ScriptTransfer(creator, balance, fromBase58String(ticketAsset)), if ((prizeAsset == ""))
68
+
                                        then ScriptTransfer(i.caller, prizeAmount, unit)
69
+
                                        else ScriptTransfer(i.caller, prizeAmount, fromBase58String(prizeAsset))]))
91
70
 
                                    }
92
-
                                else WriteSet([DataEntry(toString(cell), ((toString(i.caller) + "_") + toString(round))), DataEntry(cellsKey, (cells + 1))])
71
+
                                else WriteSet([DataEntry(((id + "_cell:") + toString(cell)), toString(i.caller)), DataEntry((id + "_cells"), (cells + 1))])
93
72
 
                            }
94
-
                    }
95
-
            }
73
+
                }
96
74
 
    }
97
75
 
98
76
 
99
77
 
@Verifier(tx)
100
78
 
func verify () = true
101
79
 

github/deemru/w8io/169f3d6 
40.69 ms ◑