tx · EK6tfbE8VauEQgMCo1Hc8gaho8dBdGytmu7uYAZvdfLZ

3PPK7G7BQf3yWQdXapuBhEhYkaqNBfcvNtk:  -0.01000000 Waves

2023.02.02 11:15 [3497278] smart account 3PPK7G7BQf3yWQdXapuBhEhYkaqNBfcvNtk > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "EK6tfbE8VauEQgMCo1Hc8gaho8dBdGytmu7uYAZvdfLZ",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1675325733032,
    "version": 2,
    "chainId": 87,
    "sender": "3PPK7G7BQf3yWQdXapuBhEhYkaqNBfcvNtk",
    "senderPublicKey": "A7NMFMzFrP68kDc9YuQ5eyn4AvoXyFaRuanTKhzinA7k",
    "proofs": [
        "2cBGgUt53LEqN1RRXyhBHWiyiTKn7H2ZGX2wRNTDpuWGtcuSR3ryTcaY74w2y6zpCLcqunRCCbewwJsxYWuEoVbc"
    ],
    "script": "base64:AAIFAAAAAAAAAAYIAhIAEgAAAAAGAAAAAAJ0dwEAAAAaAVdOBKn1coze5/nSUkrduGtTRYx6p5o4fZwAAAAAAkJBAQAAACB19pDo+iQUNS+1pwLfGQjdfJGdXb6DGMwVHmctRKderQAAAAADVENJAQAAACAvcuyPyu3LtpuGl5PRUZuv2GSHTPer8NlqQ8AJPJwXXwAAAAAJaXNTdG9wcGVkBwAAAAAGbXVsdGk4AAAAAAAF9eEAAAAAAAdtdWx0aTEwAAAAAAJUC+QAAAAAAgAAAAFpAQAAAAVzdGFrZQAAAAAEAAAAA3BtdAkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAQAAAAJcG10QW1vdW50CAUAAAADcG10AAAABmFtb3VudAMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAACQkEJAAACAAAAAQIAAAAYWW91IGNhbiBzdGFrZSBzTlNCVCBvbmx5AwUAAAAJaXNTdG9wcGVkCQAAAgAAAAECAAAAGXNtYXJ0IGNvbnRyYWN0IGlzIG9uIGxvY2sEAAAACmluVHJlYXN1cnkJAAPwAAAAAgUAAAAEdGhpcwUAAAACQkEEAAAAC3RvdGFsSXNzdWVkBAAAAAckbWF0Y2gwCQAD7AAAAAEFAAAAA1RDSQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAFQXNzZXQEAAAABWFzc2V0BQAAAAckbWF0Y2gwCAUAAAAFYXNzZXQAAAAIcXVhbnRpdHkJAAACAAAAAQIAAAAQQ2FuJ3QgZmluZCBhc3NldAQAAAAIdHJlYXN1cnkJAABlAAAAAgUAAAAKaW5UcmVhc3VyeQUAAAAJcG10QW1vdW50BAAAABBzaW5nbGVUQ0lpblZhbHVlCQAAawAAAAMFAAAAC3RvdGFsSXNzdWVkAAAAAAAF9eEABQAAAAh0cmVhc3VyeQQAAAADZmVlCQAAawAAAAMFAAAACXBtdEFtb3VudAUAAAAGbXVsdGk4BQAAAAdtdWx0aTEwBAAAABZkZXBvc2l0QmFsYW5jZUFmdGVyRmVlCQAAZQAAAAIFAAAACXBtdEFtb3VudAUAAAADZmVlBAAAAA1hbW91bnRUb0lzc3VlCQAAawAAAAMFAAAAFmRlcG9zaXRCYWxhbmNlQWZ0ZXJGZWUFAAAAEHNpbmdsZVRDSWluVmFsdWUAAAAAAAX14QAEAAAACFRDSUlzc3VlCQEAAAAHUmVpc3N1ZQAAAAMFAAAAA1RDSQUAAAANYW1vdW50VG9Jc3N1ZQYEAAAACHRyYW5zZmVyCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAADWFtb3VudFRvSXNzdWUFAAAAA1RDSQQAAAALdHJhbnNmZXJGZWUJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAAAdBZGRyZXNzAAAAAQUAAAACdHcFAAAAA2ZlZQUAAAACQkEJAARMAAAAAgUAAAAIVENJSXNzdWUJAARMAAAAAgUAAAAIdHJhbnNmZXIFAAAAA25pbAAAAAFpAQAAAAh3aXRoZHJhdwAAAAAEAAAAAXcJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAABmFtb3VudAgFAAAAAXcAAAAGYW1vdW50BAAAAAdiYWxhbmNlCQAD8AAAAAIIBQAAAAFpAAAABmNhbGxlcgUAAAADVENJAwkBAAAAAiE9AAAAAggFAAAAAXcAAAAHYXNzZXRJZAUAAAADVENJCQAAAgAAAAECAAAABnNkYXNkYQMJAABnAAAAAgAAAAAAAAAAAAUAAAAGYW1vdW50CQAAAgAAAAECAAAAJENhbid0IHdpdGhkcmF3IDAgb3IgbmVnYXRpdmUgYW1tb3VudAMJAABnAAAAAgAAAAAAAAAAAAUAAAAHYmFsYW5jZQkAAAIAAAABAgAAABtVbnN1ZmljaWVudCBhY2NvdW50IGJhbGFuY2UEAAAACVRDSUFtb3VudAQAAAAHJG1hdGNoMAkAA+wAAAABBQAAAANUQ0kDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABUFzc2V0BAAAAAFxBQAAAAckbWF0Y2gwCAUAAAABcQAAAAhxdWFudGl0eQAAAAAAAAAAAAQAAAACdnAJAABrAAAAAwkAA/AAAAACBQAAAAR0aGlzBQAAAAJCQQUAAAAGbXVsdGk4BQAAAAlUQ0lBbW91bnQEAAAABXRvUmVwCQAAawAAAAMFAAAAAnZwBQAAAAZhbW91bnQFAAAABm11bHRpOAQAAAACdGMJAABrAAAAAwUAAAAFdG9SZXAFAAAABm11bHRpOAUAAAAHbXVsdGkxMAQAAAADYnJuCQEAAAAEQnVybgAAAAIFAAAAA1RDSQUAAAAGYW1vdW50BAAAAAN0cmIJAABlAAAAAgUAAAAFdG9SZXAFAAAAAnRjBAAAAAR0cnNmCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAA3RyYgUAAAACQkEEAAAAA3R0cgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAB0FkZHJlc3MAAAABBQAAAAJ0dwUAAAACdGMFAAAAAkJBCQAETAAAAAIFAAAAA2JybgkABEwAAAACBQAAAAR0cnNmCQAETAAAAAIFAAAAA3R0cgUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXkC9BFo",
    "height": 3497278,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2rbSxqXqwSA17nSfZo8e2MvGoymTVZi6MVAH57cffnDM
