tx · 7TtPsj5jgQZHS3DuRk8te1D6gsA5GTPX59TpA6A48Hfo

3N61Cvq5XcnPk9rxpy2Rnp3bSr4syNGUJph:  -0.01400000 Waves

2021.10.26 13:41 [1763156] smart account 3N61Cvq5XcnPk9rxpy2Rnp3bSr4syNGUJph > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7TtPsj5jgQZHS3DuRk8te1D6gsA5GTPX59TpA6A48Hfo",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1635244938767,
    "version": 2,
    "chainId": 84,
    "sender": "3N61Cvq5XcnPk9rxpy2Rnp3bSr4syNGUJph",
    "senderPublicKey": "G7cNXePvAHUHmZfXa1eHnvFeH6DuykPC5wm9v9djTKgD",
    "proofs": [
        "4diT4TT1UhVNv59NfrDUEGTnB5GYSJs2yTbCoPmgG8ENH58RaW64Z2BuiBT9fJvwN6vNPvFcbWamkvz3dngpgWbQ"
    ],
    "script": "base64:AAIFAAAAAAAAABEIAhIAEgASAwoBCBIECgIIAQAAAAUAAAAACXVzZXJBc3NldAIAAAAsR3JmZ3BjemNjcm41QWJydUxjdFh3Qzk0MWRnd2lwQnk2SFpZRGFRWEhidWsAAAAACWRBcHBBc3NldAIAAAAsN2FwU0p4TG54REt1bmI3YUJHYXVnNXFmVFg4OGpwYzNSMjI0OXBidUpVMngAAAAACmRlcG9zaXRGZWUAAAAAAAAAA+gAAAAADWNvbnRyb2xsZXJGZWUAAAAAAAAAJxAAAAAAC3BsYXRmb3JtRmVlAAAAAAAAACcQAAAABAAAAAJhOAEAAAAEaW5pdAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAATjNQUEg3eDdpcW9iVzV6aXlpUkNpYzE5clFxS3I2blBZYUsxXzNNdGhzdUM1RUR5ZWhHb0t2eXp3aFp2TUVOcm9IUHNnYVhTX2Vhcm5lZAAAAAAAAAAAAAUAAAADbmlsAAAAAmE4AQAAAARjYWxsAAAAAAQAAAACYTkJAARDAAAABwIAAAAGQXNzZXQxAgAAAA9Bc3NldCBmcm9tIGRBcHAAAAAAAAABhqAAAAAAAAAAAAIGBQAAAAR1bml0AAAAAAAAAAAABAAAAAJiMQkABDgAAAABBQAAAAJhOQkABEwAAAACCQEAAAALQmluYXJ5RW50cnkAAAACAgAAAANiaW4BAAAAAAkABEwAAAACCQEAAAAMQm9vbGVhbkVudHJ5AAAAAgIAAAAEYm9vbAYJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAA2ludAAAAAAAAAAAAQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAANzdHICAAAAAAkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABAgAAAANzdHIJAARMAAAAAgUAAAACYTkFAAAAA25pbAAAAAFpAQAAAAdkZXBvc2l0AAAAAQAAAARwb29sBAAAAAZhbW91bnQICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAQAAAAHYXNzZXRJZAgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAHYXNzZXRJZAQAAAANcG9vbEFtb3VudEtleQkAASwAAAACBQAAAARwb29sAgAAAA5fYXNzZXRfYmFsYW5jZQQAAAALdXNlckFkZHJlc3MJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBAAAABF1c2VyUG9vbEFtb3VudEtleQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEcG9vbAIAAAABXwUAAAALdXNlckFkZHJlc3MCAAAADl9hc3NldF9iYWxhbmNlBAAAABBkQXBwQXNzZXRBZGRyZXNzCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wCAAAADl9zZXJ2aWNlX3Rva2VuBAAAAApwb29sQW1vdW50CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAA1wb29sQW1vdW50S2V5BAAAAAp1c2VyQW1vdW50BAAAAAckbWF0Y2gwCQAEHwAAAAEFAAAAEXVzZXJQb29sQW1vdW50S2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAA2ludAUAAAAHJG1hdGNoMAUAAAADaW50BAAAAAdub3RoaW5nBQAAAAckbWF0Y2gwAAAAAAAAAAAABAAAAA1uZXdQb29sQW1vdW50CQAAZAAAAAIFAAAACnBvb2xBbW91bnQFAAAABmFtb3VudAQAAAARbmV3VXNlclBvb2xBbW91bnQJAABkAAAAAgUAAAAKdXNlckFtb3VudAkAAGUAAAACCQAAZQAAAAIFAAAABmFtb3VudAkBAAAACGZyYWN0aW9uAAAABAUAAAAGYW1vdW50AAAAAAAAAAABBQAAAApkZXBvc2l0RmVlBQAAAARET1dOCQEAAAAIZnJhY3Rpb24AAAAEBQAAAAZhbW91bnQAAAAAAAAAAAEFAAAADWNvbnRyb2xsZXJGZWUFAAAABERPV04JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAZhbW91bnQJAAJZAAAAAQUAAAAQZEFwcEFzc2V0QWRkcmVzcwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAANcG9vbEFtb3VudEtleQUAAAANbmV3UG9vbEFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAARdXNlclBvb2xBbW91bnRLZXkFAAAAEW5ld1VzZXJQb29sQW1vdW50BQAAAANuaWwAAAABaQEAAAAId2l0aGRyYXcAAAACAAAABHBvb2wAAAAKdXNlckVhcm5lZAQAAAAGYW1vdW50CAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQEAAAAB2Fzc2V0SWQICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQEAAAADXBvb2xBbW91bnRLZXkJAAEsAAAAAgUAAAAEcG9vbAIAAAAOX2Fzc2V0X2JhbGFuY2UEAAAAC3VzZXJBZGRyZXNzCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAARdXNlclBvb2xBbW91bnRLZXkJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABHBvb2wCAAAAAV8FAAAAC3VzZXJBZGRyZXNzAgAAAA5fYXNzZXRfYmFsYW5jZQQAAAARdXNlclBvb2xFYXJuZWRLZXkJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABHBvb2wCAAAAAV8FAAAAC3VzZXJBZGRyZXNzAgAAAAdfZWFybmVkBAAAAApwb29sQW1vdW50CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAA1wb29sQW1vdW50S2V5BAAAAAp1c2VyQW1vdW50BAAAAAckbWF0Y2gwCQAEHwAAAAEFAAAAEXVzZXJQb29sQW1vdW50S2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAA2ludAUAAAAHJG1hdGNoMAUAAAADaW50BAAAAAdub3RoaW5nBQAAAAckbWF0Y2gwAAAAAAAAAAAABAAAABB1c2VyRWFybmVkQmVmb3JlBAAAAAckbWF0Y2gwCQAEHwAAAAEFAAAAEXVzZXJQb29sRWFybmVkS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAA2ludAUAAAAHJG1hdGNoMAUAAAADaW50BAAAAAdub3RoaW5nBQAAAAckbWF0Y2gwAAAAAAAAAAAABAAAABBkQXBwQXNzZXRBZGRyZXNzCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHBvb2wCAAAAEF9saXF1aWRpdHlfdG9rZW4EAAAAFWxpcXVpZGl0eVRva2VuRGVjaW1hbAQAAAAHJG1hdGNoMAkAA+wAAAABCQACWQAAAAEFAAAAEGRBcHBBc3NldEFkZHJlc3MDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABUFzc2V0BAAAAAVhc3NldAUAAAAHJG1hdGNoMAgFAAAABWFzc2V0AAAACGRlY2ltYWxzCQAAAgAAAAECAAAAEENhbid0IGZpbmQgYXNzZXQEAAAAD3VzZXJFYXJuZWRUb3RhbAkAAGQAAAACBQAAAAp1c2VyRWFybmVkBQAAABB1c2VyRWFybmVkQmVmb3JlBAAAAA1uZXdQb29sQW1vdW50CQAAZQAAAAIFAAAACnBvb2xBbW91bnQFAAAABmFtb3VudAMJAABnAAAAAgUAAAAKdXNlckFtb3VudAUAAAAGYW1vdW50BAAAABFuZXdVc2VyUG9vbEFtb3VudAkAAGUAAAACBQAAAAp1c2VyQW1vdW50BQAAAAZhbW91bnQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAZhbW91bnQJAAJZAAAAAQUAAAAQZEFwcEFzc2V0QWRkcmVzcwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAANcG9vbEFtb3VudEtleQUAAAANbmV3UG9vbEFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAARdXNlclBvb2xBbW91bnRLZXkFAAAAEW5ld1VzZXJQb29sQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABF1c2VyUG9vbEVhcm5lZEtleQUAAAAPdXNlckVhcm5lZFRvdGFsBQAAAANuaWwJAAACAAAAAQIAAAAmWW91IGhhdmUgbm90IHN1Y2ggYmFsYW5jZSBmb3Igd2l0aGRyYXcAAAABAAAAAmI2AQAAAAJiNwAAAAAJAAH0AAAAAwgFAAAAAmI2AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACYjYAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACYjYAAAAPc2VuZGVyUHVibGljS2V5D7j2hw==",
    "height": 1763156,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 9mZTorj4nh3Wq6q4Rsnnp5ZN7reFcPDWwsCFZdNW1Bvs
