tx · AiLsaKw2ijpTbCAbKhqnvXxQeHBs8vUVQCW2TM91A6F4

3P3tqaeh4YQLUPg4HcbPntE7FUzzSFdftCg:  -0.01000000 Waves

2021.07.20 14:25 [2686649] smart account 3P3tqaeh4YQLUPg4HcbPntE7FUzzSFdftCg > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "AiLsaKw2ijpTbCAbKhqnvXxQeHBs8vUVQCW2TM91A6F4",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1626780405098,
    "version": 2,
    "chainId": 87,
    "sender": "3P3tqaeh4YQLUPg4HcbPntE7FUzzSFdftCg",
    "senderPublicKey": "AiCfoeEPUiBVQvmRQvXgSThf3GhJZfy2AHSLFyV4nTMd",
    "proofs": [
        "bFubmuyHY7g2MKAkZyzWXzgiBorfPuGSokFxGGBQfnsWxRj8fKnVdTJM354Y3NyAJU9w4EUR4Ym8s36LYkeiigQ"
    ],
    "script": "base64:AAIEAAAAAAAAABcIAhIFCgMICAgSABIAEgASABIECgIICAAAAAoAAAAADmtleUJ1eVVMVVNSYXRlAgAAAA1idXlfVUxVU19yYXRlAAAAABxrZXlCdXlVTFVTUmF0ZVNjYWxlRGVsaW1pdGVyAgAAAB1idXlfVUxVU19yYXRlX3NjYWxlX2RlbGltaXRlcgAAAAAPa2V5U2VsbFVMVVNSYXRlAgAAAA5zZWxsX1VMVVNfcmF0ZQAAAAAda2V5U2VsbFVMVVNSYXRlU2NhbGVEZWxpbWl0ZXICAAAAHnNlbGxfVUxVU19yYXRlX3NjYWxlX2RlbGltaXRlcgAAAAANa2V5TWFrZU5GVEZlZQIAAAAQa2V5X21ha2VfTkZUX2ZlZQAAAAANa2V5Q29tbWlzc2lvbgIAAAAKY29tbWlzc2lvbgAAAAAba2V5Q29tbWlzc2lvblNjYWxlRGVsaW1pdGVyAgAAABpjb21taXNzaW9uX3NjYWxlX2RlbGltaXRlcgAAAAAEVVNETgEAAAAgtiYpwwT1zlORpA5LdSQvZIxRsfrfr1QpvUjSHSqyqtEAAAAABFVMVVMBAAAAIDYKzNWR7xMtnI7DIv2L9bY17hGQSODoIhPtOidhf3VzAAAAAAdhc3NldElkBQAAAARVU0ROAAAABgAAAAFpAQAAAAdtYWtlTkZUAAAAAwAAAARuYW1lAAAAC2Rlc2NyaXB0aW9uAAAACXByb2R1Y3RJZAQAAAALJHQwMTA5NzExNzIJAAUUAAAAAggJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50CAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAdhc3NldElkBAAAAAlwbXRBbW91bnQIBQAAAAskdDAxMDk3MTE3MgAAAAJfMQQAAAAKcG10QXNzZXRJZAgFAAAACyR0MDEwOTcxMTcyAAAAAl8yBAAAAAptYWtlTkZUZmVlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAA1rZXlNYWtlTkZURmVlAwkBAAAAAiE9AAAAAgUAAAAKcG10QXNzZXRJZAUAAAAHYXNzZXRJZAkAAAIAAAABAgAAABdBc3NldCBtdXN0IGJlIFVTRE4gb25seQMJAABmAAAAAgUAAAAKbWFrZU5GVGZlZQUAAAAJcG10QW1vdW50CQAAAgAAAAEJAAEsAAAAAgIAAAAaRmVlIGZvciBtYWtlIE5GVCB0b2tlbiBpcyAJAAGkAAAAAQUAAAAKbWFrZU5GVGZlZQMJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABHRoaXMFAAAACXByb2R1Y3RJZAkAAAIAAAABAgAAAClORlQgZm9yIHRoaXMgcHJvZHVjdElkIGlzIGFscmVhZHkgaXNzdWVkLgQAAAAIbmV3QXNzZXQJAARDAAAABwUAAAAEbmFtZQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAALZGVzY3JpcHRpb24CAAAAAVsFAAAACXByb2R1Y3RJZAIAAAABXQAAAAAAAAAAAQAAAAAAAAAAAAcFAAAABHVuaXQAAAAAAAAAAAAEAAAACm5ld0Fzc2V0SWQJAAQ4AAAAAQUAAAAIbmV3QXNzZXQJAARMAAAAAgUAAAAIbmV3QXNzZXQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAJcHJvZHVjdElkCQACWAAAAAEFAAAACm5ld0Fzc2V0SWQFAAAAA25pbAAAAAFpAQAAAAlzZXRQYXJhbXMAAAAAAwkBAAAAAiE9AAAAAggFAAAAAWkAAAAGY2FsbGVyBQAAAAR0aGlzCQAAAgAAAAECAAAAK09ubHkgdGhlIERBcHAgaXRzZWxmIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAADmtleUJ1eVVMVVNSYXRlAAAAAAAAAknwCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABxrZXlCdXlVTFVTUmF0ZVNjYWxlRGVsaW1pdGVyAAAAAAAAAAPoCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAA9rZXlTZWxsVUxVU1JhdGUAAAAAAAABhqAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAHWtleVNlbGxVTFVTUmF0ZVNjYWxlRGVsaW1pdGVyAAAAAAAAAAPoCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAA1rZXlDb21taXNzaW9uAAAAAAAAAHUwCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABtrZXlDb21taXNzaW9uU2NhbGVEZWxpbWl0ZXIAAAAAAAAPQkAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAADWtleU1ha2VORlRGZWUAAAAAAAAPQkAFAAAAA25pbAAAAAFpAQAAAA5jbGVhck9sZFBhcmFtcwAAAAADCQEAAAACIT0AAAACCAUAAAABaQAAAAZjYWxsZXIFAAAABHRoaXMJAAACAAAAAQIAAAArT25seSB0aGUgREFwcCBpdHNlbGYgY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgQAAAAQa2V5QnV5VVdPUkxEUmF0ZQIAAAAPYnV5X1VXT1JMRF9yYXRlBAAAAB5rZXlCdXlVV09STERSYXRlU2NhbGVEZWxpbWl0ZXICAAAAH2J1eV9VV09STERfcmF0ZV9zY2FsZV9kZWxpbWl0ZXIEAAAAEWtleVNlbGxVV09STERSYXRlAgAAABBzZWxsX1VXT1JMRF9yYXRlBAAAAB9rZXlTZWxsVVdPUkxEUmF0ZVNjYWxlRGVsaW1pdGVyAgAAACBzZWxsX1VXT1JMRF9yYXRlX3NjYWxlX2RlbGltaXRlcgkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABBQAAABBrZXlCdXlVV09STERSYXRlCQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEFAAAAHmtleUJ1eVVXT1JMRFJhdGVTY2FsZURlbGltaXRlcgkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABBQAAABFrZXlTZWxsVVdPUkxEUmF0ZQkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABBQAAAB9rZXlTZWxsVVdPUkxEUmF0ZVNjYWxlRGVsaW1pdGVyBQAAAANuaWwAAAABaQEAAAAHYnV5VUxVUwAAAAAEAAAACyR0MDMxMjMzMTk4CQAFFAAAAAIICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAHYXNzZXRJZAQAAAAJcG10QW1vdW50CAUAAAALJHQwMzEyMzMxOTgAAAACXzEEAAAACnBtdEFzc2V0SWQIBQAAAAskdDAzMTIzMzE5OAAAAAJfMgMJAQAAAAIhPQAAAAIFAAAACnBtdEFzc2V0SWQFAAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAXQXNzZXQgbXVzdCBiZSBVU0ROIG9ubHkEAAAADGV4Y2hhbmdlUmF0ZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwUAAAAOa2V5QnV5VUxVU1JhdGUEAAAAGmV4Y2hhbmdlUmF0ZVNjYWxlRGVsaW1pdGVyCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAABxrZXlCdXlVTFVTUmF0ZVNjYWxlRGVsaW1pdGVyBAAAAAthbW91bnRUb1BheQkAAGsAAAADBQAAAAlwbXRBbW91bnQFAAAAGmV4Y2hhbmdlUmF0ZVNjYWxlRGVsaW1pdGVyBQAAAAxleGNoYW5nZVJhdGUEAAAAF2Ftb3VudFdpdGhvdXRDb21taXNzaW9uBQAAAAthbW91bnRUb1BheQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAF2Ftb3VudFdpdGhvdXRDb21taXNzaW9uBQAAAARVTFVTBQAAAANuaWwAAAABaQEAAAAIc2VsbFVMVVMAAAAABAAAAAskdDAzODUyMzkyNwkABRQAAAACCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQEAAAACXBtdEFtb3VudAgFAAAACyR0MDM4NTIzOTI3AAAAAl8xBAAAAApwbXRBc3NldElkCAUAAAALJHQwMzg1MjM5MjcAAAACXzIDCQEAAAACIT0AAAACBQAAAApwbXRBc3NldElkBQAAAARVTFVTCQAAAgAAAAECAAAAF0Fzc2V0IG11c3QgYmUgVUxVUyBvbmx5BAAAAAxleGNoYW5nZVJhdGUJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMFAAAAD2tleVNlbGxVTFVTUmF0ZQQAAAAaZXhjaGFuZ2VSYXRlU2NhbGVEZWxpbWl0ZXIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMFAAAAHWtleVNlbGxVTFVTUmF0ZVNjYWxlRGVsaW1pdGVyBAAAAAthbW91bnRUb1BheQkAAGsAAAADBQAAAAlwbXRBbW91bnQFAAAADGV4Y2hhbmdlUmF0ZQUAAAAaZXhjaGFuZ2VSYXRlU2NhbGVEZWxpbWl0ZXIEAAAAF2Ftb3VudFdpdGhvdXRDb21taXNzaW9uBQAAAAthbW91bnRUb1BheQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAF2Ftb3VudFdpdGhvdXRDb21taXNzaW9uBQAAAARVU0ROBQAAAANuaWwAAAABaQEAAAALbWFrZVBheW1lbnQAAAACAAAACXJlY2lwaWVudAAAAAlwcm9kdWN0SWQEAAAAEHJlY2lwaWVudEFkZHJlc3MJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAACXJlY2lwaWVudAQAAAALJHQwNDY4MDQ3NTUJAAUUAAAAAggJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50CAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAdhc3NldElkBAAAAAlwbXRBbW91bnQIBQAAAAskdDA0NjgwNDc1NQAAAAJfMQQAAAAKcG10QXNzZXRJZAgFAAAACyR0MDQ2ODA0NzU1AAAAAl8yAwkBAAAAAiE9AAAAAgUAAAAKcG10QXNzZXRJZAUAAAAHYXNzZXRJZAkAAAIAAAABAgAAABdBc3NldCBtdXN0IGJlIFVTRE4gb25seQQAAAAKY29tbWlzc2lvbgkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwUAAAANa2V5Q29tbWlzc2lvbgQAAAAYY29tbWlzc2lvblNjYWxlRGVsaW1pdGVyCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAABtrZXlDb21taXNzaW9uU2NhbGVEZWxpbWl0ZXIEAAAAEGFtb3VudENvbW1pc3Npb24JAABrAAAAAwUAAAAJcG10QW1vdW50BQAAAApjb21taXNzaW9uBQAAABhjb21taXNzaW9uU2NhbGVEZWxpbWl0ZXIEAAAAF2Ftb3VudFdpdGhvdXRDb21taXNzaW9uCQAAZQAAAAIFAAAACXBtdEFtb3VudAUAAAAQYW1vdW50Q29tbWlzc2lvbgQAAAAOYW1vdW50Q2FzaGJhY2sJAABrAAAAAwUAAAAJcG10QW1vdW50AAAAAAAAAABkAAAAAAAAD0JAAwkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAAEdGhpcwUAAAAJcHJvZHVjdElkBAAAAApORlRhc3NldElkCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAACXByb2R1Y3RJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAABByZWNpcGllbnRBZGRyZXNzBQAAABdhbW91bnRXaXRob3V0Q29tbWlzc2lvbgUAAAAHYXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAADmFtb3VudENhc2hiYWNrBQAAAARVTFVTCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgAAAAAAAAAAAQUAAAAKTkZUYXNzZXRJZAUAAAADbmlsCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAEHJlY2lwaWVudEFkZHJlc3MFAAAAF2Ftb3VudFdpdGhvdXRDb21taXNzaW9uBQAAAAdhc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAOYW1vdW50Q2FzaGJhY2sFAAAABFVMVVMFAAAAA25pbAAAAACGfWsi",
    "height": 2686649,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 5an89JZEAvF8xp7HTJQRTPZ6vZWfvZVw7vQPGJhx5VWy
