tx · BpU27UARpJDLiCH9s4ryKVinwaSkSVGgCtvHsa4Fue1s

3P3qCUfvbDUjRnjrfM5XFMrXrzxxiad94Ez:  -0.01000000 Waves

2023.02.11 16:03 [3510574] smart account 3P3qCUfvbDUjRnjrfM5XFMrXrzxxiad94Ez > SELF 0.00000000 Waves

{ "type": 13, "id": "BpU27UARpJDLiCH9s4ryKVinwaSkSVGgCtvHsa4Fue1s", "fee": 1000000, "feeAssetId": null, "timestamp": 1676120632703, "version": 2, "chainId": 87, "sender": "3P3qCUfvbDUjRnjrfM5XFMrXrzxxiad94Ez", "senderPublicKey": "3zaQerEjh4SK1xhin9zzs5qr337aLRFhz7z1ckjFGhMz", "proofs": [ "2CotwU4sqePZgd7m1FCVHU8Xyn81KGmYM4YVpA7YrjFMwpAjadhwSDTmrGuMJpJWnQFBnn24ZbNGYEHbYDXTJNed" ], "script": "base64:BgLdBwgCEgMKAQESAwoBCCIOZnJlZV90b19ib3Jyb20iDVVTRE5fQVNTRVRfSUQiBGJvc3MiDmFkbWluUHVibGljS2V5IglnZXRQdXRHZXQiCWlzX3N0YWJsZSIHcHV0RnVuYyIHZ2V0RnVuYyIKZ2V0QmFsYW5jZSIHYXNzZXRJZCIHJG1hdGNoMCIBYiIIZ2V0QmFzZTEiBGRhdGEiBnBfZGF0YSIBYSICYTIiB2Fzc2V0SW4iCGFtb3VudEluIghhbW91bnRfMSIIYW1vdW50XzIiCGFtb3VudF8zIghnZXRCYXNlMiICcDEiACIDbHAxIgtpc19zdGFibGVfMSIBdCINZ2V0QXNzZXRCeXRlcyIHc3dhcF93eCIBcCICbHAiBWFzc2V0IgZhbW91bnQiCHB1dEZ1bmMxIghnZXRGdW5jMSIEcHV0MSILbHAxX2Fzc2V0aWQiC2xwQmFsYW5jZV8xIgRnZXQxIglzd2FwX3N3b3AiBnN0YWJsZSIDZXN0IgNtaW4iBXN3YXAxIgVzd2FwMiILc3dhcF9wdXp6bGUiCGFzc2V0T3V0IgRzd2FwIg9nZXRJbnRlZ2VyQnlLZXkiB2FkZHJlc3MiA2tleSIPZ2V0TWluVG9SZWNlaXZlIhBhbW91bnRXaXRob3V0RmVlIgRwb29sIgNmZWUiCWZlZVNjYWxlNiINYW1vdW50V2l0aEZlZSIYbWluVG9SZWNlaXZlV2l0aFNsZWVwYWdlIgFpIgRhbW50IgpjdXJyZW50QmFsIgpkYXRhX2FycmF5IgskdDAzNjAxMzY4NyILJHQwMzY5MjM3NDgiAnQxIgskdDAzNzUzMzgwOSICcDIiA2xwMiILaXNfc3RhYmxlXzIiAnQyIgskdDAzODE0Mzg3MCICcDMiA2xwMyILaXNfc3RhYmxlXzMiAnQzIgskdDAzODc2Mzk0MiILJHQwMzk0NzQwMTMiCHB1dEZ1bmMyIghnZXRGdW5jMiILJHQwNDAxODQwODQiCHB1dEZ1bmMzIghnZXRGdW5jMyISYW1vdW50X2JlZl9hc3NldEluIgxuZXdfYW1vdW50SW4iCyR0MDQyOTA0NDI0IgVlc3RfMSIFbWluXzEiCyR0MDQ0Mjk0NTYzIgVlc3RfMiIFbWluXzIiCyR0MDQ1Njg0NzAyIgVlc3RfMyIFbWluXzMiEWFtb3VudF9iZWZfYXNzZXQxIgJuYiIRYW1vdW50X2JlZl9hc3NldDIiA25iMiIVYW1vdW50X2JlZl9iYXNlX2Fzc2V0IgVzd2FwMyIDbmIzIgJ0eCIGdmVyaWZ5DgABYQkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM1BHN0NIdkJhdEhwQ2h3bThyZUg3NHdmRXdrMVBIYzhScXkAAWIBILYmKcME9c5TkaQOS3UkL2SMUbH6369UKb1I0h0qsqrRAAFjCQERQGV4dHJOYXRpdmUoMTA2MikBAiMzUFJFNUtIOW9QR2ZGUHM3ZkduUWNKNHdOc2hFRFVQR2oxdAABZAEgr/8efHaHn138Hq+fsexc54494j5bIbLgBnFNFv+bFW0BAWUBAWYEAWcDCQAAAgUBZgABAgtwdXRPbmVUa25WMgIJcHV0T25lVGtuBAFoAwkAAAIFAWYAAQILZ2V0T25lVGtuVjICCWdldE9uZVRrbgkAlAoCBQFnBQFoAQFpAQFqBAFrBQFqAwkAAQIFAWsCCkJ5dGVWZWN0b3IEAWwFAWsJAPAHAgUEdGhpcwUBbAgJAO8HAQUEdGhpcwlhdmFpbGFibGUBAW0BAW4EAW8JALUJAgUBbgIBXwQBcAkAkQMCBQFvAAAEAXEJAJEDAgUBbwABBAFyCQCRAwIFAW8AAgQBcwkAkQMCBQFvAAMEAXQJAJEDAgUBbwAEBAF1CQCRAwIFAW8ABQQBdgkAkQMCBQFvAAYJAJkKBwUBcAUBcQUBcgUBcwUBdAUBdQUBdgEBdwEBbgQBbwkAtQkCBQFuAgFfBAF4CQCRAwIFAW8AAAQBegkAkQMCBQFvAAEEAUEJAJEDAgUBbwACBAFCCQCRAwIFAW8AAwkAlgoEBQF4BQF6BQFBBQFCAQFDAQFqAwkAAAIFAWoCBVdBVkVTBQR1bml0CQDZBAEFAWoBAUQHAUUBRgFHAUgBSQFKAXAEAUsJAPwHBAkBB0FkZHJlc3MBCQDZBAEFAUUFAUkJAMwIAgABCQDMCAIHBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQFDAQUBRwUBSAUDbmlsAwkAAAIFAUsFAUsEAUwJANkEAQUBRgQBTQkBAWkBBQFMAwkAAAIFAU0FAU0EAU4JAPwHBAkBB0FkZHJlc3MBCQDZBAEFAUUFAUoJAMwIAgUBcAkAzAgCAAEFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUBTAUBTQUDbmlsAwkAAAIFAU4FAU4FA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEBTwYBRQFHAUgBUAFRAVIDCQAAAgUBUAABBAFTCQD8BwQJAQdBZGRyZXNzAQkA2QQBBQFFAghleGNoYW5nZQkAzAgCBQFRCQDMCAIFAVIFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBAUMBBQFHBQFIBQNuaWwDCQAAAgUBUwUBUwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBAFUCQD8BwQJAQdBZGRyZXNzAQkA2QQBBQFFAghleGNoYW5nZQkAzAgCAAEFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBAUMBBQFHBQFIBQNuaWwDCQAAAgUBVAUBVAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQFVBAFFAUcBSAFWBAFXCQD8BwQJAQdBZGRyZXNzAQkA2QQBBQFFAgRzd2FwCQDMCAIFAVYJAMwIAgABBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQFDAQUBRwUBSAUDbmlsAwkAAAIFAVcFAVcFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEBWAIBWQFaCQELdmFsdWVPckVsc2UCCQCaCAIFAVkFAVoAAAECYWECAmFiAmFjBAJhZAkBAVgCCQEHQWRkcmVzcwEJANkEAQUCYWMCCmNvbW1pc3Npb24EAmFlAMCEPQQCYWYJAGsDBQJhYgkAZQIFAmFlBQJhZAUCYWUEAmFnCQBlAgUCYWYJAGsDBQJhZgDcCwDAhD0JAJQKAgUCYWYFAmFnAgJhaAEGYm9ycm93AQJhaQMDCQECIT0CCAUCYWgGY2FsbGVyBQFjCQECIT0CCAUCYWgGY2FsbGVyBQFhBwkAAgECHnlvdSBhcmUgbm90IGFsbG93ZWQgdG8gYm9ycm93IQQCYWoJAQFpAQUBYgMJAGYCBQJhaQUCYWoJAAIBAhxZb3UgY2Fubm5vdCBib3Jyb3cgdGhhdCBtdWNoCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQJhaAZjYWxsZXIFAmFpBQFiBQNuaWwCYWgBAXkBAW4DAwkBAiE9AggFAmFoBmNhbGxlcgUEdGhpcwkBAiE9AggFAmFoBmNhbGxlcgUBYwcJAAIBAht5b3UgYXJlIG5vdCBhbGxvd2VkIHRvIGFyYiEEAmFrCQC8CQIFAW4CAXwEAmFsCQEBbQEJAJEDAgUCYWsAAAQBcAgFAmFsAl8xBAFxCAUCYWwCXzIEAXIIBQJhbAJfMwQBcwgFAmFsAl80BAF0CAUCYWwCXzUEAXUIBQJhbAJfNgQBdggFAmFsAl83BAJhbQkBAXcBCQCRAwIFAmFrAAEEAXgIBQJhbQJfMQQBeggFAmFtAl8yBAFBCAUCYW0CXzMEAmFuCAUCYW0CXzQEAmFvCQEBdwEJAJEDAgUCYWsAAgQCYXAIBQJhbwJfMQQCYXEIBQJhbwJfMgQCYXIIBQJhbwJfMwQCYXMIBQJhbwJfNAQCYXQJAQF3AQkAkQMCBQJhawADBAJhdQgFAmF0Al8xBAJhdggFAmF0Al8yBAJhdwgFAmF0Al8zBAJheAgFAmF0Al80BAJheQkBAWUBCQEFdmFsdWUBCQC2CQEFAUEEAUkIBQJheQJfMQQBSggFAmF5Al8yBAJhegkBAWUBCQEFdmFsdWUBCQC2CQEFAmFyBAJhQQgFAmF6Al8xBAJhQggFAmF6Al8yBAJhQwkBAWUBCQEFdmFsdWUBCQC2CQEFAmF3BAJhRAgFAmFDAl8xBAJhRQgFAmFDAl8yBAJhRgkBAWkBCQEBQwEFAXIDCQAAAgUCYUYFAmFGBAJhRwMJAGYCCQEFdmFsdWUBCQC2CQEFAXMFAmFGBQJhRgkBBXZhbHVlAQkAtgkBBQFzAwkAAAIFAmFHBQJhRwQCYUgDAwkAAAIFAmFuAgFTCQAAAgkBBXZhbHVlAQkAtgkBBQFBAAEHCQECYWECCQEFdmFsdWUBCQC2CQEFAXQFAXgJAJQKAgAAAAAEAmFJCAUCYUgCXzEEAmFKCAUCYUgCXzIEAmFLAwMJAAACBQJhcwIBUwkAAAIJAQV2YWx1ZQEJALYJAQUCYXIAAQcJAQJhYQIJAQV2YWx1ZQEJALYJAQUBdQUCYXAJAJQKAgAAAAAEAmFMCAUCYUsCXzEEAmFNCAUCYUsCXzIEAmFOAwMJAAACBQJheAIBUwkAAAIJAQV2YWx1ZQEJALYJAQUCYXcAAQcJAQJhYQIJAQV2YWx1ZQEJALYJAQUBdgUCYXUJAJQKAgAAAAAEAmFPCAUCYU4CXzEEAmFQCAUCYU4CXzIEAmFRCQEBaQEJAQFDAQUBcAMJAAACBQJhUQUCYVEEAVMDCQAAAgUCYW4CAVcJAQFEBwUBeAUBegUBcgUCYUcFAUkFAUoFAXADCQAAAgUCYW4CAVMJAQFPBgUBeAUBcgUCYUcJAQV2YWx1ZQEJALYJAQUBQQUCYUkFAmFKCQEBVQQFAXgFAXIFAmFHBQFwAwkAAAIFAVMFAVMEAmFSCQBlAgkBAWkBCQEBQwEFAXAFAmFRAwkAAAIFAmFSBQJhUgQCYVMJAQFpAQkBAUMBBQFxAwkAAAIFAmFTBQJhUwQBVAMJAAACBQJhcwIBVwkBAUQHBQJhcAUCYXEFAXAFAmFSBQJhQQUCYUIFAXEDCQAAAgUCYXMCAVMJAQFPBgUCYXAFAXAFAmFSCQEFdmFsdWUBCQC2CQEFAmFyBQJhTAUCYU0JAQFVBAUCYXAFAXAFAmFSBQFxAwkAAAIFAVQFAVQEAmFUCQBlAgkBAWkBCQEBQwEFAXEFAmFTAwkAAAIFAmFUBQJhVAQCYVUJAQFpAQkBAUMBBQFyAwkAAAIFAmFVBQJhVQQCYVYDCQAAAgUCYXgCAVcJAQFEBwUCYXUFAmF2BQFxBQJhVAUCYUQFAmFFBQFyAwkAAAIFAmF4AgFTCQEBTwYFAmF1BQFxBQJhVAkBBXZhbHVlAQkAtgkBBQJhdwUCYU8FAmFQCQEBVQQFAmF1BQFxBQJhVAUBcgMJAAACBQJhVgUCYVYEAmFXCQBlAgkBAWkBCQEBQwEFAXIFAmFVAwkAAAIFAmFXBQJhVwMJAGYCBQJhVwkAZAIFAmFHANCGAwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUCYWgGY2FsbGVyCQBlAgUCYVcFAmFHCQEBQwEFAXIFA25pbAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICEm9yaWdpbiBhbW91bnRJbiA9IAUBcwIRLCBuZXdfYW1vdW50SW4gPSAJAKQDAQUCYUcCDCwgbmV3QmFsXzE6IAkApAMBBQJhUgIMLCBuZXdCYWxfMjogCQCkAwEFAmFUAgwsIG5ld0JhbF8zOiAJAKQDAQUCYVcJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAmFYAQJhWQADCQDIEwMIBQJhWAlib2R5Qnl0ZXMJAJEDAggFAmFYBnByb29mcwAACAUCYVgPc2VuZGVyUHVibGljS2V5BgkAyBMDCAUCYVgJYm9keUJ5dGVzCQCRAwIIBQJhWAZwcm9vZnMAAAUBZESz0Cc=", "height": 3510574, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 4i4iHVkzA71FtQCN6f31FAkeo1zVe57zfshRUV68Jskh Next: E5rQpJzgx7KuqUiLCJvpkkXS5qBHmL7AkwtJkNagX4ML Diff:
OldNewDifferences
9898 }
9999
100100
101-func getMinToReceive (amountWithoutFee) = {
102- let amountWithFee = (amountWithoutFee - fraction(amountWithoutFee, 6, 1000))
103- let minToReceiveWithSleepage = (amountWithFee - fraction(amountWithFee, 15, 1000))
101+func getIntegerByKey (address,key) = valueOrElse(getInteger(address, key), 0)
102+
103+
104+func getMinToReceive (amountWithoutFee,pool) = {
105+ let fee = getIntegerByKey(Address(fromBase58String(pool)), "commission")
106+ let feeScale6 = 1000000
107+ let amountWithFee = fraction(amountWithoutFee, (feeScale6 - fee), feeScale6)
108+ let minToReceiveWithSleepage = (amountWithFee - fraction(amountWithFee, 1500, 1000000))
104109 $Tuple2(amountWithFee, minToReceiveWithSleepage)
105110 }
106111
126131 then throw("you are not allowed to arb!")
127132 else {
128133 let data_array = split_4C(data, "|")
129- let $t037223808 = getBase1(data_array[0])
130- let a = $t037223808._1
131- let a2 = $t037223808._2
132- let assetIn = $t037223808._3
133- let amountIn = $t037223808._4
134- let amount_1 = $t037223808._5
135- let amount_2 = $t037223808._6
136- let amount_3 = $t037223808._7
137- let $t038133869 = getBase2(data_array[1])
138- let p1 = $t038133869._1
139- let lp1 = $t038133869._2
140- let is_stable_1 = $t038133869._3
141- let t1 = $t038133869._4
142- let $t038743930 = getBase2(data_array[2])
143- let p2 = $t038743930._1
144- let lp2 = $t038743930._2
145- let is_stable_2 = $t038743930._3
146- let t2 = $t038743930._4
147- let $t039353991 = getBase2(data_array[3])
148- let p3 = $t039353991._1
149- let lp3 = $t039353991._2
150- let is_stable_3 = $t039353991._3
151- let t3 = $t039353991._4
152- let $t039974063 = getPutGet(value(parseInt(is_stable_1)))
153- let putFunc1 = $t039974063._1
154- let getFunc1 = $t039974063._2
155- let $t040684134 = getPutGet(value(parseInt(is_stable_2)))
156- let putFunc2 = $t040684134._1
157- let getFunc2 = $t040684134._2
158- let $t041394205 = getPutGet(value(parseInt(is_stable_3)))
159- let putFunc3 = $t041394205._1
160- let getFunc3 = $t041394205._2
134+ let $t036013687 = getBase1(data_array[0])
135+ let a = $t036013687._1
136+ let a2 = $t036013687._2
137+ let assetIn = $t036013687._3
138+ let amountIn = $t036013687._4
139+ let amount_1 = $t036013687._5
140+ let amount_2 = $t036013687._6
141+ let amount_3 = $t036013687._7
142+ let $t036923748 = getBase2(data_array[1])
143+ let p1 = $t036923748._1
144+ let lp1 = $t036923748._2
145+ let is_stable_1 = $t036923748._3
146+ let t1 = $t036923748._4
147+ let $t037533809 = getBase2(data_array[2])
148+ let p2 = $t037533809._1
149+ let lp2 = $t037533809._2
150+ let is_stable_2 = $t037533809._3
151+ let t2 = $t037533809._4
152+ let $t038143870 = getBase2(data_array[3])
153+ let p3 = $t038143870._1
154+ let lp3 = $t038143870._2
155+ let is_stable_3 = $t038143870._3
156+ let t3 = $t038143870._4
157+ let $t038763942 = getPutGet(value(parseInt(is_stable_1)))
158+ let putFunc1 = $t038763942._1
159+ let getFunc1 = $t038763942._2
160+ let $t039474013 = getPutGet(value(parseInt(is_stable_2)))
161+ let putFunc2 = $t039474013._1
162+ let getFunc2 = $t039474013._2
163+ let $t040184084 = getPutGet(value(parseInt(is_stable_3)))
164+ let putFunc3 = $t040184084._1
165+ let getFunc3 = $t040184084._2
161166 let amount_bef_assetIn = getBalance(getAssetBytes(assetIn))
162167 if ((amount_bef_assetIn == amount_bef_assetIn))
163168 then {
166171 else value(parseInt(amountIn))
167172 if ((new_amountIn == new_amountIn))
168173 then {
169- let $t044114541 = if (if ((t1 == "S"))
174+ let $t042904424 = if (if ((t1 == "S"))
170175 then (value(parseInt(is_stable_1)) == 1)
171176 else false)
172- then getMinToReceive(value(parseInt(amount_1)))
177+ then getMinToReceive(value(parseInt(amount_1)), p1)
173178 else $Tuple2(0, 0)
174- let est_1 = $t044114541._1
175- let min_1 = $t044114541._2
176- let $t045464676 = if (if ((t2 == "S"))
179+ let est_1 = $t042904424._1
180+ let min_1 = $t042904424._2
181+ let $t044294563 = if (if ((t2 == "S"))
177182 then (value(parseInt(is_stable_2)) == 1)
178183 else false)
179- then getMinToReceive(value(parseInt(amount_2)))
184+ then getMinToReceive(value(parseInt(amount_2)), p2)
180185 else $Tuple2(0, 0)
181- let est_2 = $t045464676._1
182- let min_2 = $t045464676._2
183- let $t046814811 = if (if ((t3 == "S"))
186+ let est_2 = $t044294563._1
187+ let min_2 = $t044294563._2
188+ let $t045684702 = if (if ((t3 == "S"))
184189 then (value(parseInt(is_stable_3)) == 1)
185190 else false)
186- then getMinToReceive(value(parseInt(amount_3)))
191+ then getMinToReceive(value(parseInt(amount_3)), p3)
187192 else $Tuple2(0, 0)
188- let est_3 = $t046814811._1
189- let min_3 = $t046814811._2
193+ let est_3 = $t045684702._1
194+ let min_3 = $t045684702._2
190195 let amount_bef_asset1 = getBalance(getAssetBytes(a))
191196 if ((amount_bef_asset1 == amount_bef_asset1))
192197 then {
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let free_to_borrom = addressFromStringValue("3PG7CHvBatHpChwm8reH74wfEwk1PHc8Rqy")
55
66 let USDN_ASSET_ID = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
77
88 let boss = addressFromStringValue("3PRE5KH9oPGfFPs7fGnQcJ4wNshEDUPGj1t")
99
1010 let adminPublicKey = base58'Cr1ybL2JGg9GwJHA2JwqxBPfSW6Q7Jg4HvNrsEiCsHu6'
1111
1212 func getPutGet (is_stable) = {
1313 let putFunc = if ((is_stable == 1))
1414 then "putOneTknV2"
1515 else "putOneTkn"
1616 let getFunc = if ((is_stable == 1))
1717 then "getOneTknV2"
1818 else "getOneTkn"
1919 $Tuple2(putFunc, getFunc)
2020 }
2121
2222
2323 func getBalance (assetId) = match assetId {
2424 case b: ByteVector =>
2525 assetBalance(this, b)
2626 case _ =>
2727 wavesBalance(this).available
2828 }
2929
3030
3131 func getBase1 (data) = {
3232 let p_data = split(data, "_")
3333 let a = p_data[0]
3434 let a2 = p_data[1]
3535 let assetIn = p_data[2]
3636 let amountIn = p_data[3]
3737 let amount_1 = p_data[4]
3838 let amount_2 = p_data[5]
3939 let amount_3 = p_data[6]
4040 $Tuple7(a, a2, assetIn, amountIn, amount_1, amount_2, amount_3)
4141 }
4242
4343
4444 func getBase2 (data) = {
4545 let p_data = split(data, "_")
4646 let p1 = p_data[0]
4747 let lp1 = p_data[1]
4848 let is_stable_1 = p_data[2]
4949 let t = p_data[3]
5050 $Tuple4(p1, lp1, is_stable_1, t)
5151 }
5252
5353
5454 func getAssetBytes (assetId) = if ((assetId == "WAVES"))
5555 then unit
5656 else fromBase58String(assetId)
5757
5858
5959 func swap_wx (p,lp,asset,amount,putFunc1,getFunc1,a) = {
6060 let put1 = invoke(Address(fromBase58String(p)), putFunc1, [1, false], [AttachedPayment(getAssetBytes(asset), amount)])
6161 if ((put1 == put1))
6262 then {
6363 let lp1_assetid = fromBase58String(lp)
6464 let lpBalance_1 = getBalance(lp1_assetid)
6565 if ((lpBalance_1 == lpBalance_1))
6666 then {
6767 let get1 = invoke(Address(fromBase58String(p)), getFunc1, [a, 1], [AttachedPayment(lp1_assetid, lpBalance_1)])
6868 if ((get1 == get1))
6969 then nil
7070 else throw("Strict value is not equal to itself.")
7171 }
7272 else throw("Strict value is not equal to itself.")
7373 }
7474 else throw("Strict value is not equal to itself.")
7575 }
7676
7777
7878 func swap_swop (p,asset,amount,stable,est,min) = if ((stable == 1))
7979 then {
8080 let swap1 = invoke(Address(fromBase58String(p)), "exchange", [est, min], [AttachedPayment(getAssetBytes(asset), amount)])
8181 if ((swap1 == swap1))
8282 then nil
8383 else throw("Strict value is not equal to itself.")
8484 }
8585 else {
8686 let swap2 = invoke(Address(fromBase58String(p)), "exchange", [1], [AttachedPayment(getAssetBytes(asset), amount)])
8787 if ((swap2 == swap2))
8888 then nil
8989 else throw("Strict value is not equal to itself.")
9090 }
9191
9292
9393 func swap_puzzle (p,asset,amount,assetOut) = {
9494 let swap = invoke(Address(fromBase58String(p)), "swap", [assetOut, 1], [AttachedPayment(getAssetBytes(asset), amount)])
9595 if ((swap == swap))
9696 then nil
9797 else throw("Strict value is not equal to itself.")
9898 }
9999
100100
101-func getMinToReceive (amountWithoutFee) = {
102- let amountWithFee = (amountWithoutFee - fraction(amountWithoutFee, 6, 1000))
103- let minToReceiveWithSleepage = (amountWithFee - fraction(amountWithFee, 15, 1000))
101+func getIntegerByKey (address,key) = valueOrElse(getInteger(address, key), 0)
102+
103+
104+func getMinToReceive (amountWithoutFee,pool) = {
105+ let fee = getIntegerByKey(Address(fromBase58String(pool)), "commission")
106+ let feeScale6 = 1000000
107+ let amountWithFee = fraction(amountWithoutFee, (feeScale6 - fee), feeScale6)
108+ let minToReceiveWithSleepage = (amountWithFee - fraction(amountWithFee, 1500, 1000000))
104109 $Tuple2(amountWithFee, minToReceiveWithSleepage)
105110 }
106111
107112
108113 @Callable(i)
109114 func borrow (amnt) = if (if ((i.caller != boss))
110115 then (i.caller != free_to_borrom)
111116 else false)
112117 then throw("you are not allowed to borrow!")
113118 else {
114119 let currentBal = getBalance(USDN_ASSET_ID)
115120 if ((amnt > currentBal))
116121 then throw("You cannnot borrow that much")
117122 else [ScriptTransfer(i.caller, amnt, USDN_ASSET_ID)]
118123 }
119124
120125
121126
122127 @Callable(i)
123128 func y (data) = if (if ((i.caller != this))
124129 then (i.caller != boss)
125130 else false)
126131 then throw("you are not allowed to arb!")
127132 else {
128133 let data_array = split_4C(data, "|")
129- let $t037223808 = getBase1(data_array[0])
130- let a = $t037223808._1
131- let a2 = $t037223808._2
132- let assetIn = $t037223808._3
133- let amountIn = $t037223808._4
134- let amount_1 = $t037223808._5
135- let amount_2 = $t037223808._6
136- let amount_3 = $t037223808._7
137- let $t038133869 = getBase2(data_array[1])
138- let p1 = $t038133869._1
139- let lp1 = $t038133869._2
140- let is_stable_1 = $t038133869._3
141- let t1 = $t038133869._4
142- let $t038743930 = getBase2(data_array[2])
143- let p2 = $t038743930._1
144- let lp2 = $t038743930._2
145- let is_stable_2 = $t038743930._3
146- let t2 = $t038743930._4
147- let $t039353991 = getBase2(data_array[3])
148- let p3 = $t039353991._1
149- let lp3 = $t039353991._2
150- let is_stable_3 = $t039353991._3
151- let t3 = $t039353991._4
152- let $t039974063 = getPutGet(value(parseInt(is_stable_1)))
153- let putFunc1 = $t039974063._1
154- let getFunc1 = $t039974063._2
155- let $t040684134 = getPutGet(value(parseInt(is_stable_2)))
156- let putFunc2 = $t040684134._1
157- let getFunc2 = $t040684134._2
158- let $t041394205 = getPutGet(value(parseInt(is_stable_3)))
159- let putFunc3 = $t041394205._1
160- let getFunc3 = $t041394205._2
134+ let $t036013687 = getBase1(data_array[0])
135+ let a = $t036013687._1
136+ let a2 = $t036013687._2
137+ let assetIn = $t036013687._3
138+ let amountIn = $t036013687._4
139+ let amount_1 = $t036013687._5
140+ let amount_2 = $t036013687._6
141+ let amount_3 = $t036013687._7
142+ let $t036923748 = getBase2(data_array[1])
143+ let p1 = $t036923748._1
144+ let lp1 = $t036923748._2
145+ let is_stable_1 = $t036923748._3
146+ let t1 = $t036923748._4
147+ let $t037533809 = getBase2(data_array[2])
148+ let p2 = $t037533809._1
149+ let lp2 = $t037533809._2
150+ let is_stable_2 = $t037533809._3
151+ let t2 = $t037533809._4
152+ let $t038143870 = getBase2(data_array[3])
153+ let p3 = $t038143870._1
154+ let lp3 = $t038143870._2
155+ let is_stable_3 = $t038143870._3
156+ let t3 = $t038143870._4
157+ let $t038763942 = getPutGet(value(parseInt(is_stable_1)))
158+ let putFunc1 = $t038763942._1
159+ let getFunc1 = $t038763942._2
160+ let $t039474013 = getPutGet(value(parseInt(is_stable_2)))
161+ let putFunc2 = $t039474013._1
162+ let getFunc2 = $t039474013._2
163+ let $t040184084 = getPutGet(value(parseInt(is_stable_3)))
164+ let putFunc3 = $t040184084._1
165+ let getFunc3 = $t040184084._2
161166 let amount_bef_assetIn = getBalance(getAssetBytes(assetIn))
162167 if ((amount_bef_assetIn == amount_bef_assetIn))
163168 then {
164169 let new_amountIn = if ((value(parseInt(amountIn)) > amount_bef_assetIn))
165170 then amount_bef_assetIn
166171 else value(parseInt(amountIn))
167172 if ((new_amountIn == new_amountIn))
168173 then {
169- let $t044114541 = if (if ((t1 == "S"))
174+ let $t042904424 = if (if ((t1 == "S"))
170175 then (value(parseInt(is_stable_1)) == 1)
171176 else false)
172- then getMinToReceive(value(parseInt(amount_1)))
177+ then getMinToReceive(value(parseInt(amount_1)), p1)
173178 else $Tuple2(0, 0)
174- let est_1 = $t044114541._1
175- let min_1 = $t044114541._2
176- let $t045464676 = if (if ((t2 == "S"))
179+ let est_1 = $t042904424._1
180+ let min_1 = $t042904424._2
181+ let $t044294563 = if (if ((t2 == "S"))
177182 then (value(parseInt(is_stable_2)) == 1)
178183 else false)
179- then getMinToReceive(value(parseInt(amount_2)))
184+ then getMinToReceive(value(parseInt(amount_2)), p2)
180185 else $Tuple2(0, 0)
181- let est_2 = $t045464676._1
182- let min_2 = $t045464676._2
183- let $t046814811 = if (if ((t3 == "S"))
186+ let est_2 = $t044294563._1
187+ let min_2 = $t044294563._2
188+ let $t045684702 = if (if ((t3 == "S"))
184189 then (value(parseInt(is_stable_3)) == 1)
185190 else false)
186- then getMinToReceive(value(parseInt(amount_3)))
191+ then getMinToReceive(value(parseInt(amount_3)), p3)
187192 else $Tuple2(0, 0)
188- let est_3 = $t046814811._1
189- let min_3 = $t046814811._2
193+ let est_3 = $t045684702._1
194+ let min_3 = $t045684702._2
190195 let amount_bef_asset1 = getBalance(getAssetBytes(a))
191196 if ((amount_bef_asset1 == amount_bef_asset1))
192197 then {
193198 let swap1 = if ((t1 == "W"))
194199 then swap_wx(p1, lp1, assetIn, new_amountIn, putFunc1, getFunc1, a)
195200 else if ((t1 == "S"))
196201 then swap_swop(p1, assetIn, new_amountIn, value(parseInt(is_stable_1)), est_1, min_1)
197202 else swap_puzzle(p1, assetIn, new_amountIn, a)
198203 if ((swap1 == swap1))
199204 then {
200205 let nb = (getBalance(getAssetBytes(a)) - amount_bef_asset1)
201206 if ((nb == nb))
202207 then {
203208 let amount_bef_asset2 = getBalance(getAssetBytes(a2))
204209 if ((amount_bef_asset2 == amount_bef_asset2))
205210 then {
206211 let swap2 = if ((t2 == "W"))
207212 then swap_wx(p2, lp2, a, nb, putFunc2, getFunc2, a2)
208213 else if ((t2 == "S"))
209214 then swap_swop(p2, a, nb, value(parseInt(is_stable_2)), est_2, min_2)
210215 else swap_puzzle(p2, a, nb, a2)
211216 if ((swap2 == swap2))
212217 then {
213218 let nb2 = (getBalance(getAssetBytes(a2)) - amount_bef_asset2)
214219 if ((nb2 == nb2))
215220 then {
216221 let amount_bef_base_asset = getBalance(getAssetBytes(assetIn))
217222 if ((amount_bef_base_asset == amount_bef_base_asset))
218223 then {
219224 let swap3 = if ((t3 == "W"))
220225 then swap_wx(p3, lp3, a2, nb2, putFunc3, getFunc3, assetIn)
221226 else if ((t3 == "S"))
222227 then swap_swop(p3, a2, nb2, value(parseInt(is_stable_3)), est_3, min_3)
223228 else swap_puzzle(p3, a2, nb2, assetIn)
224229 if ((swap3 == swap3))
225230 then {
226231 let nb3 = (getBalance(getAssetBytes(assetIn)) - amount_bef_base_asset)
227232 if ((nb3 == nb3))
228233 then if ((nb3 > (new_amountIn + 50000)))
229234 then [ScriptTransfer(i.caller, (nb3 - new_amountIn), getAssetBytes(assetIn))]
230235 else throw(((((((((("origin amountIn = " + amountIn) + ", new_amountIn = ") + toString(new_amountIn)) + ", newBal_1: ") + toString(nb)) + ", newBal_2: ") + toString(nb2)) + ", newBal_3: ") + toString(nb3)))
231236 else throw("Strict value is not equal to itself.")
232237 }
233238 else throw("Strict value is not equal to itself.")
234239 }
235240 else throw("Strict value is not equal to itself.")
236241 }
237242 else throw("Strict value is not equal to itself.")
238243 }
239244 else throw("Strict value is not equal to itself.")
240245 }
241246 else throw("Strict value is not equal to itself.")
242247 }
243248 else throw("Strict value is not equal to itself.")
244249 }
245250 else throw("Strict value is not equal to itself.")
246251 }
247252 else throw("Strict value is not equal to itself.")
248253 }
249254 else throw("Strict value is not equal to itself.")
250255 }
251256 else throw("Strict value is not equal to itself.")
252257 }
253258
254259
255260 @Verifier(tx)
256261 func verify () = if (sigVerify_128Kb(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
257262 then true
258263 else sigVerify_128Kb(tx.bodyBytes, tx.proofs[0], adminPublicKey)
259264

github/deemru/w8io/3ef1775 
67.56 ms