w8 · tx

2023.02.22 13:07 [3526216] smart account 3P3qCUfvbDUjRnjrfM5XFMrXrzxxiad94Ez > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3cQj929vyZpm1VJe8wws4hz6A6QUuJaa3VfXxhxGvo4C",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1677060500628,
    "version": 2,
    "chainId": 87,
    "sender": "3P3qCUfvbDUjRnjrfM5XFMrXrzxxiad94Ez",
    "senderPublicKey": "3zaQerEjh4SK1xhin9zzs5qr337aLRFhz7z1ckjFGhMz",
    "proofs": [
        "3R8ejgE7RRPVVtGCmMpPK93wnQKBzqkAf3Ga6xsNT6VBzrewW5HEr5SbC6BtK5EG1j6DHbyieAu34EPJWBBe9vfn"
    ],
    "script": "base64:BgLdBwgCEgMKAQESAwoBCCIOZnJlZV90b19ib3Jyb20iDVVTRE5fQVNTRVRfSUQiBGJvc3MiDmFkbWluUHVibGljS2V5IglnZXRQdXRHZXQiCWlzX3N0YWJsZSIHcHV0RnVuYyIHZ2V0RnVuYyIKZ2V0QmFsYW5jZSIHYXNzZXRJZCIHJG1hdGNoMCIBYiIIZ2V0QmFzZTEiBGRhdGEiBnBfZGF0YSIBYSICYTIiB2Fzc2V0SW4iCGFtb3VudEluIghhbW91bnRfMSIIYW1vdW50XzIiCGFtb3VudF8zIghnZXRCYXNlMiICcDEiACIDbHAxIgtpc19zdGFibGVfMSIBdCINZ2V0QXNzZXRCeXRlcyIHc3dhcF93eCIBcCICbHAiBWFzc2V0IgZhbW91bnQiCHB1dEZ1bmMxIghnZXRGdW5jMSIEcHV0MSILbHAxX2Fzc2V0aWQiC2xwQmFsYW5jZV8xIgRnZXQxIglzd2FwX3N3b3AiBnN0YWJsZSIDZXN0IgNtaW4iBXN3YXAxIgVzd2FwMiILc3dhcF9wdXp6bGUiCGFzc2V0T3V0IgRzd2FwIg9nZXRJbnRlZ2VyQnlLZXkiB2FkZHJlc3MiA2tleSIPZ2V0TWluVG9SZWNlaXZlIhBhbW91bnRXaXRob3V0RmVlIgRwb29sIgNmZWUiCWZlZVNjYWxlNiINYW1vdW50V2l0aEZlZSIYbWluVG9SZWNlaXZlV2l0aFNsZWVwYWdlIgFpIgRhbW50IgpjdXJyZW50QmFsIgpkYXRhX2FycmF5IgskdDAzNTQ3MzYzMyILJHQwMzYzODM2OTQiAnQxIgskdDAzNjk5Mzc1NSICcDIiA2xwMiILaXNfc3RhYmxlXzIiAnQyIgskdDAzNzYwMzgxNiICcDMiA2xwMyILaXNfc3RhYmxlXzMiAnQzIgskdDAzODIyMzg4OCILJHQwMzg5MzM5NTkiCHB1dEZ1bmMyIghnZXRGdW5jMiILJHQwMzk2NDQwMzAiCHB1dEZ1bmMzIghnZXRGdW5jMyISYW1vdW50X2JlZl9hc3NldEluIgxuZXdfYW1vdW50SW4iCyR0MDQyMzY0MzcwIgVlc3RfMSIFbWluXzEiEWFtb3VudF9iZWZfYXNzZXQxIgJuYiILJHQwNDc2NTQ4OTkiBWVzdF8yIgVtaW5fMiIRYW1vdW50X2JlZl9hc3NldDIiA25iMiILJHQwNTU4NzU3MjEiBWVzdF8zIgVtaW5fMyIVYW1vdW50X2JlZl9iYXNlX2Fzc2V0IgVzd2FwMyIDbmIzIgJ0eCIGdmVyaWZ5DgABYQkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM1BHN0NIdkJhdEhwQ2h3bThyZUg3NHdmRXdrMVBIYzhScXkAAWIBILYmKcME9c5TkaQOS3UkL2SMUbH6369UKb1I0h0qsqrRAAFjCQERQGV4dHJOYXRpdmUoMTA2MikBAiMzUFJFNUtIOW9QR2ZGUHM3ZkduUWNKNHdOc2hFRFVQR2oxdAABZAEgr/8efHaHn138Hq+fsexc54494j5bIbLgBnFNFv+bFW0BAWUBAWYEAWcDCQAAAgUBZgABAgtwdXRPbmVUa25WMgIJcHV0T25lVGtuBAFoAwkAAAIFAWYAAQILZ2V0T25lVGtuVjICCWdldE9uZVRrbgkAlAoCBQFnBQFoAQFpAQFqBAFrBQFqAwkAAQIFAWsCCkJ5dGVWZWN0b3IEAWwFAWsJAPAHAgUEdGhpcwUBbAgJAO8HAQUEdGhpcwlhdmFpbGFibGUBAW0BAW4EAW8JALUJAgUBbgIBXwQBcAkAkQMCBQFvAAAEAXEJAJEDAgUBbwABBAFyCQCRAwIFAW8AAgQBcwkAkQMCBQFvAAMEAXQJAJEDAgUBbwAEBAF1CQCRAwIFAW8ABQQBdgkAkQMCBQFvAAYJAJkKBwUBcAUBcQUBcgUBcwUBdAUBdQUBdgEBdwEBbgQBbwkAtQkCBQFuAgFfBAF4CQCRAwIFAW8AAAQBegkAkQMCBQFvAAEEAUEJAJEDAgUBbwACBAFCCQCRAwIFAW8AAwkAlgoEBQF4BQF6BQFBBQFCAQFDAQFqAwkAAAIFAWoCBVdBVkVTBQR1bml0CQDZBAEFAWoBAUQHAUUBRgFHAUgBSQFKAXAEAUsJAPwHBAkBB0FkZHJlc3MBCQDZBAEFAUUFAUkJAMwIAgABCQDMCAIHBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQFDAQUBRwUBSAUDbmlsAwkAAAIFAUsFAUsEAUwJANkEAQUBRgQBTQkBAWkBBQFMAwkAAAIFAU0FAU0EAU4JAPwHBAkBB0FkZHJlc3MBCQDZBAEFAUUFAUoJAMwIAgUBcAkAzAgCAAEFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUBTAUBTQUDbmlsAwkAAAIFAU4FAU4FA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEBTwYBRQFHAUgBUAFRAVIDCQAAAgUBUAABBAFTCQD8BwQJAQdBZGRyZXNzAQkA2QQBBQFFAghleGNoYW5nZQkAzAgCBQFRCQDMCAIFAVIFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBAUMBBQFHBQFIBQNuaWwDCQAAAgUBUwUBUwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBAFUCQD8BwQJAQdBZGRyZXNzAQkA2QQBBQFFAghleGNoYW5nZQkAzAgCAAEFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBAUMBBQFHBQFIBQNuaWwDCQAAAgUBVAUBVAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQFVBAFFAUcBSAFWBAFXCQD8BwQJAQdBZGRyZXNzAQkA2QQBBQFFAgRzd2FwCQDMCAIFAVYJAMwIAgABBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQFDAQUBRwUBSAUDbmlsAwkAAAIFAVcFAVcFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEBWAIBWQFaCQELdmFsdWVPckVsc2UCCQCaCAIFAVkFAVoAAAECYWECAmFiAmFjBAJhZAkBAVgCCQEHQWRkcmVzcwEJANkEAQUCYWMCCmNvbW1pc3Npb24EAmFlAMCEPQQCYWYJAGsDBQJhYgkAZQIFAmFlBQJhZAUCYWUEAmFnCQBlAgUCYWYJAGsDBQJhZgCYdQDAhD0JAJQKAgUCYWYFAmFnAgJhaAEGYm9ycm93AQJhaQMDCQECIT0CCAUCYWgGY2FsbGVyBQFjCQECIT0CCAUCYWgGY2FsbGVyBQFhBwkAAgECHnlvdSBhcmUgbm90IGFsbG93ZWQgdG8gYm9ycm93IQQCYWoJAQFpAQUBYgMJAGYCBQJhaQUCYWoJAAIBAhxZb3UgY2Fubm5vdCBib3Jyb3cgdGhhdCBtdWNoCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQJhaAZjYWxsZXIFAmFpBQFiBQNuaWwCYWgBAXkBAW4DAwkBAiE9AggFAmFoBmNhbGxlcgUEdGhpcwkBAiE9AggFAmFoBmNhbGxlcgUBYwcJAAIBAht5b3UgYXJlIG5vdCBhbGxvd2VkIHRvIGFyYiEEAmFrCQC8CQIFAW4CAXwEAmFsCQEBbQEJAJEDAgUCYWsAAAQBcAgFAmFsAl8xBAFxCAUCYWwCXzIEAXIIBQJhbAJfMwQBcwgFAmFsAl80BAF0CAUCYWwCXzUEAXUIBQJhbAJfNgQBdggFAmFsAl83BAJhbQkBAXcBCQCRAwIFAmFrAAEEAXgIBQJhbQJfMQQBeggFAmFtAl8yBAFBCAUCYW0CXzMEAmFuCAUCYW0CXzQEAmFvCQEBdwEJAJEDAgUCYWsAAgQCYXAIBQJhbwJfMQQCYXEIBQJhbwJfMgQCYXIIBQJhbwJfMwQCYXMIBQJhbwJfNAQCYXQJAQF3AQkAkQMCBQJhawADBAJhdQgFAmF0Al8xBAJhdggFAmF0Al8yBAJhdwgFAmF0Al8zBAJheAgFAmF0Al80BAJheQkBAWUBCQEFdmFsdWUBCQC2CQEFAUEEAUkIBQJheQJfMQQBSggFAmF5Al8yBAJhegkBAWUBCQEFdmFsdWUBCQC2CQEFAmFyBAJhQQgFAmF6Al8xBAJhQggFAmF6Al8yBAJhQwkBAWUBCQEFdmFsdWUBCQC2CQEFAmF3BAJhRAgFAmFDAl8xBAJhRQgFAmFDAl8yBAJhRgkBAWkBCQEBQwEFAXIDCQAAAgUCYUYFAmFGBAJhRwMJAGYCCQEFdmFsdWUBCQC2CQEFAXMFAmFGBQJhRgkBBXZhbHVlAQkAtgkBBQFzAwkAAAIFAmFHBQJhRwQCYUgDAwkAAAIFAmFuAgFTCQAAAgkBBXZhbHVlAQkAtgkBBQFBAAEHCQECYWECCQEFdmFsdWUBCQC2CQEFAXQFAXgJAJQKAgAAAAAEAmFJCAUCYUgCXzEEAmFKCAUCYUgCXzIEAmFLCQEBaQEJAQFDAQUBcAMJAAACBQJhSwUCYUsEAVMDCQAAAgUCYW4CAVcJAQFEBwUBeAUBegUBcgUCYUcFAUkFAUoFAXADCQAAAgUCYW4CAVMJAQFPBgUBeAUBcgUCYUcJAQV2YWx1ZQEJALYJAQUBQQUCYUkFAmFKCQEBVQQFAXgFAXIFAmFHBQFwAwkAAAIFAVMFAVMEAmFMCQBlAgkBAWkBCQEBQwEFAXAFAmFLAwkAAAIFAmFMBQJhTAQCYU0DAwkAAAIFAmFzAgFTCQAAAgkBBXZhbHVlAQkAtgkBBQJhcgABBwkBAmFhAgkBBXZhbHVlAQkAtgkBBQF1BQJhcAkAlAoCAAAAAAQCYU4IBQJhTQJfMQQCYU8IBQJhTQJfMgQCYVAJAQFpAQkBAUMBBQFxAwkAAAIFAmFQBQJhUAQBVAMJAAACBQJhcwIBVwkBAUQHBQJhcAUCYXEFAXAFAmFMBQJhQQUCYUIFAXEDCQAAAgUCYXMCAVMJAQFPBgUCYXAFAXAFAmFMCQEFdmFsdWUBCQC2CQEFAmFyBQJhTgUCYU8JAQFVBAUCYXAFAXAFAmFMBQFxAwkAAAIFAVQFAVQEAmFRCQBlAgkBAWkBCQEBQwEFAXEFAmFQAwkAAAIFAmFRBQJhUQQCYVIDAwkAAAIFAmF4AgFTCQAAAgkBBXZhbHVlAQkAtgkBBQJhdwABBwkBAmFhAgkBBXZhbHVlAQkAtgkBBQF2BQJhdQkAlAoCAAAAAAQCYVMIBQJhUgJfMQQCYVQIBQJhUgJfMgQCYVUJAQFpAQkBAUMBBQFyAwkAAAIFAmFVBQJhVQQCYVYDCQAAAgUCYXgCAVcJAQFEBwUCYXUFAmF2BQFxBQJhUQUCYUQFAmFFBQFyAwkAAAIFAmF4AgFTCQEBTwYFAmF1BQFxBQJhUQkBBXZhbHVlAQkAtgkBBQJhdwUCYVMFAmFUCQEBVQQFAmF1BQFxBQJhUQUBcgMJAAACBQJhVgUCYVYEAmFXCQBlAgkBAWkBCQEBQwEFAXIFAmFVAwkAAAIFAmFXBQJhVwMJAGYCBQJhVwkAZAIFAmFHAPCTCQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUCYWgGY2FsbGVyCQBlAgUCYVcFAmFHCQEBQwEFAXIFA25pbAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICEm9yaWdpbiBhbW91bnRJbiA9IAUBcwIRLCBuZXdfYW1vdW50SW4gPSAJAKQDAQUCYUcCDCwgbmV3QmFsXzE6IAkApAMBBQJhTAIMLCBuZXdCYWxfMjogCQCkAwEFAmFRAgwsIG5ld0JhbF8zOiAJAKQDAQUCYVcJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAmFYAQJhWQADCQDIEwMIBQJhWAlib2R5Qnl0ZXMJAJEDAggFAmFYBnByb29mcwAACAUCYVgPc2VuZGVyUHVibGljS2V5BgkAyBMDCAUCYVgJYm9keUJ5dGVzCQCRAwIIBQJhWAZwcm9vZnMAAAUBZN5atQ8=",
    "height": 3526216,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7Jyg3T5qXkDFGb4cXo22j4T755kLtWm11P6GwwkT3qpG