Next: DE3hUHkYx9H8rFQc7mXW6UmeaHTsVGVQtjH3YBcvoHfa

Diff: 
Old
New
Differences
8
8
 
let TCI = base58'4CDoUKSAtLTwVTpdxFu6EcbafiCDZUSBXrWGjrAcCPoL'
9
9
 
10
10
 
let isStopped = false
11
+
12
+
let multi8 = 100000000
13
+
14
+
let multi10 = 10000000000
11
15
 
12
16
 
@Callable(i)
13
17
 
func stake () = {
27
31
 
                }
28
32
 
                let treasury = (inTreasury - pmtAmount)
29
33
 
                let singleTCIinValue = fraction(totalIssued, 100000000, treasury)
30
-
                let amountToIssue = fraction(pmtAmount, singleTCIinValue, 100000000)
34
+
                let fee = fraction(pmtAmount, multi8, multi10)
35
+
                let depositBalanceAfterFee = (pmtAmount - fee)
36
+
                let amountToIssue = fraction(depositBalanceAfterFee, singleTCIinValue, 100000000)
31
37
 
                let TCIIssue = Reissue(TCI, amountToIssue, true)
32
38
 
                let transfer = ScriptTransfer(i.caller, amountToIssue, TCI)
39
+
                let transferFee = ScriptTransfer(Address(tw), fee, BA)
33
40
 
[TCIIssue, transfer]
34
41
 
                }
35
42
 
    }
54
61
 
                        case _ => 
55
62
 
                            0
56
63
 
                    }
57
-
                    let vp = fraction(assetBalance(this, BA), 100000000, TCIAmount)
58
-
                    let toRep = fraction(vp, amount, 100000000)
59
-
                    let tc = fraction(toRep, 100000000, 10000000000)
64
+
                    let vp = fraction(assetBalance(this, BA), multi8, TCIAmount)
