tx · 2DkgJ864MNwhv9gUx2U2h1j2HZ8GzjLYnH8SFAPvsc3M

3PGFHzVGT4NTigwCKP1NcwoXkodVZwvBuuU:  -0.01000000 Waves

2023.06.07 18:04 [3677980] smart account 3PGFHzVGT4NTigwCKP1NcwoXkodVZwvBuuU > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2DkgJ864MNwhv9gUx2U2h1j2HZ8GzjLYnH8SFAPvsc3M",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1686150348901,
    "version": 2,
    "chainId": 87,
    "sender": "3PGFHzVGT4NTigwCKP1NcwoXkodVZwvBuuU",
    "senderPublicKey": "Dmn1fWHxpwN789LPfoMHFj7uSYKSsb5VFfyNQyQ629f9",
    "proofs": [
        "5Le8dfj5BAxHY4dg1XBVoHr3ZNrGtcMAh942AiGEbmecU6xCFvQaYnbbgHRvkwa7HkvPiNuVt8n2avCW7v6fTs8W"
    ],
    "script": "base64:BgIaCAISBAoCCAESBQoDCAEIEgQKAggIEgMKAQQKAAl1c2RuSWRTdHICLERHMnhGa1BkRHdLVW9Ca3pHQWhRdExwU0d6ZlhMaUNZUEV6ZUtIMkFkMjRwAAZ1c2RuSWQBILYmKcME9c5TkaQOS3UkL2SMUbH6369UKb1I0h0qsqrRAA1saW1pdENvbnRyYWN0AiMzUEZCNkxKeVNoc0NLRUExQVUxVTFXTGJEYXpxeWo2Wkw5YgEMdHJ5R2V0U3RyaW5nAQNrZXkEByRtYXRjaDAJAJ0IAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYgUHJG1hdGNoMAUBYgIAAQ5nZXRBc3NldFN0cmluZwEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFiBQckbWF0Y2gwCQDYBAEFAWICBVdBVkVTAQ1nZXRBc3NldEJ5dGVzAQphc3NldElkU3RyAwkAAAIFCmFzc2V0SWRTdHICBVdBVkVTBQR1bml0CQDZBAEFCmFzc2V0SWRTdHIBCmdldEJhbGFuY2UBB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIEVW5pdAQBeAUHJG1hdGNoMAgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAPAHAgUEdGhpcwkBBXZhbHVlAQUHYXNzZXRJZAEGc3dhcFdYAwZhc3NldDAGYXNzZXQxB2Ftb3VudDAEE2Fzc2V0MUJhbGFuY2VCZWZvcmUJAQpnZXRCYWxhbmNlAQkBDWdldEFzc2V0Qnl0ZXMBBQZhc3NldDEDCQAAAgUTYXNzZXQxQmFsYW5jZUJlZm9yZQUTYXNzZXQxQmFsYW5jZUJlZm9yZQQEaW52MQkA/AcECQEHQWRkcmVzcwEBGgFXLio1NbENt/F5PuG3RtCedFJNezHQg64GAgRzd2FwCQDMCAIAAQkAzAgCBQZhc3NldDEJAMwIAgkApQgBBQR0aGlzBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQ1nZXRBc3NldEJ5dGVzAQUGYXNzZXQwBQdhbW91bnQwBQNuaWwDCQAAAgUEaW52MQUEaW52MQQHYW1vdW50MQkAZQIJAQpnZXRCYWxhbmNlAQkBDWdldEFzc2V0Qnl0ZXMBBQZhc3NldDEFE2Fzc2V0MUJhbGFuY2VCZWZvcmUDCQAAAgUHYW1vdW50MQUHYW1vdW50MQUHYW1vdW50MQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEJc3dhcExpbWl0AwZwYXJhbXMFdDBTdHIFdDFTdHIKAQdkb0xpbWl0AgVhc3NldAtvcmRlclBhcmFtcwQDb3JkCQC1CQIFC29yZGVyUGFyYW1zAgE+BAskdDAzMTg0MzIyOQkAlAoCCQCRAwIFA29yZAAACQCRAwIFA29yZAABBAdvcmRlcklkCAULJHQwMzE4NDMyMjkCXzEEC29yZGVyQW1vdW50CAULJHQwMzE4NDMyMjkCXzIEA2ludgkA/AcECQEHQWRkcmVzcwEJANkEAQUNbGltaXRDb250cmFjdAIMZnVsZmlsbE9yZGVyCQDMCAIFB29yZGVySWQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUFYXNzZXQJAQ1wYXJzZUludFZhbHVlAQULb3JkZXJBbW91bnQFA25pbAMJAAACBQNpbnYFA2ludgUFYXNzZXQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4ECG9yZGVyc0xpCQC1CQIFBnBhcmFtcwIBOgQCdDAJAQ1nZXRBc3NldEJ5dGVzAQUFdDBTdHIEBnJlc3VsdAoAAiRsBQhvcmRlcnNMaQoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFAnQwCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdkb0xpbWl0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAwkAAAIFBnJlc3VsdAUGcmVzdWx0AAAJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BDHN3YXBJbnRlcm5hbAQBaQlyb3V0ZXNTdHIMbWluVG9SZWNlaXZlBnJlZktleQQIc2h1dGRvd24JAQt2YWx1ZU9yRWxzZQIJAKAIAQIIc2h1dGRvd24HAwUIc2h1dGRvd24JAAIBAghzaHV0ZG93bgoBBmRvU3dhcAIGYW1vdW50BHN3YXAEBnN3YXBMaQkAtQkCBQRzd2FwAgEsBAskdDAzODE3Mzg5OAkAlgoECQCRAwIFBnN3YXBMaQAACQCRAwIFBnN3YXBMaQABCQCRAwIFBnN3YXBMaQACCQCRAwIFBnN3YXBMaQADBARkQXBwCAULJHQwMzgxNzM4OTgCXzEECGRBcHBUeXBlCAULJHQwMzgxNzM4OTgCXzIEBXQwU3RyCAULJHQwMzgxNzM4OTgCXzMEBXQxU3RyCAULJHQwMzgxNzM4OTgCXzQEAnQwCQENZ2V0QXNzZXRCeXRlcwEFBXQwU3RyBAdhbW91bnQwAwkBAiE9AgUGYW1vdW50AAAFBmFtb3VudAkBCmdldEJhbGFuY2UBBQJ0MAQCaTEDCQAAAgUIZEFwcFR5cGUCBnN3b3BmaQkA/AcECQEHQWRkcmVzcwEJANkEAQUEZEFwcAIIZXhjaGFuZ2UJAMwIAgABBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFAnQwBQdhbW91bnQwBQNuaWwDCQAAAgUIZEFwcFR5cGUCBnB1enpsZQkA/AcECQEHQWRkcmVzcwEJANkEAQUEZEFwcAIEc3dhcAkAzAgCBQV0MVN0cgkAzAgCAAAFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUCdDAFB2Ftb3VudDAFA25pbAMJAAACBQhkQXBwVHlwZQICd3gJAQZzd2FwV1gDBQV0MFN0cgUFdDFTdHIFB2Ftb3VudDADCQAAAgUIZEFwcFR5cGUCBWxpbWl0CQEJc3dhcExpbWl0AwUEZEFwcAUFdDBTdHIFBXQxU3RyCQACAQIraW50ZXJuYWwgYWdncmVnYXRvciBpc3N1ZTogdW5rbm93IHBvb2wgdHlwZQMJAAACBQJpMQUCaTEAAAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgoBB2RvUm91dGUCBWFjY3VtBXJvdXRlBAhhbW91bnRJbgkBDXBhcnNlSW50VmFsdWUBCQCRAwIJALUJAgUFcm91dGUCAS8AAAQFc3dhcHMJALUJAgkAkQMCCQC1CQIFBXJvdXRlAgEvAAECATsEC3N3YXBzUmVzdWx0CgACJGwFBXN3YXBzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUIYW1vdW50SW4KAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBmRvU3dhcAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMwkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwMJAAACBQtzd2Fwc1Jlc3VsdAULc3dhcHNSZXN1bHQJAGQCBQVhY2N1bQULc3dhcHNSZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4EDXNwbGl0dGVkUm91dGUJALUJAgkAsgICBQlyb3V0ZXNTdHIAMgIBLAQJYXNzZXQxU3RyCQCRAwIFDXNwbGl0dGVkUm91dGUJAGUCCQCQAwEFDXNwbGl0dGVkUm91dGUAAQQGYXNzZXQxCQENZ2V0QXNzZXRCeXRlcwEFCWFzc2V0MVN0cgQGcm91dGVzCQC8CQIFCXJvdXRlc1N0cgIBfAQFc3dhcHMKAAIkbAUGcm91dGVzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdkb1JvdXRlAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA0CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQDCQAAAgUFc3dhcHMFBXN3YXBzBAh0b3RhbE91dAkBCmdldEJhbGFuY2UBBQZhc3NldDEECWZlZUFtb3VudAkAawMFCHRvdGFsT3V0AB0AkE4EEGNsZWFuVG90YWxBbW91bnQJAGUCBQh0b3RhbE91dAUJZmVlQW1vdW50AwkAZgIFDG1pblRvUmVjZWl2ZQUQY2xlYW5Ub3RhbEFtb3VudAkAAgEJAKwCAgkArAICCQCsAgICX2Ftb3VudCB0byByZWNlaXZlIGlzIHRvbyBsb3cuIHBsZWFzZSB0cnkgYWdhaW4gd2l0aCBhbm90aGVyIGFtb3VudCBvciB3YWl0IDEgbWludXRlLiBleHBlY3RlZDogCQCkAwEFDG1pblRvUmVjZWl2ZQIHLCByZWFsIAkApAMBBRBjbGVhblRvdGFsQW1vdW50BAd1c2RuRmVlAwkAAAIFBmFzc2V0MQUGdXNkbklkBQlmZWVBbW91bnQEDnBvb2xBZGRyZXNzU3RyCQEMdHJ5R2V0U3RyaW5nAQkArAICCQCsAgICDXN0YXRpY19hc3NldF8FCWFzc2V0MVN0cgILX3B1enpsZVBvb2wDCQAAAgUOcG9vbEFkZHJlc3NTdHICAAAABBF1c2RuQmFsYW5jZUJlZm9yZQkBCmdldEJhbGFuY2UBBQZ1c2RuSWQDCQAAAgURdXNkbkJhbGFuY2VCZWZvcmUFEXVzZG5CYWxhbmNlQmVmb3JlBAxjb252ZXJ0ZWRGZWUJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQUOcG9vbEFkZHJlc3NTdHICBHN3YXAJAMwIAgUJdXNkbklkU3RyCQDMCAIAAAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQZhc3NldDEFCWZlZUFtb3VudAUDbmlsAwkAAAIFDGNvbnZlcnRlZEZlZQUMY29udmVydGVkRmVlBBB1c2RuQmFsYW5jZUFmdGVyCQEKZ2V0QmFsYW5jZQEFBnVzZG5JZAMJAAACBRB1c2RuQmFsYW5jZUFmdGVyBRB1c2RuQmFsYW5jZUFmdGVyCQBlAgUQdXNkbkJhbGFuY2VBZnRlcgURdXNkbkJhbGFuY2VCZWZvcmUJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4DCQAAAgUHdXNkbkZlZQUHdXNkbkZlZQQPcmVmZXJyYWxBZGRyZXNzAwkAAAIFBnJlZktleQIEbXVuYQkBB0FkZHJlc3MBARoBV50MqsYTUaluy4D3Y33BZHji73JNqAy60wMJAAACBQZyZWZLZXkCBmtlZXBlcgkBB0FkZHJlc3MBARoBV+O2yhI07m9Gb/DKqIDji69xTfFemaw79gMJAAACBQZyZWZLZXkCA3RjaQkBB0FkZHJlc3MBARoBV04EqfVyjN7n+dJSSt24a1NFjHqnmjh9nAkBB0FkZHJlc3MBARoBV/yaB3Dhb97RlCEhbXq2jVjSQlh7LAcmEgQMcmVmVXNkblNoYXJlAwkAAAIFBnJlZktleQIFbm9yZWYAAAkAawMFB3VzZG5GZWUAAgAKBAV0b3BVcAMJAQIhPQIFB3VzZG5GZWUAAAkA/AcECQEHQWRkcmVzcwEBGgFXwIqtc5QhM72wGFYPKLW5PkF3zr9v8v7XAgt0b3BVcFJld2FyZAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQZ1c2RuSWQJAGUCBQd1c2RuRmVlBQxyZWZVc2RuU2hhcmUFA25pbAUEdW5pdAMJAAACBQV0b3BVcAUFdG9wVXAEBmFzc2V0MAgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBAdhbW91bnQwCQBlAgkBCmdldEJhbGFuY2UBBQZhc3NldDADCQAAAgUGYXNzZXQwBQZ1c2RuSWQFDHJlZlVzZG5TaGFyZQAABAdhbW91bnQxCQBlAgUQY2xlYW5Ub3RhbEFtb3VudAMJAAACBQZhc3NldDEFBnVzZG5JZAUMcmVmVXNkblNoYXJlAAAJAM4IAgkAzggCCQDOCAIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQdhbW91bnQxBQZhc3NldDEFA25pbAMJAQIhPQIFDHJlZlVzZG5TaGFyZQAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFD3JlZmVycmFsQWRkcmVzcwUMcmVmVXNkblNoYXJlBQZ1c2RuSWQFA25pbAUDbmlsAwkBAiE9AgUHYW1vdW50MAAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUHYW1vdW50MAUGYXNzZXQwBQNuaWwFA25pbAMJAAACBQd1c2RuRmVlAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBB0FkZHJlc3MBARoBVx7h+0Axa4Hm7EtWGwUsUaGTbt8JsTzSwQUJZmVlQW1vdW50BQZhc3NldDEFA25pbAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBAFpAQRzd2FwAglyb3V0ZXNTdHIMbWluVG9SZWNlaXZlCQEMc3dhcEludGVybmFsBAUBaQUJcm91dGVzU3RyBQxtaW5Ub1JlY2VpdmUCBW5vcmVmAWkBEHN3YXBXaXRoUmVmZXJyYWwDCXJvdXRlc1N0cgxtaW5Ub1JlY2VpdmUGcmVmS2V5CQEMc3dhcEludGVybmFsBAUBaQUJcm91dGVzU3RyBQxtaW5Ub1JlY2VpdmUFBnJlZktleQFpARJhZGRUb2tlblB1enpsZVBvb2wCCmFzc2V0SWRTdHIOcG9vbEFkZHJlc3NTdHIDCQECIT0CCAUBaQZjYWxsZXIJAQdBZGRyZXNzAQEaAVfX4SNRjnyriFrV1yiXddiIddOPriMFpuEJAAIBAgphZG1pbiBvbmx5CQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICAg1zdGF0aWNfYXNzZXRfBQphc3NldElkU3RyAgtfcHV6emxlUG9vbAUOcG9vbEFkZHJlc3NTdHIFA25pbAFpAQhzaHV0ZG93bgEDdmFsAwkBAiE9AggFAWkGY2FsbGVyCQEHQWRkcmVzcwEBGgFX1+EjUY58q4ha1dcol3XYiHXTj64jBabhCQACAQIHd2wgb25seQkAzAgCCQEMQm9vbGVhbkVudHJ5AgIIc2h1dGRvd24FA3ZhbAUDbmlsAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tledHhDxo=",
    "height": 3677980,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: ExGqdZ9fP481SHbytbrhA6Canu8ePm2ig8hJASRPeKud
