tx · ExGqdZ9fP481SHbytbrhA6Canu8ePm2ig8hJASRPeKud

3PGFHzVGT4NTigwCKP1NcwoXkodVZwvBuuU:  -0.02000000 Waves

2023.06.07 16:26 [3677876] smart account 3PGFHzVGT4NTigwCKP1NcwoXkodVZwvBuuU > SELF 0.00000000 Waves

{ "type": 13, "id": "ExGqdZ9fP481SHbytbrhA6Canu8ePm2ig8hJASRPeKud", "fee": 2000000, "feeAssetId": null, "timestamp": 1686144392383, "version": 2, "chainId": 87, "sender": "3PGFHzVGT4NTigwCKP1NcwoXkodVZwvBuuU", "senderPublicKey": "Dmn1fWHxpwN789LPfoMHFj7uSYKSsb5VFfyNQyQ629f9", "proofs": [ "pb8zxqUhJJZLAwKYFyhZcoiAYRje2vQr86vLC85zGZ6SnFTP6BEvySdSc2HUofffhjCUbAAyS7BXhNMbYkfLa5C" ], "script": "base64:BgIaCAISAwoBBBIECgIIARIFCgMIAQgSBAoCCAgIAAl1c2RuSWRTdHICLERHMnhGa1BkRHdLVW9Ca3pHQWhRdExwU0d6ZlhMaUNZUEV6ZUtIMkFkMjRwAAZ1c2RuSWQBILYmKcME9c5TkaQOS3UkL2SMUbH6369UKb1I0h0qsqrRAQx0cnlHZXRTdHJpbmcBA2tleQQHJG1hdGNoMAkAnQgCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFiBQckbWF0Y2gwBQFiAgABDmdldEFzc2V0U3RyaW5nAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAWIFByRtYXRjaDAJANgEAQUBYgIFV0FWRVMBDWdldEFzc2V0Qnl0ZXMBCmFzc2V0SWRTdHIDCQAAAgUKYXNzZXRJZFN0cgIFV0FWRVMFBHVuaXQJANkEAQUKYXNzZXRJZFN0cgEKZ2V0QmFsYW5jZQEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgRVbml0BAF4BQckbWF0Y2gwCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQkA8AcCBQR0aGlzCQEFdmFsdWUBBQdhc3NldElkAQZzd2FwV1gDBmFzc2V0MAZhc3NldDEHYW1vdW50MAQTYXNzZXQxQmFsYW5jZUJlZm9yZQkBCmdldEJhbGFuY2UBCQENZ2V0QXNzZXRCeXRlcwEFBmFzc2V0MQMJAAACBRNhc3NldDFCYWxhbmNlQmVmb3JlBRNhc3NldDFCYWxhbmNlQmVmb3JlBARpbnYxCQD8BwQJAQdBZGRyZXNzAQEaAVcuKjU1sQ238Xk+4bdG0J50Uk17MdCDrgYCBHN3YXAJAMwIAgABCQDMCAIFBmFzc2V0MQkAzAgCCQClCAEFBHRoaXMFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDWdldEFzc2V0Qnl0ZXMBBQZhc3NldDAFB2Ftb3VudDAFA25pbAMJAAACBQRpbnYxBQRpbnYxBAdhbW91bnQxCQBlAgkBCmdldEJhbGFuY2UBCQENZ2V0QXNzZXRCeXRlcwEFBmFzc2V0MQUTYXNzZXQxQmFsYW5jZUJlZm9yZQMJAAACBQdhbW91bnQxBQdhbW91bnQxBQdhbW91bnQxCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQxzd2FwSW50ZXJuYWwEAWkJcm91dGVzU3RyDG1pblRvUmVjZWl2ZQZyZWZLZXkECHNodXRkb3duCQELdmFsdWVPckVsc2UCCQCgCAECCHNodXRkb3duBwMFCHNodXRkb3duCQACAQIIc2h1dGRvd24KAQZkb1N3YXACBmFtb3VudARzd2FwBAZzd2FwTGkJALUJAgUEc3dhcAIBLAQLJHQwMzIyOTMzMTAJAJYKBAkAkQMCBQZzd2FwTGkAAAkAkQMCBQZzd2FwTGkAAQkAkQMCBQZzd2FwTGkAAgkAkQMCBQZzd2FwTGkAAwQEZEFwcAgFCyR0MDMyMjkzMzEwAl8xBAhkQXBwVHlwZQgFCyR0MDMyMjkzMzEwAl8yBAV0MFN0cggFCyR0MDMyMjkzMzEwAl8zBAV0MVN0cggFCyR0MDMyMjkzMzEwAl80BAJ0MAkBDWdldEFzc2V0Qnl0ZXMBBQV0MFN0cgQHYW1vdW50MAMJAQIhPQIFBmFtb3VudAAABQZhbW91bnQJAQpnZXRCYWxhbmNlAQUCdDAEAmkxAwkAAAIFCGRBcHBUeXBlAgZzd29wZmkJAPwHBAkBB0FkZHJlc3MBCQDZBAEFBGRBcHACCGV4Y2hhbmdlCQDMCAIAAQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQJ0MAUHYW1vdW50MAUDbmlsAwkAAAIFCGRBcHBUeXBlAgZwdXp6bGUJAPwHBAkBB0FkZHJlc3MBCQDZBAEFBGRBcHACBHN3YXAJAMwIAgUFdDFTdHIJAMwIAgAABQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAnQwBQdhbW91bnQwBQNuaWwDCQAAAgUIZEFwcFR5cGUCB3BzdGFibGUJAPwHBAkBB0FkZHJlc3MBCQDZBAEFBGRBcHACBHN3YXAJAMwIAgUFdDFTdHIJAMwIAgAABQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAnQwBQdhbW91bnQwBQNuaWwDCQAAAgUIZEFwcFR5cGUCAnd4CQEGc3dhcFdYAwUFdDBTdHIFBXQxU3RyBQdhbW91bnQwCQACAQIraW50ZXJuYWwgYWdncmVnYXRvciBpc3N1ZTogdW5rbm93IHBvb2wgdHlwZQMJAAACBQJpMQUCaTEAAAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgoBB2RvUm91dGUCBWFjY3VtBXJvdXRlBAhhbW91bnRJbgkBDXBhcnNlSW50VmFsdWUBCQCRAwIJALUJAgUFcm91dGUCAS8AAAQFc3dhcHMJALUJAgkAkQMCCQC1CQIFBXJvdXRlAgEvAAECATsEC3N3YXBzUmVzdWx0CgACJGwFBXN3YXBzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUIYW1vdW50SW4KAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBmRvU3dhcAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMwkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwMJAAACBQtzd2Fwc1Jlc3VsdAULc3dhcHNSZXN1bHQJAGQCBQVhY2N1bQULc3dhcHNSZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4EDXNwbGl0dGVkUm91dGUJALUJAgkAsgICBQlyb3V0ZXNTdHIAMgIBLAQJYXNzZXQxU3RyCQCRAwIFDXNwbGl0dGVkUm91dGUJAGUCCQCQAwEFDXNwbGl0dGVkUm91dGUAAQQGYXNzZXQxCQENZ2V0QXNzZXRCeXRlcwEFCWFzc2V0MVN0cgQGcm91dGVzCQC8CQIFCXJvdXRlc1N0cgIBfAQFc3dhcHMKAAIkbAUGcm91dGVzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdkb1JvdXRlAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA0CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQDCQAAAgUFc3dhcHMFBXN3YXBzBAh0b3RhbE91dAkBCmdldEJhbGFuY2UBBQZhc3NldDEECWZlZUFtb3VudAkAawMFCHRvdGFsT3V0AB0AkE4EEGNsZWFuVG90YWxBbW91bnQJAGUCBQh0b3RhbE91dAUJZmVlQW1vdW50AwkAZgIFDG1pblRvUmVjZWl2ZQUQY2xlYW5Ub3RhbEFtb3VudAkAAgEJAKwCAgkArAICCQCsAgICX2Ftb3VudCB0byByZWNlaXZlIGlzIHRvbyBsb3cuIHBsZWFzZSB0cnkgYWdhaW4gd2l0aCBhbm90aGVyIGFtb3VudCBvciB3YWl0IDEgbWludXRlLiBleHBlY3RlZDogCQCkAwEFDG1pblRvUmVjZWl2ZQIHLCByZWFsIAkApAMBBRBjbGVhblRvdGFsQW1vdW50BAd1c2RuRmVlAwkAAAIFBmFzc2V0MQUGdXNkbklkBQlmZWVBbW91bnQEDnBvb2xBZGRyZXNzU3RyCQEMdHJ5R2V0U3RyaW5nAQkArAICCQCsAgICDXN0YXRpY19hc3NldF8FCWFzc2V0MVN0cgILX3B1enpsZVBvb2wDCQAAAgUOcG9vbEFkZHJlc3NTdHICAAAABBF1c2RuQmFsYW5jZUJlZm9yZQkBCmdldEJhbGFuY2UBBQZ1c2RuSWQDCQAAAgURdXNkbkJhbGFuY2VCZWZvcmUFEXVzZG5CYWxhbmNlQmVmb3JlBAxjb252ZXJ0ZWRGZWUJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQUOcG9vbEFkZHJlc3NTdHICBHN3YXAJAMwIAgUJdXNkbklkU3RyCQDMCAIAAAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQZhc3NldDEFCWZlZUFtb3VudAUDbmlsAwkAAAIFDGNvbnZlcnRlZEZlZQUMY29udmVydGVkRmVlBBB1c2RuQmFsYW5jZUFmdGVyCQEKZ2V0QmFsYW5jZQEFBnVzZG5JZAMJAAACBRB1c2RuQmFsYW5jZUFmdGVyBRB1c2RuQmFsYW5jZUFmdGVyCQBlAgUQdXNkbkJhbGFuY2VBZnRlcgURdXNkbkJhbGFuY2VCZWZvcmUJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4DCQAAAgUHdXNkbkZlZQUHdXNkbkZlZQQPcmVmZXJyYWxBZGRyZXNzAwkAAAIFBnJlZktleQIEbXVuYQkBB0FkZHJlc3MBARoBV50MqsYTUaluy4D3Y33BZHji73JNqAy60wMJAAACBQZyZWZLZXkCBmtlZXBlcgkBB0FkZHJlc3MBARoBV+O2yhI07m9Gb/DKqIDji69xTfFemaw79gMJAAACBQZyZWZLZXkCA3RjaQkBB0FkZHJlc3MBARoBV04EqfVyjN7n+dJSSt24a1NFjHqnmjh9nAkBB0FkZHJlc3MBARoBV/yaB3Dhb97RlCEhbXq2jVjSQlh7LAcmEgQMcmVmVXNkblNoYXJlAwkAAAIFBnJlZktleQIFbm9yZWYAAAkAawMFB3VzZG5GZWUAAgAKBAV0b3BVcAMJAQIhPQIFB3VzZG5GZWUAAAkA/AcECQEHQWRkcmVzcwEBGgFXwIqtc5QhM72wGFYPKLW5PkF3zr9v8v7XAgt0b3BVcFJld2FyZAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQZ1c2RuSWQJAGUCBQd1c2RuRmVlBQxyZWZVc2RuU2hhcmUFA25pbAUEdW5pdAMJAAACBQV0b3BVcAUFdG9wVXAEBmFzc2V0MAgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBAdhbW91bnQwCQBlAgkBCmdldEJhbGFuY2UBBQZhc3NldDADCQAAAgUGYXNzZXQwBQZ1c2RuSWQFDHJlZlVzZG5TaGFyZQAABAdhbW91bnQxCQBlAgUQY2xlYW5Ub3RhbEFtb3VudAMJAAACBQZhc3NldDEFBnVzZG5JZAUMcmVmVXNkblNoYXJlAAAJAM4IAgkAzggCCQDOCAIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQdhbW91bnQxBQZhc3NldDEFA25pbAMJAQIhPQIFDHJlZlVzZG5TaGFyZQAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFD3JlZmVycmFsQWRkcmVzcwUMcmVmVXNkblNoYXJlBQZ1c2RuSWQFA25pbAUDbmlsAwkBAiE9AgUHYW1vdW50MAAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUHYW1vdW50MAUGYXNzZXQwBQNuaWwFA25pbAMJAAACBQd1c2RuRmVlAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBB0FkZHJlc3MBARoBVx7h+0Axa4Hm7EtWGwUsUaGTbt8JsTzSwQUJZmVlQW1vdW50BQZhc3NldDEFA25pbAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBAFpAQhzaHV0ZG93bgEDdmFsAwkAAAIIBQFpBmNhbGxlcgkBB0FkZHJlc3MBARoBV9fhI1GOfKuIWtXXKJd12Ih104+uIwWm4QkAAgECB3dsIG9ubHkJAMwIAgkBDEJvb2xlYW5FbnRyeQICCHNodXRkb3duBQN2YWwFA25pbAFpAQRzd2FwAglyb3V0ZXNTdHIMbWluVG9SZWNlaXZlCQEMc3dhcEludGVybmFsBAUBaQUJcm91dGVzU3RyBQxtaW5Ub1JlY2VpdmUCBW5vcmVmAWkBEHN3YXBXaXRoUmVmZXJyYWwDCXJvdXRlc1N0cgxtaW5Ub1JlY2VpdmUGcmVmS2V5CQEMc3dhcEludGVybmFsBAUBaQUJcm91dGVzU3RyBQxtaW5Ub1JlY2VpdmUFBnJlZktleQFpARJhZGRUb2tlblB1enpsZVBvb2wCCmFzc2V0SWRTdHIOcG9vbEFkZHJlc3NTdHIDCQECIT0CCAUBaQZjYWxsZXIJAQdBZGRyZXNzAQEaAVfOV/Mk0Qeks07+0rriKKzFkJbWitFtBe4JAAIBAgphZG1pbiBvbmx5CQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICAg1zdGF0aWNfYXNzZXRfBQphc3NldElkU3RyAgtfcHV6emxlUG9vbAUOcG9vbEFkZHJlc3NTdHIFA25pbAECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXnAfUzZ", "height": 3677876, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 9ysHx2K1c3K9uKmBfpho5wq7tZ6htpy3UdEmSTAropJ7 Next: 2DkgJ864MNwhv9gUx2U2h1j2HZ8GzjLYnH8SFAPvsc3M Diff:
OldNewDifferences
5353
5454
5555 func swapInternal (i,routesStr,minToReceive,refKey) = {
56- func doSwap (amount,swap) = {
57- let swapLi = split(swap, ",")
58- let $t031183199 = $Tuple4(swapLi[0], swapLi[1], swapLi[2], swapLi[3])
59- let dApp = $t031183199._1
60- let dAppType = $t031183199._2
61- let t0Str = $t031183199._3
62- let t1Str = $t031183199._4
63- let t0 = getAssetBytes(t0Str)
64- let amount0 = if ((amount != 0))
65- then amount
66- else getBalance(t0)
67- let i1 = if ((dAppType == "swopfi"))
68- then invoke(Address(fromBase58String(dApp)), "exchange", [1], [AttachedPayment(t0, amount0)])
69- else if ((dAppType == "puzzle"))
70- then invoke(Address(fromBase58String(dApp)), "swap", [t1Str, 0], [AttachedPayment(t0, amount0)])
71- else if ((dAppType == "wx"))
72- then swapWX(t0Str, t1Str, amount0)
73- else throw("internal aggregator issue: unknow pool type")
74- if ((i1 == i1))
75- then 0
76- else throw("Strict value is not equal to itself.")
77- }
56+ let shutdown = valueOrElse(getBoolean("shutdown"), false)
57+ if (shutdown)
58+ then throw("shutdown")
59+ else {
60+ func doSwap (amount,swap) = {
61+ let swapLi = split(swap, ",")
62+ let $t032293310 = $Tuple4(swapLi[0], swapLi[1], swapLi[2], swapLi[3])
63+ let dApp = $t032293310._1
64+ let dAppType = $t032293310._2
65+ let t0Str = $t032293310._3
66+ let t1Str = $t032293310._4
67+ let t0 = getAssetBytes(t0Str)
68+ let amount0 = if ((amount != 0))
69+ then amount
70+ else getBalance(t0)
71+ let i1 = if ((dAppType == "swopfi"))
72+ then invoke(Address(fromBase58String(dApp)), "exchange", [1], [AttachedPayment(t0, amount0)])
73+ else if ((dAppType == "puzzle"))
74+ then invoke(Address(fromBase58String(dApp)), "swap", [t1Str, 0], [AttachedPayment(t0, amount0)])
75+ else if ((dAppType == "pstable"))
76+ then invoke(Address(fromBase58String(dApp)), "swap", [t1Str, 0], [AttachedPayment(t0, amount0)])
77+ else if ((dAppType == "wx"))
78+ then swapWX(t0Str, t1Str, amount0)
79+ else throw("internal aggregator issue: unknow pool type")
80+ if ((i1 == i1))
81+ then 0
82+ else throw("Strict value is not equal to itself.")
83+ }
7884
79- func doRoute (accum,route) = {
80- let amountIn = parseIntValue(split(route, "/")[0])
81- let swaps = split(split(route, "/")[1], ";")
82- let swapsResult = {
83- let $l = swaps
84- let $s = size($l)
85- let $acc0 = amountIn
86- func $f0_1 ($a,$i) = if (($i >= $s))
87- then $a
88- else doSwap($a, $l[$i])
85+ func doRoute (accum,route) = {
86+ let amountIn = parseIntValue(split(route, "/")[0])
87+ let swaps = split(split(route, "/")[1], ";")
88+ let swapsResult = {
89+ let $l = swaps
90+ let $s = size($l)
91+ let $acc0 = amountIn
92+ func $f0_1 ($a,$i) = if (($i >= $s))
93+ then $a
94+ else doSwap($a, $l[$i])
8995
90- func $f0_2 ($a,$i) = if (($i >= $s))
91- then $a
92- else throw("List size exceeds 3")
96+ func $f0_2 ($a,$i) = if (($i >= $s))
97+ then $a
98+ else throw("List size exceeds 3")
9399
94- $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
95- }
96- if ((swapsResult == swapsResult))
97- then (accum + swapsResult)
98- else throw("Strict value is not equal to itself.")
99- }
100+ $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
101+ }
102+ if ((swapsResult == swapsResult))
103+ then (accum + swapsResult)
104+ else throw("Strict value is not equal to itself.")
105+ }
100106
101- let splittedRoute = split(takeRight(routesStr, 50), ",")
102- let asset1Str = splittedRoute[(size(splittedRoute) - 1)]
103- let asset1 = getAssetBytes(asset1Str)
104- let routes = split_4C(routesStr, "|")
105- let swaps = {
106- let $l = routes
107- let $s = size($l)
108- let $acc0 = 0
109- func $f0_1 ($a,$i) = if (($i >= $s))
110- then $a
111- else doRoute($a, $l[$i])
107+ let splittedRoute = split(takeRight(routesStr, 50), ",")
108+ let asset1Str = splittedRoute[(size(splittedRoute) - 1)]
109+ let asset1 = getAssetBytes(asset1Str)
110+ let routes = split_4C(routesStr, "|")
111+ let swaps = {
112+ let $l = routes
113+ let $s = size($l)
114+ let $acc0 = 0
115+ func $f0_1 ($a,$i) = if (($i >= $s))
116+ then $a
117+ else doRoute($a, $l[$i])
112118
113- func $f0_2 ($a,$i) = if (($i >= $s))
114- then $a
115- else throw("List size exceeds 4")
119+ func $f0_2 ($a,$i) = if (($i >= $s))
120+ then $a
121+ else throw("List size exceeds 4")
116122
117- $f0_2($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4)
118- }
119- if ((swaps == swaps))
120- then {
121- let totalOut = getBalance(asset1)
122- let feeAmount = fraction(totalOut, 29, 10000)
123- let cleanTotalAmount = (totalOut - feeAmount)
124- if ((minToReceive > cleanTotalAmount))
125- then throw(((("amount to receive is too low. please try again with another amount or wait 1 minute. expected: " + toString(minToReceive)) + ", real ") + toString(cleanTotalAmount)))
126- else {
127- let usdnFee = if ((asset1 == usdnId))
128- then feeAmount
123+ $f0_2($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4)
124+ }
125+ if ((swaps == swaps))
126+ then {
127+ let totalOut = getBalance(asset1)
128+ let feeAmount = fraction(totalOut, 29, 10000)
129+ let cleanTotalAmount = (totalOut - feeAmount)
130+ if ((minToReceive > cleanTotalAmount))
131+ then throw(((("amount to receive is too low. please try again with another amount or wait 1 minute. expected: " + toString(minToReceive)) + ", real ") + toString(cleanTotalAmount)))
129132 else {
130- let poolAddressStr = tryGetString((("static_asset_" + asset1Str) + "_puzzlePool"))
131- if ((poolAddressStr == ""))
132- then 0
133+ let usdnFee = if ((asset1 == usdnId))
134+ then feeAmount
133135 else {
134- let usdnBalanceBefore = getBalance(usdnId)
135- if ((usdnBalanceBefore == usdnBalanceBefore))
136- then {
137- let convertedFee = invoke(addressFromStringValue(poolAddressStr), "swap", [usdnIdStr, 0], [AttachedPayment(asset1, feeAmount)])
138- if ((convertedFee == convertedFee))
136+ let poolAddressStr = tryGetString((("static_asset_" + asset1Str) + "_puzzlePool"))
137+ if ((poolAddressStr == ""))
138+ then 0
139+ else {
140+ let usdnBalanceBefore = getBalance(usdnId)
141+ if ((usdnBalanceBefore == usdnBalanceBefore))
139142 then {
140- let usdnBalanceAfter = getBalance(usdnId)
141- if ((usdnBalanceAfter == usdnBalanceAfter))
142- then (usdnBalanceAfter - usdnBalanceBefore)
143+ let convertedFee = invoke(addressFromStringValue(poolAddressStr), "swap", [usdnIdStr, 0], [AttachedPayment(asset1, feeAmount)])
144+ if ((convertedFee == convertedFee))
145+ then {
146+ let usdnBalanceAfter = getBalance(usdnId)
147+ if ((usdnBalanceAfter == usdnBalanceAfter))
148+ then (usdnBalanceAfter - usdnBalanceBefore)
149+ else throw("Strict value is not equal to itself.")
150+ }
143151 else throw("Strict value is not equal to itself.")
144152 }
145153 else throw("Strict value is not equal to itself.")
146154 }
155+ }
156+ if ((usdnFee == usdnFee))
157+ then {
158+ let referralAddress = if ((refKey == "muna"))
159+ then Address(base58'3PGFHzVGT4NTigwCKP1NcwoXkodVZwvBuuU')
160+ else if ((refKey == "keeper"))
161+ then Address(base58'3PNgw6Db2TGUQbjnV7ekve6q126xBC1e7eM')
162+ else if ((refKey == "tci"))
163+ then Address(base58'3P93R2GBkTGVehRPhytHr7sdxYww93jkbhm')
164+ else Address(base58'3PQxXXiQXpWsjDwQLYxyuoPiaLnVHjJguFo')
165+ let refUsdnShare = if ((refKey == "noref"))
166+ then 0
167+ else fraction(usdnFee, 2, 10)
168+ let topUp = if ((usdnFee != 0))
169+ then invoke(Address(base58'3PKUxbZaSYfsR7wu2HaAgiirHYwAMupDrYW'), "topUpReward", nil, [AttachedPayment(usdnId, (usdnFee - refUsdnShare))])
170+ else unit
171+ if ((topUp == topUp))
172+ then {
173+ let asset0 = i.payments[0].assetId
174+ let amount0 = (getBalance(asset0) - (if ((asset0 == usdnId))
175+ then refUsdnShare
176+ else 0))
177+ let amount1 = (cleanTotalAmount - (if ((asset1 == usdnId))
178+ then refUsdnShare
179+ else 0))
180+ ((([ScriptTransfer(i.caller, amount1, asset1)] ++ (if ((refUsdnShare != 0))
181+ then [ScriptTransfer(referralAddress, refUsdnShare, usdnId)]
182+ else nil)) ++ (if ((amount0 != 0))
183+ then [ScriptTransfer(i.caller, amount0, asset0)]
184+ else nil)) ++ (if ((usdnFee == 0))
185+ then [ScriptTransfer(Address(base58'3P4kBiU4wr2yV1S5gMfu3MdkVvy7kxXHsKe'), feeAmount, asset1)]
186+ else nil))
187+ }
147188 else throw("Strict value is not equal to itself.")
148- }
149- }
150- if ((usdnFee == usdnFee))
151- then {
152- let referralAddress = if ((refKey == "muna"))
153- then Address(base58'3PGFHzVGT4NTigwCKP1NcwoXkodVZwvBuuU')
154- else if ((refKey == "keeper"))
155- then Address(base58'3PNgw6Db2TGUQbjnV7ekve6q126xBC1e7eM')
156- else if ((refKey == "tci"))
157- then Address(base58'3P93R2GBkTGVehRPhytHr7sdxYww93jkbhm')
158- else Address(base58'3PQxXXiQXpWsjDwQLYxyuoPiaLnVHjJguFo')
159- let refUsdnShare = if ((refKey == "noref"))
160- then 0
161- else fraction(usdnFee, 2, 10)
162- let topUp = if ((usdnFee != 0))
163- then invoke(Address(base58'3PKUxbZaSYfsR7wu2HaAgiirHYwAMupDrYW'), "topUpReward", nil, [AttachedPayment(usdnId, (usdnFee - refUsdnShare))])
164- else unit
165- if ((topUp == topUp))
166- then {
167- let asset0 = i.payments[0].assetId
168- let amount0 = (getBalance(asset0) - (if ((asset0 == usdnId))
169- then refUsdnShare
170- else 0))
171- let amount1 = (cleanTotalAmount - (if ((asset1 == usdnId))
172- then refUsdnShare
173- else 0))
174- ((([ScriptTransfer(i.caller, amount1, asset1)] ++ (if ((refUsdnShare != 0))
175- then [ScriptTransfer(referralAddress, refUsdnShare, usdnId)]
176- else nil)) ++ (if ((amount0 != 0))
177- then [ScriptTransfer(i.caller, amount0, asset0)]
178- else nil)) ++ (if ((usdnFee == 0))
179- then [ScriptTransfer(Address(base58'3P4kBiU4wr2yV1S5gMfu3MdkVvy7kxXHsKe'), feeAmount, asset1)]
180- else nil))
181189 }
182190 else throw("Strict value is not equal to itself.")
183191 }
184- else throw("Strict value is not equal to itself.")
185192 }
193+ else throw("Strict value is not equal to itself.")
186194 }
187- else throw("Strict value is not equal to itself.")
188195 }
196+
197+
198+@Callable(i)
199+func shutdown (val) = if ((i.caller == Address(base58'3PMcMiMEs6w56NRGacksXtFG5zS7doE9fpL')))
200+ then throw("wl only")
201+ else [BooleanEntry("shutdown", val)]
202+
189203
190204
191205 @Callable(i)
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let usdnIdStr = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
55
66 let usdnId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
77
88 func tryGetString (key) = match getString(this, key) {
99 case b: String =>
1010 b
1111 case _ =>
1212 ""
1313 }
1414
1515
1616 func getAssetString (assetId) = match assetId {
1717 case b: ByteVector =>
1818 toBase58String(b)
1919 case _ =>
2020 "WAVES"
2121 }
2222
2323
2424 func getAssetBytes (assetIdStr) = if ((assetIdStr == "WAVES"))
2525 then unit
2626 else fromBase58String(assetIdStr)
2727
2828
2929 func getBalance (assetId) = match assetId {
3030 case x: Unit =>
3131 wavesBalance(this).available
3232 case _ =>
3333 assetBalance(this, value(assetId))
3434 }
3535
3636
3737 func swapWX (asset0,asset1,amount0) = {
3838 let asset1BalanceBefore = getBalance(getAssetBytes(asset1))
3939 if ((asset1BalanceBefore == asset1BalanceBefore))
4040 then {
4141 let inv1 = invoke(Address(base58'3P68zNiufsu1viZpu1aY3cdahRRKcvV5N93'), "swap", [1, asset1, toString(this)], [AttachedPayment(getAssetBytes(asset0), amount0)])
4242 if ((inv1 == inv1))
4343 then {
4444 let amount1 = (getBalance(getAssetBytes(asset1)) - asset1BalanceBefore)
4545 if ((amount1 == amount1))
4646 then amount1
4747 else throw("Strict value is not equal to itself.")
4848 }
4949 else throw("Strict value is not equal to itself.")
5050 }
5151 else throw("Strict value is not equal to itself.")
5252 }
5353
5454
5555 func swapInternal (i,routesStr,minToReceive,refKey) = {
56- func doSwap (amount,swap) = {
57- let swapLi = split(swap, ",")
58- let $t031183199 = $Tuple4(swapLi[0], swapLi[1], swapLi[2], swapLi[3])
59- let dApp = $t031183199._1
60- let dAppType = $t031183199._2
61- let t0Str = $t031183199._3
62- let t1Str = $t031183199._4
63- let t0 = getAssetBytes(t0Str)
64- let amount0 = if ((amount != 0))
65- then amount
66- else getBalance(t0)
67- let i1 = if ((dAppType == "swopfi"))
68- then invoke(Address(fromBase58String(dApp)), "exchange", [1], [AttachedPayment(t0, amount0)])
69- else if ((dAppType == "puzzle"))
70- then invoke(Address(fromBase58String(dApp)), "swap", [t1Str, 0], [AttachedPayment(t0, amount0)])
71- else if ((dAppType == "wx"))
72- then swapWX(t0Str, t1Str, amount0)
73- else throw("internal aggregator issue: unknow pool type")
74- if ((i1 == i1))
75- then 0
76- else throw("Strict value is not equal to itself.")
77- }
56+ let shutdown = valueOrElse(getBoolean("shutdown"), false)
57+ if (shutdown)
58+ then throw("shutdown")
59+ else {
60+ func doSwap (amount,swap) = {
61+ let swapLi = split(swap, ",")
62+ let $t032293310 = $Tuple4(swapLi[0], swapLi[1], swapLi[2], swapLi[3])
63+ let dApp = $t032293310._1
64+ let dAppType = $t032293310._2
65+ let t0Str = $t032293310._3
66+ let t1Str = $t032293310._4
67+ let t0 = getAssetBytes(t0Str)
68+ let amount0 = if ((amount != 0))
69+ then amount
70+ else getBalance(t0)
71+ let i1 = if ((dAppType == "swopfi"))
72+ then invoke(Address(fromBase58String(dApp)), "exchange", [1], [AttachedPayment(t0, amount0)])
73+ else if ((dAppType == "puzzle"))
74+ then invoke(Address(fromBase58String(dApp)), "swap", [t1Str, 0], [AttachedPayment(t0, amount0)])
75+ else if ((dAppType == "pstable"))
76+ then invoke(Address(fromBase58String(dApp)), "swap", [t1Str, 0], [AttachedPayment(t0, amount0)])
77+ else if ((dAppType == "wx"))
78+ then swapWX(t0Str, t1Str, amount0)
79+ else throw("internal aggregator issue: unknow pool type")
80+ if ((i1 == i1))
81+ then 0
82+ else throw("Strict value is not equal to itself.")
83+ }
7884
79- func doRoute (accum,route) = {
80- let amountIn = parseIntValue(split(route, "/")[0])
81- let swaps = split(split(route, "/")[1], ";")
82- let swapsResult = {
83- let $l = swaps
84- let $s = size($l)
85- let $acc0 = amountIn
86- func $f0_1 ($a,$i) = if (($i >= $s))
87- then $a
88- else doSwap($a, $l[$i])
85+ func doRoute (accum,route) = {
86+ let amountIn = parseIntValue(split(route, "/")[0])
87+ let swaps = split(split(route, "/")[1], ";")
88+ let swapsResult = {
89+ let $l = swaps
90+ let $s = size($l)
91+ let $acc0 = amountIn
92+ func $f0_1 ($a,$i) = if (($i >= $s))
93+ then $a
94+ else doSwap($a, $l[$i])
8995
90- func $f0_2 ($a,$i) = if (($i >= $s))
91- then $a
92- else throw("List size exceeds 3")
96+ func $f0_2 ($a,$i) = if (($i >= $s))
97+ then $a
98+ else throw("List size exceeds 3")
9399
94- $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
95- }
96- if ((swapsResult == swapsResult))
97- then (accum + swapsResult)
98- else throw("Strict value is not equal to itself.")
99- }
100+ $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
101+ }
102+ if ((swapsResult == swapsResult))
103+ then (accum + swapsResult)
104+ else throw("Strict value is not equal to itself.")
105+ }
100106
101- let splittedRoute = split(takeRight(routesStr, 50), ",")
102- let asset1Str = splittedRoute[(size(splittedRoute) - 1)]
103- let asset1 = getAssetBytes(asset1Str)
104- let routes = split_4C(routesStr, "|")
105- let swaps = {
106- let $l = routes
107- let $s = size($l)
108- let $acc0 = 0
109- func $f0_1 ($a,$i) = if (($i >= $s))
110- then $a
111- else doRoute($a, $l[$i])
107+ let splittedRoute = split(takeRight(routesStr, 50), ",")
108+ let asset1Str = splittedRoute[(size(splittedRoute) - 1)]
109+ let asset1 = getAssetBytes(asset1Str)
110+ let routes = split_4C(routesStr, "|")
111+ let swaps = {
112+ let $l = routes
113+ let $s = size($l)
114+ let $acc0 = 0
115+ func $f0_1 ($a,$i) = if (($i >= $s))
116+ then $a
117+ else doRoute($a, $l[$i])
112118
113- func $f0_2 ($a,$i) = if (($i >= $s))
114- then $a
115- else throw("List size exceeds 4")
119+ func $f0_2 ($a,$i) = if (($i >= $s))
120+ then $a
121+ else throw("List size exceeds 4")
116122
117- $f0_2($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4)
118- }
119- if ((swaps == swaps))
120- then {
121- let totalOut = getBalance(asset1)
122- let feeAmount = fraction(totalOut, 29, 10000)
123- let cleanTotalAmount = (totalOut - feeAmount)
124- if ((minToReceive > cleanTotalAmount))
125- then throw(((("amount to receive is too low. please try again with another amount or wait 1 minute. expected: " + toString(minToReceive)) + ", real ") + toString(cleanTotalAmount)))
126- else {
127- let usdnFee = if ((asset1 == usdnId))
128- then feeAmount
123+ $f0_2($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4)
124+ }
125+ if ((swaps == swaps))
126+ then {
127+ let totalOut = getBalance(asset1)
128+ let feeAmount = fraction(totalOut, 29, 10000)
129+ let cleanTotalAmount = (totalOut - feeAmount)
130+ if ((minToReceive > cleanTotalAmount))
131+ then throw(((("amount to receive is too low. please try again with another amount or wait 1 minute. expected: " + toString(minToReceive)) + ", real ") + toString(cleanTotalAmount)))
129132 else {
130- let poolAddressStr = tryGetString((("static_asset_" + asset1Str) + "_puzzlePool"))
131- if ((poolAddressStr == ""))
132- then 0
133+ let usdnFee = if ((asset1 == usdnId))
134+ then feeAmount
133135 else {
134- let usdnBalanceBefore = getBalance(usdnId)
135- if ((usdnBalanceBefore == usdnBalanceBefore))
136- then {
137- let convertedFee = invoke(addressFromStringValue(poolAddressStr), "swap", [usdnIdStr, 0], [AttachedPayment(asset1, feeAmount)])
138- if ((convertedFee == convertedFee))
136+ let poolAddressStr = tryGetString((("static_asset_" + asset1Str) + "_puzzlePool"))
137+ if ((poolAddressStr == ""))
138+ then 0
139+ else {
140+ let usdnBalanceBefore = getBalance(usdnId)
141+ if ((usdnBalanceBefore == usdnBalanceBefore))
139142 then {
140- let usdnBalanceAfter = getBalance(usdnId)
141- if ((usdnBalanceAfter == usdnBalanceAfter))
142- then (usdnBalanceAfter - usdnBalanceBefore)
143+ let convertedFee = invoke(addressFromStringValue(poolAddressStr), "swap", [usdnIdStr, 0], [AttachedPayment(asset1, feeAmount)])
144+ if ((convertedFee == convertedFee))
145+ then {
146+ let usdnBalanceAfter = getBalance(usdnId)
147+ if ((usdnBalanceAfter == usdnBalanceAfter))
148+ then (usdnBalanceAfter - usdnBalanceBefore)
149+ else throw("Strict value is not equal to itself.")
150+ }
143151 else throw("Strict value is not equal to itself.")
144152 }
145153 else throw("Strict value is not equal to itself.")
146154 }
155+ }
156+ if ((usdnFee == usdnFee))
157+ then {
158+ let referralAddress = if ((refKey == "muna"))
159+ then Address(base58'3PGFHzVGT4NTigwCKP1NcwoXkodVZwvBuuU')
160+ else if ((refKey == "keeper"))
161+ then Address(base58'3PNgw6Db2TGUQbjnV7ekve6q126xBC1e7eM')
162+ else if ((refKey == "tci"))
163+ then Address(base58'3P93R2GBkTGVehRPhytHr7sdxYww93jkbhm')
164+ else Address(base58'3PQxXXiQXpWsjDwQLYxyuoPiaLnVHjJguFo')
165+ let refUsdnShare = if ((refKey == "noref"))
166+ then 0
167+ else fraction(usdnFee, 2, 10)
168+ let topUp = if ((usdnFee != 0))
169+ then invoke(Address(base58'3PKUxbZaSYfsR7wu2HaAgiirHYwAMupDrYW'), "topUpReward", nil, [AttachedPayment(usdnId, (usdnFee - refUsdnShare))])
170+ else unit
171+ if ((topUp == topUp))
172+ then {
173+ let asset0 = i.payments[0].assetId
174+ let amount0 = (getBalance(asset0) - (if ((asset0 == usdnId))
175+ then refUsdnShare
176+ else 0))
177+ let amount1 = (cleanTotalAmount - (if ((asset1 == usdnId))
178+ then refUsdnShare
179+ else 0))
180+ ((([ScriptTransfer(i.caller, amount1, asset1)] ++ (if ((refUsdnShare != 0))
181+ then [ScriptTransfer(referralAddress, refUsdnShare, usdnId)]
182+ else nil)) ++ (if ((amount0 != 0))
183+ then [ScriptTransfer(i.caller, amount0, asset0)]
184+ else nil)) ++ (if ((usdnFee == 0))
185+ then [ScriptTransfer(Address(base58'3P4kBiU4wr2yV1S5gMfu3MdkVvy7kxXHsKe'), feeAmount, asset1)]
186+ else nil))
187+ }
147188 else throw("Strict value is not equal to itself.")
148- }
149- }
150- if ((usdnFee == usdnFee))
151- then {
152- let referralAddress = if ((refKey == "muna"))
153- then Address(base58'3PGFHzVGT4NTigwCKP1NcwoXkodVZwvBuuU')
154- else if ((refKey == "keeper"))
155- then Address(base58'3PNgw6Db2TGUQbjnV7ekve6q126xBC1e7eM')
156- else if ((refKey == "tci"))
157- then Address(base58'3P93R2GBkTGVehRPhytHr7sdxYww93jkbhm')
158- else Address(base58'3PQxXXiQXpWsjDwQLYxyuoPiaLnVHjJguFo')
159- let refUsdnShare = if ((refKey == "noref"))
160- then 0
161- else fraction(usdnFee, 2, 10)
162- let topUp = if ((usdnFee != 0))
163- then invoke(Address(base58'3PKUxbZaSYfsR7wu2HaAgiirHYwAMupDrYW'), "topUpReward", nil, [AttachedPayment(usdnId, (usdnFee - refUsdnShare))])
164- else unit
165- if ((topUp == topUp))
166- then {
167- let asset0 = i.payments[0].assetId
168- let amount0 = (getBalance(asset0) - (if ((asset0 == usdnId))
169- then refUsdnShare
170- else 0))
171- let amount1 = (cleanTotalAmount - (if ((asset1 == usdnId))
172- then refUsdnShare
173- else 0))
174- ((([ScriptTransfer(i.caller, amount1, asset1)] ++ (if ((refUsdnShare != 0))
175- then [ScriptTransfer(referralAddress, refUsdnShare, usdnId)]
176- else nil)) ++ (if ((amount0 != 0))
177- then [ScriptTransfer(i.caller, amount0, asset0)]
178- else nil)) ++ (if ((usdnFee == 0))
179- then [ScriptTransfer(Address(base58'3P4kBiU4wr2yV1S5gMfu3MdkVvy7kxXHsKe'), feeAmount, asset1)]
180- else nil))
181189 }
182190 else throw("Strict value is not equal to itself.")
183191 }
184- else throw("Strict value is not equal to itself.")
185192 }
193+ else throw("Strict value is not equal to itself.")
186194 }
187- else throw("Strict value is not equal to itself.")
188195 }
196+
197+
198+@Callable(i)
199+func shutdown (val) = if ((i.caller == Address(base58'3PMcMiMEs6w56NRGacksXtFG5zS7doE9fpL')))
200+ then throw("wl only")
201+ else [BooleanEntry("shutdown", val)]
202+
189203
190204
191205 @Callable(i)
192206 func swap (routesStr,minToReceive) = swapInternal(i, routesStr, minToReceive, "noref")
193207
194208
195209
196210 @Callable(i)
197211 func swapWithReferral (routesStr,minToReceive,refKey) = swapInternal(i, routesStr, minToReceive, refKey)
198212
199213
200214
201215 @Callable(i)
202216 func addTokenPuzzlePool (assetIdStr,poolAddressStr) = if ((i.caller != Address(base58'3PLjwHcz9NEuaTo63NZR9B9okQiKQxZSbmf')))
203217 then throw("admin only")
204218 else [StringEntry((("static_asset_" + assetIdStr) + "_puzzlePool"), poolAddressStr)]
205219
206220
207221 @Verifier(tx)
208222 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
209223

github/deemru/w8io/3ef1775 
65.71 ms