tx · 2Umki97kgg2KxiNEykPS8Q95E3RZym8cQawjVtwssaH1

3PAQxC1NtqBPC5DZ4PxABpuyt3NVBVgVnFi:  -0.00500000 Waves

2023.01.12 17:10 [3467337] smart account 3PAQxC1NtqBPC5DZ4PxABpuyt3NVBVgVnFi > SELF 0.00000000 Waves

{ "type": 13, "id": "2Umki97kgg2KxiNEykPS8Q95E3RZym8cQawjVtwssaH1", "fee": 500000, "feeAssetId": null, "timestamp": 1673532628803, "version": 1, "sender": "3PAQxC1NtqBPC5DZ4PxABpuyt3NVBVgVnFi", "senderPublicKey": "685QegvRtFhSp3FHC6USr7hTG6sw7Gbccyi2vBHX5EXi", "proofs": [ "5uWya2BbPBNbuyDwNzzmEbt33ijEsZ1pE4NDKXmBnBbDVNQzcJ1NHoG9SZZ1G6bUehFoVh5USA2WJqbrynCuL2oT" ], "script": "base64:BgIYCAISAwoBARIDCgEBEgMKAQgSBQoDCAgBBwAEVVNETgEgtiYpwwT1zlORpA5LdSQvZIxRsfrfr1QpvUjSHSqyqtEABFNVUkYBIJLR9EriEQEr9H7q3iGOPcX7yfJ9zoey7VIZ8DpOJFj1AAxhZG1pbkFkZHJlc3MJAQdBZGRyZXNzAQEaAVc0FN9xREbfMFTR97icc0UMqzorm02OJmEAC2FnZ3JBZGRyZXNzCQEHQWRkcmVzcwEBGgFXJqAMCkZONGXCherIE8gqRGALS8LL8ZtsAA91c2RuQWdnckFkZHJlc3MJAQdBZGRyZXNzAQEaAVcHjOFVob2YfPYA61m/TjnrxEWlXnNk32wBCWFzQW55TGlzdAEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAglMaXN0W0FueV0EAWwFByRtYXRjaDAFAWwJAAIBAgQjZXJyAQVhc0ludAEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgNJbnQEAXgFByRtYXRjaDAFAXgEAXQFByRtYXRjaDAJAAIBAgQjZXJyBAFpAQh1c2RuXzEwMAEGYW1vdW50BBF1c2RuQW1vdW50T25TdGFydAkA8AcCBQR0aGlzBQRVU0ROAwkAAAIFEXVzZG5BbW91bnRPblN0YXJ0BRF1c2RuQW1vdW50T25TdGFydAQDaW52CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNQQ2J2UFZRZlN2VnU4OGlwOEZtNVlqd0poakVZazFUeGhrAhV3aXRoZHJhd1Zlc3RlZEFsbFVTRE4JAMwIAgcJAMwIAgYFA25pbAUDbmlsAwkAAAIFA2ludgUDaW52BBd1c2RuQW1vdW50QWZ0ZXJXaXRoZHJhdwkA8AcCBQR0aGlzBQRVU0ROAwkAAAIFF3VzZG5BbW91bnRBZnRlcldpdGhkcmF3BRd1c2RuQW1vdW50QWZ0ZXJXaXRoZHJhdwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQthZ2dyQWRkcmVzcwkAZQIFF3VzZG5BbW91bnRBZnRlcldpdGhkcmF3BRF1c2RuQW1vdW50T25TdGFydAUEVVNETgUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBBHN1cmYBAXcDAwkBAiE9AggFAWkGY2FsbGVyBQxhZG1pbkFkZHJlc3MJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwcJAAIBAhFvbmx5IGFkbWluIGNhbiBkbwQPbmV1dHJpbm9NZXRyaWNzCQEJYXNBbnlMaXN0AQkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBAiMzUDc3aVV1c053TU16V0ZkQzhmN2JmdHdwSHlHMVBCczFncQIaY2FsY05ldXRpbm9NZXRyaWNzUkVBRE9OTFkFA25pbAUDbmlsBAJCUgkBBWFzSW50AQkAkQMCBQ9uZXV0cmlub01ldHJpY3MACAMJAGYCBQF3BQJCUgQDaW52CQD8BwQJAQdBZGRyZXNzAQEaAVd1Et2Tgg9b3iV2FTnLSdUfUygJxOhxXicCFXdpdGhkcmF3VmVzdGVkQWxsU1VSRgkAzAgCBwkAzAgCBgUDbmlsBQNuaWwDCQAAAgUDaW52BQNpbnYEB2FBbW91bnQJAPAHAgUEdGhpcwUEU1VSRgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQthZ2dyQWRkcmVzcwUHYUFtb3VudAUEU1VSRgUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQkArAICAgticiBpcyBiYWQuIAkApAMBBQJCUgFpAQl0b1Zlc3RpbmcBAWIDAwMJAQIhPQIIBQFpDG9yaWdpbkNhbGxlcgUMYWRtaW5BZGRyZXNzCQECIT0CCAUBaQxvcmlnaW5DYWxsZXIFBHRoaXMHCQECIT0CCAUBaQxvcmlnaW5DYWxsZXIFC2FnZ3JBZGRyZXNzBwkAAgECEW9ubHkgYWRtaW4gY2FuIGRvAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQILYmFkIHBheW1lbnQEC3JlcGF5QW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQKcmVwYXlBc3NldAgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBARpbnYxCQD8BwQJAQdBZGRyZXNzAQEaAVdewZYZMMmiQ3hGadYm1vHmuEPQvfZMHrgCBXJlcGF5CQDMCAIFAWIFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUKcmVwYXlBc3NldAULcmVwYXlBbW91bnQFA25pbAMJAAACBQRpbnYxBQRpbnYxBARpbnYyCQD8BwQJAQdBZGRyZXNzAQEaAVd1Et2Tgg9b3iV2FTnLSdUfUygJxOhxXicCDWNvbnZlcnRUb1VTRE4FA25pbAUDbmlsAwkAAAIFBGludjIFBGludjIEBGludjMJAPwHBAkBB0FkZHJlc3MBARoBV17BlhkwyaJDeEZp1ibW8ea4Q9C99kweuAIId2l0aGRyYXcJAMwIAgIsREcyeEZrUGREd0tVb0JrekdBaFF0THBTR3pmWExpQ1lQRXplS0gyQWQyNHAJAMwIAgD///////////8BBQNuaWwFA25pbAMJAAACBQRpbnYzBQRpbnYzBAdiYWxhbmNlCQDwBwIFBHRoaXMJAQV2YWx1ZQEFCnJlcGF5QXNzZXQDCQAAAgUHYmFsYW5jZQUHYmFsYW5jZQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQthZ2dyQWRkcmVzcwUHYmFsYW5jZQUKcmVwYXlBc3NldAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQ91c2RuQWdnckFkZHJlc3MJAPAHAgUEdGhpcwUEVVNETgUEVVNETgUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBDmZ1bGxWZXN0aW5nRXVyAwFiAXYMdHJhbnNmZXJEZWJ0AwMDCQECIT0CCAUBaQxvcmlnaW5DYWxsZXIFDGFkbWluQWRkcmVzcwkBAiE9AggFAWkMb3JpZ2luQ2FsbGVyBQR0aGlzBwkBAiE9AggFAWkMb3JpZ2luQ2FsbGVyBQthZ2dyQWRkcmVzcwcJAAIBAhFvbmx5IGFkbWluIGNhbiBkbwMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAgkAAgECC2JhZCBwYXltZW50BAxzdXBwbHlBbW91bnQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAtzdXBwbHlBc3NldAgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBAtyZXBheUFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAQZhbW91bnQECnJlcGF5QXNzZXQICQCRAwIIBQFpCHBheW1lbnRzAAEHYXNzZXRJZAMJAQIhPQIFC3N1cHBseUFzc2V0BQRVU0ROCQACAQIRYmFkIGRlcG9zaXQgYXNzZXQEBGludjEJAPwHBAkBB0FkZHJlc3MBARoBV17BlhkwyaJDeEZp1ibW8ea4Q9C99kweuAIHZGVwb3NpdAkAzAgCAiMzUEN3RlhTcTh2ajhpS2l0QTV6cnJMUmJ1cWVoZm1pbXBjZQkAzAgCBgUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQtzdXBwbHlBc3NldAUMc3VwcGx5QW1vdW50BQNuaWwDCQAAAgUEaW52MQUEaW52MQQEaW52MgkA/AcECQEHQWRkcmVzcwEBGgFXsV2QJ5CRleRkwqONdBGALebCh9So7SI8Agx0cmFuc2ZlckRlYnQJAMwIAgIjM1BCanFpTXd3YWc3MlZXVXRITm5WcnhUQnJOSzhEN2JWY04JAMwIAgIjM1BHQ2tySEJ4Rk1pN3R6MXhxbnhnQnBlTnZuNUU0TTRnOFMJAMwIAgUBdgkAzAgCBQx0cmFuc2ZlckRlYnQFA25pbAUDbmlsAwkAAAIFBGludjIFBGludjIEBGludjMJAPwHBAkBB0FkZHJlc3MBARoBV17BlhkwyaJDeEZp1ibW8ea4Q9C99kweuAIFcmVwYXkJAMwIAgUBYgUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQpyZXBheUFzc2V0BQtyZXBheUFtb3VudAUDbmlsAwkAAAIFBGludjMFBGludjMEBGludjQJAPwHBAkBB0FkZHJlc3MBARoBV3US3ZOCD1veJXYVOctJ1R9TKAnE6HFeJwINY29udmVydFRvVVNETgUDbmlsBQNuaWwDCQAAAgUEaW52NAUEaW52NAQEaW52NQkA/AcECQEHQWRkcmVzcwEBGgFXXsGWGTDJokN4RmnWJtbx5rhD0L32TB64Agh3aXRoZHJhdwkAzAgCAixERzJ4RmtQZER3S1VvQmt6R0FoUXRMcFNHemZYTGlDWVBFemVLSDJBZDI0cAkAzAgCAP///////////wEFA25pbAUDbmlsAwkAAAIFBGludjUFBGludjUEBGludjYJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM1BDYnZQVlFmU3ZWdTg4aXA4Rm01WWp3SmhqRVlrMVR4aGsCFXdpdGhkcmF3VmVzdGVkQWxsVVNETgkAzAgCBwkAzAgCBgUDbmlsBQNuaWwDCQAAAgUEaW52NgUEaW52NgQHYmFsYW5jZQkA8AcCBQR0aGlzCQEFdmFsdWUBBQpyZXBheUFzc2V0AwkAAAIFB2JhbGFuY2UFB2JhbGFuY2UJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwULYWdnckFkZHJlc3MFB2JhbGFuY2UFCnJlcGF5QXNzZXQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUPdXNkbkFnZ3JBZGRyZXNzCQDwBwIFBHRoaXMFBFVTRE4FBFVTRE4FA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAXu/T6", "chainId": 87, "height": 3467337, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 4vg3V5pdjnZv94yHjB9Vggxaa3YNsgYg7mW39vqkDqMb Next: 7LMMd5aTyt9bSu68EhYukN71je7eqToF5vHjLrV9JsHj Diff:
OldNewDifferences
33 {-# CONTENT_TYPE DAPP #-}
44 let USDN = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
55
6+let SURF = base58'At8D6NFFpheCbvKVnjVoeLL84Eo8NZn6ovManxfLaFWL'
7+
68 let adminAddress = Address(base58'3P6gGsVQbD2xgmaNxN7Rj3arohPsBxvo5GC')
79
8-let zeftAddress = Address(base58'3PC51qgNQz4xx7m1DhLdCDYESaeNKT6zeFt')
10+let aggrAddress = Address(base58'3P5T88oGg47FEsJcpC2o43BSF34Bs5dcFpP')
11+
12+let usdnAggrAddress = Address(base58'3P2cpE7nusQRRFt3Tg22WtKfdi6bUKwmqVM')
13+
14+func asAnyList (v) = match v {
15+ case l: List[Any] =>
16+ l
17+ case _ =>
18+ throw("#err")
19+}
20+
21+
22+func asInt (v) = match v {
23+ case x: Int =>
24+ x
25+ case t =>
26+ throw("#err")
27+}
28+
929
1030 @Callable(i)
11-func usdn_100 (amount) = if ((i.originCaller != adminAddress))
31+func usdn_100 (amount) = {
32+ let usdnAmountOnStart = assetBalance(this, USDN)
33+ if ((usdnAmountOnStart == usdnAmountOnStart))
34+ then {
35+ let inv = invoke(addressFromStringValue("3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk"), "withdrawVestedAllUSDN", [false, true], nil)
36+ if ((inv == inv))
37+ then {
38+ let usdnAmountAfterWithdraw = assetBalance(this, USDN)
39+ if ((usdnAmountAfterWithdraw == usdnAmountAfterWithdraw))
40+ then [ScriptTransfer(aggrAddress, (usdnAmountAfterWithdraw - usdnAmountOnStart), USDN)]
41+ else throw("Strict value is not equal to itself.")
42+ }
43+ else throw("Strict value is not equal to itself.")
44+ }
45+ else throw("Strict value is not equal to itself.")
46+ }
47+
48+
49+
50+@Callable(i)
51+func surf (w) = if (if ((i.caller != adminAddress))
52+ then (i.caller != this)
53+ else false)
1254 then throw("only admin can do")
1355 else {
14- let usdnAmountOnStart = assetBalance(this, USDN)
15- if ((usdnAmountOnStart == usdnAmountOnStart))
56+ let neutrinoMetrics = asAnyList(invoke(addressFromStringValue("3P77iUusNwMMzWFdC8f7bftwpHyG1PBs1gq"), "calcNeutinoMetricsREADONLY", nil, nil))
57+ let BR = asInt(neutrinoMetrics[8])
58+ if ((w > BR))
1659 then {
17- let inv = invoke(addressFromStringValue("3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk"), "withdrawVestedAllUSDN", [false, true], nil)
60+ let inv = invoke(Address(base58'3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk'), "withdrawVestedAllSURF", [false, true], nil)
1861 if ((inv == inv))
1962 then {
20- let usdnAmountAfterWithdraw = assetBalance(this, USDN)
21- if ((usdnAmountAfterWithdraw == usdnAmountAfterWithdraw))
22- then [ScriptTransfer(zeftAddress, (usdnAmountAfterWithdraw - usdnAmountOnStart), USDN)]
23- else throw("Strict value is not equal to itself.")
63+ let aAmount = assetBalance(this, SURF)
64+[ScriptTransfer(aggrAddress, aAmount, SURF)]
2465 }
2566 else throw("Strict value is not equal to itself.")
2667 }
27- else throw("Strict value is not equal to itself.")
68+ else throw(("br is bad. " + toString(BR)))
2869 }
70+
71+
72+
73+@Callable(i)
74+func toVesting (b) = if (if (if ((i.originCaller != adminAddress))
75+ then (i.originCaller != this)
76+ else false)
77+ then (i.originCaller != aggrAddress)
78+ else false)
79+ then throw("only admin can do")
80+ else if ((size(i.payments) != 1))
81+ then throw("bad payment")
82+ else {
83+ let repayAmount = i.payments[0].amount
84+ let repayAsset = i.payments[0].assetId
85+ let inv1 = invoke(Address(base58'3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT'), "repay", [b], [AttachedPayment(repayAsset, repayAmount)])
86+ if ((inv1 == inv1))
87+ then {
88+ let inv2 = invoke(Address(base58'3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk'), "convertToUSDN", nil, nil)
89+ if ((inv2 == inv2))
90+ then {
91+ let inv3 = invoke(Address(base58'3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT'), "withdraw", ["DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p", -1], nil)
92+ if ((inv3 == inv3))
93+ then {
94+ let balance = assetBalance(this, value(repayAsset))
95+ if ((balance == balance))
96+ then [ScriptTransfer(aggrAddress, balance, repayAsset), ScriptTransfer(usdnAggrAddress, assetBalance(this, USDN), USDN)]
97+ else throw("Strict value is not equal to itself.")
98+ }
99+ else throw("Strict value is not equal to itself.")
100+ }
101+ else throw("Strict value is not equal to itself.")
102+ }
103+ else throw("Strict value is not equal to itself.")
104+ }
105+
106+
107+
108+@Callable(i)
109+func fullVestingEur (b,v,transferDebt) = if (if (if ((i.originCaller != adminAddress))
110+ then (i.originCaller != this)
111+ else false)
112+ then (i.originCaller != aggrAddress)
113+ else false)
114+ then throw("only admin can do")
115+ else if ((size(i.payments) != 2))
116+ then throw("bad payment")
117+ else {
118+ let supplyAmount = i.payments[0].amount
119+ let supplyAsset = i.payments[0].assetId
120+ let repayAmount = i.payments[1].amount
121+ let repayAsset = i.payments[1].assetId
122+ if ((supplyAsset != USDN))
123+ then throw("bad deposit asset")
124+ else {
125+ let inv1 = invoke(Address(base58'3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT'), "deposit", ["3PCwFXSq8vj8iKitA5zrrLRbuqehfmimpce", true], [AttachedPayment(supplyAsset, supplyAmount)])
126+ if ((inv1 == inv1))
127+ then {
128+ let inv2 = invoke(Address(base58'3PJ6iR5X1PT2rZcNmbqByKuh7k8mtj5wVGw'), "transferDebt", ["3PBjqiMwwag72VWUtHNnVrxTBrNK8D7bVcN", "3PGCkrHBxFMi7tz1xqnxgBpeNvn5E4M4g8S", v, transferDebt], nil)
129+ if ((inv2 == inv2))
130+ then {
131+ let inv3 = invoke(Address(base58'3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT'), "repay", [b], [AttachedPayment(repayAsset, repayAmount)])
132+ if ((inv3 == inv3))
133+ then {
134+ let inv4 = invoke(Address(base58'3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk'), "convertToUSDN", nil, nil)
135+ if ((inv4 == inv4))
136+ then {
137+ let inv5 = invoke(Address(base58'3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT'), "withdraw", ["DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p", -1], nil)
138+ if ((inv5 == inv5))
139+ then {
140+ let inv6 = invoke(addressFromStringValue("3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk"), "withdrawVestedAllUSDN", [false, true], nil)
141+ if ((inv6 == inv6))
142+ then {
143+ let balance = assetBalance(this, value(repayAsset))
144+ if ((balance == balance))
145+ then [ScriptTransfer(aggrAddress, balance, repayAsset), ScriptTransfer(usdnAggrAddress, assetBalance(this, USDN), USDN)]
146+ else throw("Strict value is not equal to itself.")
147+ }
148+ else throw("Strict value is not equal to itself.")
149+ }
150+ else throw("Strict value is not equal to itself.")
151+ }
152+ else throw("Strict value is not equal to itself.")
153+ }
154+ else throw("Strict value is not equal to itself.")
155+ }
156+ else throw("Strict value is not equal to itself.")
157+ }
158+ else throw("Strict value is not equal to itself.")
159+ }
160+ }
29161
30162
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let USDN = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
55
6+let SURF = base58'At8D6NFFpheCbvKVnjVoeLL84Eo8NZn6ovManxfLaFWL'
7+
68 let adminAddress = Address(base58'3P6gGsVQbD2xgmaNxN7Rj3arohPsBxvo5GC')
79
8-let zeftAddress = Address(base58'3PC51qgNQz4xx7m1DhLdCDYESaeNKT6zeFt')
10+let aggrAddress = Address(base58'3P5T88oGg47FEsJcpC2o43BSF34Bs5dcFpP')
11+
12+let usdnAggrAddress = Address(base58'3P2cpE7nusQRRFt3Tg22WtKfdi6bUKwmqVM')
13+
14+func asAnyList (v) = match v {
15+ case l: List[Any] =>
16+ l
17+ case _ =>
18+ throw("#err")
19+}
20+
21+
22+func asInt (v) = match v {
23+ case x: Int =>
24+ x
25+ case t =>
26+ throw("#err")
27+}
28+
929
1030 @Callable(i)
11-func usdn_100 (amount) = if ((i.originCaller != adminAddress))
31+func usdn_100 (amount) = {
32+ let usdnAmountOnStart = assetBalance(this, USDN)
33+ if ((usdnAmountOnStart == usdnAmountOnStart))
34+ then {
35+ let inv = invoke(addressFromStringValue("3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk"), "withdrawVestedAllUSDN", [false, true], nil)
36+ if ((inv == inv))
37+ then {
38+ let usdnAmountAfterWithdraw = assetBalance(this, USDN)
39+ if ((usdnAmountAfterWithdraw == usdnAmountAfterWithdraw))
40+ then [ScriptTransfer(aggrAddress, (usdnAmountAfterWithdraw - usdnAmountOnStart), USDN)]
41+ else throw("Strict value is not equal to itself.")
42+ }
43+ else throw("Strict value is not equal to itself.")
44+ }
45+ else throw("Strict value is not equal to itself.")
46+ }
47+
48+
49+
50+@Callable(i)
51+func surf (w) = if (if ((i.caller != adminAddress))
52+ then (i.caller != this)
53+ else false)
1254 then throw("only admin can do")
1355 else {
14- let usdnAmountOnStart = assetBalance(this, USDN)
15- if ((usdnAmountOnStart == usdnAmountOnStart))
56+ let neutrinoMetrics = asAnyList(invoke(addressFromStringValue("3P77iUusNwMMzWFdC8f7bftwpHyG1PBs1gq"), "calcNeutinoMetricsREADONLY", nil, nil))
57+ let BR = asInt(neutrinoMetrics[8])
58+ if ((w > BR))
1659 then {
17- let inv = invoke(addressFromStringValue("3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk"), "withdrawVestedAllUSDN", [false, true], nil)
60+ let inv = invoke(Address(base58'3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk'), "withdrawVestedAllSURF", [false, true], nil)
1861 if ((inv == inv))
1962 then {
20- let usdnAmountAfterWithdraw = assetBalance(this, USDN)
21- if ((usdnAmountAfterWithdraw == usdnAmountAfterWithdraw))
22- then [ScriptTransfer(zeftAddress, (usdnAmountAfterWithdraw - usdnAmountOnStart), USDN)]
23- else throw("Strict value is not equal to itself.")
63+ let aAmount = assetBalance(this, SURF)
64+[ScriptTransfer(aggrAddress, aAmount, SURF)]
2465 }
2566 else throw("Strict value is not equal to itself.")
2667 }
27- else throw("Strict value is not equal to itself.")
68+ else throw(("br is bad. " + toString(BR)))
2869 }
70+
71+
72+
73+@Callable(i)
74+func toVesting (b) = if (if (if ((i.originCaller != adminAddress))
75+ then (i.originCaller != this)
76+ else false)
77+ then (i.originCaller != aggrAddress)
78+ else false)
79+ then throw("only admin can do")
80+ else if ((size(i.payments) != 1))
81+ then throw("bad payment")
82+ else {
83+ let repayAmount = i.payments[0].amount
84+ let repayAsset = i.payments[0].assetId
85+ let inv1 = invoke(Address(base58'3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT'), "repay", [b], [AttachedPayment(repayAsset, repayAmount)])
86+ if ((inv1 == inv1))
87+ then {
88+ let inv2 = invoke(Address(base58'3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk'), "convertToUSDN", nil, nil)
89+ if ((inv2 == inv2))
90+ then {
91+ let inv3 = invoke(Address(base58'3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT'), "withdraw", ["DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p", -1], nil)
92+ if ((inv3 == inv3))
93+ then {
94+ let balance = assetBalance(this, value(repayAsset))
95+ if ((balance == balance))
96+ then [ScriptTransfer(aggrAddress, balance, repayAsset), ScriptTransfer(usdnAggrAddress, assetBalance(this, USDN), USDN)]
97+ else throw("Strict value is not equal to itself.")
98+ }
99+ else throw("Strict value is not equal to itself.")
100+ }
101+ else throw("Strict value is not equal to itself.")
102+ }
103+ else throw("Strict value is not equal to itself.")
104+ }
105+
106+
107+
108+@Callable(i)
109+func fullVestingEur (b,v,transferDebt) = if (if (if ((i.originCaller != adminAddress))
110+ then (i.originCaller != this)
111+ else false)
112+ then (i.originCaller != aggrAddress)
113+ else false)
114+ then throw("only admin can do")
115+ else if ((size(i.payments) != 2))
116+ then throw("bad payment")
117+ else {
118+ let supplyAmount = i.payments[0].amount
119+ let supplyAsset = i.payments[0].assetId
120+ let repayAmount = i.payments[1].amount
121+ let repayAsset = i.payments[1].assetId
122+ if ((supplyAsset != USDN))
123+ then throw("bad deposit asset")
124+ else {
125+ let inv1 = invoke(Address(base58'3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT'), "deposit", ["3PCwFXSq8vj8iKitA5zrrLRbuqehfmimpce", true], [AttachedPayment(supplyAsset, supplyAmount)])
126+ if ((inv1 == inv1))
127+ then {
128+ let inv2 = invoke(Address(base58'3PJ6iR5X1PT2rZcNmbqByKuh7k8mtj5wVGw'), "transferDebt", ["3PBjqiMwwag72VWUtHNnVrxTBrNK8D7bVcN", "3PGCkrHBxFMi7tz1xqnxgBpeNvn5E4M4g8S", v, transferDebt], nil)
129+ if ((inv2 == inv2))
130+ then {
131+ let inv3 = invoke(Address(base58'3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT'), "repay", [b], [AttachedPayment(repayAsset, repayAmount)])
132+ if ((inv3 == inv3))
133+ then {
134+ let inv4 = invoke(Address(base58'3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk'), "convertToUSDN", nil, nil)
135+ if ((inv4 == inv4))
136+ then {
137+ let inv5 = invoke(Address(base58'3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT'), "withdraw", ["DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p", -1], nil)
138+ if ((inv5 == inv5))
139+ then {
140+ let inv6 = invoke(addressFromStringValue("3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk"), "withdrawVestedAllUSDN", [false, true], nil)
141+ if ((inv6 == inv6))
142+ then {
143+ let balance = assetBalance(this, value(repayAsset))
144+ if ((balance == balance))
145+ then [ScriptTransfer(aggrAddress, balance, repayAsset), ScriptTransfer(usdnAggrAddress, assetBalance(this, USDN), USDN)]
146+ else throw("Strict value is not equal to itself.")
147+ }
148+ else throw("Strict value is not equal to itself.")
149+ }
150+ else throw("Strict value is not equal to itself.")
151+ }
152+ else throw("Strict value is not equal to itself.")
153+ }
154+ else throw("Strict value is not equal to itself.")
155+ }
156+ else throw("Strict value is not equal to itself.")
157+ }
158+ else throw("Strict value is not equal to itself.")
159+ }
160+ }
29161
30162

github/deemru/w8io/3ef1775 
29.17 ms