tx · GyZscZDR6jNh3Fx2y88kroBkVoRYrjjTB1Q63ibCVSn9

3NADYuG3G91PrmsrRqQfyeDCf2Pi53UV5id:  -0.01400000 Waves

2021.05.06 02:23 [1513044] smart account 3NADYuG3G91PrmsrRqQfyeDCf2Pi53UV5id > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "GyZscZDR6jNh3Fx2y88kroBkVoRYrjjTB1Q63ibCVSn9",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1620257063896,
    "version": 2,
    "chainId": 84,
    "sender": "3NADYuG3G91PrmsrRqQfyeDCf2Pi53UV5id",
    "senderPublicKey": "8agr5kfwDL7NLuMetvciXCcd9TcDKZhRwYZPPTAShaCC",
    "proofs": [
        "5KjRmZWpk7goQvcbWBpeCuLh1dLaz19fdNZ9mY8iDeJjND3yT9hQP5nLLryNPHLsWMmuFMK1557NLe5ur4CHMX3N"
    ],
    "script": "base64:AAIEAAAAAAAAABEIAhIECgIBARIAEgASAwoBCAAAAAkAAAAAD2tleUV4Y2hhbmdlUmF0ZQIAAAANZXhjaGFuZ2VfcmF0ZQAAAAAda2V5RXhjaGFuZ2VSYXRlU2NhbGVEZWxpbWl0ZXICAAAAHWV4Y2hhbmdlX3JhdGVfc2NhbGVfZGVsaW1pdGVyAAAAAA1rZXlDb21taXNzaW9uAgAAAApjb21taXNzaW9uAAAAABtrZXlDb21taXNzaW9uU2NhbGVEZWxpbWl0ZXICAAAAGmNvbW1pc3Npb25fc2NhbGVfZGVsaW1pdGVyAAAAAARVU0ROAQAAACC2JinDBPXOU5GkDkt1JC9kjFGx+t+vVCm9SNIdKrKq0QAAAAAGVVdPUkxEAQAAACAtGFOlUDuo5uQJ1exIGoVYlbyPhEbn5MXvOd7nG64s6QAAAAAHYXNzZXRJZAUAAAAEVVNETgAAAAAKY29tbWlzc2lvbgAAAAAAAAB1MAAAAAAYY29tbWlzc2lvblNjYWxlRGVsaW1pdGVyAAAAAAAAD0JAAAAABAAAAAFpAQAAAAlzZXRQYXJhbXMAAAACAAAADGV4Y2hhbmdlUmF0ZQAAABpleGNoYW5nZVJhdGVTY2FsZURlbGltaXRlcgMJAQAAAAIhPQAAAAIIBQAAAAFpAAAABmNhbGxlcgUAAAAEdGhpcwkAAAIAAAABAgAAACtPbmx5IHRoZSBEQXBwIGl0c2VsZiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAA9rZXlFeGNoYW5nZVJhdGUFAAAADGV4Y2hhbmdlUmF0ZQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAda2V5RXhjaGFuZ2VSYXRlU2NhbGVEZWxpbWl0ZXIFAAAAGmV4Y2hhbmdlUmF0ZVNjYWxlRGVsaW1pdGVyCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAA1rZXlDb21taXNzaW9uBQAAAApjb21taXNzaW9uCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABtrZXlDb21taXNzaW9uU2NhbGVEZWxpbWl0ZXIFAAAAGGNvbW1pc3Npb25TY2FsZURlbGltaXRlcgUAAAADbmlsAAAAAWkBAAAACWJ1eVVXT1JMRAAAAAAEAAAACyR0MDEwNDcxMTIyCQAFFAAAAAIICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAHYXNzZXRJZAQAAAAJcG10QW1vdW50CAUAAAALJHQwMTA0NzExMjIAAAACXzEEAAAACnBtdEFzc2V0SWQIBQAAAAskdDAxMDQ3MTEyMgAAAAJfMgMJAQAAAAIhPQAAAAIFAAAACnBtdEFzc2V0SWQFAAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAXQXNzZXQgbXVzdCBiZSBVU0ROIG9ubHkEAAAADGV4Y2hhbmdlUmF0ZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwUAAAAPa2V5RXhjaGFuZ2VSYXRlBAAAABpleGNoYW5nZVJhdGVTY2FsZURlbGltaXRlcgkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwUAAAAda2V5RXhjaGFuZ2VSYXRlU2NhbGVEZWxpbWl0ZXIEAAAAC2Ftb3VudFRvUGF5CQAAawAAAAMFAAAACXBtdEFtb3VudAUAAAAMZXhjaGFuZ2VSYXRlBQAAABpleGNoYW5nZVJhdGVTY2FsZURlbGltaXRlcgQAAAAQYW1vdW50Q29tbWlzc2lvbgkAAGsAAAADBQAAAAthbW91bnRUb1BheQUAAAAKY29tbWlzc2lvbgUAAAAYY29tbWlzc2lvblNjYWxlRGVsaW1pdGVyBAAAABdhbW91bnRXaXRob3V0Q29tbWlzc2lvbgkAAGUAAAACBQAAAAthbW91bnRUb1BheQUAAAAQYW1vdW50Q29tbWlzc2lvbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAF2Ftb3VudFdpdGhvdXRDb21taXNzaW9uBQAAAAZVV09STEQFAAAAA25pbAAAAAFpAQAAAApzZWxsVVdPUkxEAAAAAAQAAAALJHQwMTc4MDE4NTUJAAUUAAAAAggJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50CAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAdhc3NldElkBAAAAAlwbXRBbW91bnQIBQAAAAskdDAxNzgwMTg1NQAAAAJfMQQAAAAKcG10QXNzZXRJZAgFAAAACyR0MDE3ODAxODU1AAAAAl8yAwkBAAAAAiE9AAAAAgUAAAAKcG10QXNzZXRJZAUAAAAGVVdPUkxECQAAAgAAAAECAAAAGUFzc2V0IG11c3QgYmUgVVdPUkxEIG9ubHkEAAAADGV4Y2hhbmdlUmF0ZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwUAAAAPa2V5RXhjaGFuZ2VSYXRlBAAAABpleGNoYW5nZVJhdGVTY2FsZURlbGltaXRlcgkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwUAAAAda2V5RXhjaGFuZ2VSYXRlU2NhbGVEZWxpbWl0ZXIEAAAAC2Ftb3VudFRvUGF5CQAAawAAAAMFAAAACXBtdEFtb3VudAUAAAAaZXhjaGFuZ2VSYXRlU2NhbGVEZWxpbWl0ZXIFAAAADGV4Y2hhbmdlUmF0ZQQAAAAQYW1vdW50Q29tbWlzc2lvbgkAAGsAAAADBQAAAAthbW91bnRUb1BheQUAAAAKY29tbWlzc2lvbgUAAAAYY29tbWlzc2lvblNjYWxlRGVsaW1pdGVyBAAAABdhbW91bnRXaXRob3V0Q29tbWlzc2lvbgkAAGUAAAACBQAAAAthbW91bnRUb1BheQUAAAAQYW1vdW50Q29tbWlzc2lvbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAF2Ftb3VudFdpdGhvdXRDb21taXNzaW9uBQAAAARVU0ROBQAAAANuaWwAAAABaQEAAAALbWFrZVBheW1lbnQAAAABAAAACXJlY2lwaWVudAQAAAAQcmVjaXBpZW50QWRkcmVzcwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAJcmVjaXBpZW50BAAAAAskdDAyNTkxMjY2NgkABRQAAAACCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQEAAAACXBtdEFtb3VudAgFAAAACyR0MDI1OTEyNjY2AAAAAl8xBAAAAApwbXRBc3NldElkCAUAAAALJHQwMjU5MTI2NjYAAAACXzIDCQEAAAACIT0AAAACBQAAAApwbXRBc3NldElkBQAAAAdhc3NldElkCQAAAgAAAAECAAAAF0Fzc2V0IG11c3QgYmUgVVNETiBvbmx5BAAAABBhbW91bnRDb21taXNzaW9uCQAAawAAAAMFAAAACXBtdEFtb3VudAUAAAAKY29tbWlzc2lvbgUAAAAYY29tbWlzc2lvblNjYWxlRGVsaW1pdGVyBAAAABdhbW91bnRXaXRob3V0Q29tbWlzc2lvbgkAAGUAAAACBQAAAAlwbXRBbW91bnQFAAAAEGFtb3VudENvbW1pc3Npb24EAAAADmFtb3VudENhc2hiYWNrCQAAawAAAAMFAAAACXBtdEFtb3VudAAAAAAAAAAACgAAAAAAAAAAZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAABByZWNpcGllbnRBZGRyZXNzBQAAABdhbW91bnRXaXRob3V0Q29tbWlzc2lvbgUAAAAHYXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAABByZWNpcGllbnRBZGRyZXNzBQAAAA5hbW91bnRDYXNoYmFjawUAAAAGVVdPUkxECQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAOYW1vdW50Q2FzaGJhY2sFAAAABlVXT1JMRAUAAAADbmlsAAAAAPmNc9w=",
    "height": 1513044,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2GWm7BkWcubddzHbk3gwuizvVQbvLwFcY6TPVg9fBbGN
