w8 · tx · 7t6···byT

tx · 7t6KrGz6TKWzhYxi1uiZHJrYFcwSdad1KKAHsZaxjbyT

3N69YR9dGN9tJnhxGrURt5cQycjAN1zbQ9t:  -0.05000000 Waves

2021.02.01 02:43 [1378344] smart account 3N69YR9dGN9tJnhxGrURt5cQycjAN1zbQ9t > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7t6KrGz6TKWzhYxi1uiZHJrYFcwSdad1KKAHsZaxjbyT",
    "fee": 5000000,
    "feeAssetId": null,
    "timestamp": 1612136635966,
    "version": 2,
    "chainId": 84,
    "sender": "3N69YR9dGN9tJnhxGrURt5cQycjAN1zbQ9t",
    "senderPublicKey": "Bo16mjUNTGCeZDYvQc6gHh46P21B3DqYCHoDt9CyzxHf",
    "proofs": [
        "3kEA8sDBU34aHGkUmQyLNVgCCVVMhzkTeLJ1eASoJdysk8yMRMxbpYQZjCVzRc6MkgtQ4QeapeCwj5emnYgfsEDs"
    ],
    "script": "base64:AAIEAAAAAAAAAAkIAhIAEgMKAQEAAAAOAAAAAAFlAAAAAAAQM8TWAAAAAA5rd290YXJvd25vd2FnaQAAAAkYTnKgAAAAAAAEYmF6YQkAAGgAAAACBQAAAA5rd290YXJvd25vd2FnaQAAAAAAAAAAEgAAAAAHZW5hYmxlZAkABBoAAAACBQAAAAR0aGlzAgAAAAdlbmFibGVkAAAAAAZwb3ppb20JAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAABlBvemlvbQAAAAAKYmFsYW5zVVNETgkAAGgAAAACCQAD8AAAAAIFAAAABHRoaXMBAAAAILcwEVDzAH5/KJhWA+xRAa417KPR+5S8mya0Jgcjq6dKAAAAAAAAAABkAAAAAApiYWxhbnNVU0RUCQAAaAAAAAIJAAPwAAAAAgUAAAAEdGhpcwEAAAAgCQkIc1SlToBQ6g5srGyVfDpHDiTpgVyC9ileahaxg84AAAAAAAAAAGQBAAAAAmxuAAAAAQAAAAF4CQAAbQAAAAYFAAAAAXgAAAAAAAAAAAgFAAAAAWUAAAAAAAAAAAgAAAAAAAAAAAgFAAAABERPV04BAAAAA2V4cAAAAAEAAAABeAkAAGwAAAAGBQAAAAFlAAAAAAAAAAAIBQAAAAF4AAAAAAAAAAAIAAAAAAAAAAAIBQAAAARET1dOAQAAAAhtbm96ZW5pZQAAAAIAAAABeAAAAAF5CQAAawAAAAMFAAAAAXgFAAAAAXkAAAAAAAX14QABAAAACWR6aWVsZW5pZQAAAAIAAAABeAAAAAF5CQAAawAAAAMFAAAAAXgAAAAAAAX14QAFAAAAAXkBAAAABkhhbGxleQAAAAIAAAABeAAAAAF3BAAAAAZ3VGltZXMJAABlAAAAAgkBAAAACG1ub3plbmllAAAAAgUAAAABdwkBAAAAA2V4cAAAAAEFAAAAAXcFAAAAAXgEAAAADXdQbHVzT25lVGltZXMJAQAAAAhtbm96ZW5pZQAAAAIJAABkAAAAAgUAAAABdwAAAAAABfXhAAkBAAAAA2V4cAAAAAEFAAAAAXcDCQEAAAACIT0AAAACBQAAAAZ3VGltZXMAAAAAAAAAAAAJAABlAAAAAgUAAAABdwkBAAAACWR6aWVsZW5pZQAAAAIFAAAABndUaW1lcwkAAGUAAAACBQAAAA13UGx1c09uZVRpbWVzCQEAAAAJZHppZWxlbmllAAAAAgkBAAAACG1ub3plbmllAAAAAgkAAGQAAAACBQAAAAF3AAAAAAAL68IABQAAAAZ3VGltZXMJAABkAAAAAgkAAGgAAAACAAAAAAAAAAACBQAAAAF3AAAAAAAL68IABQAAAAF3AQAAABFjb250aW51ZWRmcmFjdGlvbgAAAAEAAAABeAkBAAAACWR6aWVsZW5pZQAAAAIFAAAAAXgJAABkAAAAAgAAAAAABfXhAAkBAAAACWR6aWVsZW5pZQAAAAIFAAAAAXgJAABkAAAAAgAAAAAABfXhAAkBAAAACWR6aWVsZW5pZQAAAAIFAAAAAXgJAABkAAAAAgAAAAAAC+vCAAkBAAAACWR6aWVsZW5pZQAAAAIJAABoAAAAAgUAAAABeAAAAAAAAAAABQkAAGQAAAACAAAAAAAR4aMACQEAAAAJZHppZWxlbmllAAAAAgkAAGgAAAACBQAAAAF4AAAAAAAAAAARCQAAZAAAAAIAAAAAADuaygAJAQAAAAlkemllbGVuaWUAAAACCQAAaAAAAAIFAAAAAXgAAAAAAAAAAIUJAABkAAAAAgAAAAAAZVPxAAkBAAAACWR6aWVsZW5pZQAAAAIJAABoAAAAAgUAAAABeAAAAAAAAAAHhwkAAGQAAAACAAAAAABxP7MACQEAAAAJZHppZWxlbmllAAAAAgkAAGgAAAACBQAAAAF4AAAAAAAAz0F3AAAACJZ07/cAAQAAAAlMYW1iZXJ0VzAAAAABAAAAAXgJAQAAAAZIYWxsZXkAAAACBQAAAAF4CQEAAAARY29udGludWVkZnJhY3Rpb24AAAABBQAAAAF4AAAAAgAAAAFpAQAAABBVU0RUbmFVU0RObmFVU0RUAAAAAAQAAAAGb3BsYXRhCQAAawAAAAMICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAAAAAAAAAAABAAAAAAAAAAnEAQAAAAMa3dvdGF3eW1pYW55CQAAawAAAAMJAABlAAAAAggJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50BQAAAAZvcGxhdGEAAAAAAAAAAGQAAAAAAAAAAAEDCQAAAAAAAAIFAAAAB2VuYWJsZWQAAAAAAAAAAAEDCQAAAAAAAAIICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQBAAAAIAkJCHNUpU6AUOoObKxslXw6Rw4k6YFcgvYpXmoWsYPOAwkAAGYAAAACBQAAAAxrd290YXd5bWlhbnkJAABlAAAAAgUAAAAOa3dvdGFyb3dub3dhZ2kFAAAACmJhbGFuc1VTRFQDCQAAZwAAAAIFAAAACmJhbGFuc1VTRFQFAAAADmt3b3Rhcm93bm93YWdpBAAAAApub3d5cG96aW9tCQAAZAAAAAIFAAAABnBvemlvbQUAAAAMa3dvdGF3eW1pYW55BAAAAAd3eXBsYXRhCQEAAAAIbW5vemVuaWUAAAACBQAAAARiYXphCQAAZQAAAAIJAQAAAAJsbgAAAAEFAAAACm5vd3lwb3ppb20JAQAAAAJsbgAAAAEFAAAABnBvemlvbQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIJAABpAAAAAgUAAAAHd3lwbGF0YQAAAAAAAAAAZAEAAAAgtzARUPMAfn8omFYD7FEBrjXso9H7lLybJrQmByOrp0oJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQIAAAAjM01yZVFXQ01BM3ZoemlDcTh5TUNmOUJkQm1IY1pHcmJXNFMFAAAABm9wbGF0YQEAAAAgCQkIc1SlToBQ6g5srGyVfDpHDiTpgVyC9ileahaxg84JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAABlBvemlvbQUAAAAKbm93eXBvemlvbQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHV3lwbGF0YQkAAGsAAAADBQAAAAd3eXBsYXRhAAAAAAAAAAABAAAAAAAAAABkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAdXYXJ1bmVrAAAAAAAAAAABBQAAAANuaWwEAAAABmN6ZXNjMQkAAGUAAAACBQAAAA5rd290YXJvd25vd2FnaQUAAAAKYmFsYW5zVVNEVAQAAAAKbm93eXBvemlvbQkAAGUAAAACCQAAZAAAAAIJAABkAAAAAgUAAAAKYmFsYW5zVVNEVAUAAAAMa3dvdGF3eW1pYW55BQAAAARiYXphBQAAAA5rd290YXJvd25vd2FnaQQAAAAHd3lwbGF0YQkAAGUAAAACCQAAZAAAAAIJAQAAAAhtbm96ZW5pZQAAAAIFAAAABGJhemEJAABlAAAAAgkBAAAAAmxuAAAAAQUAAAAKbm93eXBvemlvbQkBAAAAAmxuAAAAAQUAAAAEYmF6YQUAAAAGcG96aW9tCQEAAAAJZHppZWxlbmllAAAAAgUAAAAGcG96aW9tCQEAAAADZXhwAAAAAQkBAAAACWR6aWVsZW5pZQAAAAIFAAAABmN6ZXNjMQUAAAAEYmF6YQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIJAABpAAAAAgUAAAAHd3lwbGF0YQAAAAAAAAAAZAEAAAAgtzARUPMAfn8omFYD7FEBrjXso9H7lLybJrQmByOrp0oJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQIAAAAjM01yZVFXQ01BM3ZoemlDcTh5TUNmOUJkQm1IY1pHcmJXNFMFAAAABm9wbGF0YQEAAAAgCQkIc1SlToBQ6g5srGyVfDpHDiTpgVyC9ileahaxg84JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB1d5cGxhdGEJAABrAAAAAwUAAAAHd3lwbGF0YQAAAAAAAAAAAQAAAAAAAAAAZAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAGUG96aW9tBQAAAApub3d5cG96aW9tCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAdXYXJ1bmVrAAAAAAAAAAACBQAAAANuaWwEAAAAB3d5cGxhdGEJAABlAAAAAgUAAAAGcG96aW9tCQEAAAAJZHppZWxlbmllAAAAAgUAAAAGcG96aW9tCQEAAAADZXhwAAAAAQkBAAAACWR6aWVsZW5pZQAAAAIFAAAADGt3b3Rhd3ltaWFueQUAAAAEYmF6YQQAAAAKbm93eXBvemlvbQkAAGUAAAACBQAAAAZwb3ppb20FAAAAB3d5cGxhdGEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyCQAAaQAAAAIFAAAAB3d5cGxhdGEAAAAAAAAAAGQBAAAAILcwEVDzAH5/KJhWA+xRAa417KPR+5S8mya0Jgcjq6dKCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAECAAAAIzNNcmVRV0NNQTN2aHppQ3E4eU1DZjlCZEJtSGNaR3JiVzRTBQAAAAZvcGxhdGEBAAAAIAkJCHNUpU6AUOoObKxslXw6Rw4k6YFcgvYpXmoWsYPOCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAdXeXBsYXRhCQAAawAAAAMFAAAAB3d5cGxhdGEAAAAAAAAAAAEAAAAAAAAAAGQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAABlBvemlvbQUAAAAKbm93eXBvemlvbQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHV2FydW5lawAAAAAAAAAAAwUAAAADbmlsAwkAAAAAAAACCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAdhc3NldElkAQAAACC3MBFQ8wB+fyiYVgPsUQGuNeyj0fuUvJsmtCYHI6unSgMJAABmAAAAAgUAAAAMa3dvdGF3eW1pYW55CQAAZQAAAAIFAAAADmt3b3Rhcm93bm93YWdpBQAAAApiYWxhbnNVU0ROAwkAAGcAAAACBQAAAApiYWxhbnNVU0ROBQAAAA5rd290YXJvd25vd2FnaQQAAAAKbm93eXBvemlvbQkAAGQAAAACBQAAAAZwb3ppb20FAAAADGt3b3Rhd3ltaWFueQQAAAAHd3lwbGF0YQkBAAAACG1ub3plbmllAAAAAgUAAAAEYmF6YQkAAGUAAAACCQEAAAACbG4AAAABBQAAAApub3d5cG96aW9tCQEAAAACbG4AAAABBQAAAAZwb3ppb20JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyCQAAaQAAAAIFAAAAB3d5cGxhdGEAAAAAAAAAAGQBAAAAIAkJCHNUpU6AUOoObKxslXw6Rw4k6YFcgvYpXmoWsYPOCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAECAAAAIzNNcmVRV0NNQTN2aHppQ3E4eU1DZjlCZEJtSGNaR3JiVzRTBQAAAAZvcGxhdGEBAAAAILcwEVDzAH5/KJhWA+xRAa417KPR+5S8mya0Jgcjq6dKCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAZQb3ppb20FAAAACm5vd3lwb3ppb20JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB1d5cGxhdGEJAABrAAAAAwUAAAAHd3lwbGF0YQAAAAAAAAAAAQAAAAAAAAAAZAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHV2FydW5lawAAAAAAAAAACwUAAAADbmlsBAAAAAZjemVzYzEJAABlAAAAAgUAAAAOa3dvdGFyb3dub3dhZ2kFAAAACmJhbGFuc1VTRE4EAAAACm5vd3lwb3ppb20JAABlAAAAAgkAAGQAAAACCQAAZAAAAAIFAAAACmJhbGFuc1VTRE4FAAAADGt3b3Rhd3ltaWFueQUAAAAEYmF6YQUAAAAOa3dvdGFyb3dub3dhZ2kEAAAAB3d5cGxhdGEJAABlAAAAAgkAAGQAAAACCQEAAAAIbW5vemVuaWUAAAACBQAAAARiYXphCQAAZQAAAAIJAQAAAAJsbgAAAAEFAAAACm5vd3lwb3ppb20JAQAAAAJsbgAAAAEFAAAABGJhemEFAAAABnBvemlvbQkBAAAACWR6aWVsZW5pZQAAAAIFAAAABnBvemlvbQkBAAAAA2V4cAAAAAEJAQAAAAlkemllbGVuaWUAAAACBQAAAAZjemVzYzEFAAAABGJhemEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyCQAAaQAAAAIFAAAAB3d5cGxhdGEAAAAAAAAAAGQBAAAAIAkJCHNUpU6AUOoObKxslXw6Rw4k6YFcgvYpXmoWsYPOCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAECAAAAIzNNcmVRV0NNQTN2aHppQ3E4eU1DZjlCZEJtSGNaR3JiVzRTBQAAAAZvcGxhdGEBAAAAILcwEVDzAH5/KJhWA+xRAa417KPR+5S8mya0Jgcjq6dKCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAdXeXBsYXRhCQAAawAAAAMFAAAAB3d5cGxhdGEAAAAAAAAAAAEAAAAAAAAAAGQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAABlBvemlvbQUAAAAKbm93eXBvemlvbQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHV2FydW5lawAAAAAAAAAAFQUAAAADbmlsBAAAAAd3eXBsYXRhCQAAZQAAAAIFAAAABnBvemlvbQkBAAAACWR6aWVsZW5pZQAAAAIFAAAABnBvemlvbQkBAAAAA2V4cAAAAAEJAQAAAAlkemllbGVuaWUAAAACBQAAAAxrd290YXd5bWlhbnkFAAAABGJhemEEAAAACm5vd3lwb3ppb20JAABlAAAAAgUAAAAGcG96aW9tBQAAAAd3eXBsYXRhCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgkAAGkAAAACBQAAAAd3eXBsYXRhAAAAAAAAAABkAQAAACAJCQhzVKVOgFDqDmysbJV8OkcOJOmBXIL2KV5qFrGDzgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABAgAAACMzTXJlUVdDTUEzdmh6aUNxOHlNQ2Y5QmRCbUhjWkdyYlc0UwUAAAAGb3BsYXRhAQAAACC3MBFQ8wB+fyiYVgPsUQGuNeyj0fuUvJsmtCYHI6unSgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHV3lwbGF0YQkAAGsAAAADBQAAAAd3eXBsYXRhAAAAAAAAAAABAAAAAAAAAABkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAZQb3ppb20FAAAACm5vd3lwb3ppb20JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB1dhcnVuZWsAAAAAAAAAAB8FAAAAA25pbAkAAAIAAAABAgAAABVOaWVvYnPFgnVnaXdhbnkgYXNzZXQJAAACAAAAAQIAAAAfS29udHJha3QgdHltY3phc293byB3ecWCxIVjem9ueQAAAAFpAQAAAA5Jbndlc3R5Y2phVVNETgAAAAEAAAAGd3BsYXRhAwkAAGYAAAACCQAAZAAAAAIFAAAACmJhbGFuc1VTRE4FAAAABndwbGF0YQUAAAAKYmFsYW5zVVNEVAQAAAACYjEFAAAACmJhbGFuc1VTRFQEAAAAAmIyCQAAZAAAAAIFAAAACmJhbGFuc1VTRE4FAAAABndwbGF0YQQAAAABYQkBAAAACG1ub3plbmllAAAAAgkBAAAACWR6aWVsZW5pZQAAAAIFAAAAAmIxBQAAAAJiMgkBAAAAA2V4cAAAAAEJAQAAAAlkemllbGVuaWUAAAACCQAAZAAAAAIFAAAAAmIyCQAAaAAAAAIAAAAAAAAAABEFAAAAAmIxCQAAaAAAAAIAAAAAAAAAABIFAAAAAmIyBAAAAAJXMAkBAAAACUxhbWJlcnRXMAAAAAEFAAAAAWEEAAAACG5vd2FiYXphCQEAAAAJZHppZWxlbmllAAAAAgkBAAAACG1ub3plbmllAAAAAgkAAGgAAAACAAAAAAAAAAAJBQAAAAJiMQUAAAACYjIJAABlAAAAAgkBAAAACG1ub3plbmllAAAAAgkAAGgAAAACBQAAAAJXMAAAAAAAAAAACQUAAAACYjIJAQAAAAlkemllbGVuaWUAAAACCQAAaAAAAAIAAAAAAAAAABEFAAAAAmIxAAAAAAAL68IABAAAAAd3eXBsYXRhCQAAaQAAAAIJAABlAAAAAgUAAAAIbm93YWJhemEFAAAABGJhemEAAAAAAAAAAAkJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAADVdMYW1iZXJ0dmFsdWUFAAAACG5vd2FiYXphBQAAAANuaWwEAAAAAmIyBQAAAApiYWxhbnNVU0RUBAAAAAJiMQkAAGQAAAACBQAAAApiYWxhbnNVU0ROBQAAAAZ3cGxhdGEEAAAAAWEJAQAAAAhtbm96ZW5pZQAAAAIJAQAAAAlkemllbGVuaWUAAAACBQAAAAJiMQUAAAACYjIJAQAAAANleHAAAAABCQEAAAAJZHppZWxlbmllAAAAAgkAAGQAAAACBQAAAAJiMgkAAGgAAAACAAAAAAAAAAARBQAAAAJiMQkAAGgAAAACAAAAAAAAAAASBQAAAAJiMgQAAAACVzAJAQAAAAlMYW1iZXJ0VzAAAAABBQAAAAFhBAAAAAhub3dhYmF6YQkBAAAACWR6aWVsZW5pZQAAAAIJAQAAAAhtbm96ZW5pZQAAAAIJAABoAAAAAgAAAAAAAAAACQUAAAACYjEFAAAAAmIyCQAAZQAAAAIJAQAAAAhtbm96ZW5pZQAAAAIJAABoAAAAAgUAAAACVzAAAAAAAAAAAAkFAAAAAmIyCQEAAAAJZHppZWxlbmllAAAAAgkAAGgAAAACAAAAAAAAAAARBQAAAAJiMQAAAAAAC+vCAAQAAAAHd3lwbGF0YQkAAGkAAAACCQAAZQAAAAIFAAAACG5vd2FiYXphBQAAAARiYXphAAAAAAAAAAAJCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAA1XTGFtYmVydHZhbHVlBQAAAAd3eXBsYXRhBQAAAANuaWwAAAAASNkIGw==",
    "height": 1378344,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 9n8NuNxztfSvQFBTg7DCdhNBbg5dA2EujQgZqkQ7CwLg
