tx · 4b3HoiU2gePZJeFgYUMUdzvUnVEynZhXB2ZCPpLxQnuV

3N1FWHMYZ9QJDkUaMPxexydkBqiUxEk3J6o:  -0.01400000 Waves

2020.11.10 10:56 [1258966] smart account 3N1FWHMYZ9QJDkUaMPxexydkBqiUxEk3J6o > SELF 0.00000000 Waves

{ "type": 13, "id": "4b3HoiU2gePZJeFgYUMUdzvUnVEynZhXB2ZCPpLxQnuV", "fee": 1400000, "feeAssetId": null, "timestamp": 1604995000929, "version": 1, "sender": "3N1FWHMYZ9QJDkUaMPxexydkBqiUxEk3J6o", "senderPublicKey": "oH6E3DnZcMibsYC4VB7KvfemJfz3koDVwZ5Z3pXGpCN", "proofs": [ "5SyjKQV7XjvgomYxHARwoMBoGEMYHkGgJngZXPf7mKVnN8SeG3y6djykaHKAGkaZMawc5zCn9jjaXUq1BqH16qa3" ], "script": "base64:AAIEAAAAAAAAAAwIAhIAEgASBAoCAQEAAAATAAAAAARVU0RUAgAAACw1U2g5S2doZmtaeWhqd3VvZG92RGhCNlBnaERVR0JIaUFQWjRNa3JQZ0t0WAAAAAAEVVNETgIAAAAsMjVGRXFFalJrcUs2eUNraVQ3THo2U0FZejdnVUZDdHhmQ0NobnJWRkQ1QVQAAAAABmlkVVNETgkAAlkAAAABBQAAAARVU0ROAAAAAAZpZFVTRFQJAAJZAAAAAQUAAAAEVVNEVAAAAAANd2l0aGRyYXdEZWxheQAAAAAAAAAAAgAAAAAPZGVjaW1hbFBhcnRVU0ROAAAAAAAAD0JAAAAAAA9kZWNpbWFsUGFydFVTRFQAAAAAAAAPQkAAAAAAF21pbmltYWxBbW91bnRUb1N3YXBVU0RUCQAAaAAAAAIAAAAAAAAAJxAFAAAAD2RlY2ltYWxQYXJ0VVNETgAAAAAXbWluaW1hbEFtb3VudFRvU3dhcFVTRE4JAABoAAAAAgAAAAAAAAAnEAUAAAAPZGVjaW1hbFBhcnRVU0RUAQAAAApjb2xsZWN0S2V5AAAAAwAAAAdhZGRyZXNzAAAAEWFtb3VudFRvU3dhcEluS2V5AAAAFWFsbG93VG9XaXRoZHJhd0hlaWdodAkABLkAAAACCQAETAAAAAIFAAAAB2FkZHJlc3MJAARMAAAAAgIAAAAIV0lUSERSQVcJAARMAAAAAgkAAaQAAAABBQAAABFhbW91bnRUb1N3YXBJbktleQkABEwAAAACAgAAAAZIRUlHSFQJAARMAAAAAgkAAaQAAAABBQAAABVhbGxvd1RvV2l0aGRyYXdIZWlnaHQFAAAAA25pbAIAAAABXwEAAAARY29sbGVjdEJhbGFuY2VLZXkAAAABAAAAB2FkZHJlc3MJAAS5AAAAAgkABEwAAAACBQAAAAdhZGRyZXNzCQAETAAAAAICAAAAB2JhbGFuY2UFAAAAA25pbAIAAAABXwEAAAAYY29sbGVjdEJhbGFuY2VLZXlXaXRoRmVlAAAAAQAAAAdhZGRyZXNzCQAEuQAAAAIJAARMAAAAAgUAAAAHYWRkcmVzcwkABEwAAAACAgAAABBiYWxhbmNlX3dpdGhfZmVlBQAAAANuaWwCAAAAAV8BAAAAFHVzZHRUb1VzZG5Bc3NldEVycm9yAAAAAAkAAAIAAAABAgAAADRUbyBzd2FwIFVTRFQgdG8gVVNETiB5b3UgbmVlZCBhdHRhY2ggcGF5bWVudCBpbiBVU0RUAQAAABR1c2RuVG9Vc2R0QXNzZXRFcnJvcgAAAAAJAAACAAAAAQIAAAA0VG8gc3dhcCBVU0ROIHRvIFVTRFQgeW91IG5lZWQgYXR0YWNoIHBheW1lbnQgaW4gVVNETgEAAAAXdXNkdFRvVXNkbkxvd0xpbWl0RXJyb3IAAAAACQAAAgAAAAEJAAEsAAAAAgkAASwAAAACAgAAABZ5b3UgY2FuIHN3YXAgYXQgbGVhc3QgCQABpAAAAAEJAABpAAAAAgUAAAAXbWluaW1hbEFtb3VudFRvU3dhcFVTRFQFAAAAD2RlY2ltYWxQYXJ0VVNEVAIAAAAHIHRva2VucwEAAAADYWJzAAAAAQAAAAFuAwkAAGYAAAACAAAAAAAAAAAABQAAAAFuCQAAaAAAAAIFAAAAAW4A//////////8FAAAAAW4BAAAAFWdldFdpdGhvdXRGZWVXaXRoZHJhdwAAAAIAAAAGYW1vdW50AAAAEWJhbGFuY2VXaXRob3V0RmVlCQABlwAAAAEJAARMAAAAAgUAAAAGYW1vdW50CQAETAAAAAIFAAAAEWJhbGFuY2VXaXRob3V0RmVlBQAAAANuaWwBAAAAF2dldExpc3RFbGVtZW50T3JEZWZhdWx0AAAAAwAAAARsaXN0AAAABWluZGV4AAAAB2RlZmF1bHQDCQAAZgAAAAIJAAGQAAAAAQUAAAAEbGlzdAUAAAAFaW5kZXgJAAGRAAAAAgUAAAAEbGlzdAUAAAAFaW5kZXgFAAAAB2RlZmF1bHQBAAAAEmN1cnJlbnRXaXRoZHJhd2FscwAAAAIAAAAHYWRkcmVzcwAAAAZhbW91bnQEAAAACmJhbGFuY2VLZXkJAQAAABFjb2xsZWN0QmFsYW5jZUtleQAAAAEFAAAAB2FkZHJlc3MEAAAAEWJhbGFuY2VXaXRoRmVlS2V5CQEAAAAYY29sbGVjdEJhbGFuY2VLZXlXaXRoRmVlAAAAAQUAAAAHYWRkcmVzcwQAAAAUY3VycmVudENsaWVudEJhbGFuY2UJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwUAAAAKYmFsYW5jZUtleQAAAAAAAAAAAAQAAAAbY3VycmVudENsaWVudEJhbGFuY2VXaXRoRmVlCQEAAAALdmFsdWVPckVsc2UAAAACCQAEGgAAAAIFAAAABHRoaXMFAAAAEWJhbGFuY2VXaXRoRmVlS2V5AAAAAAAAAAAABAAAAAt1c2VyQmFsYW5jZQkAAGQAAAACBQAAABRjdXJyZW50Q2xpZW50QmFsYW5jZQUAAAAbY3VycmVudENsaWVudEJhbGFuY2VXaXRoRmVlAwMJAABmAAAAAgUAAAAGYW1vdW50BQAAAAt1c2VyQmFsYW5jZQYJAABmAAAAAgUAAAAXbWluaW1hbEFtb3VudFRvU3dhcFVTRE4FAAAABmFtb3VudAkAAAIAAAABAgAAAC9Td2FwIGFtb3VudCBmYWlsLCBhbW91bnQgaXMgdG8gc21hbGwgb3IgdG8gYmlnLgQAAAAUdG9XaXRoZHJhd1dpdGhvdXRGZWUJAQAAABVnZXRXaXRob3V0RmVlV2l0aGRyYXcAAAACBQAAAAZhbW91bnQFAAAAFGN1cnJlbnRDbGllbnRCYWxhbmNlBAAAABF0b1dpdGhkcmF3V2l0aEZlZQkAAGUAAAACBQAAAAZhbW91bnQFAAAAFHRvV2l0aGRyYXdXaXRob3V0RmVlBAAAAANmZWUJAABoAAAAAgkAAGkAAAACBQAAABF0b1dpdGhkcmF3V2l0aEZlZQAAAAAAAAAAZAAAAAAAAAAAAQkABEwAAAACBQAAABR0b1dpdGhkcmF3V2l0aG91dEZlZQkABEwAAAACBQAAABF0b1dpdGhkcmF3V2l0aEZlZQkABEwAAAACBQAAAANmZWUFAAAAA25pbAAAAAMAAAAGaW52b2tlAQAAAA5zd2FwVVNEVHRvVVNETgAAAAAEAAAACmJhbGFuY2VLZXkJAQAAABhjb2xsZWN0QmFsYW5jZUtleVdpdGhGZWUAAAABCQAEJQAAAAEIBQAAAAZpbnZva2UAAAAGY2FsbGVyBAAAAAdwYXltZW50CQEAAAAFdmFsdWUAAAABCQABkQAAAAIIBQAAAAZpbnZva2UAAAAIcGF5bWVudHMAAAAAAAAAAAADCQEAAAACIT0AAAACCAUAAAAHcGF5bWVudAAAAAdhc3NldElkBQAAAAZpZFVTRFQJAQAAABR1c2R0VG9Vc2RuQXNzZXRFcnJvcgAAAAAEAAAABmFtb3VudAgFAAAAB3BheW1lbnQAAAAGYW1vdW50BAAAAANmZWUJAABoAAAAAgkAAGkAAAACBQAAAAZhbW91bnQAAAAAAAAAAGQAAAAAAAAAAAEEAAAAGGN1cnJlbnRDbGllbnRCYWxhbmNlVVNEVAkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAAAR0aGlzBQAAAApiYWxhbmNlS2V5AAAAAAAAAAAAAwkAAGYAAAACBQAAABdtaW5pbWFsQW1vdW50VG9Td2FwVVNEVAUAAAAGYW1vdW50CQEAAAAXdXNkdFRvVXNkbkxvd0xpbWl0RXJyb3IAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAApiYWxhbmNlS2V5CQAAZAAAAAIFAAAAGGN1cnJlbnRDbGllbnRCYWxhbmNlVVNEVAUAAAAGYW1vdW50CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAZpbnZva2UAAAAGY2FsbGVyCQAAZQAAAAIFAAAABmFtb3VudAUAAAADZmVlBQAAAAZpZFVTRE4FAAAAA25pbAAAAAZpbnZva2UBAAAAHGluaXRpYWxpemF0aW9uVVNETnRvVVNEVHN3YXAAAAAABAAAAAdwYXltZW50CQEAAAAFdmFsdWUAAAABCQABkQAAAAIIBQAAAAZpbnZva2UAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAAB2FkZHJlc3MJAAQlAAAAAQgFAAAABmludm9rZQAAAAZjYWxsZXIDCQEAAAACIT0AAAACCAUAAAAHcGF5bWVudAAAAAdhc3NldElkBQAAAAZpZFVTRE4JAQAAABR1c2RuVG9Vc2R0QXNzZXRFcnJvcgAAAAAEAAAABmFtb3VudAgFAAAAB3BheW1lbnQAAAAGYW1vdW50BAAAAApiYWxhbmNlS2V5CQEAAAARY29sbGVjdEJhbGFuY2VLZXkAAAABBQAAAAdhZGRyZXNzBAAAABFiYWxhbmNlV2l0aEZlZUtleQkBAAAAGGNvbGxlY3RCYWxhbmNlS2V5V2l0aEZlZQAAAAEFAAAAB2FkZHJlc3MEAAAAFGN1cnJlbnRDbGllbnRCYWxhbmNlCQEAAAALdmFsdWVPckVsc2UAAAACCQAEGgAAAAIFAAAABHRoaXMFAAAACmJhbGFuY2VLZXkAAAAAAAAAAAAEAAAAG2N1cnJlbnRDbGllbnRCYWxhbmNlV2l0aEZlZQkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAAAR0aGlzBQAAABFiYWxhbmNlV2l0aEZlZUtleQAAAAAAAAAAAAQAAAALdXNlckJhbGFuY2UJAABkAAAAAgUAAAAUY3VycmVudENsaWVudEJhbGFuY2UFAAAAG2N1cnJlbnRDbGllbnRCYWxhbmNlV2l0aEZlZQQAAAAEZGF0YQkBAAAAEmN1cnJlbnRXaXRoZHJhd2FscwAAAAIJAAQlAAAAAQgFAAAABmludm9rZQAAAAZjYWxsZXIFAAAABmFtb3VudAQAAAAUdG9XaXRoZHJhd1dpdGhvdXRGZWUJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkAAZEAAAACBQAAAARkYXRhAAAAAAAAAAAAAgAAACJXcm9uZyAnY3VycmVudFdpdGhkcmF3YWxzJyBtZXRob2QhBAAAABF0b1dpdGhkcmF3V2l0aEZlZQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAECAAAAIldyb25nICdjdXJyZW50V2l0aGRyYXdhbHMnIG1ldGhvZCEEAAAAA2ZlZQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAICAAAAIldyb25nICdjdXJyZW50V2l0aGRyYXdhbHMnIG1ldGhvZCEEAAAABXRvdGFsCQAAZQAAAAIJAABkAAAAAgUAAAARdG9XaXRoZHJhd1dpdGhGZWUFAAAAFHRvV2l0aGRyYXdXaXRob3V0RmVlBQAAAANmZWUEAAAAFWFsbG93VG9XaXRoRHJhd0hlaWdodAkAAGQAAAACBQAAAAZoZWlnaHQFAAAADXdpdGhkcmF3RGVsYXkDCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAR0aGlzCQEAAAAKY29sbGVjdEtleQAAAAMJAAQlAAAAAQgFAAAABmludm9rZQAAAAZjYWxsZXIFAAAABmFtb3VudAUAAAAVYWxsb3dUb1dpdGhEcmF3SGVpZ2h0CQAAAgAAAAECAAAAPVlvdSBoYXZlIGFscmVhZHkgc3RhcnRlZCB3aXRoZHJhd2FsIHByb2Nlc3MsIHdhaXQgbmV4dCBibG9jay4JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAACmJhbGFuY2VLZXkJAABlAAAAAgUAAAAUY3VycmVudENsaWVudEJhbGFuY2UFAAAAFHRvV2l0aGRyYXdXaXRob3V0RmVlCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABFiYWxhbmNlV2l0aEZlZUtleQkAAGUAAAACBQAAABtjdXJyZW50Q2xpZW50QmFsYW5jZVdpdGhGZWUFAAAAEXRvV2l0aGRyYXdXaXRoRmVlCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAAApjb2xsZWN0S2V5AAAAAwkABCUAAAABCAUAAAAGaW52b2tlAAAABmNhbGxlcgUAAAAGYW1vdW50BQAAABVhbGxvd1RvV2l0aERyYXdIZWlnaHQJAAS5AAAAAgkABEwAAAACAgAAAA1ub3Rfd2l0aGRyYXduCQAETAAAAAIJAAGkAAAAAQkAAGUAAAACBQAAAAZhbW91bnQFAAAAA2ZlZQUAAAADbmlsAgAAAAFfBQAAAANuaWwAAAAGaW52b2tlAQAAAA5zd2FwVVNETnRvVVNEVAAAAAIAAAAGYW1vdW50AAAAC2hlaWdodEluS2V5BAAAAANrZXkJAQAAAApjb2xsZWN0S2V5AAAAAwkABCUAAAABCAUAAAAGaW52b2tlAAAABmNhbGxlcgUAAAAGYW1vdW50BQAAAAtoZWlnaHRJbktleQQAAAANd2l0aGRyYXduSW5mbwkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAABHRoaXMFAAAAA2tleQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAYVGhpcyBrZXkgZG9lc24ndCBleGlzdHMgBQAAAANrZXkCAAAADSBhdCBhZGRyZXNzICAJAAQlAAAAAQUAAAAEdGhpcwQAAAAKdG9XaXRoZHJhdwkBAAAAF2dldExpc3RFbGVtZW50T3JEZWZhdWx0AAAAAwkABLUAAAACBQAAAA13aXRoZHJhd25JbmZvAgAAAAFfAAAAAAAAAAACCQABpAAAAAEFAAAABmFtb3VudAMDCQAAZwAAAAIFAAAABmhlaWdodAUAAAALaGVpZ2h0SW5LZXkJAQAAAAhjb250YWlucwAAAAIFAAAADXdpdGhkcmF3bkluZm8CAAAADW5vdF93aXRoZHJhd24HCQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEFAAAAA2tleQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAAGaW52b2tlAAAABmNhbGxlcgkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEtgAAAAEFAAAACnRvV2l0aGRyYXcCAAAAFFdyb25nIHdpdGhkcmF3IGRhdGEhBQAAAAZpZFVTRFQFAAAAA25pbAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAdV2l0aGRyYXdhbCBpcyBwb3NzaWJsZSBhZnRlciAJAAGkAAAAAQUAAAALaGVpZ2h0SW5LZXkCAAAAKyBoZWlnaHQgb3IgeW91IGhhdmUgYWxyZWFkeSB3aXRoZHJhd24gVVNEVC4AAAAAAG/iKg==", "chainId": 84, "height": 1258966, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 3ME835z4bBUvt9SCcmSsNdsy4TS7V5M5i6Fa6eDuyv3i Next: none Diff:
OldNewDifferences
1-{-# STDLIB_VERSION 3 #-}
1+{-# STDLIB_VERSION 4 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let USDT = "5Sh9KghfkZyhjwuodovDhB6PghDUGBHiAPZ4MkrPgKtX"
1919
2020 let minimalAmountToSwapUSDN = (10000 * decimalPartUSDT)
2121
22-func collectKey (address,amountToSwapInKey,allowToWithdrawHeight) = ((((toString(address) + "_WITHDRAW_") + toString(amountToSwapInKey)) + "_HEIGHT_") + toString(allowToWithdrawHeight))
22+func collectKey (address,amountToSwapInKey,allowToWithdrawHeight) = makeString([address, "WITHDRAW", toString(amountToSwapInKey), "HEIGHT", toString(allowToWithdrawHeight)], "_")
2323
2424
25-@Callable(contextObj)
25+func collectBalanceKey (address) = makeString([address, "balance"], "_")
26+
27+
28+func collectBalanceKeyWithFee (address) = makeString([address, "balance_with_fee"], "_")
29+
30+
31+func usdtToUsdnAssetError () = throw("To swap USDT to USDN you need attach payment in USDT")
32+
33+
34+func usdnToUsdtAssetError () = throw("To swap USDN to USDT you need attach payment in USDN")
35+
36+
37+func usdtToUsdnLowLimitError () = throw((("you can swap at least " + toString((minimalAmountToSwapUSDT / decimalPartUSDT))) + " tokens"))
38+
39+
40+func abs (n) = if ((0 > n))
41+ then (n * -1)
42+ else n
43+
44+
45+func getWithoutFeeWithdraw (amount,balanceWithoutFee) = min([amount, balanceWithoutFee])
46+
47+
48+func getListElementOrDefault (list,index,default) = if ((size(list) > index))
49+ then list[index]
50+ else default
51+
52+
53+func currentWithdrawals (address,amount) = {
54+ let balanceKey = collectBalanceKey(address)
55+ let balanceWithFeeKey = collectBalanceKeyWithFee(address)
56+ let currentClientBalance = valueOrElse(getInteger(this, balanceKey), 0)
57+ let currentClientBalanceWithFee = valueOrElse(getInteger(this, balanceWithFeeKey), 0)
58+ let userBalance = (currentClientBalance + currentClientBalanceWithFee)
59+ if (if ((amount > userBalance))
60+ then true
61+ else (minimalAmountToSwapUSDN > amount))
62+ then throw("Swap amount fail, amount is to small or to big.")
63+ else {
64+ let toWithdrawWithoutFee = getWithoutFeeWithdraw(amount, currentClientBalance)
65+ let toWithdrawWithFee = (amount - toWithdrawWithoutFee)
66+ let fee = ((toWithdrawWithFee / 100) * 1)
67+[toWithdrawWithoutFee, toWithdrawWithFee, fee]
68+ }
69+ }
70+
71+
72+@Callable(invoke)
2673 func swapUSDTtoUSDN () = {
27- let payment = match contextObj.payment {
28- case p: AttachedPayment =>
29- p
30- case _ =>
31- throw("Payment not attached")
32- }
33- let assetIdReceived = payment.assetId
34- let tokenReceiveAmount = payment.amount
35- let userAddress = contextObj.caller
36- let currentClientBalanceUSDT = match getInteger(this, (toString(userAddress) + "_balance")) {
37- case currentBalance: Int =>
38- value(getInteger(this, (toString(userAddress) + "_balance")))
39- case _ =>
40- 0
41- }
42- if ((assetIdReceived != idUSDT))
43- then throw("to swap USDT to USDN you need attach payment in USDT")
44- else if ((minimalAmountToSwapUSDT > tokenReceiveAmount))
45- then throw((("you can swap at least " + toString((minimalAmountToSwapUSDT / decimalPartUSDT))) + " tokens"))
46- else ScriptResult(WriteSet([DataEntry((toString(contextObj.caller) + "_balance"), (currentClientBalanceUSDT + tokenReceiveAmount))]), TransferSet([ScriptTransfer(contextObj.caller, tokenReceiveAmount, idUSDN)]))
74+ let balanceKey = collectBalanceKeyWithFee(toString(invoke.caller))
75+ let payment = value(invoke.payments[0])
76+ if ((payment.assetId != idUSDT))
77+ then usdtToUsdnAssetError()
78+ else {
79+ let amount = payment.amount
80+ let fee = ((amount / 100) * 1)
81+ let currentClientBalanceUSDT = valueOrElse(getInteger(this, balanceKey), 0)
82+ if ((minimalAmountToSwapUSDT > amount))
83+ then usdtToUsdnLowLimitError()
84+ else [IntegerEntry(balanceKey, (currentClientBalanceUSDT + amount)), ScriptTransfer(invoke.caller, (amount - fee), idUSDN)]
85+ }
4786 }
4887
4988
5089
51-@Callable(contextObj)
90+@Callable(invoke)
5291 func initializationUSDNtoUSDTswap () = {
53- let payment = match contextObj.payment {
54- case p: AttachedPayment =>
55- p
56- case _ =>
57- throw("Payment not attached")
58- }
59- let assetIdReceived = payment.assetId
60- let paymentAmount = payment.amount
61- let userAddress = contextObj.caller
62- let currentClientBalanceUSDT = match getInteger(this, (toString(userAddress) + "_balance")) {
63- case currentBalance: Int =>
64- getIntegerValue(this, (toString(userAddress) + "_balance"))
65- case _ =>
66- 0
67- }
68- if ((assetIdReceived != idUSDN))
69- then throw("to swap USDN to USDT you need attach payment in USDN")
70- else if (if ((paymentAmount > currentClientBalanceUSDT))
71- then true
72- else (minimalAmountToSwapUSDN > paymentAmount))
73- then throw("swap amount fail")
74- else {
75- let allowToWithDrawHeight = (height + withdrawDelay)
76- if (isDefined(getString(this, collectKey(contextObj.caller, paymentAmount, allowToWithDrawHeight))))
77- then throw("you have already started withdrawal process, wait next block")
78- else ScriptResult(WriteSet([DataEntry((toString(contextObj.caller) + "_balance"), (currentClientBalanceUSDT - paymentAmount)), DataEntry(collectKey(contextObj.caller, paymentAmount, allowToWithDrawHeight), "not_withdrawn")]), TransferSet(nil))
79- }
92+ let payment = value(invoke.payments[0])
93+ let address = toString(invoke.caller)
94+ if ((payment.assetId != idUSDN))
95+ then usdnToUsdtAssetError()
96+ else {
97+ let amount = payment.amount
98+ let balanceKey = collectBalanceKey(address)
99+ let balanceWithFeeKey = collectBalanceKeyWithFee(address)
100+ let currentClientBalance = valueOrElse(getInteger(this, balanceKey), 0)
101+ let currentClientBalanceWithFee = valueOrElse(getInteger(this, balanceWithFeeKey), 0)
102+ let userBalance = (currentClientBalance + currentClientBalanceWithFee)
103+ let data = currentWithdrawals(toString(invoke.caller), amount)
104+ let toWithdrawWithoutFee = valueOrErrorMessage(data[0], "Wrong 'currentWithdrawals' method!")
105+ let toWithdrawWithFee = valueOrErrorMessage(data[1], "Wrong 'currentWithdrawals' method!")
106+ let fee = valueOrErrorMessage(data[2], "Wrong 'currentWithdrawals' method!")
107+ let total = ((toWithdrawWithFee + toWithdrawWithoutFee) - fee)
108+ let allowToWithDrawHeight = (height + withdrawDelay)
109+ if (isDefined(getString(this, collectKey(toString(invoke.caller), amount, allowToWithDrawHeight))))
110+ then throw("You have already started withdrawal process, wait next block.")
111+ else [IntegerEntry(balanceKey, (currentClientBalance - toWithdrawWithoutFee)), IntegerEntry(balanceWithFeeKey, (currentClientBalanceWithFee - toWithdrawWithFee)), StringEntry(collectKey(toString(invoke.caller), amount, allowToWithDrawHeight), makeString(["not_withdrawn", toString((amount - fee))], "_"))]
112+ }
80113 }
81114
82115
83116
84-@Callable(contextObj)
85-func swapUSDNtoUSDT (amountToSwapInKey,heightInKey) = {
86- let key = collectKey(contextObj.caller, amountToSwapInKey, heightInKey)
87- let withdrawnInfo = match getString(this, key) {
88- case withdrawnInfo: String =>
89- getStringValue(this, key)
90- case _ =>
91- throw(((("this key doesn't exists " + key) + " at address ") + toString(this)))
92- }
117+@Callable(invoke)
118+func swapUSDNtoUSDT (amount,heightInKey) = {
119+ let key = collectKey(toString(invoke.caller), amount, heightInKey)
120+ let withdrawnInfo = valueOrErrorMessage(getString(this, key), ((("This key doesn't exists " + key) + " at address ") + toString(this)))
121+ let toWithdraw = getListElementOrDefault(split(withdrawnInfo, "_"), 2, toString(amount))
93122 if (if ((height >= heightInKey))
94- then (withdrawnInfo == "not_withdrawn")
123+ then contains(withdrawnInfo, "not_withdrawn")
95124 else false)
96- then ScriptResult(WriteSet([DataEntry(key, "withdrawn")]), TransferSet([ScriptTransfer(contextObj.caller, amountToSwapInKey, idUSDT)]))
97- else throw((("withdrawal is possible after " + toString(heightInKey)) + " height or you have already withdrawn USDT"))
125+ then [DeleteEntry(key), ScriptTransfer(invoke.caller, valueOrErrorMessage(parseInt(toWithdraw), "Wrong withdraw data!"), idUSDT)]
126+ else throw((("Withdrawal is possible after " + toString(heightInKey)) + " height or you have already withdrawn USDT."))
98127 }
99128
100129
Full:
OldNewDifferences
1-{-# STDLIB_VERSION 3 #-}
1+{-# STDLIB_VERSION 4 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let USDT = "5Sh9KghfkZyhjwuodovDhB6PghDUGBHiAPZ4MkrPgKtX"
55
66 let USDN = "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"
77
88 let idUSDN = fromBase58String(USDN)
99
1010 let idUSDT = fromBase58String(USDT)
1111
1212 let withdrawDelay = 2
1313
1414 let decimalPartUSDN = 1000000
1515
1616 let decimalPartUSDT = 1000000
1717
1818 let minimalAmountToSwapUSDT = (10000 * decimalPartUSDN)
1919
2020 let minimalAmountToSwapUSDN = (10000 * decimalPartUSDT)
2121
22-func collectKey (address,amountToSwapInKey,allowToWithdrawHeight) = ((((toString(address) + "_WITHDRAW_") + toString(amountToSwapInKey)) + "_HEIGHT_") + toString(allowToWithdrawHeight))
22+func collectKey (address,amountToSwapInKey,allowToWithdrawHeight) = makeString([address, "WITHDRAW", toString(amountToSwapInKey), "HEIGHT", toString(allowToWithdrawHeight)], "_")
2323
2424
25-@Callable(contextObj)
25+func collectBalanceKey (address) = makeString([address, "balance"], "_")
26+
27+
28+func collectBalanceKeyWithFee (address) = makeString([address, "balance_with_fee"], "_")
29+
30+
31+func usdtToUsdnAssetError () = throw("To swap USDT to USDN you need attach payment in USDT")
32+
33+
34+func usdnToUsdtAssetError () = throw("To swap USDN to USDT you need attach payment in USDN")
35+
36+
37+func usdtToUsdnLowLimitError () = throw((("you can swap at least " + toString((minimalAmountToSwapUSDT / decimalPartUSDT))) + " tokens"))
38+
39+
40+func abs (n) = if ((0 > n))
41+ then (n * -1)
42+ else n
43+
44+
45+func getWithoutFeeWithdraw (amount,balanceWithoutFee) = min([amount, balanceWithoutFee])
46+
47+
48+func getListElementOrDefault (list,index,default) = if ((size(list) > index))
49+ then list[index]
50+ else default
51+
52+
53+func currentWithdrawals (address,amount) = {
54+ let balanceKey = collectBalanceKey(address)
55+ let balanceWithFeeKey = collectBalanceKeyWithFee(address)
56+ let currentClientBalance = valueOrElse(getInteger(this, balanceKey), 0)
57+ let currentClientBalanceWithFee = valueOrElse(getInteger(this, balanceWithFeeKey), 0)
58+ let userBalance = (currentClientBalance + currentClientBalanceWithFee)
59+ if (if ((amount > userBalance))
60+ then true
61+ else (minimalAmountToSwapUSDN > amount))
62+ then throw("Swap amount fail, amount is to small or to big.")
63+ else {
64+ let toWithdrawWithoutFee = getWithoutFeeWithdraw(amount, currentClientBalance)
65+ let toWithdrawWithFee = (amount - toWithdrawWithoutFee)
66+ let fee = ((toWithdrawWithFee / 100) * 1)
67+[toWithdrawWithoutFee, toWithdrawWithFee, fee]
68+ }
69+ }
70+
71+
72+@Callable(invoke)
2673 func swapUSDTtoUSDN () = {
27- let payment = match contextObj.payment {
28- case p: AttachedPayment =>
29- p
30- case _ =>
31- throw("Payment not attached")
32- }
33- let assetIdReceived = payment.assetId
34- let tokenReceiveAmount = payment.amount
35- let userAddress = contextObj.caller
36- let currentClientBalanceUSDT = match getInteger(this, (toString(userAddress) + "_balance")) {
37- case currentBalance: Int =>
38- value(getInteger(this, (toString(userAddress) + "_balance")))
39- case _ =>
40- 0
41- }
42- if ((assetIdReceived != idUSDT))
43- then throw("to swap USDT to USDN you need attach payment in USDT")
44- else if ((minimalAmountToSwapUSDT > tokenReceiveAmount))
45- then throw((("you can swap at least " + toString((minimalAmountToSwapUSDT / decimalPartUSDT))) + " tokens"))
46- else ScriptResult(WriteSet([DataEntry((toString(contextObj.caller) + "_balance"), (currentClientBalanceUSDT + tokenReceiveAmount))]), TransferSet([ScriptTransfer(contextObj.caller, tokenReceiveAmount, idUSDN)]))
74+ let balanceKey = collectBalanceKeyWithFee(toString(invoke.caller))
75+ let payment = value(invoke.payments[0])
76+ if ((payment.assetId != idUSDT))
77+ then usdtToUsdnAssetError()
78+ else {
79+ let amount = payment.amount
80+ let fee = ((amount / 100) * 1)
81+ let currentClientBalanceUSDT = valueOrElse(getInteger(this, balanceKey), 0)
82+ if ((minimalAmountToSwapUSDT > amount))
83+ then usdtToUsdnLowLimitError()
84+ else [IntegerEntry(balanceKey, (currentClientBalanceUSDT + amount)), ScriptTransfer(invoke.caller, (amount - fee), idUSDN)]
85+ }
4786 }
4887
4988
5089
51-@Callable(contextObj)
90+@Callable(invoke)
5291 func initializationUSDNtoUSDTswap () = {
53- let payment = match contextObj.payment {
54- case p: AttachedPayment =>
55- p
56- case _ =>
57- throw("Payment not attached")
58- }
59- let assetIdReceived = payment.assetId
60- let paymentAmount = payment.amount
61- let userAddress = contextObj.caller
62- let currentClientBalanceUSDT = match getInteger(this, (toString(userAddress) + "_balance")) {
63- case currentBalance: Int =>
64- getIntegerValue(this, (toString(userAddress) + "_balance"))
65- case _ =>
66- 0
67- }
68- if ((assetIdReceived != idUSDN))
69- then throw("to swap USDN to USDT you need attach payment in USDN")
70- else if (if ((paymentAmount > currentClientBalanceUSDT))
71- then true
72- else (minimalAmountToSwapUSDN > paymentAmount))
73- then throw("swap amount fail")
74- else {
75- let allowToWithDrawHeight = (height + withdrawDelay)
76- if (isDefined(getString(this, collectKey(contextObj.caller, paymentAmount, allowToWithDrawHeight))))
77- then throw("you have already started withdrawal process, wait next block")
78- else ScriptResult(WriteSet([DataEntry((toString(contextObj.caller) + "_balance"), (currentClientBalanceUSDT - paymentAmount)), DataEntry(collectKey(contextObj.caller, paymentAmount, allowToWithDrawHeight), "not_withdrawn")]), TransferSet(nil))
79- }
92+ let payment = value(invoke.payments[0])
93+ let address = toString(invoke.caller)
94+ if ((payment.assetId != idUSDN))
95+ then usdnToUsdtAssetError()
96+ else {
97+ let amount = payment.amount
98+ let balanceKey = collectBalanceKey(address)
99+ let balanceWithFeeKey = collectBalanceKeyWithFee(address)
100+ let currentClientBalance = valueOrElse(getInteger(this, balanceKey), 0)
101+ let currentClientBalanceWithFee = valueOrElse(getInteger(this, balanceWithFeeKey), 0)
102+ let userBalance = (currentClientBalance + currentClientBalanceWithFee)
103+ let data = currentWithdrawals(toString(invoke.caller), amount)
104+ let toWithdrawWithoutFee = valueOrErrorMessage(data[0], "Wrong 'currentWithdrawals' method!")
105+ let toWithdrawWithFee = valueOrErrorMessage(data[1], "Wrong 'currentWithdrawals' method!")
106+ let fee = valueOrErrorMessage(data[2], "Wrong 'currentWithdrawals' method!")
107+ let total = ((toWithdrawWithFee + toWithdrawWithoutFee) - fee)
108+ let allowToWithDrawHeight = (height + withdrawDelay)
109+ if (isDefined(getString(this, collectKey(toString(invoke.caller), amount, allowToWithDrawHeight))))
110+ then throw("You have already started withdrawal process, wait next block.")
111+ else [IntegerEntry(balanceKey, (currentClientBalance - toWithdrawWithoutFee)), IntegerEntry(balanceWithFeeKey, (currentClientBalanceWithFee - toWithdrawWithFee)), StringEntry(collectKey(toString(invoke.caller), amount, allowToWithDrawHeight), makeString(["not_withdrawn", toString((amount - fee))], "_"))]
112+ }
80113 }
81114
82115
83116
84-@Callable(contextObj)
85-func swapUSDNtoUSDT (amountToSwapInKey,heightInKey) = {
86- let key = collectKey(contextObj.caller, amountToSwapInKey, heightInKey)
87- let withdrawnInfo = match getString(this, key) {
88- case withdrawnInfo: String =>
89- getStringValue(this, key)
90- case _ =>
91- throw(((("this key doesn't exists " + key) + " at address ") + toString(this)))
92- }
117+@Callable(invoke)
118+func swapUSDNtoUSDT (amount,heightInKey) = {
119+ let key = collectKey(toString(invoke.caller), amount, heightInKey)
120+ let withdrawnInfo = valueOrErrorMessage(getString(this, key), ((("This key doesn't exists " + key) + " at address ") + toString(this)))
121+ let toWithdraw = getListElementOrDefault(split(withdrawnInfo, "_"), 2, toString(amount))
93122 if (if ((height >= heightInKey))
94- then (withdrawnInfo == "not_withdrawn")
123+ then contains(withdrawnInfo, "not_withdrawn")
95124 else false)
96- then ScriptResult(WriteSet([DataEntry(key, "withdrawn")]), TransferSet([ScriptTransfer(contextObj.caller, amountToSwapInKey, idUSDT)]))
97- else throw((("withdrawal is possible after " + toString(heightInKey)) + " height or you have already withdrawn USDT"))
125+ then [DeleteEntry(key), ScriptTransfer(invoke.caller, valueOrErrorMessage(parseInt(toWithdraw), "Wrong withdraw data!"), idUSDT)]
126+ else throw((("Withdrawal is possible after " + toString(heightInKey)) + " height or you have already withdrawn USDT."))
98127 }
99128
100129

github/deemru/w8io/3ef1775 
44.88 ms