tx · ENDZPHbYLBjZPGNoHfaydWTVTPfHC1UjkWjSKuHJDUWJ

3N8XBzcbxt5snTdkqVSobDjtDGbTns27DdY:  -0.01400000 Waves

2020.10.06 18:38 [1208891] smart account 3N8XBzcbxt5snTdkqVSobDjtDGbTns27DdY > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "ENDZPHbYLBjZPGNoHfaydWTVTPfHC1UjkWjSKuHJDUWJ",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1601998769920,
    "version": 2,
    "chainId": 84,
    "sender": "3N8XBzcbxt5snTdkqVSobDjtDGbTns27DdY",
    "senderPublicKey": "HhWoKsFPjXVx9nYfPydpV9BwLmuUdJyJ8ydtyVJVxg9Z",
    "proofs": [
        "2e9AmP8MSWUHzHzqzBeH1Vtb3vYxCfKHLzy1MUq4eh7hRoLoBhqNKZeFxmcF9tMtZe6GFhmxa6Fxr3SFV7RTAbHP"
    ],
    "script": "base64:AAIDAAAAAAAAAAYIARIAEgAAAAAAAAAAAgAAAAFpAQAAAAdkZXBvc2l0AAAAAAQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQEAAAAC2Jsb2NrSGVpZ2h0CAUAAAAJbGFzdEJsb2NrAAAABmhlaWdodAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAhY2FuIGhvZGwgd2F2ZXMgb25seSBhdCB0aGUgbW9tZW50BAAAAApjdXJyZW50S2V5CQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABHRoaXMFAAAACmN1cnJlbnRLZXkJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAACmN1cnJlbnRLZXkJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAGkAAAAAQkAAGgAAAACCQAAaQAAAAIIBQAAAANwbXQAAAAGYW1vdW50AAAAAAAAAABkAAAAAAAAAAB4AgAAAAFfCQABpAAAAAEFAAAAC2Jsb2NrSGVpZ2h0AgAAAAJfMAUAAAADbmlsBAAAAAdvbGREYXRhCQAEtQAAAAIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwUAAAAKY3VycmVudEtleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAANzdHIFAAAAByRtYXRjaDAFAAAAA3N0cgkAAAIAAAABAgAAAAVlcnJvcgIAAAABXwQAAAANY3VycmVudEFtb3VudAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAB29sZERhdGEAAAAAAAAAAAAJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAACmN1cnJlbnRLZXkJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAAaQAAAABCQAAZAAAAAIFAAAADWN1cnJlbnRBbW91bnQJAABoAAAAAgkAAGkAAAACCAUAAAADcG10AAAABmFtb3VudAAAAAAAAAAAZAAAAAAAAAAAeAIAAAABXwkAAaQAAAABBQAAAAtibG9ja0hlaWdodAIAAAABXwkAAZEAAAACBQAAAAdvbGREYXRhAAAAAAAAAAACBQAAAANuaWwAAAABaQEAAAAId2l0aGRyYXcAAAAABAAAAA9mcm9zdEJsb2NrQ291bnQAAAAAAAAAAAoEAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50BAAAAAZhbW91bnQIBQAAAANwbXQAAAAGYW1vdW50BAAAAApjdXJyZW50S2V5CQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAB29sZERhdGEJAAS1AAAAAgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAApjdXJyZW50S2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAA3N0cgUAAAAHJG1hdGNoMAUAAAADc3RyCQAAAgAAAAECAAAABWVycm9yAgAAAAFfBAAAAAlvbGRBbW91bnQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAdvbGREYXRhAAAAAAAAAAAABAAAAAluZXdBbW91bnQJAABlAAAAAgUAAAAJb2xkQW1vdW50BQAAAAZhbW91bnQEAAAAC2Jsb2NrSGVpZ2h0CAUAAAAJbGFzdEJsb2NrAAAABmhlaWdodAQAAAAQZnJvc3RCbG9ja0hlaWdodAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAB29sZERhdGEAAAAAAAAAAAEEAAAAEmRlZnJvc3RCbG9ja0hlaWdodAkAAGQAAAACBQAAABBmcm9zdEJsb2NrSGVpZ2h0BQAAAA9mcm9zdEJsb2NrQ291bnQEAAAAC3N1bVdpdGhkcmF3CQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAdvbGREYXRhAAAAAAAAAAACBQAAAAZhbW91bnQEAAAAC21heFdpdGhkcmF3AwkAAGcAAAACBQAAAAtibG9ja0hlaWdodAUAAAASZGVmcm9zdEJsb2NrSGVpZ2h0BQAAAAlvbGRBbW91bnQJAABoAAAAAgkAAGkAAAACBQAAAAlvbGRBbW91bnQFAAAAD2Zyb3N0QmxvY2tDb3VudAkAAGUAAAACBQAAABJkZWZyb3N0QmxvY2tIZWlnaHQFAAAAC2Jsb2NrSGVpZ2h0AwkAAGYAAAACAAAAAAAAAAAABQAAAAZhbW91bnQJAAACAAAAAQIAAAAeQ2FuJ3Qgd2l0aGRyYXcgbmVnYXRpdmUgYW1vdW50AwkAAGYAAAACBQAAAAZhbW91bnQFAAAAC21heFdpdGhkcmF3CQAAAgAAAAECAAAADFdhaXQgZGVmcm9zdAMJAABmAAAAAgAAAAAAAAAAAAUAAAAJbmV3QW1vdW50CQAAAgAAAAECAAAAEk5vdCBlbm91Z2ggYmFsYW5jZQkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAACmN1cnJlbnRLZXkJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAGkAAAAAQUAAAAJbmV3QW1vdW50AgAAAAFfCQABkQAAAAIFAAAAB29sZERhdGEAAAAAAAAAAAECAAAAAV8JAAGkAAAAAQUAAAALc3VtV2l0aGRyYXcCAAAAAV8JAAGkAAAAAQUAAAALbWF4V2l0aGRyYXcFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAABmFtb3VudAUAAAAEdW5pdAUAAAADbmlsAAAAAIzPQck=",
    "height": 1208891,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: ySfmQTJN883eV5tRAxPW4tbNhBatKFMbyYKCrZThxzu
