tx · 7T7WCh4MSJLAVR8AnpcWvRa9WDGnBBS1YQ3Sjny2TjAQ

3MxqwSpM3AG7C7hFro5BBCWeLgyErDC8Bfo:  -0.01000000 Waves

2023.09.14 10:38 [2754776] smart account 3MxqwSpM3AG7C7hFro5BBCWeLgyErDC8Bfo > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7T7WCh4MSJLAVR8AnpcWvRa9WDGnBBS1YQ3Sjny2TjAQ",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1694677079040,
    "version": 2,
    "chainId": 84,
    "sender": "3MxqwSpM3AG7C7hFro5BBCWeLgyErDC8Bfo",
    "senderPublicKey": "3YmXnYZsiso8BMpD6DmjALWpVNLQSa8WEMP8Ron3Vg7V",
    "proofs": [
        "4w3htVsACsHFxKZx5MgSmpcw22XWRqXd2K71Na3NUFvTTNhD94xaX8KzHEcBxMpTBGWxYrdQJM4eRPz7mzmqMNAh"
    ],
    "script": "base64:BgINCAISAwoBARIECgIBAQUAEGN1cnJlbnRMb2NrSWRLZXkCDWN1cnJlbnRMb2NrSWQAA1NFUAICX18BCWFzUGF5bWVudAEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAg9BdHRhY2hlZFBheW1lbnQEAXAFByRtYXRjaDAFAXAJAAIBAiFmYWlsIHRvIGNhc3QgaW50byBBdHRhY2hlZFBheW1lbnQBDGFzQnl0ZVZlY3RvcgEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFwBQckbWF0Y2gwBQFwCQACAQIcZmFpbCB0byBjYXN0IGludG8gQnl0ZVZlY3RvcgEGa2V5SWRzAQdhZGRyZXNzCQCsAgIJAKwCAgUHYWRkcmVzcwUDU0VQAgNpZHMCAWkBBGxvY2sBFHBlckJsb2NrVW5sb2NrQW1vdW50AwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIUT25lIFBheW1lbnQgZXhwZWN0ZWQEB3BheW1lbnQJAQlhc1BheW1lbnQBCQCRAwIIBQFpCHBheW1lbnRzAAADCQBnAgAACAUHcGF5bWVudAZhbW91bnQJAAIBAhdBbW91bnQgbXVzdCBiZSBwb3NpdGl2ZQQNY3VycmVudExvY2tJZAkBC3ZhbHVlT3JFbHNlAgkAnwgBBRBjdXJyZW50TG9ja0lkS2V5AAAEE2NhbGxlckFkZHJlc3NTdHJpbmcJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQUcGF5bWVudEFzc2V0SWRTdHJpbmcDCQEBIQEJAQlpc0RlZmluZWQBCAUHcGF5bWVudAdhc3NldElkAgVXQVZFUwkA2AQBCQEMYXNCeXRlVmVjdG9yAQgFB3BheW1lbnQHYXNzZXRJZAQDa2V5CQCsAgIJAKwCAgUTY2FsbGVyQWRkcmVzc1N0cmluZwUDU0VQCQCkAwEFDWN1cnJlbnRMb2NrSWQEBGRhdGEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCkAwEFBmhlaWdodAUDU0VQCQCkAwEIBQdwYXltZW50BmFtb3VudAUDU0VQAgEwBQNTRVAJAKQDAQUUcGVyQmxvY2tVbmxvY2tBbW91bnQFA1NFUAUUcGF5bWVudEFzc2V0SWRTdHJpbmcEDnByZXZpb3NVc2VySWRzCQELdmFsdWVPckVsc2UCCQCiCAEJAQZrZXlJZHMBBRNjYWxsZXJBZGRyZXNzU3RyaW5nAgAECm5ld1VzZXJJZHMDCQAAAgkAsQIBBQ5wcmV2aW9zVXNlcklkcwAACQCkAwEFDWN1cnJlbnRMb2NrSWQJAKwCAgkArAICBQ5wcmV2aW9zVXNlcklkcwUDU0VQCQCkAwEFDWN1cnJlbnRMb2NrSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgUDa2V5BQRkYXRhCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQZrZXlJZHMBBRNjYWxsZXJBZGRyZXNzU3RyaW5nBQpuZXdVc2VySWRzCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRBjdXJyZW50TG9ja0lkS2V5CQBkAgUNY3VycmVudExvY2tJZAABBQNuaWwBaQEId2l0aGRyYXcCBmFtb3VudAZsb2NrSWQDAwkAZwIAAAUGYW1vdW50BgkAZgIAAAUGbG9ja0lkCQACAQIoQW1vdW50IG11c3QgYmUgcG9zaXRpdmUgb3Igd3JvbmcgbG9jayBpZAQTY2FsbGVyQWRkcmVzc1N0cmluZwkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBANrZXkJAKwCAgkArAICBRNjYWxsZXJBZGRyZXNzU3RyaW5nBQNTRVAJAKQDAQUGbG9ja0lkBAlkYXRhQXJyYXkJALUJAgkBEUBleHRyTmF0aXZlKDEwNTgpAQUDa2V5BQNTRVADCQECIT0CCQCQAwEFCWRhdGFBcnJheQAFCQACAQIOSW50ZXJuYWwgZXJyb3IEDHN0b3JlZEhlaWdodAkAkQMCBQlkYXRhQXJyYXkAAAQMc3RvcmVkQW1vdW50CQCRAwIFCWRhdGFBcnJheQABBBFzdG9yZWRUYWtlZEFtb3VudAkAkQMCBQlkYXRhQXJyYXkAAgQac3RvcmVkUGVyQmxvY2tVbmxvY2tBbW91bnQJAJEDAgUJZGF0YUFycmF5AAMEDXN0b3JlZEFzc2V0SWQJAJEDAgUJZGF0YUFycmF5AAQEDGhlaWdodHNEaWZmcwkAZQIFBmhlaWdodAkBDXBhcnNlSW50VmFsdWUBBQxzdG9yZWRIZWlnaHQED2F2YWlsYWJsZUFtb3VudAkAZQIJAGgCCQENcGFyc2VJbnRWYWx1ZQEFGnN0b3JlZFBlckJsb2NrVW5sb2NrQW1vdW50BQxoZWlnaHRzRGlmZnMJAQ1wYXJzZUludFZhbHVlAQURc3RvcmVkVGFrZWRBbW91bnQDCQBmAgUGYW1vdW50BQ9hdmFpbGFibGVBbW91bnQJAAIBCQCsAgICNlJlcXVlc3RlZCBhbW91bnQgaXMgdHdvIGJpZywgbWF4IGF2YWlsYWJsZSBhbW91bnQgaXM6IAkApAMBBQ9hdmFpbGFibGVBbW91bnQEB25ld0RhdGEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQxzdG9yZWRIZWlnaHQFA1NFUAUMc3RvcmVkQW1vdW50BQNTRVAJAKQDAQkAZAIJAQ1wYXJzZUludFZhbHVlAQURc3RvcmVkVGFrZWRBbW91bnQFBmFtb3VudAUDU0VQBRpzdG9yZWRQZXJCbG9ja1VubG9ja0Ftb3VudAUDU0VQBQ1zdG9yZWRBc3NldElkBBFhc3NldElkVG9UcmFuc2ZlcgMJAAACBQ1zdG9yZWRBc3NldElkAgVXQVZFUwUEdW5pdAkA2QQBBQ1zdG9yZWRBc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIFA2tleQUHbmV3RGF0YQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFBmFtb3VudAURYXNzZXRJZFRvVHJhbnNmZXIFA25pbAECdHgBBnZlcmlmeQAH/wkUTg==",
    "height": 2754776,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: none
