tx · 7yHk3FsmUhzvn1LCePodUu3Hf3j11uHP6sqMr9X8z4T5

3N69YR9dGN9tJnhxGrURt5cQycjAN1zbQ9t:  -0.05000000 Waves

2021.01.25 17:29 [1369147] smart account 3N69YR9dGN9tJnhxGrURt5cQycjAN1zbQ9t > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7yHk3FsmUhzvn1LCePodUu3Hf3j11uHP6sqMr9X8z4T5",
    "fee": 5000000,
    "feeAssetId": null,
    "timestamp": 1611585028103,
    "version": 2,
    "chainId": 84,
    "sender": "3N69YR9dGN9tJnhxGrURt5cQycjAN1zbQ9t",
    "senderPublicKey": "Bo16mjUNTGCeZDYvQc6gHh46P21B3DqYCHoDt9CyzxHf",
    "proofs": [
        "254Z8QWKiadLBzRGvZf9YBnmVDxbdKY3zD5FPY2UsvtqhE1MXNCVH6L5wiJBzP1NhpYMqrNX9Wz49uAhxwBJDixU"
    ],
    "script": "base64:AAIEAAAAAAAAAAQIAhIAAAAACgAAAAABZQAAAAAAEDPE1gAAAAAOa3dvdGFyb3dub3dhZ2kAAAAAF0h26AAAAAAABGJhemEJAABpAAAAAgUAAAAOa3dvdGFyb3dub3dhZ2kAAAAAAAAAAAIAAAAABnBvemlvbQAAAAALpDt0AAAAAAAKYmFsYW5zVVNETgAAAAAXSHboAAAAAAAKYmFsYW5zVVNEVAAAAAAXSHboAAEAAAACbG4AAAABAAAAAXgJAABtAAAABgUAAAABeAAAAAAAAAAACAUAAAABZQAAAAAAAAAACAAAAAAAAAAACAUAAAAERE9XTgEAAAADZXhwAAAAAQAAAAF4CQAAbAAAAAYFAAAAAWUAAAAAAAAAAAgFAAAAAXgAAAAAAAAAAAgAAAAAAAAAAAgFAAAABERPV04BAAAACG1ub3plbmllAAAAAgAAAAF4AAAAAXkJAABrAAAAAwUAAAABeAUAAAABeQAAAAAABfXhAAEAAAAJZHppZWxlbmllAAAAAgAAAAF4AAAAAXkJAABrAAAAAwUAAAABeAAAAAAABfXhAAUAAAABeQAAAAEAAAABaQEAAAAHd3ltaWFuYQAAAAAEAAAADGt3b3Rhd3ltaWFueQAAAAABKgXyAAMJAABmAAAAAgUAAAAMa3dvdGF3eW1pYW55CQAAZQAAAAIFAAAADmt3b3Rhcm93bm93YWdpBQAAAApiYWxhbnNVU0RUAwkAAGYAAAACBQAAAApiYWxhbnNVU0RUAAAAAAAAAAPoBAAAAApub3d5cG96aW9tCQAAZAAAAAIFAAAABnBvemlvbQUAAAAMa3dvdGF3eW1pYW55BAAAAAd3eXBsYXRhCQAAawAAAAMJAQAAAAhtbm96ZW5pZQAAAAIFAAAABGJhemEJAABlAAAAAgkBAAAAAmxuAAAAAQUAAAAKbm93eXBvemlvbQkBAAAAAmxuAAAAAQUAAAAGcG96aW9tAAAAAAAAAAABAAAAAAAAAABkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAZQb3ppb20FAAAACm5vd3lwb3ppb20JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB1d5cGxhdGEFAAAAB3d5cGxhdGEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB1dhcnVuZWsAAAAAAAAAAAEJAARMAAAAAgkBAAAAC0RlbGV0ZUVudHJ5AAAAAQIAAAAIV2FydW5layAFAAAAA25pbAQAAAAGY3plc2MxCQAAZQAAAAIAAAAAAAAAA+gFAAAACmJhbGFuc1VTRFQEAAAABmN6ZXNjMgkAAGUAAAACBQAAAAxrd290YXd5bWlhbnkFAAAABmN6ZXNjMQQAAAAKbm93eXBvemlvbQUAAAAGY3plc2MyBAAAAAd3eXBsYXRhCQAAZQAAAAIJAABkAAAAAgkAAGsAAAADCQEAAAAIbW5vemVuaWUAAAACBQAAAARiYXphCQAAZQAAAAIJAQAAAAJsbgAAAAEFAAAACm5vd3lwb3ppb20JAQAAAAJsbgAAAAEFAAAABGJhemEAAAAAAAAAAAEAAAAAAAAAAGQFAAAABnBvemlvbQkBAAAACWR6aWVsZW5pZQAAAAIFAAAABnBvemlvbQkBAAAAA2V4cAAAAAEJAQAAAAlkemllbGVuaWUAAAACBQAAAAZjemVzYzEFAAAABGJhemEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAACFd5cMWCYXRhBQAAAAd3eXBsYXRhCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAZQb3ppb20FAAAACm5vd3lwb3ppb20JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB1dhcnVuZWsAAAAAAAAAAAIFAAAAA25pbAQAAAAHd3lwbGF0YQkAAGsAAAADCQAAZQAAAAIFAAAABnBvemlvbQkBAAAACWR6aWVsZW5pZQAAAAIFAAAABnBvemlvbQkBAAAAA2V4cAAAAAEJAQAAAAlkemllbGVuaWUAAAACBQAAAAxrd290YXd5bWlhbnkFAAAABGJhemEAAAAAAAAAAAEAAAAAAAAAAGQEAAAACm5vd3lwb3ppb20JAABlAAAAAgUAAAAGcG96aW9tBQAAAAd3eXBsYXRhCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAdXeXBsYXRhBQAAAAd3eXBsYXRhCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAZQb3ppb20FAAAACm5vd3lwb3ppb20JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB1dhcnVuZWsAAAAAAAAAAAMFAAAAA25pbAAAAAAUzaH5",
    "height": 1369147,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7kuT1hxxXFkEsZn23pGRmXxcs1t2zu89hF42FJoK26f3
