tx · 2R9Jhcf848sqmypzBzgvt9hXwitw3TBDpri5VT9Ghi8Y

3N69YR9dGN9tJnhxGrURt5cQycjAN1zbQ9t:  -0.05000000 Waves

2021.01.29 17:21 [1374871] smart account 3N69YR9dGN9tJnhxGrURt5cQycjAN1zbQ9t > SELF 0.00000000 Waves

{ "type": 13, "id": "2R9Jhcf848sqmypzBzgvt9hXwitw3TBDpri5VT9Ghi8Y", "fee": 5000000, "feeAssetId": null, "timestamp": 1611930114601, "version": 2, "chainId": 84, "sender": "3N69YR9dGN9tJnhxGrURt5cQycjAN1zbQ9t", "senderPublicKey": "Bo16mjUNTGCeZDYvQc6gHh46P21B3DqYCHoDt9CyzxHf", "proofs": [ "2peZUhp6dxoRMxDApjyPZLjwBSDmqzLtvaedG5GQocmZbFa8BZSrrEFBKuZTCnj64jpagwi1tEitKscPt5qU32uV" ], "script": "base64:AAIEAAAAAAAAAAkIAhIAEgMKAQEAAAALAAAAAAFlAAAAAAAQM8TWAAAAAA5rd290YXJvd25vd2FnaQAAAAkYTnKgAAAAAAAEYmF6YQkAAGgAAAACBQAAAA5rd290YXJvd25vd2FnaQAAAAAAAAAAEgAAAAAGcG96aW9tCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAAAZQb3ppb20AAAAACmJhbGFuc1VTRE4JAABoAAAAAgkAA/AAAAACBQAAAAR0aGlzAQAAACC3MBFQ8wB+fyiYVgPsUQGuNeyj0fuUvJsmtCYHI6unSgAAAAAAAAAAZAAAAAAKYmFsYW5zVVNEVAkAAGgAAAACCQAD8AAAAAIFAAAABHRoaXMBAAAAIAkJCHNUpU6AUOoObKxslXw6Rw4k6YFcgvYpXmoWsYPOAAAAAAAAAABkAQAAAAJsbgAAAAEAAAABeAkAAG0AAAAGBQAAAAF4AAAAAAAAAAAIBQAAAAFlAAAAAAAAAAAIAAAAAAAAAAAIBQAAAARET1dOAQAAAANleHAAAAABAAAAAXgJAABsAAAABgUAAAABZQAAAAAAAAAACAUAAAABeAAAAAAAAAAACAAAAAAAAAAACAUAAAAERE9XTgEAAAAIbW5vemVuaWUAAAACAAAAAXgAAAABeQkAAGsAAAADBQAAAAF4BQAAAAF5AAAAAAAF9eEAAQAAAAlkemllbGVuaWUAAAACAAAAAXgAAAABeQkAAGsAAAADBQAAAAF4AAAAAAAF9eEABQAAAAF5AQAAAAhXTGFtYmVydAAAAAEAAAABeAkBAAAACWR6aWVsZW5pZQAAAAIFAAAAAXgJAQAAAANleHAAAAABCQEAAAAJZHppZWxlbmllAAAAAgUAAAABeAkBAAAAA2V4cAAAAAEJAQAAAAlkemllbGVuaWUAAAACBQAAAAF4CQEAAAADZXhwAAAAAQkBAAAACWR6aWVsZW5pZQAAAAIFAAAAAXgJAQAAAANleHAAAAABCQEAAAAJZHppZWxlbmllAAAAAgUAAAABeAkBAAAAA2V4cAAAAAEJAQAAAAlkemllbGVuaWUAAAACBQAAAAF4CQEAAAADZXhwAAAAAQkBAAAACWR6aWVsZW5pZQAAAAIFAAAAAXgJAQAAAANleHAAAAABCQEAAAAJZHppZWxlbmllAAAAAgUAAAABeAkBAAAAA2V4cAAAAAEJAQAAAAlkemllbGVuaWUAAAACBQAAAAF4CQEAAAADZXhwAAAAAQkBAAAACWR6aWVsZW5pZQAAAAIFAAAAAXgJAQAAAANleHAAAAABCQEAAAAJZHppZWxlbmllAAAAAgUAAAABeAkBAAAAA2V4cAAAAAEJAQAAAAlkemllbGVuaWUAAAACBQAAAAF4CQEAAAADZXhwAAAAAQkBAAAACWR6aWVsZW5pZQAAAAIFAAAAAXgJAQAAAANleHAAAAABCQEAAAAJZHppZWxlbmllAAAAAgUAAAABeAkBAAAAA2V4cAAAAAEJAQAAAAlkemllbGVuaWUAAAACBQAAAAF4CQEAAAADZXhwAAAAAQkBAAAACWR6aWVsZW5pZQAAAAIFAAAAAXgJAQAAAANleHAAAAABCQEAAAAJZHppZWxlbmllAAAAAgUAAAABeAkBAAAAA2V4cAAAAAEJAQAAAAlkemllbGVuaWUAAAACBQAAAAF4CQEAAAADZXhwAAAAAQkBAAAACWR6aWVsZW5pZQAAAAIFAAAAAXgJAQAAAANleHAAAAABCQEAAAAJZHppZWxlbmllAAAAAgUAAAABeAkBAAAAA2V4cAAAAAEJAQAAAAlkemllbGVuaWUAAAACBQAAAAF4CQEAAAADZXhwAAAAAQUAAAABeAAAAAIAAAABaQEAAAAQVVNEVG5hVVNETm5hVVNEVAAAAAAEAAAABm9wbGF0YQkAAGsAAAADCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQAAAAAAAAAAAQAAAAAAAAAJxAEAAAADGt3b3Rhd3ltaWFueQkAAGsAAAADCQAAZQAAAAIICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAUAAAAGb3BsYXRhAAAAAAAAAABkAAAAAAAAAAABAwkAAAAAAAACCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAdhc3NldElkAQAAACAJCQhzVKVOgFDqDmysbJV8OkcOJOmBXIL2KV5qFrGDzgMJAABmAAAAAgUAAAAMa3dvdGF3eW1pYW55CQAAZQAAAAIFAAAADmt3b3Rhcm93bm93YWdpBQAAAApiYWxhbnNVU0RUAwkAAGcAAAACBQAAAApiYWxhbnNVU0RUBQAAAA5rd290YXJvd25vd2FnaQQAAAAKbm93eXBvemlvbQkAAGQAAAACBQAAAAZwb3ppb20FAAAADGt3b3Rhd3ltaWFueQQAAAAHd3lwbGF0YQkBAAAACG1ub3plbmllAAAAAgUAAAAEYmF6YQkAAGUAAAACCQEAAAACbG4AAAABBQAAAApub3d5cG96aW9tCQEAAAACbG4AAAABBQAAAAZwb3ppb20JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyCQAAaQAAAAIFAAAAB3d5cGxhdGEAAAAAAAAAAGQBAAAAILcwEVDzAH5/KJhWA+xRAa417KPR+5S8mya0Jgcjq6dKCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAECAAAAIzNNcmVRV0NNQTN2aHppQ3E4eU1DZjlCZEJtSGNaR3JiVzRTBQAAAAZvcGxhdGEBAAAAIAkJCHNUpU6AUOoObKxslXw6Rw4k6YFcgvYpXmoWsYPOCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAZQb3ppb20FAAAACm5vd3lwb3ppb20JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB1d5cGxhdGEJAABrAAAAAwUAAAAHd3lwbGF0YQAAAAAAAAAAAQAAAAAAAAAAZAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHV2FydW5lawAAAAAAAAAAAQUAAAADbmlsBAAAAAZjemVzYzEJAABlAAAAAgUAAAAOa3dvdGFyb3dub3dhZ2kFAAAACmJhbGFuc1VTRFQEAAAACm5vd3lwb3ppb20JAABlAAAAAgkAAGQAAAACCQAAZAAAAAIFAAAACmJhbGFuc1VTRFQFAAAADGt3b3Rhd3ltaWFueQUAAAAEYmF6YQUAAAAOa3dvdGFyb3dub3dhZ2kEAAAAB3d5cGxhdGEJAABlAAAAAgkAAGQAAAACCQEAAAAIbW5vemVuaWUAAAACBQAAAARiYXphCQAAZQAAAAIJAQAAAAJsbgAAAAEFAAAACm5vd3lwb3ppb20JAQAAAAJsbgAAAAEFAAAABGJhemEFAAAABnBvemlvbQkBAAAACWR6aWVsZW5pZQAAAAIFAAAABnBvemlvbQkBAAAAA2V4cAAAAAEJAQAAAAlkemllbGVuaWUAAAACBQAAAAZjemVzYzEFAAAABGJhemEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyCQAAaQAAAAIFAAAAB3d5cGxhdGEAAAAAAAAAAGQBAAAAILcwEVDzAH5/KJhWA+xRAa417KPR+5S8mya0Jgcjq6dKCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAECAAAAIzNNcmVRV0NNQTN2aHppQ3E4eU1DZjlCZEJtSGNaR3JiVzRTBQAAAAZvcGxhdGEBAAAAIAkJCHNUpU6AUOoObKxslXw6Rw4k6YFcgvYpXmoWsYPOCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAdXeXBsYXRhCQAAawAAAAMFAAAAB3d5cGxhdGEAAAAAAAAAAAEAAAAAAAAAAGQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAABlBvemlvbQUAAAAKbm93eXBvemlvbQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHV2FydW5lawAAAAAAAAAAAgUAAAADbmlsBAAAAAd3eXBsYXRhCQAAZQAAAAIFAAAABnBvemlvbQkBAAAACWR6aWVsZW5pZQAAAAIFAAAABnBvemlvbQkBAAAAA2V4cAAAAAEJAQAAAAlkemllbGVuaWUAAAACBQAAAAxrd290YXd5bWlhbnkFAAAABGJhemEEAAAACm5vd3lwb3ppb20JAABlAAAAAgUAAAAGcG96aW9tBQAAAAd3eXBsYXRhCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgkAAGkAAAACBQAAAAd3eXBsYXRhAAAAAAAAAABkAQAAACC3MBFQ8wB+fyiYVgPsUQGuNeyj0fuUvJsmtCYHI6unSgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABAgAAACMzTXJlUVdDTUEzdmh6aUNxOHlNQ2Y5QmRCbUhjWkdyYlc0UwUAAAAGb3BsYXRhAQAAACAJCQhzVKVOgFDqDmysbJV8OkcOJOmBXIL2KV5qFrGDzgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHV3lwbGF0YQkAAGsAAAADBQAAAAd3eXBsYXRhAAAAAAAAAAABAAAAAAAAAABkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAZQb3ppb20FAAAACm5vd3lwb3ppb20JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB1dhcnVuZWsAAAAAAAAAAAMFAAAAA25pbAMJAAAAAAAAAggJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAHYXNzZXRJZAEAAAAgtzARUPMAfn8omFYD7FEBrjXso9H7lLybJrQmByOrp0oDCQAAZgAAAAIFAAAADGt3b3Rhd3ltaWFueQkAAGUAAAACBQAAAA5rd290YXJvd25vd2FnaQUAAAAKYmFsYW5zVVNETgMJAABnAAAAAgUAAAAKYmFsYW5zVVNETgUAAAAOa3dvdGFyb3dub3dhZ2kEAAAACm5vd3lwb3ppb20JAABkAAAAAgUAAAAGcG96aW9tBQAAAAxrd290YXd5bWlhbnkEAAAAB3d5cGxhdGEJAQAAAAhtbm96ZW5pZQAAAAIFAAAABGJhemEJAABlAAAAAgkBAAAAAmxuAAAAAQUAAAAKbm93eXBvemlvbQkBAAAAAmxuAAAAAQUAAAAGcG96aW9tCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgkAAGkAAAACBQAAAAd3eXBsYXRhAAAAAAAAAABkAQAAACAJCQhzVKVOgFDqDmysbJV8OkcOJOmBXIL2KV5qFrGDzgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABAgAAACMzTXJlUVdDTUEzdmh6aUNxOHlNQ2Y5QmRCbUhjWkdyYlc0UwUAAAAGb3BsYXRhAQAAACC3MBFQ8wB+fyiYVgPsUQGuNeyj0fuUvJsmtCYHI6unSgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAGUG96aW9tBQAAAApub3d5cG96aW9tCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAdXeXBsYXRhCQAAawAAAAMFAAAAB3d5cGxhdGEAAAAAAAAAAAEAAAAAAAAAAGQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB1dhcnVuZWsAAAAAAAAAAAsFAAAAA25pbAQAAAAGY3plc2MxCQAAZQAAAAIFAAAADmt3b3Rhcm93bm93YWdpBQAAAApiYWxhbnNVU0ROBAAAAApub3d5cG96aW9tCQAAZQAAAAIJAABkAAAAAgkAAGQAAAACBQAAAApiYWxhbnNVU0ROBQAAAAxrd290YXd5bWlhbnkFAAAABGJhemEFAAAADmt3b3Rhcm93bm93YWdpBAAAAAd3eXBsYXRhCQAAZQAAAAIJAABkAAAAAgkBAAAACG1ub3plbmllAAAAAgUAAAAEYmF6YQkAAGUAAAACCQEAAAACbG4AAAABBQAAAApub3d5cG96aW9tCQEAAAACbG4AAAABBQAAAARiYXphBQAAAAZwb3ppb20JAQAAAAlkemllbGVuaWUAAAACBQAAAAZwb3ppb20JAQAAAANleHAAAAABCQEAAAAJZHppZWxlbmllAAAAAgUAAAAGY3plc2MxBQAAAARiYXphCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgkAAGkAAAACBQAAAAd3eXBsYXRhAAAAAAAAAABkAQAAACAJCQhzVKVOgFDqDmysbJV8OkcOJOmBXIL2KV5qFrGDzgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABAgAAACMzTXJlUVdDTUEzdmh6aUNxOHlNQ2Y5QmRCbUhjWkdyYlc0UwUAAAAGb3BsYXRhAQAAACC3MBFQ8wB+fyiYVgPsUQGuNeyj0fuUvJsmtCYHI6unSgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHV3lwbGF0YQkAAGsAAAADBQAAAAd3eXBsYXRhAAAAAAAAAAABAAAAAAAAAABkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAZQb3ppb20FAAAACm5vd3lwb3ppb20JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB1dhcnVuZWsAAAAAAAAAABUFAAAAA25pbAQAAAAHd3lwbGF0YQkAAGUAAAACBQAAAAZwb3ppb20JAQAAAAlkemllbGVuaWUAAAACBQAAAAZwb3ppb20JAQAAAANleHAAAAABCQEAAAAJZHppZWxlbmllAAAAAgUAAAAMa3dvdGF3eW1pYW55BQAAAARiYXphBAAAAApub3d5cG96aW9tCQAAZQAAAAIFAAAABnBvemlvbQUAAAAHd3lwbGF0YQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIJAABpAAAAAgUAAAAHd3lwbGF0YQAAAAAAAAAAZAEAAAAgCQkIc1SlToBQ6g5srGyVfDpHDiTpgVyC9ileahaxg84JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQIAAAAjM01yZVFXQ01BM3ZoemlDcTh5TUNmOUJkQm1IY1pHcmJXNFMFAAAABm9wbGF0YQEAAAAgtzARUPMAfn8omFYD7FEBrjXso9H7lLybJrQmByOrp0oJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB1d5cGxhdGEJAABrAAAAAwUAAAAHd3lwbGF0YQAAAAAAAAAAAQAAAAAAAAAAZAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAGUG96aW9tBQAAAApub3d5cG96aW9tCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAdXYXJ1bmVrAAAAAAAAAAAfBQAAAANuaWwJAAACAAAAAQIAAAAVTmllb2JzxYJ1Z2l3YW55IGFzc2V0AAAAAWkBAAAADVdMYW1iZXJ0dmFsdWUAAAABAAAAAXgEAAAABXd5bmlrCQEAAAAIV0xhbWJlcnQAAAABBQAAAAF4CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAA1XTGFtYmVydHZhbHVlBQAAAAV3eW5pawUAAAADbmlsAAAAAP/ypvM=", "height": 1374871, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 4aYgWQT5kmFfPKhrwCurEHdnAkJ7wUYknTv5dceiDpsz Next: FaxL65iYQFRRXoPWwxSnAfbZneVRPZD8Uru1fns1Dh16 Diff:
OldNewDifferences
2525 func dzielenie (x,y) = fraction(x, 100000000, y)
2626
2727
28-func WLambert (x) = dzielenie(x, exp(dzielenie(x, exp(x))))
28+func WLambert (x) = dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(x))))))))))))))))))))))))))))))))))))))))))
2929
3030
3131 @Callable(i)
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 4 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let e = 271828182
55
66 let kwotarownowagi = 10000000000000
77
88 let baza = (kwotarownowagi * 18)
99
1010 let poziom = getIntegerValue(this, "Poziom")
1111
1212 let balansUSDN = (assetBalance(this, base58'DL67xXsNV42GiRUY1XMTXNyLCs42gnEL8jizPLBbrb8d') * 100)
1313
1414 let balansUSDT = (assetBalance(this, base58'cGfAv1s7NxGWL913wR2Lp9yFSY7DrkWip6YPQGJGc6y') * 100)
1515
1616 func ln (x) = log(x, 8, e, 8, 8, DOWN)
1717
1818
1919 func exp (x) = pow(e, 8, x, 8, 8, DOWN)
2020
2121
2222 func mnozenie (x,y) = fraction(x, y, 100000000)
2323
2424
2525 func dzielenie (x,y) = fraction(x, 100000000, y)
2626
2727
28-func WLambert (x) = dzielenie(x, exp(dzielenie(x, exp(x))))
28+func WLambert (x) = dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(dzielenie(x, exp(x))))))))))))))))))))))))))))))))))))))))))
2929
3030
3131 @Callable(i)
3232 func USDTnaUSDNnaUSDT () = {
3333 let oplata = fraction(i.payments[0].amount, 4, 10000)
3434 let kwotawymiany = fraction((i.payments[0].amount - oplata), 100, 1)
3535 if ((i.payments[0].assetId == base58'cGfAv1s7NxGWL913wR2Lp9yFSY7DrkWip6YPQGJGc6y'))
3636 then if ((kwotawymiany > (kwotarownowagi - balansUSDT)))
3737 then if ((balansUSDT >= kwotarownowagi))
3838 then {
3939 let nowypoziom = (poziom + kwotawymiany)
4040 let wyplata = mnozenie(baza, (ln(nowypoziom) - ln(poziom)))
4141 [ScriptTransfer(i.caller, (wyplata / 100), base58'DL67xXsNV42GiRUY1XMTXNyLCs42gnEL8jizPLBbrb8d'), ScriptTransfer(addressFromStringValue("3MreQWCMA3vhziCq8yMCf9BdBmHcZGrbW4S"), oplata, base58'cGfAv1s7NxGWL913wR2Lp9yFSY7DrkWip6YPQGJGc6y'), IntegerEntry("Poziom", nowypoziom), IntegerEntry("Wyplata", fraction(wyplata, 1, 100)), IntegerEntry("Warunek", 1)]
4242 }
4343 else {
4444 let czesc1 = (kwotarownowagi - balansUSDT)
4545 let nowypoziom = (((balansUSDT + kwotawymiany) + baza) - kwotarownowagi)
4646 let wyplata = ((mnozenie(baza, (ln(nowypoziom) - ln(baza))) + poziom) - dzielenie(poziom, exp(dzielenie(czesc1, baza))))
4747 [ScriptTransfer(i.caller, (wyplata / 100), base58'DL67xXsNV42GiRUY1XMTXNyLCs42gnEL8jizPLBbrb8d'), ScriptTransfer(addressFromStringValue("3MreQWCMA3vhziCq8yMCf9BdBmHcZGrbW4S"), oplata, base58'cGfAv1s7NxGWL913wR2Lp9yFSY7DrkWip6YPQGJGc6y'), IntegerEntry("Wyplata", fraction(wyplata, 1, 100)), IntegerEntry("Poziom", nowypoziom), IntegerEntry("Warunek", 2)]
4848 }
4949 else {
5050 let wyplata = (poziom - dzielenie(poziom, exp(dzielenie(kwotawymiany, baza))))
5151 let nowypoziom = (poziom - wyplata)
5252 [ScriptTransfer(i.caller, (wyplata / 100), base58'DL67xXsNV42GiRUY1XMTXNyLCs42gnEL8jizPLBbrb8d'), ScriptTransfer(addressFromStringValue("3MreQWCMA3vhziCq8yMCf9BdBmHcZGrbW4S"), oplata, base58'cGfAv1s7NxGWL913wR2Lp9yFSY7DrkWip6YPQGJGc6y'), IntegerEntry("Wyplata", fraction(wyplata, 1, 100)), IntegerEntry("Poziom", nowypoziom), IntegerEntry("Warunek", 3)]
5353 }
5454 else if ((i.payments[0].assetId == base58'DL67xXsNV42GiRUY1XMTXNyLCs42gnEL8jizPLBbrb8d'))
5555 then if ((kwotawymiany > (kwotarownowagi - balansUSDN)))
5656 then if ((balansUSDN >= kwotarownowagi))
5757 then {
5858 let nowypoziom = (poziom + kwotawymiany)
5959 let wyplata = mnozenie(baza, (ln(nowypoziom) - ln(poziom)))
6060 [ScriptTransfer(i.caller, (wyplata / 100), base58'cGfAv1s7NxGWL913wR2Lp9yFSY7DrkWip6YPQGJGc6y'), ScriptTransfer(addressFromStringValue("3MreQWCMA3vhziCq8yMCf9BdBmHcZGrbW4S"), oplata, base58'DL67xXsNV42GiRUY1XMTXNyLCs42gnEL8jizPLBbrb8d'), IntegerEntry("Poziom", nowypoziom), IntegerEntry("Wyplata", fraction(wyplata, 1, 100)), IntegerEntry("Warunek", 11)]
6161 }
6262 else {
6363 let czesc1 = (kwotarownowagi - balansUSDN)
6464 let nowypoziom = (((balansUSDN + kwotawymiany) + baza) - kwotarownowagi)
6565 let wyplata = ((mnozenie(baza, (ln(nowypoziom) - ln(baza))) + poziom) - dzielenie(poziom, exp(dzielenie(czesc1, baza))))
6666 [ScriptTransfer(i.caller, (wyplata / 100), base58'cGfAv1s7NxGWL913wR2Lp9yFSY7DrkWip6YPQGJGc6y'), ScriptTransfer(addressFromStringValue("3MreQWCMA3vhziCq8yMCf9BdBmHcZGrbW4S"), oplata, base58'DL67xXsNV42GiRUY1XMTXNyLCs42gnEL8jizPLBbrb8d'), IntegerEntry("Wyplata", fraction(wyplata, 1, 100)), IntegerEntry("Poziom", nowypoziom), IntegerEntry("Warunek", 21)]
6767 }
6868 else {
6969 let wyplata = (poziom - dzielenie(poziom, exp(dzielenie(kwotawymiany, baza))))
7070 let nowypoziom = (poziom - wyplata)
7171 [ScriptTransfer(i.caller, (wyplata / 100), base58'cGfAv1s7NxGWL913wR2Lp9yFSY7DrkWip6YPQGJGc6y'), ScriptTransfer(addressFromStringValue("3MreQWCMA3vhziCq8yMCf9BdBmHcZGrbW4S"), oplata, base58'DL67xXsNV42GiRUY1XMTXNyLCs42gnEL8jizPLBbrb8d'), IntegerEntry("Wyplata", fraction(wyplata, 1, 100)), IntegerEntry("Poziom", nowypoziom), IntegerEntry("Warunek", 31)]
7272 }
7373 else throw("Nieobsługiwany asset")
7474 }
7575
7676
7777
7878 @Callable(i)
7979 func WLambertvalue (x) = {
8080 let wynik = WLambert(x)
8181 [IntegerEntry("WLambertvalue", wynik)]
8282 }
8383
8484

github/deemru/w8io/026f985 
35.91 ms