Next: AY2vwMdQqi5qqhZMeV6nFoNmmG2hxDHkg1y7SLaXE163

Diff: 
Old
New
Differences
4
4
 
let usdnIdStr = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
5
5
 
6
6
 
let usdnId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
7
+
8
+
let limitContract = "3PFB6LJyShsCKEA1AU1U1WLbDazqyj6ZL9b"
7
9
 
8
10
 
func tryGetString (key) = match getString(this, key) {
9
11
 
    case b: String => 
52
54
 
    }
53
55
 
54
56
 
57
+
func swapLimit (params,t0Str,t1Str) = {
58
+
    func doLimit (asset,orderParams) =     {
59
+
        let ord = split(orderParams, ">")
60
+
        let $t031843229 = $Tuple2(ord[0], ord[1])
61
+
        let orderId = $t031843229._1
62
+
        let orderAmount = $t031843229._2
63
+
        let inv = invoke(Address(fromBase58String(limitContract)), "fulfillOrder", [orderId], [AttachedPayment(asset, parseIntValue(orderAmount))])
64
+
        if ((inv == inv))
65
+
            then asset
66
+
            else throw("Strict value is not equal to itself.")
67
+
        }
68
+
69
+
    let ordersLi = split(params, ":")
70
+
    let t0 = getAssetBytes(t0Str)
71
+
    let result = {
72
+
        let $l = ordersLi
73
+
        let $s = size($l)
74
+
        let $acc0 = t0
75
+
        func $f0_1 ($a,$i) =         if (($i >= $s))
76
+
            then $a
77
+
            else doLimit($a, $l[$i])
78
+
79
+
        func $f0_2 ($a,$i) =         if (($i >= $s))
80
+
            then $a
81
+
            else throw("List size exceeds 10")
82
+
83
+
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
84
+
        }
85
+
    if ((result == result))
86
+
        then 0
87
+
        else throw("Strict value is not equal to itself.")
88
+
    }
