2022.04.10 09:29 [3067436] smart account 3P8jiywkftibZ2ocUkXJ6PjHVTNXvUnKAvA > SELF 0.00000000 Waves

{ "type": 13, "id": "2DuS2ToERm6saR7Q8zCYQuN6cTrL2bxcqkis1ddBb9SJ", "fee": 1000000, "feeAssetId": null, "timestamp": 1649572162793, "version": 2, "chainId": 87, "sender": "3P8jiywkftibZ2ocUkXJ6PjHVTNXvUnKAvA", "senderPublicKey": "7iZ6aJsbhCNBroCgZUCmi6Vc2jkv2zpkTtB7o6wwjKuG", "proofs": [ "QL5aQfjGH45KCaVXtMHpxqTcU9MEMJ4V9Dkv99JFNUTJ9w4Ewh5dLBE4e5rtNausrgX2vuFtha39XDaLn1QiN7d" ], "script": "base64:AAIFAAAAAAAAAAoIAhIAEgQKAgEEAAAABQEAAAAFYXNJbnQAAAABAAAABXZhbHVlBAAAAAckbWF0Y2gwBQAAAAV2YWx1ZQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAANpbnQFAAAAByRtYXRjaDAFAAAAA2ludAkAAAIAAAABAgAAABl3cm9uZyB0eXBlLCBleHBlY3RlZDogSW50AQAAABFhc1VzZXJCYWxhbmNlRGF0YQAAAAEAAAAFdmFsdWUEAAAAByRtYXRjaDAFAAAABXZhbHVlAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAACIoSW50LCBJbnQsIEludCwgSW50LCBJbnQsIEJvb2xlYW4pBAAAAAF4BQAAAAckbWF0Y2gwBQAAAAF4BAAAAAF0BQAAAAckbWF0Y2gwCQAAAgAAAAECAAAAIndyb25nIHR5cGUsIGV4cGVjdGVkOiBJbnQ1JkJvb2xlYW4AAAAABG1haW4JAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAECAAAAIzNQQVp2OXRnSzFQWDdkS1I3YjRrY2hxNXFkcFVTM0c1c1lUAAAAAAxhc3NldFN0cmluZ3MJAARMAAAAAgIAAAAsNlh0SGpwWGJzOVJSSlAyU3I5R1V5VnF6QUNjYnk5VGtUaEhYbmpWQzVDREoJAARMAAAAAgIAAAAsMzROOVljRUVUTFduOTNxWVE2NEVzUDF4ODl0U3J1SlU0NFJyRU1TWFhFUEoJAARMAAAAAgIAAAAsREcyeEZrUGREd0tVb0JrekdBaFF0THBTR3pmWExpQ1lQRXplS0gyQWQyNHAFAAAAA25pbAAAAAAIcmVzZXJ2ZXMJAARMAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQIAAAAjM1BHQ2tySEJ4Rk1pN3R6MXhxbnhnQnBlTnZuNUU0TTRnOFMJAARMAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQIAAAAjM1BFaUQxekpXVE1aTldTQ3l6aHZCdzlweHhBV2VFd2FnaFIJAARMAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQIAAAAjM1BDd0ZYU3E4dmo4aUtpdEE1enJyTFJidXFlaGZtaW1wY2UFAAAAA25pbAAAAAIAAAABaQEAAAALd2l0aGRyYXdBbGwAAAAABAAAAAdhbW91bnQwCQEAAAAFYXNJbnQAAAABCQAD/AAAAAQFAAAABHRoaXMCAAAACHdpdGhkcmF3CQAETAAAAAIAAAAAAAAAAAAFAAAAA25pbAUAAAADbmlsBAAAAAdhbW91bnQxCQEAAAAFYXNJbnQAAAABCQAD/AAAAAQFAAAABHRoaXMCAAAACHdpdGhkcmF3CQAETAAAAAIAAAAAAAAAAAEFAAAAA25pbAUAAAADbmlsAwkAAGYAAAACCQAAZAAAAAIFAAAAB2Ftb3VudDAFAAAAB2Ftb3VudDEAAAAAAAX14QAJAAUUAAAAAgUAAAADbmlsCQAAZAAAAAIFAAAAB2Ftb3VudDAFAAAAB2Ftb3VudDEJAAACAAAAAQIAAAARbm90aGluZyB3aXRoZHJhd24AAAABaQEAAAAId2l0aGRyYXcAAAACAAAABWFzc2V0AAAABHBhc3MEAAAADWFzc2V0SWRTdHJpbmcJAAGRAAAAAgUAAAAMYXNzZXRTdHJpbmdzBQAAAAVhc3NldAQAAAAHYXNzZXRJZAkAAlkAAAABBQAAAA1hc3NldElkU3RyaW5nBAAAAAdyZXNlcnZlCQABkQAAAAIFAAAACHJlc2VydmVzBQAAAAVhc3NldAQAAAAJYXZhaWxhYmxlCQAD8AAAAAIFAAAAB3Jlc2VydmUFAAAAB2Fzc2V0SWQEAAAAD3VzZXJiYWxhbmNlZGF0YQkBAAAAEWFzVXNlckJhbGFuY2VEYXRhAAAAAQkAA/wAAAAEBQAAAAdyZXNlcnZlAgAAAAt1c2VyQmFsYW5jZQkABEwAAAACCQAEJQAAAAEFAAAABHRoaXMFAAAAA25pbAUAAAADbmlsBAAAAAJscAgFAAAAD3VzZXJiYWxhbmNlZGF0YQAAAAJfMQQAAAAJbWF4QW1vdW50CAUAAAAPdXNlcmJhbGFuY2VkYXRhAAAAAl8yBAAAAApkZXBvc2l0VXNkCAUAAAAPdXNlcmJhbGFuY2VkYXRhAAAAAl8zBAAAAARkZWJ0CAUAAAAPdXNlcmJhbGFuY2VkYXRhAAAAAl80BAAAAAdkZWJ0VXNkCAUAAAAPdXNlcmJhbGFuY2VkYXRhAAAAAl81BAAAAAxhc0NvbGxhdGVyYWwIBQAAAA91c2VyYmFsYW5jZWRhdGEAAAACXzYEAAAAAXYDCQAAZgAAAAIFAAAACWF2YWlsYWJsZQUAAAAJbWF4QW1vdW50AP//////////AwkAAGYAAAACAAAAAAAAAAACBQAAAAVhc3NldAUAAAAJYXZhaWxhYmxlAP//////////BAAAAAZhbW91bnQJAQAAAAVhc0ludAAAAAEJAAP8AAAABAUAAAAEbWFpbgIAAAAId2l0aGRyYXcJAARMAAAAAgUAAAANYXNzZXRJZFN0cmluZwkABEwAAAACBQAAAAF2BQAAAANuaWwFAAAAA25pbAMDCQAAZgAAAAIFAAAABmFtb3VudAAAAAAAdzWUAAYFAAAABHBhc3MJAAUUAAAAAgUAAAADbmlsBQAAAAZhbW91bnQJAAACAAAAAQkAAaQAAAABBQAAAAZhbW91bnQAAAAADaCl4w==", "height": 3067436, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: DAHoruoFL6zpKZGMhJUWwK3XE1YMceMpxKmULqPTUSeK Next: none Full:
OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let admin = addressFromStringValue("3P8jiywkftibZ2ocUkXJ6PjHVTNXvUnKAvA")
4+func asInt (value) = match value {
5+ case int: Int =>
6+ int
7+ case _ =>
8+ throw("wrong type, expected: Int")
9+}
510
6-let viresUsdcAddress = base58'3PGCkrHBxFMi7tz1xqnxgBpeNvn5E4M4g8S'
711
8-let viresUsdtAddress = base58'3PEiD1zJWTMZNWSCyzhvBw9pxxAWeEwaghR'
12+func asUserBalanceData (value) = match value {
13+ case x: (Int, Int, Int, Int, Int, Boolean) =>
14+ x
15+ case t =>
16+ throw("wrong type, expected: Int5&Boolean")
17+}
918
10-let viresMainAddress = base58'3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT'
1119
12-let USDC = base58'6XtHjpXbs9RRJP2Sr9GUyVqzACcby9TkThHXnjVC5CDJ'
20+let main = addressFromStringValue("3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT")
1321
14-let USDC_LP = base58'FSRHtSyXRXQjzQLRtmaqFpBDDCNjY8PU8KNtwoGXVBmr'
22+let assetStrings = ["6XtHjpXbs9RRJP2Sr9GUyVqzACcby9TkThHXnjVC5CDJ", "34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ", "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"]
1523
16-let USDT = base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ'
17-
18-let USDT_LP = base58'2tVLdi5fQXk2JcuDAojhctnDp5B5PZhNMyj5GUpeC3tZ'
24+let reserves = [addressFromStringValue("3PGCkrHBxFMi7tz1xqnxgBpeNvn5E4M4g8S"), addressFromStringValue("3PEiD1zJWTMZNWSCyzhvBw9pxxAWeEwaghR"), addressFromStringValue("3PCwFXSq8vj8iKitA5zrrLRbuqehfmimpce")]
1925
2026 @Callable(i)
21-func usdc () = if ((i.caller != admin))
22- then throw("!")
23- else {
24- let balance = assetBalance(Address(viresUsdcAddress), USDC)
25- if ((balance == balance))
26- then if ((10000000 > balance))
27- then throw(("balance: " + toString(balance)))
28- else {
29- let lpAmount = assetBalance(this, USDC_LP)
30- if ((lpAmount == lpAmount))
31- then {
32- let amount = min([fraction(balance, 100, 130), lpAmount])
33- if ((0 >= amount))
34- then throw("?")
35- else {
36- let swap1 = invoke(Address(viresMainAddress), "redeemAtokens", nil, [AttachedPayment(USDC_LP, amount)])
37- if ((swap1 == swap1))
38- then nil
39- else throw("Strict value is not equal to itself.")
40- }
41- }
42- else throw("Strict value is not equal to itself.")
43- }
44- else throw("Strict value is not equal to itself.")
45- }
27+func withdrawAll () = {
28+ let amount0 = asInt(invoke(this, "withdraw", [0], nil))
29+ let amount1 = asInt(invoke(this, "withdraw", [1], nil))
30+ if (((amount0 + amount1) > 100000000))
31+ then $Tuple2(nil, (amount0 + amount1))
32+ else throw("nothing withdrawn")
33+ }
4634
4735
4836
4937 @Callable(i)
50-func usdt () = if ((i.caller != admin))
51- then throw("!")
52- else {
53- let balance = assetBalance(Address(viresUsdtAddress), USDT)
54- if ((balance == balance))
55- then if ((10000000 > balance))
56- then throw("!")
57- else {
58- let lpAmount = assetBalance(this, USDT_LP)
59- if ((lpAmount == lpAmount))
60- then {
61- let amount = min([fraction(balance, 100, 130), lpAmount])
62- if ((0 >= amount))
63- then throw("?")
64- else {
65- let swap1 = invoke(Address(viresMainAddress), "redeemAtokens", nil, [AttachedPayment(USDT_LP, amount)])
66- if ((swap1 == swap1))
67- then nil
68- else throw("Strict value is not equal to itself.")
69- }
70- }
71- else throw("Strict value is not equal to itself.")
72- }
73- else throw("Strict value is not equal to itself.")
74- }
38+func withdraw (asset,pass) = {
39+ let assetIdString = assetStrings[asset]
40+ let assetId = fromBase58String(assetIdString)
41+ let reserve = reserves[asset]
42+ let available = assetBalance(reserve, assetId)
43+ let userbalancedata = asUserBalanceData(invoke(reserve, "userBalance", [toString(this)], nil))
44+ let lp = userbalancedata._1
45+ let maxAmount = userbalancedata._2
46+ let depositUsd = userbalancedata._3
47+ let debt = userbalancedata._4
48+ let debtUsd = userbalancedata._5
49+ let asCollateral = userbalancedata._6
50+ let v = if ((available > maxAmount))
51+ then -1
52+ else if ((2 > asset))
53+ then available
54+ else -1
55+ let amount = asInt(invoke(main, "withdraw", [assetIdString, v], nil))
56+ if (if ((amount > 2000000000))
57+ then true
58+ else pass)
59+ then $Tuple2(nil, amount)
60+ else throw(toString(amount))
61+ }
7562
7663

github/deemru/w8io/786bc32 
26.96 ms