Next: 2ouMD1yZhQjWwXZm3KenK3Sn167FXGr1VVqNTgbqWaK1

Diff: 
Old
New
Differences
4
4
 
let keyExchangeRate = "exchange_rate"
5
5
 
6
6
 
let keyExchangeRateScaleDelimiter = "exchange_rate_scale_delimiter"
7
+
8
+
let keyCommission = "commission"
9
+
10
+
let keyCommissionScaleDelimiter = "commission_scale_delimiter"
7
11
 
8
12
 
let USDN = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
9
13
 
18
22
 
@Callable(i)
19
23
 
func setParams (exchangeRate,exchangeRateScaleDelimiter) = if ((i.caller != this))
20
24
 
    then throw("Only the DApp itself can call this function")
21
-
    else [IntegerEntry(keyExchangeRate, exchangeRate), IntegerEntry(keyExchangeRateScaleDelimiter, exchangeRateScaleDelimiter)]
25
+
    else [IntegerEntry(keyExchangeRate, exchangeRate), IntegerEntry(keyExchangeRateScaleDelimiter, exchangeRateScaleDelimiter), IntegerEntry(keyCommission, commission), IntegerEntry(keyCommissionScaleDelimiter, commissionScaleDelimiter)]
26
+
27
+
28
+
29
+
@Callable(i)
30
+
func buyUWORLD () = {
31
+
    let $t010471122 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
32
+
    let pmtAmount = $t010471122._1
33
+
    let pmtAssetId = $t010471122._2
34
+
    if ((pmtAssetId != assetId))
35
+
        then throw("Asset must be USDN only")
36
+
        else {
37
+
            let exchangeRate = getIntegerValue(this, keyExchangeRate)
38
+
            let exchangeRateScaleDelimiter = getIntegerValue(this, keyExchangeRateScaleDelimiter)
39
+
            let amountToPay = fraction(pmtAmount, exchangeRate, exchangeRateScaleDelimiter)
40
+
            let amountCommission = fraction(amountToPay, commission, commissionScaleDelimiter)
41
+
            let amountWithoutCommission = (amountToPay - amountCommission)
42
+
[ScriptTransfer(i.caller, amountWithoutCommission, UWORLD)]
43
+
            }
44
+
    }
