| 4 | + | func a (b) = { |
---|
| 5 | + | func c (d,e) = if ((d == "i")) |
---|
| 6 | + | then parseIntValue(e) |
---|
| 7 | + | else if ((d == "s")) |
---|
| 8 | + | then e |
---|
| 9 | + | else if ((d == "b")) |
---|
| 10 | + | then (e == "1") |
---|
| 11 | + | else throw(d) |
---|
| 12 | + | |
---|
| 13 | + | func f (g,e) = if ((g == "")) |
---|
| 14 | + | then nil |
---|
| 15 | + | else if ((g == "1")) |
---|
| 16 | + | then { |
---|
| 17 | + | let d = split(e, ":") |
---|
| 18 | + | [c(d[0], d[1])] |
---|
| 19 | + | } |
---|
| 20 | + | else if ((g == "2")) |
---|
| 21 | + | then { |
---|
| 22 | + | let d = split(e, ":") |
---|
| 23 | + | [c(d[0], d[1]), c(d[2], d[3])] |
---|
| 24 | + | } |
---|
| 25 | + | else if ((g == "3")) |
---|
| 26 | + | then { |
---|
| 27 | + | let d = split(e, ":") |
---|
| 28 | + | [c(d[0], d[1]), c(d[2], d[3]), c(d[4], d[5])] |
---|
| 29 | + | } |
---|
| 30 | + | else if ((g == "4")) |
---|
| 31 | + | then { |
---|
| 32 | + | let d = split(e, ":") |
---|
| 33 | + | [c(d[0], d[1]), c(d[2], d[3]), c(d[4], d[5]), c(d[6], d[7])] |
---|
| 34 | + | } |
---|
| 35 | + | else if ((g == "5")) |
---|
| 36 | + | then { |
---|
| 37 | + | let d = split(e, ":") |
---|
| 38 | + | [c(d[0], d[1]), c(d[2], d[3]), c(d[4], d[5]), c(d[6], d[7]), c(d[8], d[9])] |
---|
| 39 | + | } |
---|
| 40 | + | else throw(g) |
---|
| 41 | + | |
---|
| 42 | + | func h (e,i) = if ((e == "")) |
---|
| 43 | + | then if ((i == "")) |
---|
| 44 | + | then AttachedPayment(unit, wavesBalance(this).available) |
---|
| 45 | + | else AttachedPayment(unit, parseIntValue(i)) |
---|
| 46 | + | else if ((i == "")) |
---|
| 47 | + | then AttachedPayment(fromBase58String(e), assetBalance(this, fromBase58String(e))) |
---|
| 48 | + | else AttachedPayment(fromBase58String(e), parseIntValue(i)) |
---|
| 49 | + | |
---|
| 50 | + | func j (g,e) = if ((g == "")) |
---|
| 51 | + | then nil |
---|
| 52 | + | else if ((g == "1")) |
---|
| 53 | + | then { |
---|
| 54 | + | let d = split(e, ":") |
---|
| 55 | + | [h(d[0], d[1])] |
---|
| 56 | + | } |
---|
| 57 | + | else if ((g == "2")) |
---|
| 58 | + | then { |
---|
| 59 | + | let d = split(e, ":") |
---|
| 60 | + | [h(d[0], d[1]), h(d[2], d[3])] |
---|
| 61 | + | } |
---|
| 62 | + | else throw(g) |
---|
| 63 | + | |
---|
| 64 | + | func k (l,e) = { |
---|
| 65 | + | let d = split(e, ";") |
---|
| 66 | + | invoke(Address(fromBase58String(d[0])), d[1], f(d[2], d[3]), j(d[4], d[5])) |
---|
| 67 | + | } |
---|
| 68 | + | |
---|
| 69 | + | let m = if ((size(b) == 1)) |
---|
| 70 | + | then getStringValue(this, b) |
---|
| 71 | + | else b |
---|
| 72 | + | let n = { |
---|
| 73 | + | let p = split_4C(toUtf8String(fromBase64String(m)), "|") |
---|
| 74 | + | let q = size(p) |
---|
| 75 | + | let r = 0 |
---|
| 76 | + | func s (t,u) = if ((u >= q)) |
---|
| 77 | + | then t |
---|
| 78 | + | else k(t, p[u]) |
---|
| 79 | + | |
---|
| 80 | + | func v (t,u) = if ((u >= q)) |
---|
| 81 | + | then t |
---|
| 82 | + | else throw("List size exceeds 50") |
---|
| 83 | + | |
---|
| 84 | + | v(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(r, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50) |
---|
| 85 | + | } |
---|
| 86 | + | if ((n == n)) |
---|
| 87 | + | then nil |
---|
| 88 | + | else throw("Strict value is not equal to itself.") |
---|
| 89 | + | } |
---|
25 | | - | else if ((g == "2")) |
---|
26 | | - | then { |
---|
27 | | - | let d = split(e, ":") |
---|
28 | | - | [c(d[0], d[1]), c(d[2], d[3])] |
---|
29 | | - | } |
---|
30 | | - | else if ((g == "3")) |
---|
31 | | - | then { |
---|
32 | | - | let d = split(e, ":") |
---|
33 | | - | [c(d[0], d[1]), c(d[2], d[3]), c(d[4], d[5])] |
---|
34 | | - | } |
---|
35 | | - | else if ((g == "4")) |
---|
36 | | - | then { |
---|
37 | | - | let d = split(e, ":") |
---|
38 | | - | [c(d[0], d[1]), c(d[2], d[3]), c(d[4], d[5]), c(d[6], d[7])] |
---|
39 | | - | } |
---|
40 | | - | else if ((g == "5")) |
---|
41 | | - | then { |
---|
42 | | - | let d = split(e, ":") |
---|
43 | | - | [c(d[0], d[1]), c(d[2], d[3]), c(d[4], d[5]), c(d[6], d[7]), c(d[8], d[9])] |
---|
44 | | - | } |
---|
45 | | - | else throw(g) |
---|
46 | | - | |
---|
47 | | - | func h (e,a) = if ((e == "")) |
---|
48 | | - | then if ((a == "")) |
---|
49 | | - | then AttachedPayment(unit, wavesBalance(this).available) |
---|
50 | | - | else AttachedPayment(unit, parseIntValue(a)) |
---|
51 | | - | else if ((a == "")) |
---|
52 | | - | then AttachedPayment(fromBase58String(e), assetBalance(this, fromBase58String(e))) |
---|
53 | | - | else AttachedPayment(fromBase58String(e), parseIntValue(a)) |
---|
54 | | - | |
---|
55 | | - | func i (g,e) = if ((g == "")) |
---|
56 | | - | then nil |
---|
57 | | - | else if ((g == "1")) |
---|
58 | | - | then { |
---|
59 | | - | let d = split(e, ":") |
---|
60 | | - | [h(d[0], d[1])] |
---|
61 | | - | } |
---|
62 | | - | else if ((g == "2")) |
---|
63 | | - | then { |
---|
64 | | - | let d = split(e, ":") |
---|
65 | | - | [h(d[0], d[1]), h(d[2], d[3])] |
---|
66 | | - | } |
---|
67 | | - | else throw(g) |
---|
68 | | - | |
---|
69 | | - | func j (k,e) = { |
---|
70 | | - | let d = split(e, ";") |
---|
71 | | - | invoke(Address(fromBase58String(d[0])), d[1], f(d[2], d[3]), i(d[4], d[5])) |
---|
| 110 | + | else addressFromRecipient(Alias(w)) |
---|
74 | | - | let l = if ((size(b) == 1)) |
---|
75 | | - | then getStringValue(this, b) |
---|
76 | | - | else b |
---|
77 | | - | let m = { |
---|
78 | | - | let n = split_4C(toUtf8String(fromBase64String(l)), "|") |
---|
79 | | - | let p = size(n) |
---|
80 | | - | let q = 0 |
---|
81 | | - | func r (s,t) = if ((t >= p)) |
---|
82 | | - | then s |
---|
83 | | - | else j(s, n[t]) |
---|
| 113 | + | func k (l,e) = { |
---|
| 114 | + | let d = split(e, ";") |
---|
| 115 | + | let z = d[0] |
---|
| 116 | + | (l ++ (if ((z == "0")) |
---|
| 117 | + | then [BinaryEntry(d[1], fromBase58String(d[2]))] |
---|
| 118 | + | else if ((z == "1")) |
---|
| 119 | + | then [BooleanEntry(d[1], (d[2] == "1"))] |
---|
| 120 | + | else if ((z == "2")) |
---|
| 121 | + | then [IntegerEntry(d[1], parseIntValue(d[2]))] |
---|
| 122 | + | else if ((z == "3")) |
---|
| 123 | + | then [StringEntry(d[1], d[2])] |
---|
| 124 | + | else if ((z == "4")) |
---|
| 125 | + | then [DeleteEntry(d[1])] |
---|
| 126 | + | else if ((z == "5")) |
---|
| 127 | + | then [Issue(d[1], d[2], parseIntValue(d[3]), parseIntValue(d[4]), (d[5] == "1"), unit, parseIntValue(d[7]))] |
---|
| 128 | + | else if ((z == "6")) |
---|
| 129 | + | then [Reissue(fromBase58String(d[1]), parseIntValue(d[2]), (d[3] == "1"))] |
---|
| 130 | + | else if ((z == "7")) |
---|
| 131 | + | then [Burn(fromBase58String(d[1]), parseIntValue(d[2]))] |
---|
| 132 | + | else if ((z == "8")) |
---|
| 133 | + | then [SponsorFee(fromBase58String(d[1]), if ((d[2] == "")) |
---|
| 134 | + | then unit |
---|
| 135 | + | else parseIntValue(d[2]))] |
---|
| 136 | + | else if ((z == "9")) |
---|
| 137 | + | then [ScriptTransfer(l(d[1]), parseIntValue(d[2]), if ((d[3] == "")) |
---|
| 138 | + | then unit |
---|
| 139 | + | else fromBase58String(d[3]))] |
---|
| 140 | + | else if ((z == "a")) |
---|
| 141 | + | then [Lease(l(d[1]), parseIntValue(d[2]), parseIntValue(d[3]))] |
---|
| 142 | + | else if ((z == "b")) |
---|
| 143 | + | then [LeaseCancel(fromBase58String(d[1]))] |
---|
| 144 | + | else throw(z))) |
---|
| 145 | + | } |
---|
89 | | - | u(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(q, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50) |
---|
90 | | - | } |
---|
91 | | - | if ((m == m)) |
---|
92 | | - | then nil |
---|
93 | | - | else throw("Strict value is not equal to itself.") |
---|
| 154 | + | func v (t,u) = if ((u >= q)) |
---|
| 155 | + | then t |
---|
| 156 | + | else throw("List size exceeds 50") |
---|
| 157 | + | |
---|
| 158 | + | v(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(s(r, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50) |
---|
101 | | - | else { |
---|
102 | | - | func k (v) = { |
---|
103 | | - | let w = addressFromString(v) |
---|
104 | | - | if ($isInstanceOf(w, "Address")) |
---|
105 | | - | then { |
---|
106 | | - | let k = w |
---|
107 | | - | k |
---|
108 | | - | } |
---|
109 | | - | else addressFromRecipient(Alias(v)) |
---|
110 | | - | } |
---|
111 | | - | |
---|
112 | | - | func j (k,e) = { |
---|
113 | | - | let d = split(e, ";") |
---|
114 | | - | let y = d[0] |
---|
115 | | - | (k ++ (if ((y == "0")) |
---|
116 | | - | then [BinaryEntry(d[1], fromBase58String(d[2]))] |
---|
117 | | - | else if ((y == "1")) |
---|
118 | | - | then [BooleanEntry(d[1], (d[2] == "1"))] |
---|
119 | | - | else if ((y == "2")) |
---|
120 | | - | then [IntegerEntry(d[1], parseIntValue(d[2]))] |
---|
121 | | - | else if ((y == "3")) |
---|
122 | | - | then [StringEntry(d[1], d[2])] |
---|
123 | | - | else if ((y == "4")) |
---|
124 | | - | then [DeleteEntry(d[1])] |
---|
125 | | - | else if ((y == "5")) |
---|
126 | | - | then [Issue(d[1], d[2], parseIntValue(d[3]), parseIntValue(d[4]), (d[5] == "1"), unit, parseIntValue(d[7]))] |
---|
127 | | - | else if ((y == "6")) |
---|
128 | | - | then [Reissue(fromBase58String(d[1]), parseIntValue(d[2]), (d[3] == "1"))] |
---|
129 | | - | else if ((y == "7")) |
---|
130 | | - | then [Burn(fromBase58String(d[1]), parseIntValue(d[2]))] |
---|
131 | | - | else if ((y == "8")) |
---|
132 | | - | then [SponsorFee(fromBase58String(d[1]), if ((d[2] == "")) |
---|
133 | | - | then unit |
---|
134 | | - | else parseIntValue(d[2]))] |
---|
135 | | - | else if ((y == "9")) |
---|
136 | | - | then [ScriptTransfer(k(d[1]), parseIntValue(d[2]), if ((d[3] == "")) |
---|
137 | | - | then unit |
---|
138 | | - | else fromBase58String(d[3]))] |
---|
139 | | - | else if ((y == "a")) |
---|
140 | | - | then [Lease(k(d[1]), parseIntValue(d[2]), parseIntValue(d[3]))] |
---|
141 | | - | else if ((y == "b")) |
---|
142 | | - | then [LeaseCancel(fromBase58String(d[1]))] |
---|
143 | | - | else throw(y))) |
---|
144 | | - | } |
---|
145 | | - | |
---|
146 | | - | let n = split_4C(toUtf8String(fromBase64String(b)), "|") |
---|
147 | | - | let p = size(n) |
---|
148 | | - | let q = nil |
---|
149 | | - | func r (s,t) = if ((t >= p)) |
---|
150 | | - | then s |
---|
151 | | - | else j(s, n[t]) |
---|
152 | | - | |
---|
153 | | - | func u (s,t) = if ((t >= p)) |
---|
154 | | - | then s |
---|
155 | | - | else throw("List size exceeds 50") |
---|
156 | | - | |
---|
157 | | - | u(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(r(q, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50) |
---|
158 | | - | } |
---|
| 166 | + | else a(getStringValue(this, "s")) |
---|