Next: H6yY6akjzihb56sjphQij7nn8pYvMcPrnnGmfDFaseqK

Diff: 
Old New Differences
92 92  
93 93  
94 94  @Callable(i)
95 - func InwestycjaUSDN (wplata) = if ((balansUSDT > (balansUSDN + wplata)))
95 + func InwestycjaUSDN (wplata) = if (((balansUSDN + wplata) > balansUSDT))
96 96      then {
97 97          let b1 = balansUSDT
98 98          let b2 = (balansUSDN + wplata)
100 100          let W0 = LambertW0(a)
101 101          let nowabaza = dzielenie(mnozenie((9 * b1), b2), (mnozenie((W0 * 9), b2) - dzielenie((17 * b1), 200000000)))
102 102          let wyplata = ((nowabaza - baza) / 9)
103 - [IntegerEntry("WLambertvalue", (wyplata / 100))]
103 + [IntegerEntry("WLambertvalue", nowabaza)]
104 104          }
105 105      else {
106 106          let b2 = balansUSDT
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 4 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let e = 271828182
5 5  
6 6  let kwotarownowagi = 10000000000000
7 7  
8 8  let baza = (kwotarownowagi * 18)
9 9  
10 10  let enabled = getInteger(this, "enabled")
11 11  
12 12  let poziom = getIntegerValue(this, "Poziom")
13 13  
14 14  let balansUSDN = (assetBalance(this, base58'DL67xXsNV42GiRUY1XMTXNyLCs42gnEL8jizPLBbrb8d') * 100)
15 15  
16 16  let balansUSDT = (assetBalance(this, base58'cGfAv1s7NxGWL913wR2Lp9yFSY7DrkWip6YPQGJGc6y') * 100)
17 17  
18 18  func ln (x) = log(x, 8, e, 8, 8, DOWN)
19 19  
20 20  
21 21  func exp (x) = pow(e, 8, x, 8, 8, DOWN)
22 22  
23 23  
24 24  func mnozenie (x,y) = fraction(x, y, 100000000)
25 25  
26 26  
27 27  func dzielenie (x,y) = fraction(x, 100000000, y)
28 28  
29 29  
30 30  func Halley (x,w) = {
31 31      let wTimes = (mnozenie(w, exp(w)) - x)
32 32      let wPlusOneTimes = mnozenie((w + 100000000), exp(w))
33 33      if ((wTimes != 0))
34 34          then (w - dzielenie(wTimes, (wPlusOneTimes - dzielenie(mnozenie((w + 200000000), wTimes), ((2 * w) + 200000000)))))
35 35          else w
36 36      }
37 37  
38 38  
39 39  func continuedfraction (x) = dzielenie(x, (100000000 + dzielenie(x, (100000000 + dzielenie(x, (200000000 + dzielenie((x * 5), (300000000 + dzielenie((x * 17), (1000000000 + dzielenie((x * 133), (1700000000 + dzielenie((x * 1927), (1900000000 + dzielenie((x * 13582711), 9442300000000)))))))))))))))
40 40  
41 41  
42 42  func LambertW0 (x) = Halley(x, continuedfraction(x))
43 43  
44 44  
45 45  @Callable(i)
46 46  func USDTnaUSDNnaUSDT () = {
47 47      let oplata = fraction(i.payments[0].amount, 4, 10000)
48 48      let kwotawymiany = fraction((i.payments[0].amount - oplata), 100, 1)
49 49      if ((enabled == 1))
50 50          then if ((i.payments[0].assetId == base58'cGfAv1s7NxGWL913wR2Lp9yFSY7DrkWip6YPQGJGc6y'))
51 51              then if ((kwotawymiany > (kwotarownowagi - balansUSDT)))
52 52                  then if ((balansUSDT >= kwotarownowagi))
53 53                      then {
54 54                          let nowypoziom = (poziom + kwotawymiany)
55 55                          let wyplata = mnozenie(baza, (ln(nowypoziom) - ln(poziom)))
56 56  [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)]
57 57                          }
58 58                      else {
59 59                          let czesc1 = (kwotarownowagi - balansUSDT)
60 60                          let nowypoziom = (((balansUSDT + kwotawymiany) + baza) - kwotarownowagi)
61 61                          let wyplata = ((mnozenie(baza, (ln(nowypoziom) - ln(baza))) + poziom) - dzielenie(poziom, exp(dzielenie(czesc1, baza))))
62 62  [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)]
63 63                          }
64 64                  else {
65 65                      let wyplata = (poziom - dzielenie(poziom, exp(dzielenie(kwotawymiany, baza))))
66 66                      let nowypoziom = (poziom - wyplata)
67 67  [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)]
68 68                      }
69 69              else if ((i.payments[0].assetId == base58'DL67xXsNV42GiRUY1XMTXNyLCs42gnEL8jizPLBbrb8d'))
70 70                  then if ((kwotawymiany > (kwotarownowagi - balansUSDN)))
71 71                      then if ((balansUSDN >= kwotarownowagi))
72 72                          then {
73 73                              let nowypoziom = (poziom + kwotawymiany)
74 74                              let wyplata = mnozenie(baza, (ln(nowypoziom) - ln(poziom)))
75 75  [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)]
76 76                              }
77 77                          else {
78 78                              let czesc1 = (kwotarownowagi - balansUSDN)
79 79                              let nowypoziom = (((balansUSDN + kwotawymiany) + baza) - kwotarownowagi)
80 80                              let wyplata = ((mnozenie(baza, (ln(nowypoziom) - ln(baza))) + poziom) - dzielenie(poziom, exp(dzielenie(czesc1, baza))))
81 81  [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)]
82 82                              }
83 83                      else {
84 84                          let wyplata = (poziom - dzielenie(poziom, exp(dzielenie(kwotawymiany, baza))))
85 85                          let nowypoziom = (poziom - wyplata)
86 86  [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)]
87 87                          }
88 88                  else throw("Nieobsługiwany asset")
89 89          else throw("Kontrakt tymczasowo wyłączony")
90 90      }
91 91  
92 92  
93 93  
94 94  @Callable(i)
95 - func InwestycjaUSDN (wplata) = if ((balansUSDT > (balansUSDN + wplata)))
95 + func InwestycjaUSDN (wplata) = if (((balansUSDN + wplata) > balansUSDT))
96 96      then {
97 97          let b1 = balansUSDT
98 98          let b2 = (balansUSDN + wplata)
99 99          let a = mnozenie(dzielenie(b1, b2), exp(dzielenie((b2 + (17 * b1)), (18 * b2))))
100 100          let W0 = LambertW0(a)
101 101          let nowabaza = dzielenie(mnozenie((9 * b1), b2), (mnozenie((W0 * 9), b2) - dzielenie((17 * b1), 200000000)))
102 102          let wyplata = ((nowabaza - baza) / 9)
103 - [IntegerEntry("WLambertvalue", (wyplata / 100))]
103 + [IntegerEntry("WLambertvalue", nowabaza)]
104 104          }
105 105      else {
106 106          let b2 = balansUSDT
107 107          let b1 = (balansUSDN + wplata)
108 108          let a = mnozenie(dzielenie(b1, b2), exp(dzielenie((b2 + (17 * b1)), (18 * b2))))
109 109          let W0 = LambertW0(a)
110 110          let nowabaza = dzielenie(mnozenie((9 * b1), b2), (mnozenie((W0 * 9), b2) - dzielenie((17 * b1), 200000000)))
111 111          let wyplata = ((nowabaza - baza) / 9)
112 112  [IntegerEntry("WLambertvalue", wyplata)]
113 113          }
114 114  
115 115