Next: GERsMECSxb17ngjhoNWAeYzw9a1EXhMtT2Bs8PT3y3am

Diff: 
Old
New
Differences
4
4
 
let userAsset = "Grfgpczccrn5AbruLctXwC941dgwipBy6HZYDaQXHbuk"
5
5
 
6
6
 
let dAppAsset = "7apSJxLnxDKunb7aBGaug5qfTX88jpc3R2249pbuJU2x"
7
+
8
+
let depositFee = 1000
9
+
10
+
let controllerFee = 10000
11
+
12
+
let platformFee = 10000
7
13
 
8
14
 
@Callable(a8)
9
15
 
func init () = [IntegerEntry("3PPH7x7iqobW5ziyiRCic19rQqKr6nPYaK1_3MthsuC5EDyehGoKvyzwhZvMENroHPsgaXS_earned", 0)]
35
41
 
            0
36
42
 
    }
37
43
 
    let newPoolAmount = (poolAmount + amount)
38
-
    let newUserPoolAmount = (userAmount + amount)
44
+
    let newUserPoolAmount = (userAmount + ((amount - fraction(amount, 1, depositFee, DOWN)) - fraction(amount, 1, controllerFee, DOWN)))
39
45
 
[ScriptTransfer(i.caller, amount, fromBase58String(dAppAssetAddress)), IntegerEntry(poolAmountKey, newPoolAmount), IntegerEntry(userPoolAmountKey, newUserPoolAmount)]
40
46
 
    }