45
+
46
+
47
+
48
+
@Callable(i)
49
+
func sellUWORLD () = {
50
+
    let $t017801855 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
51
+
    let pmtAmount = $t017801855._1
52
+
    let pmtAssetId = $t017801855._2
53
+
    if ((pmtAssetId != UWORLD))
54
+
        then throw("Asset must be UWORLD only")
55
+
        else {
56
+
            let exchangeRate = getIntegerValue(this, keyExchangeRate)
57
+
            let exchangeRateScaleDelimiter = getIntegerValue(this, keyExchangeRateScaleDelimiter)
58
+
            let amountToPay = fraction(pmtAmount, exchangeRateScaleDelimiter, exchangeRate)
59
+
            let amountCommission = fraction(amountToPay, commission, commissionScaleDelimiter)
60
+
            let amountWithoutCommission = (amountToPay - amountCommission)
61
+
[ScriptTransfer(i.caller, amountWithoutCommission, USDN)]
62
+
            }
63
+
    }
22
64
 
23
65
 
24
66
 
25
67
 
@Callable(i)
26
68
 
func makePayment (recipient) = {
27
69
 
    let recipientAddress = addressFromStringValue(recipient)
28
-
    let $t0912987 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
29
-
    let pmtAmount = $t0912987._1
30
-
    let pmtAssetId = $t0912987._2
70
+
    let $t025912666 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
71
+
    let pmtAmount = $t025912666._1
72
+
    let pmtAssetId = $t025912666._2
31
73
 
    if ((pmtAssetId != assetId))
32
74
 
        then throw("Asset must be USDN only")
33
75
 
        else {
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 4 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let keyExchangeRate = "exchange_rate"
5
5
 
6
6
 
let keyExchangeRateScaleDelimiter = "exchange_rate_scale_delimiter"
7
+
8
+
let keyCommission = "commission"
9
+
10
+
let keyCommissionScaleDelimiter = "commission_scale_delimiter"
7
11
 
8
12
 
let USDN = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
9
13
 
10
14
 
let UWORLD = base58'432rwiV6mi3SJGLkhGPeyHVNUj8rEgHpXwyc1yXj4M6Y'
11
15
 
12
16
 
let assetId = USDN
13
17
 
14
18
 
let commission = 30000
15
19
 
16
20
 
let commissionScaleDelimiter = 1000000
17
21
 
18
22
 
@Callable(i)
19
23
 
func setParams (exchangeRate,exchangeRateScaleDelimiter) = if ((i.caller != this))
20
24
 
    then throw("Only the DApp itself can call this function")
21
-
    else [IntegerEntry(keyExchangeRate, exchangeRate), IntegerEntry(keyExchangeRateScaleDelimiter, exchangeRateScaleDelimiter)]
25
+
    else [IntegerEntry(keyExchangeRate, exchangeRate), IntegerEntry(keyExchangeRateScaleDelimiter, exchangeRateScaleDelimiter), IntegerEntry(keyCommission, commission), IntegerEntry(keyCommissionScaleDelimiter, commissionScaleDelimiter)]
26
+
27
+
28
+
29
+
@Callable(i)
30
+
func buyUWORLD () = {
31
+
    let $t010471122 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
32
+
    let pmtAmount = $t010471122._1
33
+
    let pmtAssetId = $t010471122._2
34
+
    if ((pmtAssetId != assetId))
35
+
        then throw("Asset must be USDN only")
36
+
        else {
37
+
            let exchangeRate = getIntegerValue(this, keyExchangeRate)
38
+
            let exchangeRateScaleDelimiter = getIntegerValue(this, keyExchangeRateScaleDelimiter)
39
+
            let amountToPay = fraction(pmtAmount, exchangeRate, exchangeRateScaleDelimiter)
40
+
            let amountCommission = fraction(amountToPay, commission, commissionScaleDelimiter)
41
+
            let amountWithoutCommission = (amountToPay - amountCommission)
42
+
[ScriptTransfer(i.caller, amountWithoutCommission, UWORLD)]
43
+
            }
44
+
    }
45
+
46
+
47
+
48
+
@Callable(i)
49
+
func sellUWORLD () = {
50
+
    let $t017801855 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
51
+
    let pmtAmount = $t017801855._1
52
+
    let pmtAssetId = $t017801855._2
53
+
    if ((pmtAssetId != UWORLD))
54
+
        then throw("Asset must be UWORLD only")
55
+
        else {
56
+
            let exchangeRate = getIntegerValue(this, keyExchangeRate)
57
+
            let exchangeRateScaleDelimiter = getIntegerValue(this, keyExchangeRateScaleDelimiter)
58
+
            let amountToPay = fraction(pmtAmount, exchangeRateScaleDelimiter, exchangeRate)
59
+
            let amountCommission = fraction(amountToPay, commission, commissionScaleDelimiter)
60
+
            let amountWithoutCommission = (amountToPay - amountCommission)
61
+
[ScriptTransfer(i.caller, amountWithoutCommission, USDN)]
62
+
            }
63
+
    }
22
64
 
23
65
 
24
66
 
25
67
 
@Callable(i)
26
68
 
func makePayment (recipient) = {
27
69
 
    let recipientAddress = addressFromStringValue(recipient)
28
-
    let $t0912987 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
29
-
    let pmtAmount = $t0912987._1
30
-
    let pmtAssetId = $t0912987._2
70
+
    let $t025912666 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
71
+
    let pmtAmount = $t025912666._1
72
+
    let pmtAssetId = $t025912666._2
31
73
 
    if ((pmtAssetId != assetId))
32
74
 
        then throw("Asset must be USDN only")
33
75
 
        else {
34
76
 
            let amountCommission = fraction(pmtAmount, commission, commissionScaleDelimiter)
35
77
 
            let amountWithoutCommission = (pmtAmount - amountCommission)
36
78
 
            let amountCashback = fraction(pmtAmount, 10, 100)
37
79
 
[ScriptTransfer(recipientAddress, amountWithoutCommission, assetId), ScriptTransfer(recipientAddress, amountCashback, UWORLD), ScriptTransfer(i.caller, amountCashback, UWORLD)]
38
80
 
            }
39
81
 
    }
40
82
 
41
83
 

github/deemru/w8io/026f985 
27.00 ms ◑