Old	New		Differences
92	92
93	93
94	94		@Callable(i)
95		-	func InwestycjaUSDN (wplata) = if ((~~balansUSDT >~~ (balansUSDN + wplata)))
	95	+	func InwestycjaUSDN (wplata) = if (((balansUSDN + wplata) > balansUSDT))
96	96		then {
97	97		let b1 = balansUSDT
98	98		let b2 = (balansUSDN + wplata)

100	100		let W0 = LambertW0(a)
101	101		let nowabaza = dzielenie(mnozenie((9 * b1), b2), (mnozenie((W0 * 9), b2) - dzielenie((17 * b1), 200000000)))
102	102		let wyplata = ((nowabaza - baza) / 9)
103		-	[IntegerEntry("WLambertvalue", ~~(wyplata / 100)~~)]
	103	+	[IntegerEntry("WLambertvalue", nowabaza)]
104	104		}
105	105		else {
106	106		let b2 = balansUSDT

Old	New		Differences
1	1		{-# STDLIB_VERSION 4 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let e = 271828182
5	5
6	6		let kwotarownowagi = 10000000000000
7	7
8	8		let baza = (kwotarownowagi * 18)
9	9
10	10		let enabled = getInteger(this, "enabled")
11	11
12	12		let poziom = getIntegerValue(this, "Poziom")
13	13
14	14		let balansUSDN = (assetBalance(this, base58'DL67xXsNV42GiRUY1XMTXNyLCs42gnEL8jizPLBbrb8d') * 100)
15	15
16	16		let balansUSDT = (assetBalance(this, base58'cGfAv1s7NxGWL913wR2Lp9yFSY7DrkWip6YPQGJGc6y') * 100)
17	17
18	18		func ln (x) = log(x, 8, e, 8, 8, DOWN)
19	19
20	20
21	21		func exp (x) = pow(e, 8, x, 8, 8, DOWN)
22	22
23	23
24	24		func mnozenie (x,y) = fraction(x, y, 100000000)
25	25
26	26
27	27		func dzielenie (x,y) = fraction(x, 100000000, y)
28	28
29	29
30	30		func Halley (x,w) = {
31	31		let wTimes = (mnozenie(w, exp(w)) - x)
32	32		let wPlusOneTimes = mnozenie((w + 100000000), exp(w))
33	33		if ((wTimes != 0))
34	34		then (w - dzielenie(wTimes, (wPlusOneTimes - dzielenie(mnozenie((w + 200000000), wTimes), ((2 * w) + 200000000)))))
35	35		else w
36	36		}
37	37
38	38
39	39		func continuedfraction (x) = dzielenie(x, (100000000 + dzielenie(x, (100000000 + dzielenie(x, (200000000 + dzielenie((x * 5), (300000000 + dzielenie((x * 17), (1000000000 + dzielenie((x * 133), (1700000000 + dzielenie((x * 1927), (1900000000 + dzielenie((x * 13582711), 9442300000000)))))))))))))))
40	40
41	41
42	42		func LambertW0 (x) = Halley(x, continuedfraction(x))
43	43
44	44
45	45		@Callable(i)
46	46		func USDTnaUSDNnaUSDT () = {
47	47		let oplata = fraction(i.payments[0].amount, 4, 10000)
48	48		let kwotawymiany = fraction((i.payments[0].amount - oplata), 100, 1)
49	49		if ((enabled == 1))
50	50		then if ((i.payments[0].assetId == base58'cGfAv1s7NxGWL913wR2Lp9yFSY7DrkWip6YPQGJGc6y'))
51	51		then if ((kwotawymiany > (kwotarownowagi - balansUSDT)))
52	52		then if ((balansUSDT >= kwotarownowagi))
53	53		then {
54	54		let nowypoziom = (poziom + kwotawymiany)
55	55		let wyplata = mnozenie(baza, (ln(nowypoziom) - ln(poziom)))
56	56		[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)]
57	57		}
58	58		else {
59	59		let czesc1 = (kwotarownowagi - balansUSDT)
60	60		let nowypoziom = (((balansUSDT + kwotawymiany) + baza) - kwotarownowagi)
61	61		let wyplata = ((mnozenie(baza, (ln(nowypoziom) - ln(baza))) + poziom) - dzielenie(poziom, exp(dzielenie(czesc1, baza))))
62	62		[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)]
63	63		}
64	64		else {
65	65		let wyplata = (poziom - dzielenie(poziom, exp(dzielenie(kwotawymiany, baza))))
66	66		let nowypoziom = (poziom - wyplata)
67	67		[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)]
68	68		}
69	69		else if ((i.payments[0].assetId == base58'DL67xXsNV42GiRUY1XMTXNyLCs42gnEL8jizPLBbrb8d'))
70	70		then if ((kwotawymiany > (kwotarownowagi - balansUSDN)))
71	71		then if ((balansUSDN >= kwotarownowagi))
72	72		then {
73	73		let nowypoziom = (poziom + kwotawymiany)
74	74		let wyplata = mnozenie(baza, (ln(nowypoziom) - ln(poziom)))
75	75		[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)]
76	76		}
77	77		else {
78	78		let czesc1 = (kwotarownowagi - balansUSDN)
79	79		let nowypoziom = (((balansUSDN + kwotawymiany) + baza) - kwotarownowagi)
80	80		let wyplata = ((mnozenie(baza, (ln(nowypoziom) - ln(baza))) + poziom) - dzielenie(poziom, exp(dzielenie(czesc1, baza))))
81	81		[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)]
82	82		}
83	83		else {
84	84		let wyplata = (poziom - dzielenie(poziom, exp(dzielenie(kwotawymiany, baza))))
85	85		let nowypoziom = (poziom - wyplata)
86	86		[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)]
87	87		}
88	88		else throw("Nieobsługiwany asset")
89	89		else throw("Kontrakt tymczasowo wyłączony")
90	90		}
91	91
92	92
93	93
94	94		@Callable(i)
95		-	func InwestycjaUSDN (wplata) = if ((~~balansUSDT >~~ (balansUSDN + wplata)))
	95	+	func InwestycjaUSDN (wplata) = if (((balansUSDN + wplata) > balansUSDT))