41
47
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let userAsset = "Grfgpczccrn5AbruLctXwC941dgwipBy6HZYDaQXHbuk"
5
5
 
6
6
 
let dAppAsset = "7apSJxLnxDKunb7aBGaug5qfTX88jpc3R2249pbuJU2x"
7
+
8
+
let depositFee = 1000
9
+
10
+
let controllerFee = 10000
11
+
12
+
let platformFee = 10000
7
13
 
8
14
 
@Callable(a8)
9
15
 
func init () = [IntegerEntry("3PPH7x7iqobW5ziyiRCic19rQqKr6nPYaK1_3MthsuC5EDyehGoKvyzwhZvMENroHPsgaXS_earned", 0)]
10
16
 
11
17
 
12
18
 
13
19
 
@Callable(a8)
14
20
 
func call () = {
15
21
 
    let a9 = Issue("Asset1", "Asset from dApp", 100000, 2, true, unit, 0)
16
22
 
    let b1 = calculateAssetId(a9)
17
23
 
[BinaryEntry("bin", base58''), BooleanEntry("bool", true), IntegerEntry("int", 1), StringEntry("str", ""), DeleteEntry("str"), a9]
18
24
 
    }
19
25
 
20
26
 
21
27
 
22
28
 
@Callable(i)
23
29
 