Next: H9EFsZTRPufCKKncHfXSoFPuWo4PeL957WG8CiWXshAv

Diff: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 4 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
let keyBuyUWORLDRate = "buy_UWORLD_rate"
4
+
let keyBuyULUSRate = "buy_ULUS_rate"
5
5
 
6
-
let keyBuyUWORLDRateScaleDelimiter = "buy_UWORLD_rate_scale_delimiter"
6
+
let keyBuyULUSRateScaleDelimiter = "buy_ULUS_rate_scale_delimiter"
7
7
 
8
-
let keySellUWORLDRate = "sell_UWORLD_rate"
8
+
let keySellULUSRate = "sell_ULUS_rate"
9
9
 
10
-
let keySellUWORLDRateScaleDelimiter = "sell_UWORLD_rate_scale_delimiter"
10
+
let keySellULUSRateScaleDelimiter = "sell_ULUS_rate_scale_delimiter"
11
11
 
12
12
 
let keyMakeNFTFee = "key_make_NFT_fee"
13
13
 
17
17
 
18
18
 
let USDN = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
19
19
 
20
-
let UWORLD = base58'432rwiV6mi3SJGLkhGPeyHVNUj8rEgHpXwyc1yXj4M6Y'
20
+
let ULUS = base58'4dxZue8KoEhMVzN6CxA2tuLqfSqiU67oyX8npds3FS9G'
21
21
 