96	96		then {
97	97		let b1 = balansUSDT
98	98		let b2 = (balansUSDN + wplata)
99	99		let a = mnozenie(dzielenie(b1, b2), exp(dzielenie((b2 + (17 * b1)), (18 * b2))))
100	100		let W0 = LambertW0(a)
101	101		let nowabaza = dzielenie(mnozenie((9 * b1), b2), (mnozenie((W0 * 9), b2) - dzielenie((17 * b1), 200000000)))
102	102		let wyplata = ((nowabaza - baza) / 9)
103		-	[IntegerEntry("WLambertvalue", ~~(wyplata / 100)~~)]
	103	+	[IntegerEntry("WLambertvalue", nowabaza)]
104	104		}
105	105		else {
106	106		let b2 = balansUSDT
107	107		let b1 = (balansUSDN + wplata)
108	108		let a = mnozenie(dzielenie(b1, b2), exp(dzielenie((b2 + (17 * b1)), (18 * b2))))
109	109		let W0 = LambertW0(a)
110	110		let nowabaza = dzielenie(mnozenie((9 * b1), b2), (mnozenie((W0 * 9), b2) - dzielenie((17 * b1), 200000000)))
111	111		let wyplata = ((nowabaza - baza) / 9)
112	112		[IntegerEntry("WLambertvalue", wyplata)]
113	113		}
114	114
115	115

github/deemru/w8io/169f3d6 
56.48 ms ◑