89
+
90
+
55
91
 
func swapInternal (i,routesStr,minToReceive,refKey) = {
56
92
 
    let shutdown = valueOrElse(getBoolean("shutdown"), false)
57
93
 
    if (shutdown)
59
95
 
        else {
60
96
 
            func doSwap (amount,swap) =             {
61
97
 
                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
98
+
                let $t038173898 = $Tuple4(swapLi[0], swapLi[1], swapLi[2], swapLi[3])
99
+
                let dApp = $t038173898._1
100
+
                let dAppType = $t038173898._2
101
+
                let t0Str = $t038173898._3
102
+
                let t1Str = $t038173898._4
67
103
 
                let t0 = getAssetBytes(t0Str)
68
104
 
                let amount0 = if ((amount != 0))
69
105
 
                    then amount
72
108
 
                    then invoke(Address(fromBase58String(dApp)), "exchange", [1], [AttachedPayment(t0, amount0)])
73
109
 
                    else if ((dAppType == "puzzle"))
74
110
 
                        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)
111
+
                        else if ((dAppType == "wx"))
112
+
                            then swapWX(t0Str, t1Str, amount0)
113
+
                            else if ((dAppType == "limit"))
114
+
                                then swapLimit(dApp, t0Str, t1Str)
79
115
 
                                else throw("internal aggregator issue: unknow pool type")
80
116
 
                if ((i1 == i1))
81
117
 
                    then 0
196
232
 
197
233
 
198
234
 
@Callable(i)
199
-
func shutdown (val) = if ((i.caller == Address(base58'3PMcMiMEs6w56NRGacksXtFG5zS7doE9fpL')))
200
-
    then throw("wl only")
201
-
    else [BooleanEntry("shutdown", val)]
202
-
203
-
204
-
205
-
@Callable(i)
206
235
 
func swap (routesStr,minToReceive) = swapInternal(i, routesStr, minToReceive, "noref")
207
236
 
208
237
 
213
242
 
214
243
 
215
244
 
@Callable(i)
216
-
func addTokenPuzzlePool (assetIdStr,poolAddressStr) = if ((i.caller != Address(base58'3PLjwHcz9NEuaTo63NZR9B9okQiKQxZSbmf')))
245
+
func addTokenPuzzlePool (assetIdStr,poolAddressStr) = if ((i.caller != Address(base58'3PMcMiMEs6w56NRGacksXtFG5zS7doE9fpL')))
217
246
 
    then throw("admin only")
218
247
 
    else [StringEntry((("static_asset_" + assetIdStr) + "_puzzlePool"), poolAddressStr)]
248
+
249
+
250
+
251
+
@Callable(i)
252
+
func shutdown (val) = if ((i.caller != Address(base58'3PMcMiMEs6w56NRGacksXtFG5zS7doE9fpL')))
253
+
    then throw("wl only")
254
+
    else [BooleanEntry("shutdown", val)]
219
255
 
220
256
 
221
257
 
@Verifier(tx)
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let usdnIdStr = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
5
5
 
6
6
 
let usdnId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
7
+
8
+
let limitContract = "3PFB6LJyShsCKEA1AU1U1WLbDazqyj6ZL9b"
7
9
 
8
10
 
func tryGetString (key) = match getString(this, key) {
9
11
 
    case b: String => 
10
12
 
        b
11
13
 
    case _ => 
12
14
 
        ""
13
15
 
}
14
16
 
15
17
 
16
18
 
func getAssetString (assetId) = match assetId {
17
19
 
    case b: ByteVector => 
18
20
 
        toBase58String(b)
19
21
 
    case _ => 
20
22
 
        "WAVES"
21
23
 
}
22
24
 
23
25
 
24
26
 
func getAssetBytes (assetIdStr) = if ((assetIdStr == "WAVES"))
25
27
 
    then unit
26
28
 
    else fromBase58String(assetIdStr)
27
29
 
28
30
 
29
31
 
func getBalance (assetId) = match assetId {
30
32
 
    case x: Unit => 
31
33
 
        wavesBalance(this).available
32
34
 
    case _ => 
33
35
 
        assetBalance(this, value(assetId))
34
36
 
}
35
37
 
36
38
 
37
39
 
func swapWX (asset0,asset1,amount0) = {
38
40
 
    let asset1BalanceBefore = getBalance(getAssetBytes(asset1))
39
41
 
    if ((asset1BalanceBefore == asset1BalanceBefore))
40
42
 
        then {
41
43
 
            let inv1 = invoke(Address(base58'3P68zNiufsu1viZpu1aY3cdahRRKcvV5N93'), "swap", [1, asset1, toString(this)], [AttachedPayment(getAssetBytes(asset0), amount0)])
42
44
 
            if ((inv1 == inv1))
43
45
 
                then {
44
46
 
                    let amount1 = (getBalance(getAssetBytes(asset1)) - asset1BalanceBefore)
45
47
 
                    if ((amount1 == amount1))
46
48
 
                        then amount1
47
49
 
                        else throw("Strict value is not equal to itself.")
48
50
 
                    }
49
51
 
                else throw("Strict value is not equal to itself.")
50
52
 
            }
51
53
 
        else throw("Strict value is not equal to itself.")
52
54
 
    }
53
55
 
54
56
 
57
+
func swapLimit (params,t0Str,t1Str) = {
58
+
    func doLimit (asset,orderParams) =     {
59
+
        let ord = split(orderParams, ">")
60
+
        let $t031843229 = $Tuple2(ord[0], ord[1])
61
+
        let orderId = $t031843229._1
62
+
        let orderAmount = $t031843229._2
63
+
        let inv = invoke(Address(fromBase58String(limitContract)), "fulfillOrder", [orderId], [AttachedPayment(asset, parseIntValue(orderAmount))])
64
+
        if ((inv == inv))
65
+
            then asset
66
+
            else throw("Strict value is not equal to itself.")
67
+
        }
68
+
69
+
    let ordersLi = split(params, ":")
70
+
    let t0 = getAssetBytes(t0Str)
71
+
    let result = {
72
+
        let $l = ordersLi
73
+
        let $s = size($l)
74
+
        let $acc0 = t0
75
+
        func $f0_1 ($a,$i) =         if (($i >= $s))
76
+
            then $a
77
+
            else doLimit($a, $l[$i])
78
+
79
+
        func $f0_2 ($a,$i) =         if (($i >= $s))
80
+
            then $a
81
+
            else throw("List size exceeds 10")
82
+
83
+
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
84
+
        }
85
+
    if ((result == result))
86
+
        then 0
87
+
        else throw("Strict value is not equal to itself.")
88
+
    }
89
+
90
+
55
91
 
func swapInternal (i,routesStr,minToReceive,refKey) = {
56
92
 
    let shutdown = valueOrElse(getBoolean("shutdown"), false)
57
93
 
    if (shutdown)
58
94
 
        then throw("shutdown")
59
95
 
        else {
60
96
 
            func doSwap (amount,swap) =             {
61
97
 
                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
98
+
                let $t038173898 = $Tuple4(swapLi[0], swapLi[1], swapLi[2], swapLi[3])
99
+
                let dApp = $t038173898._1
100
+
                let dAppType = $t038173898._2
101
+
                let t0Str = $t038173898._3
102
+
                let t1Str = $t038173898._4
67
103
 
                let t0 = getAssetBytes(t0Str)
68
104
 
                let amount0 = if ((amount != 0))
69
105
 
                    then amount
70
106
 
                    else getBalance(t0)
71
107
 
                let i1 = if ((dAppType == "swopfi"))
72
108
 
                    then invoke(Address(fromBase58String(dApp)), "exchange", [1], [AttachedPayment(t0, amount0)])
73
109
 
                    else if ((dAppType == "puzzle"))
74
110
 
                        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)
111
+
                        else if ((dAppType == "wx"))
112
+
                            then swapWX(t0Str, t1Str, amount0)
113
+
                            else if ((dAppType == "limit"))
114
+
                                then swapLimit(dApp, t0Str, t1Str)
79
115
 
                                else throw("internal aggregator issue: unknow pool type")
80
116
 
                if ((i1 == i1))
81
117
 
                    then 0
82
118
 
                    else throw("Strict value is not equal to itself.")
83
119
 
                }
84
120
 
85
121
 
            func doRoute (accum,route) =             {
86
122
 
                let amountIn = parseIntValue(split(route, "/")[0])
87
123
 
                let swaps = split(split(route, "/")[1], ";")
88
124
 
                let swapsResult = {
89
125
 
                    let $l = swaps
90
126
 
                    let $s = size($l)
91
127
 
                    let $acc0 = amountIn
92
128
 
                    func $f0_1 ($a,$i) =                     if (($i >= $s))
93
129
 
                        then $a
94
130
 
                        else doSwap($a, $l[$i])
95
131
 
96
132
 
                    func $f0_2 ($a,$i) =                     if (($i >= $s))
97
133
 
                        then $a
98
134
 
                        else throw("List size exceeds 3")
99
135
 
100
136
 
                    $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
101
137
 
                    }
102
138
 
                if ((swapsResult == swapsResult))
103
139
 
                    then (accum + swapsResult)
104
140
 
                    else throw("Strict value is not equal to itself.")
105
141
 
                }
106
142
 
107
143
 
            let splittedRoute = split(takeRight(routesStr, 50), ",")
108
144
 
            let asset1Str = splittedRoute[(size(splittedRoute) - 1)]
109
145
 
            let asset1 = getAssetBytes(asset1Str)
110
146
 
            let routes = split_4C(routesStr, "|")
111
147
 
            let swaps = {
112
148
 
                let $l = routes
113
149
 
                let $s = size($l)
114
150
 
                let $acc0 = 0
115
151
 
                func $f0_1 ($a,$i) =                 if (($i >= $s))
116
152
 
                    then $a
117
153
 
                    else doRoute($a, $l[$i])
118
154
 
119
155
 
                func $f0_2 ($a,$i) =                 if (($i >= $s))
120
156
 
                    then $a
121
157
 
                    else throw("List size exceeds 4")
122
158
 
123
159
 
                $f0_2($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4)
124
160
 
                }
125
161
 
            if ((swaps == swaps))
126
162
 
                then {
127
163
 
                    let totalOut = getBalance(asset1)
128
164
 
                    let feeAmount = fraction(totalOut, 29, 10000)
129
165
 
                    let cleanTotalAmount = (totalOut - feeAmount)
130
166
 
                    if ((minToReceive > cleanTotalAmount))
131
167
 
                        then throw(((("amount to receive is too low. please try again with another amount or wait 1 minute. expected: " + toString(minToReceive)) + ", real ") + toString(cleanTotalAmount)))
132
168
 
                        else {
133
169
 
                            let usdnFee = if ((asset1 == usdnId))
134
170
 
                                then feeAmount
135
171
 
                                else {
136
172
 
                                    let poolAddressStr = tryGetString((("static_asset_" + asset1Str) + "_puzzlePool"))
137
173
 
                                    if ((poolAddressStr == ""))
138
174
 
                                        then 0
139
175
 
                                        else {
140
176
 
                                            let usdnBalanceBefore = getBalance(usdnId)
141
177
 
                                            if ((usdnBalanceBefore == usdnBalanceBefore))
142
178
 
                                                then {
143
179
 
                                                    let convertedFee = invoke(addressFromStringValue(poolAddressStr), "swap", [usdnIdStr, 0], [AttachedPayment(asset1, feeAmount)])
144
180
 
                                                    if ((convertedFee == convertedFee))
145
181
 
                                                        then {
146
182
 
                                                            let usdnBalanceAfter = getBalance(usdnId)
147
183
 
                                                            if ((usdnBalanceAfter == usdnBalanceAfter))
148
184
 
                                                                then (usdnBalanceAfter - usdnBalanceBefore)
149
185
 
                                                                else throw("Strict value is not equal to itself.")
150
186
 
                                                            }
151
187
 
                                                        else throw("Strict value is not equal to itself.")
152
188
 
                                                    }
153
189
 
                                                else throw("Strict value is not equal to itself.")
154
190
 
                                            }
155
191
 
                                    }
156
192
 
                            if ((usdnFee == usdnFee))
157
193
 
                                then {
158
194
 
                                    let referralAddress = if ((refKey == "muna"))
159
195
 
                                        then Address(base58'3PGFHzVGT4NTigwCKP1NcwoXkodVZwvBuuU')
160
196
 
                                        else if ((refKey == "keeper"))
161
197
 
                                            then Address(base58'3PNgw6Db2TGUQbjnV7ekve6q126xBC1e7eM')
162
198
 
                                            else if ((refKey == "tci"))
163
199
 
                                                then Address(base58'3P93R2GBkTGVehRPhytHr7sdxYww93jkbhm')
164
200
 
                                                else Address(base58'3PQxXXiQXpWsjDwQLYxyuoPiaLnVHjJguFo')
165
201
 
                                    let refUsdnShare = if ((refKey == "noref"))
166
202
 
                                        then 0
167
203
 
                                        else fraction(usdnFee, 2, 10)
168
204
 
                                    let topUp = if ((usdnFee != 0))
169
205
 
                                        then invoke(Address(base58'3PKUxbZaSYfsR7wu2HaAgiirHYwAMupDrYW'), "topUpReward", nil, [AttachedPayment(usdnId, (usdnFee - refUsdnShare))])
170
206
 
                                        else unit
171
207
 
                                    if ((topUp == topUp))
172
208
 
                                        then {
173
209
 
                                            let asset0 = i.payments[0].assetId
174
210
 
                                            let amount0 = (getBalance(asset0) - (if ((asset0 == usdnId))
175
211
 
                                                then refUsdnShare
176
212
 
                                                else 0))
177
213
 
                                            let amount1 = (cleanTotalAmount - (if ((asset1 == usdnId))
178
214
 
                                                then refUsdnShare
179
215
 
                                                else 0))
180
216
 
                                            ((([ScriptTransfer(i.caller, amount1, asset1)] ++ (if ((refUsdnShare != 0))
181
217
 
                                                then [ScriptTransfer(referralAddress, refUsdnShare, usdnId)]
182
218
 
                                                else nil)) ++ (if ((amount0 != 0))
183
219
 
                                                then [ScriptTransfer(i.caller, amount0, asset0)]
184
220
 
                                                else nil)) ++ (if ((usdnFee == 0))
185
221
 
                                                then [ScriptTransfer(Address(base58'3P4kBiU4wr2yV1S5gMfu3MdkVvy7kxXHsKe'), feeAmount, asset1)]
186
222
 
                                                else nil))
187
223
 
                                            }
188
224
 
                                        else throw("Strict value is not equal to itself.")
189
225
 
                                    }
190
226
 
                                else throw("Strict value is not equal to itself.")
191
227
 
                            }
192
228
 
                    }
193
229
 
                else throw("Strict value is not equal to itself.")
194
230
 
            }
195
231
 
    }
196
232
 
197
233
 
198
234
 
@Callable(i)
199
-
func shutdown (val) = if ((i.caller == Address(base58'3PMcMiMEs6w56NRGacksXtFG5zS7doE9fpL')))
200
-
    then throw("wl only")
201
-
    else [BooleanEntry("shutdown", val)]
202
-
203
-
204
-
205
-
@Callable(i)
206
235
 
func swap (routesStr,minToReceive) = swapInternal(i, routesStr, minToReceive, "noref")
207
236
 
208
237
 
209
238
 
210
239
 
@Callable(i)
211
240
 
func swapWithReferral (routesStr,minToReceive,refKey) = swapInternal(i, routesStr, minToReceive, refKey)
212
241
 
213
242
 
214
243
 
215
244
 
@Callable(i)
216
-
func addTokenPuzzlePool (assetIdStr,poolAddressStr) = if ((i.caller != Address(base58'3PLjwHcz9NEuaTo63NZR9B9okQiKQxZSbmf')))
245
+
func addTokenPuzzlePool (assetIdStr,poolAddressStr) = if ((i.caller != Address(base58'3PMcMiMEs6w56NRGacksXtFG5zS7doE9fpL')))
217
246
 
    then throw("admin only")
218
247
 
    else [StringEntry((("static_asset_" + assetIdStr) + "_puzzlePool"), poolAddressStr)]
248
+
249
+
250
+
251
+
@Callable(i)
252
+
func shutdown (val) = if ((i.caller != Address(base58'3PMcMiMEs6w56NRGacksXtFG5zS7doE9fpL')))
253
+
    then throw("wl only")
254
+
    else [BooleanEntry("shutdown", val)]
219
255
 
220
256
 
221
257
 
@Verifier(tx)
222
258
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
223
259
 

github/deemru/w8io/6500d08 
37.09 ms ◑