Next: 7EJAm9Qk6LBdzrkx8rKTF3QLzbUK84aXvbuKTHKuzM2R

Diff: 
Old
New
Differences
29
29
 
30
30
 
31
31
 
@Callable(i)
32
-
func withdraw (amount) = {
32
+
func withdraw () = {
33
+
    let frostBlockCount = 10
34
+
    let pmt = extract(i.payment)
35
+
    let amount = pmt.amount
33
36
 
    let currentKey = toBase58String(i.caller.bytes)
34
37
 
    let oldData = split(    match getString(this, currentKey) {
35
38
 
        case str: String => 
37
40
 
        case _ => 
38
41
 
            throw("error")
39
42
 
    }, "_")
40
-
    let currentAmount = parseIntValue(oldData[0])
43
+
    let oldAmount = parseIntValue(oldData[0])
44
+
    let newAmount = (oldAmount - amount)
45
+
    let blockHeight = lastBlock.height
46
+
    let frostBlockHeight = parseIntValue(oldData[1])
47
+
    let defrostBlockHeight = (frostBlockHeight + frostBlockCount)
41
48
 
    let sumWithdraw = (parseIntValue(oldData[2]) + amount)
42
-
    let newAmount = (currentAmount - amount)
49
+
    let maxWithdraw = if ((blockHeight >= defrostBlockHeight))
50
+
        then oldAmount
51
+
        else ((oldAmount / frostBlockCount) * (defrostBlockHeight - blockHeight))
43
52
 
    if ((0 > amount))
44
53
 
        then throw("Can't withdraw negative amount")
45
-
        else if ((0 > newAmount))
46
-
            then throw("Not enough balance")
47
-
            else ScriptResult(WriteSet([DataEntry(currentKey, ((((toString(newAmount) + "_") + oldData[1]) + "_") + toString(sumWithdraw)))]), TransferSet([ScriptTransfer(i.caller, amount, unit)]))
54
+
        else if ((amount > maxWithdraw))
55
+
            then throw("Wait defrost")
56
+
            else if ((0 > newAmount))
57
+
                then throw("Not enough balance")
58
+
                else ScriptResult(WriteSet([DataEntry(currentKey, ((((((toString(newAmount) + "_") + oldData[1]) + "_") + toString(sumWithdraw)) + "_") + toString(maxWithdraw)))]), TransferSet([ScriptTransfer(i.caller, amount, unit)]))
48
59
 
    }
49
60
 
50
61
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 3 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
5
5
 
6
6
 
@Callable(i)
7
7
 
func deposit () = {
8
8
 
    let pmt = extract(i.payment)
9
9
 
    let blockHeight = lastBlock.height
10
10
 
    if (isDefined(pmt.assetId))
11
11
 
        then throw("can hodl waves only at the moment")
12
12
 
        else {
13
13
 
            let currentKey = toBase58String(i.caller.bytes)
14
14
 
            if (!(isDefined(getString(this, currentKey))))
15
15
 
                then WriteSet([DataEntry(currentKey, (((toString(((pmt.amount / 100) * 120)) + "_") + toString(blockHeight)) + "_0"))])
16
16
 
                else {
17
17
 
                    let oldData = split(                    match getString(this, currentKey) {
18
18
 
                        case str: String => 
19
19
 
                            str
20
20
 
                        case _ => 
21
21
 
                            throw("error")
22
22
 
                    }, "_")
23
23
 
                    let currentAmount = parseIntValue(oldData[0])
24
24
 
                    WriteSet([DataEntry(currentKey, ((((toString((currentAmount + ((pmt.amount / 100) * 120))) + "_") + toString(blockHeight)) + "_") + oldData[2]))])
25
25
 
                    }
26
26
 
            }
27
27
 
    }
28
28
 
29
29
 
30
30
 
31
31
 
@Callable(i)
32
-
func withdraw (amount) = {
32
+
func withdraw () = {
33
+
    let frostBlockCount = 10
34
+
    let pmt = extract(i.payment)
35
+
    let amount = pmt.amount
33
36
 
    let currentKey = toBase58String(i.caller.bytes)
34
37
 
    let oldData = split(    match getString(this, currentKey) {
35
38
 
        case str: String => 
36
39
 
            str
37
40
 
        case _ => 
38
41
 
            throw("error")
39
42
 
    }, "_")
40
-
    let currentAmount = parseIntValue(oldData[0])
43
+
    let oldAmount = parseIntValue(oldData[0])
44
+
    let newAmount = (oldAmount - amount)
45
+
    let blockHeight = lastBlock.height
46
+
    let frostBlockHeight = parseIntValue(oldData[1])
47
+
    let defrostBlockHeight = (frostBlockHeight + frostBlockCount)
41
48
 
    let sumWithdraw = (parseIntValue(oldData[2]) + amount)
42
-
    let newAmount = (currentAmount - amount)
49
+
    let maxWithdraw = if ((blockHeight >= defrostBlockHeight))
50
+
        then oldAmount
51
+
        else ((oldAmount / frostBlockCount) * (defrostBlockHeight - blockHeight))
43
52
 
    if ((0 > amount))
44
53
 
        then throw("Can't withdraw negative amount")
45
-
        else if ((0 > newAmount))
46
-
            then throw("Not enough balance")
47
-
            else ScriptResult(WriteSet([DataEntry(currentKey, ((((toString(newAmount) + "_") + oldData[1]) + "_") + toString(sumWithdraw)))]), TransferSet([ScriptTransfer(i.caller, amount, unit)]))
54
+
        else if ((amount > maxWithdraw))
55
+
            then throw("Wait defrost")
56
+
            else if ((0 > newAmount))
57
+
                then throw("Not enough balance")
58
+
                else ScriptResult(WriteSet([DataEntry(currentKey, ((((((toString(newAmount) + "_") + oldData[1]) + "_") + toString(sumWithdraw)) + "_") + toString(maxWithdraw)))]), TransferSet([ScriptTransfer(i.caller, amount, unit)]))
48
59
 
    }
49
60
 
50
61
 

github/deemru/w8io/3ef1775 
29.21 ms ◑