tx · 89kWQo6McU2xsm6pV9fEbC9mygjJs2ieu9a3SqChrech

3MpWdTGf7g4WqgCF16vRCm47r3jqWR4x3rH:  -0.01400000 Waves

2023.09.06 15:20 [2743503] smart account 3MpWdTGf7g4WqgCF16vRCm47r3jqWR4x3rH > SELF 0.00000000 Waves

{ "type": 13, "id": "89kWQo6McU2xsm6pV9fEbC9mygjJs2ieu9a3SqChrech", "fee": 1400000, "feeAssetId": null, "timestamp": 1694002831173, "version": 2, "chainId": 84, "sender": "3MpWdTGf7g4WqgCF16vRCm47r3jqWR4x3rH", "senderPublicKey": "E1AisEe56YET9Mh4nmc7caxvzk8vBN6W6Er2y7XoyLHt", "proofs": [ "2gJytW9N5bcfqiJMRc64yrnSct9Q1SWWdCgGZNsbfbztkhvdTPmPELCGoVb2B2sB6ZZopb9JndfHTAT1P8Lassuy" ], "script": "base64:AAIFAAAAAAAAACAIAhIHCgUIAQgYARIDCgEBEgQKAgEBEgMKAQQSAwoBAQAAAA8AAAAAEGN1cnJlbnRMb2NrSWRLZXkCAAAADWN1cnJlbnRMb2NrSWQAAAAAEGFkbWluQ29udHJhY3RLZXkCAAAADWFkbWluQ29udHJhY3QAAAAAE3RyZWFzdXJ5Q29udHJhY3RLZXkCAAAAEHRyZWFzdXJ5Q29udHJhY3QAAAAADGlzRnJlZXplZEtleQIAAAAJaXNGcmVlemVkAAAAABBpc0NvbnN0cnVjdGVkS2V5AgAAAA1pc0NvbnN0cnVjdGVkAAAAAAx2ZXJpZmllcnNLZXkCAAAACXZlcmlmaWVycwAAAAAQdmVyaWZpZXJzRGF0YUtleQIAAAANdmVyaWZpZXJzRGF0YQAAAAARdW5sb2NrRmVlQmFzaXNLZXkCAAAADnVubG9ja0ZlZUJhc2lzAAAAAANTRVACAAAAAl9fAAAAAAZNVUxUMTAAAAAAAlQL5AABAAAACWFzUGF5bWVudAAAAAEAAAABdgQAAAAHJG1hdGNoMAUAAAABdgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAPQXR0YWNoZWRQYXltZW50BAAAAAFwBQAAAAckbWF0Y2gwBQAAAAFwCQAAAgAAAAECAAAAIWZhaWwgdG8gY2FzdCBpbnRvIEF0dGFjaGVkUGF5bWVudAEAAAAMYXNCeXRlVmVjdG9yAAAAAQAAAAF2BAAAAAckbWF0Y2gwBQAAAAF2AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAApCeXRlVmVjdG9yBAAAAAFwBQAAAAckbWF0Y2gwBQAAAAFwCQAAAgAAAAECAAAAHGZhaWwgdG8gY2FzdCBpbnRvIEJ5dGVWZWN0b3IBAAAABWFzSW50AAAAAQAAAAN2YWwEAAAAByRtYXRjaDAFAAAAA3ZhbAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAZ2YWxJbnQFAAAAByRtYXRjaDAFAAAABnZhbEludAkAAAIAAAABAgAAABVmYWlsIHRvIGNhc3QgaW50byBJbnQBAAAAEW1heFRha2VhYmxlQW1vdW50AAAABAAAAApsb2NrSGVpZ2h0AAAADXZlc3RpbmdQZXJpb2QAAAAGYW1vdW50AAAAC3Rha2VkQW1vdW50BAAAAAxibG9ja3NQYXNzZWQJAABlAAAAAgUAAAAGaGVpZ2h0BQAAAApsb2NrSGVpZ2h0AwkAAGcAAAACBQAAAAxibG9ja3NQYXNzZWQFAAAADXZlc3RpbmdQZXJpb2QJAABlAAAAAgUAAAAGYW1vdW50BQAAAAt0YWtlZEFtb3VudAQAAAAOcGVyQmxvY2tVbmxvY2sJAQAAAAhmcmFjdGlvbgAAAAQFAAAABmFtb3VudAUAAAAGTVVMVDEwBQAAAA12ZXN0aW5nUGVyaW9kBQAAAAZIQUxGVVAEAAAAD2F2YWlsYWJsZVVubG9jawkAAGsAAAADBQAAAA5wZXJCbG9ja1VubG9jawUAAAAMYmxvY2tzUGFzc2VkBQAAAAZNVUxUMTAJAABlAAAAAgUAAAAPYXZhaWxhYmxlVW5sb2NrBQAAAAt0YWtlZEFtb3VudAEAAAAOdHJlYXN1cnlBbW91bnQAAAABAAAABmFtb3VudAQAAAAIZmVlQmFzaXMJAQAAABFAZXh0ck5hdGl2ZSgxMDU1KQAAAAEFAAAAEXVubG9ja0ZlZUJhc2lzS2V5AwkAAAAAAAACBQAAAAhmZWVCYXNpcwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAUAAAABaQEAAAALY29uc3RydWN0b3IAAAAFAAAAC2FkbWluQWRyZXNzAAAADnVubG9ja0ZlZUJhc2lzAAAAEHRyZWFzdXJ5Q29udHJhY3QAAAAJdmVyaWZpZXJzAAAAEXJlcXVpcmVkVmVyaWZpZXJzBAAAAAckbWF0Y2gwCQAEIAAAAAEFAAAAEGlzQ29uc3RydWN0ZWRLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAB0Jvb2xlYW4JAAACAAAAAQIAAAAjQ29uc3RydWN0b3IgY2FuIGJlIGNhbGxlZCBqdXN0IG9uY2UEAAAADnZlcmlmaWVyc0NvdW50CQABkAAAAAEFAAAACXZlcmlmaWVycwMJAABmAAAAAgUAAAAOdmVyaWZpZXJzQ291bnQAAAAAAAAAAAgJAAACAAAAAQIAAAAZTWF4IHZlcmlmaWVycyBudW1iZXIgaXMgOAQAAAAQdmVyaWZpZXJzUHViS2V5cwkABLkAAAACBQAAAAl2ZXJpZmllcnMFAAAAA1NFUAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAABBhZG1pbkNvbnRyYWN0S2V5BQAAAAthZG1pbkFkcmVzcwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAQY3VycmVudExvY2tJZEtleQAAAAAAAAAAAAkABEwAAAACCQEAAAAMQm9vbGVhbkVudHJ5AAAAAgUAAAAMaXNGcmVlemVkS2V5BwkABEwAAAACCQEAAAAMQm9vbGVhbkVudHJ5AAAAAgUAAAAQaXNDb25zdHJ1Y3RlZEtleQYJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAEXVubG9ja0ZlZUJhc2lzS2V5BQAAAA51bmxvY2tGZWVCYXNpcwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAABN0cmVhc3VyeUNvbnRyYWN0S2V5BQAAABB0cmVhc3VyeUNvbnRyYWN0CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAADHZlcmlmaWVyc0tleQUAAAAQdmVyaWZpZXJzUHViS2V5cwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAABB2ZXJpZmllcnNEYXRhS2V5CQABLAAAAAIJAAEsAAAAAgkAAaQAAAABBQAAAA52ZXJpZmllcnNDb3VudAUAAAADU0VQCQABpAAAAAEFAAAAEXJlcXVpcmVkVmVyaWZpZXJzBQAAAANuaWwAAAABaQEAAAAEbG9jawAAAAEAAAAGcGVyaW9kAwkBAAAAEUBleHRyTmF0aXZlKDEwNTYpAAAAAQUAAAAMaXNGcmVlemVkS2V5CQAAAgAAAAECAAAAIENvbnRyYWN0IG9wZXJhdGlvbnMgaXMgc3VzcGVuZGVkBAAAAAdwYXltZW50CQEAAAAJYXNQYXltZW50AAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAMJAABnAAAAAgAAAAAAAAAAAAgFAAAAB3BheW1lbnQAAAAGYW1vdW50CQAAAgAAAAECAAAAF0Ftb3VudCBtdXN0IGJlIHBvc2l0aXZlAwkAAGYAAAACAAAAAAAAAAWgBQAAAAZwZXJpb2QJAAACAAAAAQIAAAAiMjQgaG91cnMgaXMgbWluaW11bSB2ZXN0aW5nIHBlcmlvZAQAAAANY3VycmVudExvY2tJZAkBAAAAEUBleHRyTmF0aXZlKDEwNTUpAAAAAQUAAAAQY3VycmVudExvY2tJZEtleQQAAAATY2FsbGVyQWRkcmVzc1N0cmluZwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAABRwYXltZW50QXNzZXRJZFN0cmluZwkAAlgAAAABCQEAAAAMYXNCeXRlVmVjdG9yAAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAQAAAADa2V5CQABLAAAAAIJAAEsAAAAAgUAAAATY2FsbGVyQWRkcmVzc1N0cmluZwUAAAADU0VQCQABpAAAAAEFAAAADWN1cnJlbnRMb2NrSWQEAAAABGRhdGEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABpAAAAAEFAAAABmhlaWdodAUAAAADU0VQCQABpAAAAAEIBQAAAAdwYXltZW50AAAABmFtb3VudAUAAAADU0VQAgAAAAEwBQAAAANTRVAJAAGkAAAAAQUAAAAGcGVyaW9kBQAAAANTRVAFAAAAFHBheW1lbnRBc3NldElkU3RyaW5nCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAA2tleQUAAAAEZGF0YQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAQY3VycmVudExvY2tJZEtleQkAAGQAAAACBQAAAA1jdXJyZW50TG9ja0lkAAAAAAAAAAABBQAAAANuaWwAAAABaQEAAAAId2l0aGRyYXcAAAACAAAABmFtb3VudAAAAAZsb2NrSWQDCQEAAAARQGV4dHJOYXRpdmUoMTA1NikAAAABBQAAAAxpc0ZyZWV6ZWRLZXkJAAACAAAAAQIAAAAgQ29udHJhY3Qgb3BlcmF0aW9ucyBpcyBzdXNwZW5kZWQDAwkAAGcAAAACAAAAAAAAAAAABQAAAAZhbW91bnQGCQAAZgAAAAIAAAAAAAAAAAAFAAAABmxvY2tJZAkAAAIAAAABAgAAAChBbW91bnQgbXVzdCBiZSBwb3NpdGl2ZSBvciB3cm9uZyBsb2NrIGlkBAAAABNjYWxsZXJBZGRyZXNzU3RyaW5nCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAA2tleQkAASwAAAACCQABLAAAAAIFAAAAE2NhbGxlckFkZHJlc3NTdHJpbmcFAAAAA1NFUAkAAaQAAAABBQAAAAZsb2NrSWQEAAAACWRhdGFBcnJheQkABLUAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA1OCkAAAABBQAAAANrZXkFAAAAA1NFUAMJAQAAAAIhPQAAAAIJAAGQAAAAAQUAAAAJZGF0YUFycmF5AAAAAAAAAAAFCQAAAgAAAAECAAAADkludGVybmFsIGVycm9yBAAAAAxzdG9yZWRIZWlnaHQJAAGRAAAAAgUAAAAJZGF0YUFycmF5AAAAAAAAAAAABAAAAAxzdG9yZWRBbW91bnQJAAGRAAAAAgUAAAAJZGF0YUFycmF5AAAAAAAAAAABBAAAABFzdG9yZWRUYWtlZEFtb3VudAkAAZEAAAACBQAAAAlkYXRhQXJyYXkAAAAAAAAAAAIEAAAAE3N0b3JlZFZlc3RpbmdQZXJpb2QJAAGRAAAAAgUAAAAJZGF0YUFycmF5AAAAAAAAAAADBAAAAA1zdG9yZWRBc3NldElkCQABkQAAAAIFAAAACWRhdGFBcnJheQAAAAAAAAAABAQAAAAPYXZhaWxhYmxlQW1vdW50CQEAAAARbWF4VGFrZWFibGVBbW91bnQAAAAECQEAAAAFYXNJbnQAAAABBQAAAAxzdG9yZWRIZWlnaHQJAQAAAAVhc0ludAAAAAEFAAAAE3N0b3JlZFZlc3RpbmdQZXJpb2QJAQAAAAVhc0ludAAAAAEFAAAADHN0b3JlZEFtb3VudAkBAAAABWFzSW50AAAAAQUAAAARc3RvcmVkVGFrZWRBbW91bnQDCQAAZgAAAAIFAAAABmFtb3VudAUAAAAPYXZhaWxhYmxlQW1vdW50CQAAAgAAAAEJAAEsAAAAAgIAAAA2UmVxdWVzdGVkIGFtb3VudCBpcyB0d28gYmlnLCBtYXggYXZhaWxhYmxlIGFtb3VudCBpczogCQABpAAAAAEFAAAAD2F2YWlsYWJsZUFtb3VudAQAAAAHbmV3RGF0YQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAADHN0b3JlZEhlaWdodAUAAAADU0VQBQAAAAxzdG9yZWRBbW91bnQFAAAAA1NFUAkAAaQAAAABCQAAZAAAAAIJAQAAAAVhc0ludAAAAAEFAAAAEXN0b3JlZFRha2VkQW1vdW50BQAAAAZhbW91bnQFAAAAA1NFUAUAAAATc3RvcmVkVmVzdGluZ1BlcmlvZAUAAAADU0VQBQAAAA1zdG9yZWRBc3NldElkCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAA2tleQUAAAAHbmV3RGF0YQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAABmFtb3VudAkAAlkAAAABBQAAAA1zdG9yZWRBc3NldElkBQAAAANuaWwAAAABaQEAAAAOZnJlZXplQ29udHJhY3QAAAABAAAACmlzVW5mcmVlemUEAAAADGFkbWluQWRkcmVzcwkBAAAAEUBleHRyTmF0aXZlKDEwNTgpAAAAAQUAAAAQYWRtaW5Db250cmFjdEtleQMJAQAAAAIhPQAAAAIFAAAADGFkbWluQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzCQAAAgAAAAECAAAAKk9ubHkgYWRtaW4gY29udHJhY3QgY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgkABEwAAAACCQEAAAAMQm9vbGVhbkVudHJ5AAAAAgUAAAAMaXNGcmVlemVkS2V5CQEAAAABIQAAAAEFAAAACmlzVW5mcmVlemUFAAAAA25pbAAAAAFpAQAAAA5jaGFuZ2VGZWVCYXNpcwAAAAEAAAALbmV3RmVlQmFzaXMEAAAADGFkbWluQWRkcmVzcwkBAAAAEUBleHRyTmF0aXZlKDEwNTgpAAAAAQUAAAAQYWRtaW5Db250cmFjdEtleQMJAQAAAAIhPQAAAAIFAAAADGFkbWluQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzCQAAAgAAAAECAAAAKk9ubHkgYWRtaW4gY29udHJhY3QgY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgMJAABmAAAAAgAAAAAAAAAAAAUAAAALbmV3RmVlQmFzaXMJAAACAAAAAQIAAAAbRmVlIGJhc2lzIGNhbid0IGJlIG5lZ2F0aXZlAwkAAGYAAAACBQAAAAtuZXdGZWVCYXNpcwAAAAAAAAAD6AkAAAIAAAABAgAAAClGZWUgYmFzaXMgY2FuJ3QgYmUgYmlnZ2VyIHRoYW4gMTAgcGVyY2VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAARdW5sb2NrRmVlQmFzaXNLZXkFAAAAC25ld0ZlZUJhc2lzBQAAAANuaWwAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAABAAAAAl2ZXJpZmllcnMJAAS1AAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTgpAAAAAQUAAAAMdmVyaWZpZXJzS2V5BQAAAANTRVAEAAAADXZlcmlmaWVyc0RhdGEJAAS1AAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTgpAAAAAQUAAAAQdmVyaWZpZXJzRGF0YUtleQUAAAADU0VQBAAAAA52ZXJpZmllcnNDb3VudAkBAAAABWFzSW50AAAAAQkAAZEAAAACBQAAAA12ZXJpZmllcnNEYXRhAAAAAAAAAAAABAAAABF2ZXJpZmllcnNSZXF1aXJlZAkBAAAABWFzSW50AAAAAQkAAZEAAAACBQAAAA12ZXJpZmllcnNEYXRhAAAAAAAAAAABCgEAAAADc3VtAAAAAgAAAAVhY2N1bQAAAARuZXh0BAAAABR2YWxpZGF0ZWRQcm9vZnNDb3VudAgFAAAABWFjY3VtAAAAAl8xBAAAABJjdXJyZW50UHJvb2ZzSW5kZXgIBQAAAAVhY2N1bQAAAAJfMgQAAAAKaXNWZXJpZmllZAMJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzBQAAABJjdXJyZW50UHJvb2ZzSW5kZXgJAAJZAAAAAQUAAAAEbmV4dAAAAAAAAAAAAQAAAAAAAAAAAAkABRQAAAACCQAAZAAAAAIFAAAAFHZhbGlkYXRlZFByb29mc0NvdW50BQAAAAppc1ZlcmlmaWVkCQAAZAAAAAIFAAAAEmN1cnJlbnRQcm9vZnNJbmRleAAAAAAAAAAAAQQAAAAOdmFsaWRhdGlvbkRhdGEKAAAAAAIkbAUAAAAJdmVyaWZpZXJzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAkABRQAAAACAAAAAAAAAAAAAAAAAAAAAAAACgEAAAAFJGYwXzEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAADc3VtAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAAFJGYwXzIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAE0xpc3Qgc2l6ZSBleGNlZWRzIDgJAQAAAAUkZjBfMgAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAICQAAZwAAAAIIBQAAAA52YWxpZGF0aW9uRGF0YQAAAAJfMQUAAAARdmVyaWZpZXJzUmVxdWlyZWTYcYR+", "height": 2743503, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: AQHZK71TiM3hwqXmCwXgqDBnmSXk9rieCee1EVpQFsN1 Next: none Full:
OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let a = base58'DNDe2ziQMdDJSijzg5hDggeA1yxxwiAdqiu2hKo6dPSb'
4+let a = "currentLockId"
55
6-@Callable(b)
7-func call () = [BooleanEntry("Executed_6", true), ScriptTransfer(b.caller, 200000, unit)]
6+let b = "adminContract"
7+
8+let c = "treasuryContract"
9+
10+let d = "isFreezed"
11+
12+let e = "isConstructed"
13+
14+let f = "verifiers"
15+
16+let g = "verifiersData"
17+
18+let h = "unlockFeeBasis"
19+
20+let i = "__"
21+
22+let j = 10000000000
23+
24+func k (l) = {
25+ let m = l
26+ if ($isInstanceOf(m, "AttachedPayment"))
27+ then {
28+ let n = m
29+ n
30+ }
31+ else throw("fail to cast into AttachedPayment")
32+ }
833
934
10-@Verifier(c)
11-func d () = sigVerify(c.bodyBytes, c.proofs[0], a)
35+func o (l) = {
36+ let m = l
37+ if ($isInstanceOf(m, "ByteVector"))
38+ then {
39+ let n = m
40+ n
41+ }
42+ else throw("fail to cast into ByteVector")
43+ }
44+
45+
46+func p (q) = {
47+ let m = q
48+ if ($isInstanceOf(m, "Int"))
49+ then {
50+ let r = m
51+ r
52+ }
53+ else throw("fail to cast into Int")
54+ }
55+
56+
57+func s (t,u,v,w) = {
58+ let x = (height - t)
59+ if ((x >= u))
60+ then (v - w)
61+ else {
62+ let y = fraction(v, j, u, HALFUP)
63+ let z = fraction(y, x, j)
64+ (z - w)
65+ }
66+ }
67+
68+
69+func A (v) = {
70+ let B = getIntegerValue(h)
71+ if ((B == 0))
72+ then 0
73+ else 0
74+ }
75+
76+
77+@Callable(C)
78+func constructor (D,E,F,G,H) = {
79+ let m = getBoolean(e)
80+ if ($isInstanceOf(m, "Boolean"))
81+ then throw("Constructor can be called just once")
82+ else {
83+ let I = size(G)
84+ if ((I > 8))
85+ then throw("Max verifiers number is 8")
86+ else {
87+ let J = makeString(G, i)
88+[StringEntry(b, D), IntegerEntry(a, 0), BooleanEntry(d, false), BooleanEntry(e, true), IntegerEntry(h, E), StringEntry(c, F), StringEntry(f, J), StringEntry(g, ((toString(I) + i) + toString(H)))]
89+ }
90+ }
91+ }
92+
93+
94+
95+@Callable(C)
96+func lock (K) = if (getBooleanValue(d))
97+ then throw("Contract operations is suspended")
98+ else {
99+ let L = k(C.payments[0])
100+ if ((0 >= L.amount))
101+ then throw("Amount must be positive")
102+ else if ((1440 > K))
103+ then throw("24 hours is minimum vesting period")
104+ else {
105+ let M = getIntegerValue(a)
106+ let N = toBase58String(C.caller.bytes)
107+ let O = toBase58String(o(L.assetId))
108+ let P = ((N + i) + toString(M))
109+ let Q = ((((((((toString(height) + i) + toString(L.amount)) + i) + "0") + i) + toString(K)) + i) + O)
110+[StringEntry(P, Q), IntegerEntry(a, (M + 1))]
111+ }
112+ }
113+
114+
115+
116+@Callable(C)
117+func withdraw (v,R) = if (getBooleanValue(d))
118+ then throw("Contract operations is suspended")
119+ else if (if ((0 >= v))
120+ then true
121+ else (0 > R))
122+ then throw("Amount must be positive or wrong lock id")
123+ else {
124+ let N = toBase58String(C.caller.bytes)
125+ let P = ((N + i) + toString(R))
126+ let S = split(getStringValue(P), i)
127+ if ((size(S) != 5))
128+ then throw("Internal error")
129+ else {
130+ let T = S[0]
131+ let U = S[1]
132+ let V = S[2]
133+ let W = S[3]
134+ let X = S[4]
135+ let Y = s(p(T), p(W), p(U), p(V))
136+ if ((v > Y))
137+ then throw(("Requested amount is two big, max available amount is: " + toString(Y)))
138+ else {
139+ let Z = ((((((((T + i) + U) + i) + toString((p(V) + v))) + i) + W) + i) + X)
140+[StringEntry(P, Z), ScriptTransfer(C.caller, v, fromBase58String(X))]
141+ }
142+ }
143+ }
144+
145+
146+
147+@Callable(C)
148+func freezeContract (aa) = {
149+ let ab = getStringValue(b)
150+ if ((ab != toBase58String(C.caller.bytes)))
151+ then throw("Only admin contract can call this function")
152+ else [BooleanEntry(d, !(aa))]
153+ }
154+
155+
156+
157+@Callable(C)
158+func changeFeeBasis (ac) = {
159+ let ab = getStringValue(b)
160+ if ((ab != toBase58String(C.caller.bytes)))
161+ then throw("Only admin contract can call this function")
162+ else if ((0 > ac))
163+ then throw("Fee basis can't be negative")
164+ else if ((ac > 1000))
165+ then throw("Fee basis can't be bigger than 10 percent")
166+ else [IntegerEntry(h, ac)]
167+ }
168+
169+
170+@Verifier(ad)
171+func ae () = {
172+ let G = split(getStringValue(f), i)
173+ let af = split(getStringValue(g), i)
174+ let I = p(af[0])
175+ let ag = p(af[1])
176+ func ah (ai,aj) = {
177+ let ak = ai._1
178+ let al = ai._2
179+ let am = if (sigVerify(ad.bodyBytes, ad.proofs[al], fromBase58String(aj)))
180+ then 1
181+ else 0
182+ $Tuple2((ak + am), (al + 1))
183+ }
184+
185+ let an = {
186+ let ao = G
187+ let ap = size(ao)
188+ let aq = $Tuple2(0, 0)
189+ func ar (as,at) = if ((at >= ap))
190+ then as
191+ else ah(as, ao[at])
192+
193+ func au (as,at) = if ((at >= ap))
194+ then as
195+ else throw("List size exceeds 8")
196+
197+ au(ar(ar(ar(ar(ar(ar(ar(ar(aq, 0), 1), 2), 3), 4), 5), 6), 7), 8)
198+ }
199+ (an._1 >= ag)
200+ }
12201

github/deemru/w8io/169f3d6 
28.25 ms