65
+
                    let toRep = fraction(vp, amount, multi8)
66
+
                    let tc = fraction(toRep, multi8, multi10)
60
67
 
                    let brn = Burn(TCI, amount)
61
68
 
                    let trb = (toRep - tc)
62
69
 
                    let trsf = ScriptTransfer(i.caller, trb, BA)
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let tw = base58'3P93R2GBkTGVehRPhytHr7sdxYww93jkbhm'
5
5
 
6
6
 
let BA = base58'8wUmN9Y15f3JR4KZfE81XLXpkdgwnqoBNG6NmocZpKQx'
7
7
 
8
8
 
let TCI = base58'4CDoUKSAtLTwVTpdxFu6EcbafiCDZUSBXrWGjrAcCPoL'
9
9
 
10
10
 
let isStopped = false
11
+
12
+
let multi8 = 100000000
13
+
14
+
let multi10 = 10000000000
11
15
 
12
16
 
@Callable(i)
13
17
 
func stake () = {
14
18
 
    let pmt = value(i.payments[0])
15
19
 
    let pmtAmount = pmt.amount
16
20
 
    if ((pmt.assetId != BA))
17
21
 
        then throw("You can stake sNSBT only")
18
22
 
        else if (isStopped)
19
23
 
            then throw("smart contract is on lock")
20
24
 
            else {
21
25
 
                let inTreasury = assetBalance(this, BA)
22
26
 
                let totalIssued =                 match assetInfo(TCI) {
23
27
 
                    case asset: Asset => 
24
28
 
                        asset.quantity
25
29
 
                    case _ => 
26
30
 
                        throw("Can't find asset")
27
31
 
                }
28
32
 
                let treasury = (inTreasury - pmtAmount)
29
33
 
                let singleTCIinValue = fraction(totalIssued, 100000000, treasury)
30
-
                let amountToIssue = fraction(pmtAmount, singleTCIinValue, 100000000)
34
+
                let fee = fraction(pmtAmount, multi8, multi10)
35
+
                let depositBalanceAfterFee = (pmtAmount - fee)
36
+
                let amountToIssue = fraction(depositBalanceAfterFee, singleTCIinValue, 100000000)
31
37
 
                let TCIIssue = Reissue(TCI, amountToIssue, true)
32
38
 
                let transfer = ScriptTransfer(i.caller, amountToIssue, TCI)
39
+
                let transferFee = ScriptTransfer(Address(tw), fee, BA)
33
40
 
[TCIIssue, transfer]
34
41
 
                }
35
42
 
    }
36
43
 
37
44
 
38
45
 
39
46
 
@Callable(i)
40
47
 
func withdraw () = {
41
48
 
    let w = value(i.payments[0])
42
49
 
    let amount = w.amount
43
50
 
    let balance = assetBalance(i.caller, TCI)
44
51
 
    if ((w.assetId != TCI))
45
52
 
        then throw("sdasda")
46
53
 
        else if ((0 >= amount))
47
54
 
            then throw("Can't withdraw 0 or negative ammount")
48
55
 
            else if ((0 >= balance))
49
56
 
                then throw("Unsuficient account balance")
50
57
 
                else {
51
58
 
                    let TCIAmount =                     match assetInfo(TCI) {
52
59
 
                        case q: Asset => 
53
60
 
                            q.quantity
54
61
 
                        case _ => 
55
62
 
                            0
56
63
 
                    }
57
-
                    let vp = fraction(assetBalance(this, BA), 100000000, TCIAmount)
58
-
                    let toRep = fraction(vp, amount, 100000000)
59
-
                    let tc = fraction(toRep, 100000000, 10000000000)
64
+
                    let vp = fraction(assetBalance(this, BA), multi8, TCIAmount)
65
+
                    let toRep = fraction(vp, amount, multi8)
66
+
                    let tc = fraction(toRep, multi8, multi10)
60
67
 
                    let brn = Burn(TCI, amount)
61
68
 
                    let trb = (toRep - tc)
62
69
 
                    let trsf = ScriptTransfer(i.caller, trb, BA)
63
70
 
                    let ttr = ScriptTransfer(Address(tw), tc, BA)
64
71
 
[brn, trsf, ttr]
65
72
 
                    }
66
73
 
    }
67
74
 
68
75
 
69
76
 
@Verifier(tx)
70
77
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
71
78
 

github/deemru/w8io/6500d08 
31.88 ms ◑