Next: AsLdDvo355wLWb3SVnXAe6RCQUWpSEjirf159Tczpkoq

Diff: 
Old New Differences
230 230                                                                                      then {
231 231                                                                                          let nb3 = (getBalance(getAssetBytes(assetIn)) - amount_bef_base_asset)
232 232                                                                                          if ((nb3 == nb3))
233 -                                                                                             then if ((nb3 > (new_amountIn + 0)))
233 +                                                                                             then if ((nb3 > (new_amountIn + 150000)))
234 234                                                                                                  then [ScriptTransfer(i.caller, (nb3 - new_amountIn), getAssetBytes(assetIn))]
235 235                                                                                                  else throw(((((((((("origin amountIn = " + amountIn) + ", new_amountIn = ") + toString(new_amountIn)) + ", newBal_1: ") + toString(nb)) + ", newBal_2: ") + toString(nb2)) + ", newBal_3: ") + toString(nb3)))
236 236                                                                                              else throw("Strict value is not equal to itself.")
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let free_to_borrom = addressFromStringValue("3PG7CHvBatHpChwm8reH74wfEwk1PHc8Rqy")
5 5  
6 6  let USDN_ASSET_ID = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
7 7  
8 8  let boss = addressFromStringValue("3PRE5KH9oPGfFPs7fGnQcJ4wNshEDUPGj1t")
9 9  
10 10  let adminPublicKey = base58'Cr1ybL2JGg9GwJHA2JwqxBPfSW6Q7Jg4HvNrsEiCsHu6'
11 11  
12 12  func getPutGet (is_stable) = {
13 13      let putFunc = if ((is_stable == 1))
14 14          then "putOneTknV2"
15 15          else "putOneTkn"
16 16      let getFunc = if ((is_stable == 1))
17 17          then "getOneTknV2"
18 18          else "getOneTkn"
19 19      $Tuple2(putFunc, getFunc)
20 20      }
21 21  
22 22  
23 23  func getBalance (assetId) = match assetId {
24 24      case b: ByteVector => 
25 25          assetBalance(this, b)
26 26      case _ => 
27 27          wavesBalance(this).available
28 28  }
29 29  
30 30  
31 31  func getBase1 (data) = {
32 32      let p_data = split(data, "_")
33 33      let a = p_data[0]
34 34      let a2 = p_data[1]
35 35      let assetIn = p_data[2]
36 36      let amountIn = p_data[3]
37 37      let amount_1 = p_data[4]
38 38      let amount_2 = p_data[5]
39 39      let amount_3 = p_data[6]
40 40      $Tuple7(a, a2, assetIn, amountIn, amount_1, amount_2, amount_3)
41 41      }
42 42  
43 43  
44 44  func getBase2 (data) = {
45 45      let p_data = split(data, "_")
46 46      let p1 = p_data[0]
47 47      let lp1 = p_data[1]
48 48      let is_stable_1 = p_data[2]
49 49      let t = p_data[3]
50 50      $Tuple4(p1, lp1, is_stable_1, t)
51 51      }
52 52  
53 53  
54 54  func getAssetBytes (assetId) = if ((assetId == "WAVES"))
55 55      then unit
56 56      else fromBase58String(assetId)
57 57  
58 58  
59 59  func swap_wx (p,lp,asset,amount,putFunc1,getFunc1,a) = {
60 60      let put1 = invoke(Address(fromBase58String(p)), putFunc1, [1, false], [AttachedPayment(getAssetBytes(asset), amount)])
61 61      if ((put1 == put1))
62 62          then {
63 63              let lp1_assetid = fromBase58String(lp)
64 64              let lpBalance_1 = getBalance(lp1_assetid)
65 65              if ((lpBalance_1 == lpBalance_1))
66 66                  then {
67 67                      let get1 = invoke(Address(fromBase58String(p)), getFunc1, [a, 1], [AttachedPayment(lp1_assetid, lpBalance_1)])
68 68                      if ((get1 == get1))
69 69                          then nil
70 70                          else throw("Strict value is not equal to itself.")
71 71                      }
72 72                  else throw("Strict value is not equal to itself.")
73 73              }
74 74          else throw("Strict value is not equal to itself.")
75 75      }
76 76  
77 77  
78 78  func swap_swop (p,asset,amount,stable,est,min) = if ((stable == 1))
79 79      then {
80 80          let swap1 = invoke(Address(fromBase58String(p)), "exchange", [est, min], [AttachedPayment(getAssetBytes(asset), amount)])
81 81          if ((swap1 == swap1))
82 82              then nil
83 83              else throw("Strict value is not equal to itself.")
84 84          }
85 85      else {
86 86          let swap2 = invoke(Address(fromBase58String(p)), "exchange", [1], [AttachedPayment(getAssetBytes(asset), amount)])
87 87          if ((swap2 == swap2))
88 88              then nil
89 89              else throw("Strict value is not equal to itself.")
90 90          }
91 91  
92 92  
93 93  func swap_puzzle (p,asset,amount,assetOut) = {
94 94      let swap = invoke(Address(fromBase58String(p)), "swap", [assetOut, 1], [AttachedPayment(getAssetBytes(asset), amount)])
95 95      if ((swap == swap))
96 96          then nil
97 97          else throw("Strict value is not equal to itself.")
98 98      }
99 99  
100 100  
101 101  func getIntegerByKey (address,key) = valueOrElse(getInteger(address, key), 0)
102 102  
103 103  
104 104  func getMinToReceive (amountWithoutFee,pool) = {
105 105      let fee = getIntegerByKey(Address(fromBase58String(pool)), "commission")
106 106      let feeScale6 = 1000000
107 107      let amountWithFee = fraction(amountWithoutFee, (feeScale6 - fee), feeScale6)
108 108      let minToReceiveWithSleepage = (amountWithFee - fraction(amountWithFee, 15000, 1000000))
109 109      $Tuple2(amountWithFee, minToReceiveWithSleepage)
110 110      }
111 111  
112 112  
113 113  @Callable(i)
114 114  func borrow (amnt) = if (if ((i.caller != boss))
115 115      then (i.caller != free_to_borrom)
116 116      else false)
117 117      then throw("you are not allowed to borrow!")
118 118      else {
119 119          let currentBal = getBalance(USDN_ASSET_ID)
120 120          if ((amnt > currentBal))
121 121              then throw("You cannnot borrow that much")
122 122              else [ScriptTransfer(i.caller, amnt, USDN_ASSET_ID)]
123 123          }
124 124  
125 125  
126 126  
127 127  @Callable(i)
128 128  func y (data) = if (if ((i.caller != this))
129 129      then (i.caller != boss)
130 130      else false)
131 131      then throw("you are not allowed to arb!")
132 132      else {
133 133          let data_array = split_4C(data, "|")
134 134          let $t035473633 = getBase1(data_array[0])
135 135          let a = $t035473633._1
136 136          let a2 = $t035473633._2
137 137          let assetIn = $t035473633._3
138 138          let amountIn = $t035473633._4
139 139          let amount_1 = $t035473633._5
140 140          let amount_2 = $t035473633._6
141 141          let amount_3 = $t035473633._7
142 142          let $t036383694 = getBase2(data_array[1])
143 143          let p1 = $t036383694._1
144 144          let lp1 = $t036383694._2
145 145          let is_stable_1 = $t036383694._3
146 146          let t1 = $t036383694._4
147 147          let $t036993755 = getBase2(data_array[2])
148 148          let p2 = $t036993755._1
149 149          let lp2 = $t036993755._2
150 150          let is_stable_2 = $t036993755._3
151 151          let t2 = $t036993755._4
152 152          let $t037603816 = getBase2(data_array[3])
153 153          let p3 = $t037603816._1
154 154          let lp3 = $t037603816._2
155 155          let is_stable_3 = $t037603816._3
156 156          let t3 = $t037603816._4
157 157          let $t038223888 = getPutGet(value(parseInt(is_stable_1)))
158 158          let putFunc1 = $t038223888._1
159 159          let getFunc1 = $t038223888._2
160 160          let $t038933959 = getPutGet(value(parseInt(is_stable_2)))
161 161          let putFunc2 = $t038933959._1
162 162          let getFunc2 = $t038933959._2
163 163          let $t039644030 = getPutGet(value(parseInt(is_stable_3)))
164 164          let putFunc3 = $t039644030._1
165 165          let getFunc3 = $t039644030._2
166 166          let amount_bef_assetIn = getBalance(getAssetBytes(assetIn))
167 167          if ((amount_bef_assetIn == amount_bef_assetIn))
168 168              then {
169 169                  let new_amountIn = if ((value(parseInt(amountIn)) > amount_bef_assetIn))
170 170                      then amount_bef_assetIn
171 171                      else value(parseInt(amountIn))
172 172                  if ((new_amountIn == new_amountIn))
173 173                      then {
174 174                          let $t042364370 = if (if ((t1 == "S"))
175 175                              then (value(parseInt(is_stable_1)) == 1)
176 176                              else false)
177 177                              then getMinToReceive(value(parseInt(amount_1)), p1)
178 178                              else $Tuple2(0, 0)
179 179                          let est_1 = $t042364370._1
180 180                          let min_1 = $t042364370._2
181 181                          let amount_bef_asset1 = getBalance(getAssetBytes(a))
182 182                          if ((amount_bef_asset1 == amount_bef_asset1))
183 183                              then {
184 184                                  let swap1 = if ((t1 == "W"))
185 185                                      then swap_wx(p1, lp1, assetIn, new_amountIn, putFunc1, getFunc1, a)
186 186                                      else if ((t1 == "S"))
187 187                                          then swap_swop(p1, assetIn, new_amountIn, value(parseInt(is_stable_1)), est_1, min_1)
188 188                                          else swap_puzzle(p1, assetIn, new_amountIn, a)
189 189                                  if ((swap1 == swap1))
190 190                                      then {
191 191                                          let nb = (getBalance(getAssetBytes(a)) - amount_bef_asset1)
192 192                                          if ((nb == nb))
193 193                                              then {
194 194                                                  let $t047654899 = if (if ((t2 == "S"))
195 195                                                      then (value(parseInt(is_stable_2)) == 1)
196 196                                                      else false)
197 197                                                      then getMinToReceive(value(parseInt(amount_2)), p2)
198 198                                                      else $Tuple2(0, 0)
199 199                                                  let est_2 = $t047654899._1
200 200                                                  let min_2 = $t047654899._2
201 201                                                  let amount_bef_asset2 = getBalance(getAssetBytes(a2))
202 202                                                  if ((amount_bef_asset2 == amount_bef_asset2))
203 203                                                      then {
204 204                                                          let swap2 = if ((t2 == "W"))
205 205                                                              then swap_wx(p2, lp2, a, nb, putFunc2, getFunc2, a2)
206 206                                                              else if ((t2 == "S"))
207 207                                                                  then swap_swop(p2, a, nb, value(parseInt(is_stable_2)), est_2, min_2)
208 208                                                                  else swap_puzzle(p2, a, nb, a2)
209 209                                                          if ((swap2 == swap2))
210 210                                                              then {
211 211                                                                  let nb2 = (getBalance(getAssetBytes(a2)) - amount_bef_asset2)
212 212                                                                  if ((nb2 == nb2))
213 213                                                                      then {
214 214                                                                          let $t055875721 = if (if ((t3 == "S"))
215 215                                                                              then (value(parseInt(is_stable_3)) == 1)
216 216                                                                              else false)
217 217                                                                              then getMinToReceive(value(parseInt(amount_3)), p3)
218 218                                                                              else $Tuple2(0, 0)
219 219                                                                          let est_3 = $t055875721._1
220 220                                                                          let min_3 = $t055875721._2
221 221                                                                          let amount_bef_base_asset = getBalance(getAssetBytes(assetIn))
222 222                                                                          if ((amount_bef_base_asset == amount_bef_base_asset))
223 223                                                                              then {
224 224                                                                                  let swap3 = if ((t3 == "W"))
225 225                                                                                      then swap_wx(p3, lp3, a2, nb2, putFunc3, getFunc3, assetIn)
226 226                                                                                      else if ((t3 == "S"))
227 227                                                                                          then swap_swop(p3, a2, nb2, value(parseInt(is_stable_3)), est_3, min_3)
228 228                                                                                          else swap_puzzle(p3, a2, nb2, assetIn)
229 229                                                                                  if ((swap3 == swap3))
230 230                                                                                      then {
231 231                                                                                          let nb3 = (getBalance(getAssetBytes(assetIn)) - amount_bef_base_asset)
232 232                                                                                          if ((nb3 == nb3))
233 -                                                                                             then if ((nb3 > (new_amountIn + 0)))
233 +                                                                                             then if ((nb3 > (new_amountIn + 150000)))
234 234                                                                                                  then [ScriptTransfer(i.caller, (nb3 - new_amountIn), getAssetBytes(assetIn))]
235 235                                                                                                  else throw(((((((((("origin amountIn = " + amountIn) + ", new_amountIn = ") + toString(new_amountIn)) + ", newBal_1: ") + toString(nb)) + ", newBal_2: ") + toString(nb2)) + ", newBal_3: ") + toString(nb3)))
236 236                                                                                              else throw("Strict value is not equal to itself.")
237 237                                                                                          }
238 238                                                                                      else throw("Strict value is not equal to itself.")
239 239                                                                                  }
240 240                                                                              else throw("Strict value is not equal to itself.")
241 241                                                                          }
242 242                                                                      else throw("Strict value is not equal to itself.")
243 243                                                                  }
244 244                                                              else throw("Strict value is not equal to itself.")
245 245                                                          }
246 246                                                      else throw("Strict value is not equal to itself.")
247 247                                                  }
248 248                                              else throw("Strict value is not equal to itself.")
249 249                                          }
250 250                                      else throw("Strict value is not equal to itself.")
251 251                                  }
252 252                              else throw("Strict value is not equal to itself.")
253 253                          }
254 254                      else throw("Strict value is not equal to itself.")
255 255                  }
256 256              else throw("Strict value is not equal to itself.")
257 257          }
258 258  
259 259  
260 260  @Verifier(tx)
261 261  func verify () = if (sigVerify_128Kb(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
262 262      then true
263 263      else sigVerify_128Kb(tx.bodyBytes, tx.proofs[0], adminPublicKey)
264 264

Old	New		Differences
230	230		then {
231	231		let nb3 = (getBalance(getAssetBytes(assetIn)) - amount_bef_base_asset)
232	232		if ((nb3 == nb3))
233		-	then if ((nb3 > (new_amountIn + 0)))
	233	+	then if ((nb3 > (new_amountIn + 150000)))
234	234		then [ScriptTransfer(i.caller, (nb3 - new_amountIn), getAssetBytes(assetIn))]
235	235		else throw(((((((((("origin amountIn = " + amountIn) + ", new_amountIn = ") + toString(new_amountIn)) + ", newBal_1: ") + toString(nb)) + ", newBal_2: ") + toString(nb2)) + ", newBal_3: ") + toString(nb3)))
236	236		else throw("Strict value is not equal to itself.")

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let free_to_borrom = addressFromStringValue("3PG7CHvBatHpChwm8reH74wfEwk1PHc8Rqy")
5	5
6	6		let USDN_ASSET_ID = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
7	7
8	8		let boss = addressFromStringValue("3PRE5KH9oPGfFPs7fGnQcJ4wNshEDUPGj1t")
9	9
10	10		let adminPublicKey = base58'Cr1ybL2JGg9GwJHA2JwqxBPfSW6Q7Jg4HvNrsEiCsHu6'
11	11
12	12		func getPutGet (is_stable) = {
13	13		let putFunc = if ((is_stable == 1))
14	14		then "putOneTknV2"
15	15		else "putOneTkn"
16	16		let getFunc = if ((is_stable == 1))
17	17		then "getOneTknV2"
18	18		else "getOneTkn"
19	19		$Tuple2(putFunc, getFunc)
20	20		}
21	21
22	22
23	23		func getBalance (assetId) = match assetId {
24	24		case b: ByteVector =>
25	25		assetBalance(this, b)
26	26		case _ =>
27	27		wavesBalance(this).available
28	28		}
29	29
30	30
31	31		func getBase1 (data) = {
32	32		let p_data = split(data, "_")
33	33		let a = p_data[0]
34	34		let a2 = p_data[1]
35	35		let assetIn = p_data[2]
36	36		let amountIn = p_data[3]
37	37		let amount_1 = p_data[4]
38	38		let amount_2 = p_data[5]
39	39		let amount_3 = p_data[6]
40	40		$Tuple7(a, a2, assetIn, amountIn, amount_1, amount_2, amount_3)
41	41		}
42	42
43	43
44	44		func getBase2 (data) = {
45	45		let p_data = split(data, "_")
46	46		let p1 = p_data[0]
47	47		let lp1 = p_data[1]
48	48		let is_stable_1 = p_data[2]
49	49		let t = p_data[3]
50	50		$Tuple4(p1, lp1, is_stable_1, t)
51	51		}
52	52
53	53
54	54		func getAssetBytes (assetId) = if ((assetId == "WAVES"))
55	55		then unit
56	56		else fromBase58String(assetId)
57	57
58	58
59	59		func swap_wx (p,lp,asset,amount,putFunc1,getFunc1,a) = {
60	60		let put1 = invoke(Address(fromBase58String(p)), putFunc1, [1, false], [AttachedPayment(getAssetBytes(asset), amount)])
61	61		if ((put1 == put1))
62	62		then {
63	63		let lp1_assetid = fromBase58String(lp)
64	64		let lpBalance_1 = getBalance(lp1_assetid)
65	65		if ((lpBalance_1 == lpBalance_1))
66	66		then {
67	67		let get1 = invoke(Address(fromBase58String(p)), getFunc1, [a, 1], [AttachedPayment(lp1_assetid, lpBalance_1)])
68	68		if ((get1 == get1))
69	69		then nil
70	70		else throw("Strict value is not equal to itself.")
71	71		}
72	72		else throw("Strict value is not equal to itself.")
73	73		}
74	74		else throw("Strict value is not equal to itself.")
75	75		}
76	76
77	77
78	78		func swap_swop (p,asset,amount,stable,est,min) = if ((stable == 1))
79	79		then {
80	80		let swap1 = invoke(Address(fromBase58String(p)), "exchange", [est, min], [AttachedPayment(getAssetBytes(asset), amount)])
81	81		if ((swap1 == swap1))
82	82		then nil
83	83		else throw("Strict value is not equal to itself.")
84	84		}
85	85		else {
86	86		let swap2 = invoke(Address(fromBase58String(p)), "exchange", [1], [AttachedPayment(getAssetBytes(asset), amount)])
87	87		if ((swap2 == swap2))
88	88		then nil
89	89		else throw("Strict value is not equal to itself.")
90	90		}
91	91
92	92
93	93		func swap_puzzle (p,asset,amount,assetOut) = {
94	94		let swap = invoke(Address(fromBase58String(p)), "swap", [assetOut, 1], [AttachedPayment(getAssetBytes(asset), amount)])
95	95		if ((swap == swap))
96	96		then nil
97	97		else throw("Strict value is not equal to itself.")
98	98		}
99	99
100	100
101	101		func getIntegerByKey (address,key) = valueOrElse(getInteger(address, key), 0)
102	102
103	103
104	104		func getMinToReceive (amountWithoutFee,pool) = {
105	105		let fee = getIntegerByKey(Address(fromBase58String(pool)), "commission")
106	106		let feeScale6 = 1000000
107	107		let amountWithFee = fraction(amountWithoutFee, (feeScale6 - fee), feeScale6)
108	108		let minToReceiveWithSleepage = (amountWithFee - fraction(amountWithFee, 15000, 1000000))
109	109		$Tuple2(amountWithFee, minToReceiveWithSleepage)
110	110		}
111	111
112	112
113	113		@Callable(i)
114	114		func borrow (amnt) = if (if ((i.caller != boss))
115	115		then (i.caller != free_to_borrom)
116	116		else false)
117	117		then throw("you are not allowed to borrow!")
118	118		else {
119	119		let currentBal = getBalance(USDN_ASSET_ID)
120	120		if ((amnt > currentBal))
121	121		then throw("You cannnot borrow that much")
122	122		else [ScriptTransfer(i.caller, amnt, USDN_ASSET_ID)]
123	123		}
124	124
125	125
126	126
127	127		@Callable(i)
128	128		func y (data) = if (if ((i.caller != this))
129	129		then (i.caller != boss)
130	130		else false)
131	131		then throw("you are not allowed to arb!")
132	132		else {
133	133		let data_array = split_4C(data, "\|")
134	134		let $t035473633 = getBase1(data_array[0])
135	135		let a = $t035473633._1
136	136		let a2 = $t035473633._2
137	137		let assetIn = $t035473633._3
138	138		let amountIn = $t035473633._4
139	139		let amount_1 = $t035473633._5
140	140		let amount_2 = $t035473633._6
141	141		let amount_3 = $t035473633._7
142	142		let $t036383694 = getBase2(data_array[1])
143	143		let p1 = $t036383694._1
144	144		let lp1 = $t036383694._2
145	145		let is_stable_1 = $t036383694._3
146	146		let t1 = $t036383694._4
147	147		let $t036993755 = getBase2(data_array[2])
148	148		let p2 = $t036993755._1
149	149		let lp2 = $t036993755._2
150	150		let is_stable_2 = $t036993755._3
151	151		let t2 = $t036993755._4
152	152		let $t037603816 = getBase2(data_array[3])
153	153		let p3 = $t037603816._1
154	154		let lp3 = $t037603816._2
155	155		let is_stable_3 = $t037603816._3
156	156		let t3 = $t037603816._4
157	157		let $t038223888 = getPutGet(value(parseInt(is_stable_1)))
158	158		let putFunc1 = $t038223888._1
159	159		let getFunc1 = $t038223888._2
160	160		let $t038933959 = getPutGet(value(parseInt(is_stable_2)))
161	161		let putFunc2 = $t038933959._1
162	162		let getFunc2 = $t038933959._2
163	163		let $t039644030 = getPutGet(value(parseInt(is_stable_3)))
164	164		let putFunc3 = $t039644030._1
165	165		let getFunc3 = $t039644030._2
166	166		let amount_bef_assetIn = getBalance(getAssetBytes(assetIn))
167	167		if ((amount_bef_assetIn == amount_bef_assetIn))
168	168		then {
169	169		let new_amountIn = if ((value(parseInt(amountIn)) > amount_bef_assetIn))
170	170		then amount_bef_assetIn
171	171		else value(parseInt(amountIn))
172	172		if ((new_amountIn == new_amountIn))
173	173		then {
174	174		let $t042364370 = if (if ((t1 == "S"))
175	175		then (value(parseInt(is_stable_1)) == 1)
176	176		else false)
177	177		then getMinToReceive(value(parseInt(amount_1)), p1)
178	178		else $Tuple2(0, 0)
179	179		let est_1 = $t042364370._1
180	180		let min_1 = $t042364370._2
181	181		let amount_bef_asset1 = getBalance(getAssetBytes(a))
182	182		if ((amount_bef_asset1 == amount_bef_asset1))
183	183		then {
184	184		let swap1 = if ((t1 == "W"))
185	185		then swap_wx(p1, lp1, assetIn, new_amountIn, putFunc1, getFunc1, a)
186	186		else if ((t1 == "S"))
187	187		then swap_swop(p1, assetIn, new_amountIn, value(parseInt(is_stable_1)), est_1, min_1)
188	188		else swap_puzzle(p1, assetIn, new_amountIn, a)
189	189		if ((swap1 == swap1))
190	190		then {
191	191		let nb = (getBalance(getAssetBytes(a)) - amount_bef_asset1)
192	192		if ((nb == nb))
193	193		then {
194	194		let $t047654899 = if (if ((t2 == "S"))
195	195		then (value(parseInt(is_stable_2)) == 1)
196	196		else false)
197	197		then getMinToReceive(value(parseInt(amount_2)), p2)
198	198		else $Tuple2(0, 0)
199	199		let est_2 = $t047654899._1
200	200		let min_2 = $t047654899._2
201	201		let amount_bef_asset2 = getBalance(getAssetBytes(a2))
202	202		if ((amount_bef_asset2 == amount_bef_asset2))
203	203		then {
204	204		let swap2 = if ((t2 == "W"))
205	205		then swap_wx(p2, lp2, a, nb, putFunc2, getFunc2, a2)
206	206		else if ((t2 == "S"))
207	207		then swap_swop(p2, a, nb, value(parseInt(is_stable_2)), est_2, min_2)
208	208		else swap_puzzle(p2, a, nb, a2)
209	209		if ((swap2 == swap2))
210	210		then {
211	211		let nb2 = (getBalance(getAssetBytes(a2)) - amount_bef_asset2)
212	212		if ((nb2 == nb2))
213	213		then {
214	214		let $t055875721 = if (if ((t3 == "S"))
215	215		then (value(parseInt(is_stable_3)) == 1)
216	216		else false)
217	217		then getMinToReceive(value(parseInt(amount_3)), p3)
218	218		else $Tuple2(0, 0)
219	219		let est_3 = $t055875721._1
220	220		let min_3 = $t055875721._2
221	221		let amount_bef_base_asset = getBalance(getAssetBytes(assetIn))
222	222		if ((amount_bef_base_asset == amount_bef_base_asset))
223	223		then {
224	224		let swap3 = if ((t3 == "W"))
225	225		then swap_wx(p3, lp3, a2, nb2, putFunc3, getFunc3, assetIn)
226	226		else if ((t3 == "S"))
227	227		then swap_swop(p3, a2, nb2, value(parseInt(is_stable_3)), est_3, min_3)
228	228		else swap_puzzle(p3, a2, nb2, assetIn)
229	229		if ((swap3 == swap3))
230	230		then {
231	231		let nb3 = (getBalance(getAssetBytes(assetIn)) - amount_bef_base_asset)
232	232		if ((nb3 == nb3))
233		-	then if ((nb3 > (new_amountIn + 0)))
	233	+	then if ((nb3 > (new_amountIn + 150000)))
234	234		then [ScriptTransfer(i.caller, (nb3 - new_amountIn), getAssetBytes(assetIn))]
235	235		else throw(((((((((("origin amountIn = " + amountIn) + ", new_amountIn = ") + toString(new_amountIn)) + ", newBal_1: ") + toString(nb)) + ", newBal_2: ") + toString(nb2)) + ", newBal_3: ") + toString(nb3)))
236	236		else throw("Strict value is not equal to itself.")
237	237		}
238	238		else throw("Strict value is not equal to itself.")
239	239		}
240	240		else throw("Strict value is not equal to itself.")
241	241		}
242	242		else throw("Strict value is not equal to itself.")
243	243		}
244	244		else throw("Strict value is not equal to itself.")
245	245		}
246	246		else throw("Strict value is not equal to itself.")
247	247		}
248	248		else throw("Strict value is not equal to itself.")
249	249		}
250	250		else throw("Strict value is not equal to itself.")
251	251		}
252	252		else throw("Strict value is not equal to itself.")
253	253		}
254	254		else throw("Strict value is not equal to itself.")
255	255		}
256	256		else throw("Strict value is not equal to itself.")
257	257		}
258	258
259	259
260	260		@Verifier(tx)
261	261		func verify () = if (sigVerify_128Kb(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
262	262		then true
263	263		else sigVerify_128Kb(tx.bodyBytes, tx.proofs[0], adminPublicKey)
264	264

github/deemru/w8io/786bc32 
66.75 ms ◑