Next: none

Full: 
Old
New
Differences
1
-
# no script
1
+
{-# STDLIB_VERSION 6 #-}
2
+
{-# SCRIPT_TYPE ACCOUNT #-}
3
+
{-# CONTENT_TYPE DAPP #-}
4
+
let currentLockIdKey = "currentLockId"
5
+
6
+
let SEP = "__"
7
+
8
+
func asPayment (v) = match v {
9
+
    case p: AttachedPayment => 
10
+
        p
11
+
    case _ => 
12
+
        throw("fail to cast into AttachedPayment")
13
+
}
14
+
15
+
16
+
func asByteVector (v) = match v {
17
+
    case p: ByteVector => 
18
+
        p
19
+
    case _ => 
20
+
        throw("fail to cast into ByteVector")
21
+
}
22
+
23
+
24
+
func keyIds (address) = ((address + SEP) + "ids")
25
+
26
+
27
+
@Callable(i)
28
+
func lock (perBlockUnlockAmount) = if ((size(i.payments) != 1))
29
+
    then throw("One Payment expected")
30
+
    else {
31
+
        let payment = asPayment(i.payments[0])
32
+
        if ((0 >= payment.amount))
33
+
            then throw("Amount must be positive")
34
+
            else {
35
+
                let currentLockId = valueOrElse(getInteger(currentLockIdKey), 0)
36
+
                let callerAddressString = toBase58String(i.caller.bytes)
37
+
                let paymentAssetIdString = if (!(isDefined(payment.assetId)))
38
+
                    then "WAVES"
39
+
                    else toBase58String(asByteVector(payment.assetId))
40
+
                let key = ((callerAddressString + SEP) + toString(currentLockId))
41
+
                let data = ((((((((toString(height) + SEP) + toString(payment.amount)) + SEP) + "0") + SEP) + toString(perBlockUnlockAmount)) + SEP) + paymentAssetIdString)
42
+
                let previosUserIds = valueOrElse(getString(keyIds(callerAddressString)), "")
43
+
                let newUserIds = if ((size(previosUserIds) == 0))
44
+
                    then toString(currentLockId)
45
+
                    else ((previosUserIds + SEP) + toString(currentLockId))
46
+
[StringEntry(key, data), StringEntry(keyIds(callerAddressString), newUserIds), IntegerEntry(currentLockIdKey, (currentLockId + 1))]
47
+
                }
48
+
        }
49
+
50
+
51
+
52
+
@Callable(i)
53
+
func withdraw (amount,lockId) = if (if ((0 >= amount))
54
+
    then true
55
+
    else (0 > lockId))
56
+
    then throw("Amount must be positive or wrong lock id")
57
+
    else {
58
+
        let callerAddressString = toBase58String(i.caller.bytes)
59
+
        let key = ((callerAddressString + SEP) + toString(lockId))
60
+
        let dataArray = split(getStringValue(key), SEP)
61
+
        if ((size(dataArray) != 5))
62
+
            then throw("Internal error")
63
+
            else {
64
+
                let storedHeight = dataArray[0]
65
+
                let storedAmount = dataArray[1]
66
+
                let storedTakedAmount = dataArray[2]
67
+
                let storedPerBlockUnlockAmount = dataArray[3]
68
+
                let storedAssetId = dataArray[4]
69
+
                let heightsDiffs = (height - parseIntValue(storedHeight))
70
+
                let availableAmount = ((parseIntValue(storedPerBlockUnlockAmount) * heightsDiffs) - parseIntValue(storedTakedAmount))
71
+
                if ((amount > availableAmount))
72
+
                    then throw(("Requested amount is two big, max available amount is: " + toString(availableAmount)))
73
+
                    else {
74
+
                        let newData = ((((((((storedHeight + SEP) + storedAmount) + SEP) + toString((parseIntValue(storedTakedAmount) + amount))) + SEP) + storedPerBlockUnlockAmount) + SEP) + storedAssetId)
75
+
                        let assetIdToTransfer = if ((storedAssetId == "WAVES"))
76
+
                            then unit
77
+
                            else fromBase58String(storedAssetId)
78
+
[StringEntry(key, newData), ScriptTransfer(i.caller, amount, assetIdToTransfer)]
79
+
                        }
80
+
                }
81
+
        }
82
+
83
+
84
+
@Verifier(tx)
85
+
func verify () = false
86
+

github/deemru/w8io/169f3d6 
19.01 ms ◑