Next: BvRMcuMHk8Bqt2JDoHoCTvXUoyPg1nEqYRxXDEVZkbsV

Diff: 
Old
New
Differences
33
33
 
            then {
34
34
 
                let nowypoziom = (poziom + kwotawymiany)
35
35
 
                let wyplata = fraction(mnozenie(baza, (ln(nowypoziom) - ln(poziom))), 1, 100)
36
-
[IntegerEntry("Poziom", nowypoziom), IntegerEntry("Wyplata", wyplata), IntegerEntry("Warunek ", 1)]
36
+
[IntegerEntry("Poziom", nowypoziom), IntegerEntry("Wyplata", wyplata), IntegerEntry("Warunek", 1), DeleteEntry("Warunek ")]
37
37
 
                }
38
38
 
            else {
39
39
 
                let czesc1 = (1000 - balansUSDT)
40
40
 
                let czesc2 = (kwotawymiany - czesc1)
41
41
 
                let nowypoziom = czesc2
42
42
 
                let wyplata = ((fraction(mnozenie(baza, (ln(nowypoziom) - ln(baza))), 1, 100) + poziom) - dzielenie(poziom, exp(dzielenie(czesc1, baza))))
43
-
[IntegerEntry("Wypłata", wyplata), IntegerEntry("Poziom", nowypoziom), IntegerEntry("Warunek ", 2)]
43
+
[IntegerEntry("Wypłata", wyplata), IntegerEntry("Poziom", nowypoziom), IntegerEntry("Warunek", 2)]
44
44
 
                }
45
45
 
        else {
46
46
 
            let wyplata = fraction((poziom - dzielenie(poziom, exp(dzielenie(kwotawymiany, baza)))), 1, 100)
47
47
 
            let nowypoziom = (poziom - wyplata)
48
-
[IntegerEntry("Wyplata", wyplata), IntegerEntry("Poziom", nowypoziom), IntegerEntry("Warunek ", 3)]
48
+
[IntegerEntry("Wyplata", wyplata), IntegerEntry("Poziom", nowypoziom), IntegerEntry("Warunek", 3)]
49
49
 
            }
50
50
 
    }
51
51
 

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 = 100000000000
7
7
 
8
8
 
let baza = (kwotarownowagi / 2)
9
9
 
10
10
 
let poziom = 50000000000
11
11
 
12
12
 
let balansUSDN = 100000000000
13
13
 
14
14
 
let balansUSDT = 100000000000
15
15
 
16
16
 
func ln (x) = log(x, 8, e, 8, 8, DOWN)
17
17
 
18
18
 
19
19
 
func exp (x) = pow(e, 8, x, 8, 8, DOWN)
20
20
 
21
21
 
22
22
 
func mnozenie (x,y) = fraction(x, y, 100000000)
23
23
 
24
24
 
25
25
 
func dzielenie (x,y) = fraction(x, 100000000, y)
26
26
 
27
27
 
28
28
 
@Callable(i)
29
29
 
func wymiana () = {
30
30
 
    let kwotawymiany = 5000000000
31
31
 
    if ((kwotawymiany > (kwotarownowagi - balansUSDT)))
32
32
 
        then if ((balansUSDT > 1000))
33
33
 
            then {
34
34
 
                let nowypoziom = (poziom + kwotawymiany)
35
35
 
                let wyplata = fraction(mnozenie(baza, (ln(nowypoziom) - ln(poziom))), 1, 100)
36
-
[IntegerEntry("Poziom", nowypoziom), IntegerEntry("Wyplata", wyplata), IntegerEntry("Warunek ", 1)]
36
+
[IntegerEntry("Poziom", nowypoziom), IntegerEntry("Wyplata", wyplata), IntegerEntry("Warunek", 1), DeleteEntry("Warunek ")]
37
37
 
                }
38
38
 
            else {
39
39
 
                let czesc1 = (1000 - balansUSDT)
40
40
 
                let czesc2 = (kwotawymiany - czesc1)
41
41
 
                let nowypoziom = czesc2
42
42
 
                let wyplata = ((fraction(mnozenie(baza, (ln(nowypoziom) - ln(baza))), 1, 100) + poziom) - dzielenie(poziom, exp(dzielenie(czesc1, baza))))
43
-
[IntegerEntry("Wypłata", wyplata), IntegerEntry("Poziom", nowypoziom), IntegerEntry("Warunek ", 2)]
43
+
[IntegerEntry("Wypłata", wyplata), IntegerEntry("Poziom", nowypoziom), IntegerEntry("Warunek", 2)]
44
44
 
                }
45
45
 
        else {
46
46
 
            let wyplata = fraction((poziom - dzielenie(poziom, exp(dzielenie(kwotawymiany, baza)))), 1, 100)
47
47
 
            let nowypoziom = (poziom - wyplata)
48
-
[IntegerEntry("Wyplata", wyplata), IntegerEntry("Poziom", nowypoziom), IntegerEntry("Warunek ", 3)]
48
+
[IntegerEntry("Wyplata", wyplata), IntegerEntry("Poziom", nowypoziom), IntegerEntry("Warunek", 3)]
49
49
 
            }
50
50
 
    }
51
51
 
52
52
 

github/deemru/w8io/026f985 
23.81 ms ◑