func deposit (pool) = {
24
30
 
    let amount = i.payments[0].amount
25
31
 
    let assetId = i.payments[0].assetId
26
32
 
    let poolAmountKey = (pool + "_asset_balance")
27
33
 
    let userAddress = toString(i.caller)
28
34
 
    let userPoolAmountKey = (((pool + "_") + userAddress) + "_asset_balance")
29
35
 
    let dAppAssetAddress = getStringValue(this, (pool + "_service_token"))
30
36
 
    let poolAmount = getIntegerValue(this, poolAmountKey)
31
37
 
    let userAmount =     match getInteger(userPoolAmountKey) {
32
38
 
        case int: Int => 
33
39
 
            int
34
40
 
        case nothing => 
35
41
 
            0
36
42
 
    }
37
43
 
    let newPoolAmount = (poolAmount + amount)
38
-
    let newUserPoolAmount = (userAmount + amount)
44
+
    let newUserPoolAmount = (userAmount + ((amount - fraction(amount, 1, depositFee, DOWN)) - fraction(amount, 1, controllerFee, DOWN)))
39
45
 
[ScriptTransfer(i.caller, amount, fromBase58String(dAppAssetAddress)), IntegerEntry(poolAmountKey, newPoolAmount), IntegerEntry(userPoolAmountKey, newUserPoolAmount)]
40
46
 
    }
41
47
 
42
48
 
43
49
 
44
50
 
@Callable(i)
45
51
 
func withdraw (pool,userEarned) = {
46
52
 
    let amount = i.payments[0].amount
47
53
 
    let assetId = i.payments[0].assetId
48
54
 
    let poolAmountKey = (pool + "_asset_balance")
49
55
 
    let userAddress = toString(i.caller)
50
56
 
    let userPoolAmountKey = (((pool + "_") + userAddress) + "_asset_balance")
51
57
 
    let userPoolEarnedKey = (((pool + "_") + userAddress) + "_earned")
52
58
 
    let poolAmount = getIntegerValue(this, poolAmountKey)
53
59
 
    let userAmount =     match getInteger(userPoolAmountKey) {
54
60
 
        case int: Int => 
55
61
 
            int
56
62
 
        case nothing => 
57
63
 
            0
58
64
 
    }
59
65
 
    let userEarnedBefore =     match getInteger(userPoolEarnedKey) {
60
66
 
        case int: Int => 
61
67
 
            int
62
68
 
        case nothing => 
63
69
 
            0
64
70
 
    }
65
71
 
    let dAppAssetAddress = getStringValue(this, (pool + "_liquidity_token"))
66
72
 
    let liquidityTokenDecimal =     match assetInfo(fromBase58String(dAppAssetAddress)) {
67
73
 
        case asset: Asset => 
68
74
 
            asset.decimals
69
75
 
        case _ => 
70
76
 
            throw("Can't find asset")
71
77
 
    }
72
78
 
    let userEarnedTotal = (userEarned + userEarnedBefore)
73
79
 
    let newPoolAmount = (poolAmount - amount)
74
80
 
    if ((userAmount >= amount))
75
81
 
        then {
76
82
 
            let newUserPoolAmount = (userAmount - amount)
77
83
 
[ScriptTransfer(i.caller, amount, fromBase58String(dAppAssetAddress)), IntegerEntry(poolAmountKey, newPoolAmount), IntegerEntry(userPoolAmountKey, newUserPoolAmount), IntegerEntry(userPoolEarnedKey, userEarnedTotal)]
78
84
 
            }
79
85
 
        else throw("You have not such balance for withdraw")
80
86
 
    }
81
87
 
82
88
 
83
89
 
@Verifier(b6)
84
90
 
func b7 () = sigVerify(b6.bodyBytes, b6.proofs[0], b6.senderPublicKey)
85
91
 

github/deemru/w8io/169f3d6 
49.41 ms ◑