22
22
 
let assetId = USDN
23
23
 
24
24
 
@Callable(i)
25
25
 
func makeNFT (name,description,productId) = {
26
-
    let $t010271102 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
27
-
    let pmtAmount = $t010271102._1
28
-
    let pmtAssetId = $t010271102._2
26
+
    let $t010971172 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
27
+
    let pmtAmount = $t010971172._1
28
+
    let pmtAssetId = $t010971172._2
29
29
 
    let makeNFTfee = getIntegerValue(this, keyMakeNFTFee)
30
30
 
    if ((pmtAssetId != assetId))
31
31
 
        then throw("Asset must be USDN only")
45
45
 
@Callable(i)
46
46
 
func setParams () = if ((i.caller != this))
47
47
 
    then throw("Only the DApp itself can call this function")
48
-
    else [IntegerEntry(keyBuyUWORLDRate, 150000), IntegerEntry(keyBuyUWORLDRateScaleDelimiter, 1000), IntegerEntry(keySellUWORLDRate, 100000), IntegerEntry(keySellUWORLDRateScaleDelimiter, 1000), IntegerEntry(keyCommission, 30000), IntegerEntry(keyCommissionScaleDelimiter, 1000000), IntegerEntry(keyMakeNFTFee, 1000000)]
48
+
    else [IntegerEntry(keyBuyULUSRate, 150000), IntegerEntry(keyBuyULUSRateScaleDelimiter, 1000), IntegerEntry(keySellULUSRate, 100000), IntegerEntry(keySellULUSRateScaleDelimiter, 1000), IntegerEntry(keyCommission, 30000), IntegerEntry(keyCommissionScaleDelimiter, 1000000), IntegerEntry(keyMakeNFTFee, 1000000)]
49
49
 
50
50
 
51
51
 
52
52
 
@Callable(i)
53
-
func buyUWORLD () = {
54
-
    let $t025102585 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
55
-
    let pmtAmount = $t025102585._1
56
-
    let pmtAssetId = $t025102585._2
53
+
func clearOldParams () = if ((i.caller != this))
54
+
    then throw("Only the DApp itself can call this function")
55
+
    else {
56
+
        let keyBuyUWORLDRate = "buy_UWORLD_rate"
57
+
        let keyBuyUWORLDRateScaleDelimiter = "buy_UWORLD_rate_scale_delimiter"
58
+
        let keySellUWORLDRate = "sell_UWORLD_rate"
59
+
        let keySellUWORLDRateScaleDelimiter = "sell_UWORLD_rate_scale_delimiter"
60
+
[DeleteEntry(keyBuyUWORLDRate), DeleteEntry(keyBuyUWORLDRateScaleDelimiter), DeleteEntry(keySellUWORLDRate), DeleteEntry(keySellUWORLDRateScaleDelimiter)]
61
+
        }
62
+
63
+
64
+
65
+
@Callable(i)
66
+
func buyULUS () = {
67
+
    let $t031233198 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
68
+
    let pmtAmount = $t031233198._1
69
+
    let pmtAssetId = $t031233198._2
57
70
 
    if ((pmtAssetId != assetId))
58
71
 
        then throw("Asset must be USDN only")
59
72
 
        else {
60
-
            let exchangeRate = getIntegerValue(this, keyBuyUWORLDRate)
61
-
            let exchangeRateScaleDelimiter = getIntegerValue(this, keyBuyUWORLDRateScaleDelimiter)
73
+
            let exchangeRate = getIntegerValue(this, keyBuyULUSRate)
74
+
            let exchangeRateScaleDelimiter = getIntegerValue(this, keyBuyULUSRateScaleDelimiter)
62
75
 
            let amountToPay = fraction(pmtAmount, exchangeRateScaleDelimiter, exchangeRate)
63
76
 
            let amountWithoutCommission = amountToPay
64
-
[ScriptTransfer(i.caller, amountWithoutCommission, UWORLD)]
77
+
[ScriptTransfer(i.caller, amountWithoutCommission, ULUS)]
65
78
 
            }
66
79
 
    }
67
80
 
68
81
 
69
82
 
70
83
 
@Callable(i)
71
-
func sellUWORLD () = {
72
-
    let $t032473322 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
73
-
    let pmtAmount = $t032473322._1
74
-
    let pmtAssetId = $t032473322._2
75
-
    if ((pmtAssetId != UWORLD))
76
-
        then throw("Asset must be UWORLD only")
84
+
func sellULUS () = {
85
+
    let $t038523927 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
86
+
    let pmtAmount = $t038523927._1
87
+
    let pmtAssetId = $t038523927._2
88
+
    if ((pmtAssetId != ULUS))
89
+
        then throw("Asset must be ULUS only")
77
90
 
        else {
78
-
            let exchangeRate = getIntegerValue(this, keySellUWORLDRate)
79
-
            let exchangeRateScaleDelimiter = getIntegerValue(this, keySellUWORLDRateScaleDelimiter)
91
+
            let exchangeRate = getIntegerValue(this, keySellULUSRate)
92
+
            let exchangeRateScaleDelimiter = getIntegerValue(this, keySellULUSRateScaleDelimiter)
80
93
 
            let amountToPay = fraction(pmtAmount, exchangeRate, exchangeRateScaleDelimiter)
81
94
 
            let amountWithoutCommission = amountToPay
82
95
 
[ScriptTransfer(i.caller, amountWithoutCommission, USDN)]
88
101
 
@Callable(i)
89
102
 
func makePayment (recipient,productId) = {
90
103
 
    let recipientAddress = addressFromStringValue(recipient)
91
-
    let $t040834158 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
92
-
    let pmtAmount = $t040834158._1
93
-
    let pmtAssetId = $t040834158._2
104
+
    let $t046804755 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
105
+
    let pmtAmount = $t046804755._1
106
+
    let pmtAssetId = $t046804755._2
94
107
 
    if ((pmtAssetId != assetId))
95
108
 
        then throw("Asset must be USDN only")
96
109
 
        else {
102
115
 
            if (isDefined(getString(this, productId)))
103
116
 
                then {
104
117
 
                    let NFTassetId = fromBase58String(getStringValue(this, productId))
105
-
[ScriptTransfer(recipientAddress, amountWithoutCommission, assetId), ScriptTransfer(i.caller, amountCashback, UWORLD), ScriptTransfer(i.caller, 1, NFTassetId)]
118
+
[ScriptTransfer(recipientAddress, amountWithoutCommission, assetId), ScriptTransfer(i.caller, amountCashback, ULUS), ScriptTransfer(i.caller, 1, NFTassetId)]
106
119
 
                    }
107
-
                else [ScriptTransfer(recipientAddress, amountWithoutCommission, assetId), ScriptTransfer(i.caller, amountCashback, UWORLD)]
120
+
                else [ScriptTransfer(recipientAddress, amountWithoutCommission, assetId), ScriptTransfer(i.caller, amountCashback, ULUS)]
108
121
 
            }
109
122
 
    }
110
123
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 4 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
let keyBuyUWORLDRate = "buy_UWORLD_rate"
4
+
let keyBuyULUSRate = "buy_ULUS_rate"
5
5
 
6
-
let keyBuyUWORLDRateScaleDelimiter = "buy_UWORLD_rate_scale_delimiter"
6
+
let keyBuyULUSRateScaleDelimiter = "buy_ULUS_rate_scale_delimiter"
7
7
 
8
-
let keySellUWORLDRate = "sell_UWORLD_rate"
8
+
let keySellULUSRate = "sell_ULUS_rate"
9
9
 
10
-
let keySellUWORLDRateScaleDelimiter = "sell_UWORLD_rate_scale_delimiter"
10
+
let keySellULUSRateScaleDelimiter = "sell_ULUS_rate_scale_delimiter"
11
11
 
12
12
 
let keyMakeNFTFee = "key_make_NFT_fee"
13
13
 
14
14
 
let keyCommission = "commission"
15
15
 
16
16
 
let keyCommissionScaleDelimiter = "commission_scale_delimiter"
17
17
 
18
18
 
let USDN = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
19
19
 
20
-
let UWORLD = base58'432rwiV6mi3SJGLkhGPeyHVNUj8rEgHpXwyc1yXj4M6Y'
20
+
let ULUS = base58'4dxZue8KoEhMVzN6CxA2tuLqfSqiU67oyX8npds3FS9G'
21
21
 
22
22
 
let assetId = USDN
23
23
 
24
24
 
@Callable(i)
25
25
 
func makeNFT (name,description,productId) = {
26
-
    let $t010271102 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
27
-
    let pmtAmount = $t010271102._1
28
-
    let pmtAssetId = $t010271102._2
26
+
    let $t010971172 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
27
+
    let pmtAmount = $t010971172._1
28
+
    let pmtAssetId = $t010971172._2
29
29
 
    let makeNFTfee = getIntegerValue(this, keyMakeNFTFee)
30
30
 
    if ((pmtAssetId != assetId))
31
31
 
        then throw("Asset must be USDN only")
32
32
 
        else if ((makeNFTfee > pmtAmount))
33
33
 
            then throw(("Fee for make NFT token is " + toString(makeNFTfee)))
34
34
 
            else if (isDefined(getString(this, productId)))
35
35
 
                then throw("NFT for this productId is already issued.")
36
36
 
                else {
37
37
 
                    let newAsset = Issue(name, (((description + "[") + productId) + "]"), 1, 0, false, unit, 0)
38
38
 
                    let newAssetId = calculateAssetId(newAsset)
39
39
 
[newAsset, StringEntry(productId, toBase58String(newAssetId))]
40
40
 
                    }
41
41
 
    }
42
42
 
43
43
 
44
44
 
45
45
 
@Callable(i)
46
46
 
func setParams () = if ((i.caller != this))
47
47
 
    then throw("Only the DApp itself can call this function")
48
-
    else [IntegerEntry(keyBuyUWORLDRate, 150000), IntegerEntry(keyBuyUWORLDRateScaleDelimiter, 1000), IntegerEntry(keySellUWORLDRate, 100000), IntegerEntry(keySellUWORLDRateScaleDelimiter, 1000), IntegerEntry(keyCommission, 30000), IntegerEntry(keyCommissionScaleDelimiter, 1000000), IntegerEntry(keyMakeNFTFee, 1000000)]
48
+
    else [IntegerEntry(keyBuyULUSRate, 150000), IntegerEntry(keyBuyULUSRateScaleDelimiter, 1000), IntegerEntry(keySellULUSRate, 100000), IntegerEntry(keySellULUSRateScaleDelimiter, 1000), IntegerEntry(keyCommission, 30000), IntegerEntry(keyCommissionScaleDelimiter, 1000000), IntegerEntry(keyMakeNFTFee, 1000000)]
49
49
 
50
50
 
51
51
 
52
52
 
@Callable(i)
53
-
func buyUWORLD () = {
54
-
    let $t025102585 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
55
-
    let pmtAmount = $t025102585._1
56
-
    let pmtAssetId = $t025102585._2
53
+
func clearOldParams () = if ((i.caller != this))
54
+
    then throw("Only the DApp itself can call this function")
55
+
    else {
56
+
        let keyBuyUWORLDRate = "buy_UWORLD_rate"
57
+
        let keyBuyUWORLDRateScaleDelimiter = "buy_UWORLD_rate_scale_delimiter"
58
+
        let keySellUWORLDRate = "sell_UWORLD_rate"
59
+
        let keySellUWORLDRateScaleDelimiter = "sell_UWORLD_rate_scale_delimiter"
60
+
[DeleteEntry(keyBuyUWORLDRate), DeleteEntry(keyBuyUWORLDRateScaleDelimiter), DeleteEntry(keySellUWORLDRate), DeleteEntry(keySellUWORLDRateScaleDelimiter)]
61
+
        }
62
+
63
+
64
+
65
+
@Callable(i)
66
+
func buyULUS () = {
67
+
    let $t031233198 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
68
+
    let pmtAmount = $t031233198._1
69
+
    let pmtAssetId = $t031233198._2
57
70
 
    if ((pmtAssetId != assetId))
58
71
 
        then throw("Asset must be USDN only")
59
72
 
        else {
60
-
            let exchangeRate = getIntegerValue(this, keyBuyUWORLDRate)
61
-
            let exchangeRateScaleDelimiter = getIntegerValue(this, keyBuyUWORLDRateScaleDelimiter)
73
+
            let exchangeRate = getIntegerValue(this, keyBuyULUSRate)
74
+
            let exchangeRateScaleDelimiter = getIntegerValue(this, keyBuyULUSRateScaleDelimiter)
62
75
 
            let amountToPay = fraction(pmtAmount, exchangeRateScaleDelimiter, exchangeRate)
63
76
 
            let amountWithoutCommission = amountToPay
64
-
[ScriptTransfer(i.caller, amountWithoutCommission, UWORLD)]
77
+
[ScriptTransfer(i.caller, amountWithoutCommission, ULUS)]
65
78
 
            }
66
79
 
    }
67
80
 
68
81
 
69
82
 
70
83
 
@Callable(i)
71
-
func sellUWORLD () = {
72
-
    let $t032473322 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
73
-
    let pmtAmount = $t032473322._1
74
-
    let pmtAssetId = $t032473322._2
75
-
    if ((pmtAssetId != UWORLD))
76
-
        then throw("Asset must be UWORLD only")
84
+
func sellULUS () = {
85
+
    let $t038523927 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
86
+
    let pmtAmount = $t038523927._1
87
+
    let pmtAssetId = $t038523927._2
88
+
    if ((pmtAssetId != ULUS))
89
+
        then throw("Asset must be ULUS only")
77
90
 
        else {
78
-
            let exchangeRate = getIntegerValue(this, keySellUWORLDRate)
79
-
            let exchangeRateScaleDelimiter = getIntegerValue(this, keySellUWORLDRateScaleDelimiter)
91
+
            let exchangeRate = getIntegerValue(this, keySellULUSRate)
92
+
            let exchangeRateScaleDelimiter = getIntegerValue(this, keySellULUSRateScaleDelimiter)
80
93
 
            let amountToPay = fraction(pmtAmount, exchangeRate, exchangeRateScaleDelimiter)
81
94
 
            let amountWithoutCommission = amountToPay
82
95
 
[ScriptTransfer(i.caller, amountWithoutCommission, USDN)]
83
96
 
            }
84
97
 
    }
85
98
 
86
99
 
87
100
 
88
101
 
@Callable(i)
89
102
 
func makePayment (recipient,productId) = {
90
103
 
    let recipientAddress = addressFromStringValue(recipient)
91
-
    let $t040834158 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
92
-
    let pmtAmount = $t040834158._1
93
-
    let pmtAssetId = $t040834158._2
104
+
    let $t046804755 = $Tuple2(i.payments[0].amount, i.payments[0].assetId)
105
+
    let pmtAmount = $t046804755._1
106
+
    let pmtAssetId = $t046804755._2
94
107
 
    if ((pmtAssetId != assetId))
95
108
 
        then throw("Asset must be USDN only")
96
109
 
        else {
97
110
 
            let commission = getIntegerValue(this, keyCommission)
98
111
 
            let commissionScaleDelimiter = getIntegerValue(this, keyCommissionScaleDelimiter)
99
112
 
            let amountCommission = fraction(pmtAmount, commission, commissionScaleDelimiter)
100
113
 
            let amountWithoutCommission = (pmtAmount - amountCommission)
101
114
 
            let amountCashback = fraction(pmtAmount, 100, 1000000)
102
115
 
            if (isDefined(getString(this, productId)))
103
116
 
                then {
104
117
 
                    let NFTassetId = fromBase58String(getStringValue(this, productId))
105
-
[ScriptTransfer(recipientAddress, amountWithoutCommission, assetId), ScriptTransfer(i.caller, amountCashback, UWORLD), ScriptTransfer(i.caller, 1, NFTassetId)]
118
+
[ScriptTransfer(recipientAddress, amountWithoutCommission, assetId), ScriptTransfer(i.caller, amountCashback, ULUS), ScriptTransfer(i.caller, 1, NFTassetId)]
106
119
 
                    }
107
-
                else [ScriptTransfer(recipientAddress, amountWithoutCommission, assetId), ScriptTransfer(i.caller, amountCashback, UWORLD)]
120
+
                else [ScriptTransfer(recipientAddress, amountWithoutCommission, assetId), ScriptTransfer(i.caller, amountCashback, ULUS)]
108
121
 
            }
109
122
 
    }
110
123
 
111
124
 

github/deemru/w8io/3ef1775 
60.12 ms ◑