tx · 7NXY6k4e2uyrY1u2DJBfpoDuHgpPZArA2R5uTSP7nBTy

3N1ytAUyhtig9X6F2hHHs1jbzYxr47Yp8Fr:  -0.00600000 Waves

2024.10.14 09:22 [3326149] smart account 3N1ytAUyhtig9X6F2hHHs1jbzYxr47Yp8Fr > SELF 0.00000000 Waves

{ "type": 13, "id": "7NXY6k4e2uyrY1u2DJBfpoDuHgpPZArA2R5uTSP7nBTy", "fee": 600000, "feeAssetId": null, "timestamp": 1728886997980, "version": 2, "chainId": 84, "sender": "3N1ytAUyhtig9X6F2hHHs1jbzYxr47Yp8Fr", "senderPublicKey": "jXCTQV8PjX2uC9UHBFveupYy9cjhY7stHbzE9cptymw", "proofs": [ "5evdTnTWdNc3fp1Bgc5HFJn2vcfbh1ZdQT8iR6ECqBJ8DsTbH1qSxPKJ6u4h6wVm7VMX3Kx3KmUpFwhL18zC5VQv" ], "script": "base64:BwIZCAISAwoBCBIECgICGBIECgICGBIECgICGCYACXNlcGFyYXRvcgICX18AC3dhdmVzU3RyaW5nAgVXQVZFUwAQY29udHJhY3RGaWxlbmFtZQIXbWVtZV9pbV9jYWxjdWxhdG9yLnJpZGUABW11bHQ4AIDC1y8BB3dyYXBFcnIBAXMJAKwCAgkArAICBRBjb250cmFjdEZpbGVuYW1lAgI6IAUBcwEIdGhyb3dFcnIBAXMJAAIBCQEHd3JhcEVycgEFAXMBD3ZhbGlkYXRlQWRkcmVzcwEHYWRkcmVzcwkBCWlzRGVmaW5lZAEJAKYIAQUHYWRkcmVzcwAMU1RBVFVTX0VNUFRZAAAADFNUQVRVU19SRUFEWQABAAlrU2h1dGRvd24CDnNodXRkb3duX19mbGFnAAtrUHJpY2VBc3NldAIMcHJpY2VfX2Fzc2V0AA5rTGlzdGluZ1ZvbHVtZQIPbGlzdGluZ19fdm9sdW1lAAxrQ3JlYXRpb25GZWUCEnNldHVwX19jcmVhdGlvbkZlZQAMa0N1cnZlVGFyZ2V0AhJzZXR1cF9fY3VydmVUYXJnZXQAEWtWaXJ0dWFsTGlxdWlkaXR5AhdzZXR1cF9fdmlydHVhbExpcXVpZGl0eQARa1Bvb2xDb250cmFjdEhhc2gCFHBvb2xfX2NvbnRyYWN0X19oYXNoABNrTGFzdEVtcHR5UG9vbEluZGV4AhdsYXN0X19lbXB0eV9wb29sX19pbmRleAAUa0ZpcnN0RW1wdHlQb29sSW5kZXgCGWZpcnN0X19lbXB0eV9fcG9vbF9faW5kZXgBFWtQb29sQWRkcmVzc0Zyb21JbmRleAEFaW5kZXgJALkJAgkAzAgCAgRwb29sCQDMCAIJAKQDAQUFaW5kZXgFA25pbAUJc2VwYXJhdG9yARVrUG9vbEluZGV4RnJvbUFkZHJlc3MBB2FkZHJlc3MJALkJAgkAzAgCAgRwb29sCQDMCAIJAKUIAQUHYWRkcmVzcwUDbmlsBQlzZXBhcmF0b3IBCmtQb29sQXNzZXQBB2FkZHJlc3MJALkJAgkAzAgCAgVhc3NldAkAzAgCCQClCAEFB2FkZHJlc3MFA25pbAUJc2VwYXJhdG9yAQtrUG9vbFN0YXR1cwEFaW5kZXgJALkJAgkAzAgCAgRwb29sCQDMCAICBnN0YXR1cwkAzAgCCQCkAwEFBWluZGV4BQNuaWwFCXNlcGFyYXRvcgAPa0ZhY3RvcnlBZGRyZXNzAhBmYWN0b3J5X19hZGRyZXNzABRmYWN0b3J5QWRkcmVzc09wdGlvbgQHJG1hdGNoMAkAnQgCBQR0aGlzBQ9rRmFjdG9yeUFkZHJlc3MDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQCmCAEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAA5mYWN0b3J5QWRkcmVzcwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCBRRmYWN0b3J5QWRkcmVzc09wdGlvbgkBB3dyYXBFcnIBAhdpbnZhbGlkIGZhY3RvcnkgYWRkcmVzcwAIc2h1dGRvd24JAQt2YWx1ZU9yRWxzZQIJAJsIAgUOZmFjdG9yeUFkZHJlc3MFCWtTaHV0ZG93bgcADmxhc3RFbXB0eUluZGV4CQELdmFsdWVPckVsc2UCCQCaCAIFDmZhY3RvcnlBZGRyZXNzBRNrTGFzdEVtcHR5UG9vbEluZGV4AAAAD2ZpcnN0RW1wdHlJbmRleAkBC3ZhbHVlT3JFbHNlAgkAmggCBQ5mYWN0b3J5QWRkcmVzcwUUa0ZpcnN0RW1wdHlQb29sSW5kZXgAAAANbGlzdGluZ1ZvbHVtZQkBC3ZhbHVlT3JFbHNlAgkAmggCBQ5mYWN0b3J5QWRkcmVzcwUOa0xpc3RpbmdWb2x1bWUAAAALY3JlYXRpb25GZWUJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOZmFjdG9yeUFkZHJlc3MFDGtDcmVhdGlvbkZlZQAAABBwb29sQ29udHJhY3RIYXNoCQEFdmFsdWUBCQCcCAIFDmZhY3RvcnlBZGRyZXNzBRFrUG9vbENvbnRyYWN0SGFzaAEMcGFyc2VBc3NldElkAQVpbnB1dAMJAAACBQVpbnB1dAULd2F2ZXNTdHJpbmcFBHVuaXQJANkEAQUFaW5wdXQBD2Fzc2V0SWRUb1N0cmluZwEFaW5wdXQDCQAAAgUFaW5wdXQFBHVuaXQFC3dhdmVzU3RyaW5nCQDYBAEJAQV2YWx1ZQEFBWlucHV0AQttdXN0QWRkcmVzcwIGY2FsbGVyB2FkZHJlc3MDCQAAAgUGY2FsbGVyBQdhZGRyZXNzBgkBCHRocm93RXJyAQIRcGVybWlzc2lvbiBkZW5pZWQBCG11c3RUaGlzAQZjYWxsZXIJAQttdXN0QWRkcmVzcwIFBmNhbGxlcgUEdGhpcwELbXVzdEZhY3RvcnkBBmNhbGxlcgkBC211c3RBZGRyZXNzAgUGY2FsbGVyBQ5mYWN0b3J5QWRkcmVzcwERY2hlY2tDb250cmFjdEhhc2gBB2FkZHJlc3MEByRtYXRjaDAFEHBvb2xDb250cmFjdEhhc2gDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQBaAUHJG1hdGNoMAkAAAIJAPEHAQUHYWRkcmVzcwUBaAYBDGlzUG9vbEV4aXN0cwELcG9vbEFkZHJlc3MJAQlpc0RlZmluZWQBCQCaCAIFDmZhY3RvcnlBZGRyZXNzCQEVa1Bvb2xJbmRleEZyb21BZGRyZXNzAQULcG9vbEFkZHJlc3MEAWkBBGluaXQBEWZhY3RvcnlBZGRyZXNzU3RyBAtjaGVja0NhbGxlcgkBCG11c3RUaGlzAQgFAWkGY2FsbGVyAwkAAAIFC2NoZWNrQ2FsbGVyBQtjaGVja0NhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCBQ9rRmFjdG9yeUFkZHJlc3MFEWZhY3RvcnlBZGRyZXNzU3RyBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEMYWRkRW1wdHlQb29sAg9jYWxsZXJQdWJsaWNLZXkEYXJncwQObmV3UG9vbEFkZHJlc3MJAKcIAQUPY2FsbGVyUHVibGljS2V5BAxuZXdQb29sSW5kZXgJAGQCBQ5sYXN0RW1wdHlJbmRleAABBAZjaGVja3MJAMwIAgMJAQEhAQUIc2h1dGRvd24GCQEIdGhyb3dFcnIBAhZub3QgYWxsb3dlZCAoc2h1dGRvd24pCQDMCAIDCQERY2hlY2tDb250cmFjdEhhc2gBBQ5uZXdQb29sQWRkcmVzcwYJAQh0aHJvd0VycgECH3Bvb2wgc2NyaXB0IGhhc2ggaXMgbm90IGFsbG93ZWQJAMwIAgMJAQEhAQkBDGlzUG9vbEV4aXN0cwEFDm5ld1Bvb2xBZGRyZXNzBgkBCHRocm93RXJyAQIicG9vbCBhZGRyZXNzIGlzIGFscmVhZHkgcmVnaXN0ZXJlZAUDbmlsAwkAAAIFBmNoZWNrcwUGY2hlY2tzBA5mYWN0b3J5QWN0aW9ucwkAzAgCCQD8BwQFDmZhY3RvcnlBZGRyZXNzAgxpbnRlZ2VyRW50cnkJAMwIAgUTa0xhc3RFbXB0eVBvb2xJbmRleAkAzAgCBQxuZXdQb29sSW5kZXgFA25pbAUDbmlsCQDMCAIJAPwHBAUOZmFjdG9yeUFkZHJlc3MCC3N0cmluZ0VudHJ5CQDMCAIJARVrUG9vbEFkZHJlc3NGcm9tSW5kZXgBBQxuZXdQb29sSW5kZXgJAMwIAgkApQgBBQ5uZXdQb29sQWRkcmVzcwUDbmlsBQNuaWwJAMwIAgkA/AcEBQ5mYWN0b3J5QWRkcmVzcwIMaW50ZWdlckVudHJ5CQDMCAIJARVrUG9vbEluZGV4RnJvbUFkZHJlc3MBBQ5uZXdQb29sQWRkcmVzcwkAzAgCBQxuZXdQb29sSW5kZXgFA25pbAUDbmlsCQDMCAIJAPwHBAUOZmFjdG9yeUFkZHJlc3MCDGludGVnZXJFbnRyeQkAzAgCCQELa1Bvb2xTdGF0dXMBBQxuZXdQb29sSW5kZXgJAMwIAgUMU1RBVFVTX0VNUFRZBQNuaWwFA25pbAUDbmlsCQCUCgIFA25pbAUOZmFjdG9yeUFjdGlvbnMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEKY3JlYXRlUG9vbAIPY2FsbGVyUHVibGljS2V5BGFyZ3MECm1pblBheW1lbnQJAGQCBQ1saXN0aW5nVm9sdW1lBQtjcmVhdGlvbkZlZQQGY2hlY2tzCQDMCAIDCQEBIQEFCHNodXRkb3duBgkBCHRocm93RXJyAQIWbm90IGFsbG93ZWQgKHNodXRkb3duKQkAzAgCCQELbXVzdEZhY3RvcnkBCAUBaQZjYWxsZXIJAMwIAgMJAGYCCQBlAgUObGFzdEVtcHR5SW5kZXgFD2ZpcnN0RW1wdHlJbmRleAAABgkBCHRocm93RXJyAQIYbm8gZW1wdHkgcG9vbHMgYXZhaWxhYmxlCQDMCAIDCQAAAggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQR1bml0BgkBCHRocm93RXJyAQIacGF5bWVudCBzaG91bGQgYmUgaW4gV0FWRVMJAMwIAgMJAGcCCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAUKbWluUGF5bWVudAYJAQh0aHJvd0VycgEJAKwCAgImcGF5bWVudCBhbW91bnQgc2hvdWxkIGJlIGdyZWF0ZXIgdGhhbiAJAKQDAQUKbWluUGF5bWVudAkAzAgCAwkBCWlzRGVmaW5lZAEJAJEDAgUEYXJncwAABgkBCHRocm93RXJyAQIZdG9rZW5OYW1lIGlzIG5vdCBwcm92aWRlZAkAzAgCAwkBCWlzRGVmaW5lZAEJAJEDAgUEYXJncwABBgkBCHRocm93RXJyAQIgdG9rZW5EZXNjcmlwdGlvbiBpcyBub3QgcHJvdmlkZWQJAMwIAgMJAQlpc0RlZmluZWQBCQCRAwIFBGFyZ3MAAgYJAQh0aHJvd0VycgECHXRva2VuUXVhbnRpdHkgaXMgbm90IHByb3ZpZGVkBQNuaWwDCQAAAgUGY2hlY2tzBQZjaGVja3MECXBvb2xJbmRleAkAZAIFD2ZpcnN0RW1wdHlJbmRleAABBBFwb29sQWRkcmVzc1N0cmluZwkBEUBleHRyTmF0aXZlKDEwNTMpAgUOZmFjdG9yeUFkZHJlc3MJARVrUG9vbEFkZHJlc3NGcm9tSW5kZXgBBQlwb29sSW5kZXgEC3Bvb2xBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA2MikBBRFwb29sQWRkcmVzc1N0cmluZwQNY2FsbGVyQWRkcmVzcwkApwgBBQ9jYWxsZXJQdWJsaWNLZXkECnBvb2xEb21haW4JAK8CAgURcG9vbEFkZHJlc3NTdHJpbmcACAQJcG9vbE93bmVyCQClCAEFDWNhbGxlckFkZHJlc3MECXRva2VuTmFtZQkAkQMCBQRhcmdzAAAECXRva2VuRGVzYwkAkQMCBQRhcmdzAAEEDXRva2VuUXVhbnRpdHkJAJEDAgUEYXJncwACBA5pbml0UG9vbEludm9rZQkA/AcEBQ5mYWN0b3J5QWRkcmVzcwIOaW5pdFBvb2xJbnZva2UJAMwIAgURcG9vbEFkZHJlc3NTdHJpbmcJAMwIAgkAzAgCBQpwb29sRG9tYWluCQDMCAIFCXBvb2xPd25lcgkAzAgCBQl0b2tlbk5hbWUJAMwIAgUJdG9rZW5EZXNjCQDMCAIFDXRva2VuUXVhbnRpdHkFA25pbAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BQNuaWwDCQAAAgUOaW5pdFBvb2xJbnZva2UFDmluaXRQb29sSW52b2tlBA5mYWN0b3J5QWN0aW9ucwkAzAgCCQD8BwQFDmZhY3RvcnlBZGRyZXNzAgxpbnRlZ2VyRW50cnkJAMwIAgUUa0ZpcnN0RW1wdHlQb29sSW5kZXgJAMwIAgUJcG9vbEluZGV4BQNuaWwFA25pbAkAzAgCCQD8BwQFDmZhY3RvcnlBZGRyZXNzAgxpbnRlZ2VyRW50cnkJAMwIAgkBC2tQb29sU3RhdHVzAQUJcG9vbEluZGV4CQDMCAIFDFNUQVRVU19SRUFEWQUDbmlsBQNuaWwFA25pbAkAlAoCBQNuaWwFDmZhY3RvcnlBY3Rpb25zCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBEm5vdGlmeVN0YXR1c1VwZGF0ZQIPY2FsbGVyUHVibGljS2V5BGFyZ3MEC3Bvb2xBZGRyZXNzCQCnCAEFD2NhbGxlclB1YmxpY0tleQQGY2hlY2tzCQDMCAIDCQEMaXNQb29sRXhpc3RzAQULcG9vbEFkZHJlc3MGCQEIdGhyb3dFcnIBAg5wb29sIG5vdCBmb3VuZAUDbmlsAwkAAAIFBmNoZWNrcwUGY2hlY2tzBAlwb29sSW5kZXgJARFAZXh0ck5hdGl2ZSgxMDUwKQIFDmZhY3RvcnlBZGRyZXNzCQEVa1Bvb2xJbmRleEZyb21BZGRyZXNzAQULcG9vbEFkZHJlc3MECW5ld1N0YXR1cwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGFyZ3MAAAQOZmFjdG9yeUFjdGlvbnMJAMwIAgkA/AcEBQ5mYWN0b3J5QWRkcmVzcwIMaW50ZWdlckVudHJ5CQDMCAIJAQtrUG9vbFN0YXR1cwEFCXBvb2xJbmRleAkAzAgCBQluZXdTdGF0dXMFA25pbAUDbmlsBQNuaWwJAJQKAgUDbmlsBQ5mYWN0b3J5QWN0aW9ucwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgC7QfUo", "height": 3326149, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 7HhGoX2KGrwQJWc9LaBuDMmvHpLNsCrLd6o8dnoh7w5s Next: ErZh2Cy8xigxkf5jGfEeqexNvWmNJNJKxdWptzDCJWfy Diff:
OldNewDifferences
2828
2929 let n = "listing__volume"
3030
31-let o = "pool__contract__hash"
31+let o = "setup__creationFee"
3232
33-let p = "last__empty_pool__index"
33+let p = "setup__curveTarget"
3434
35-let q = "first__empty__pool__index"
35+let q = "setup__virtualLiquidity"
3636
37-func r (s) = makeString(["pool", toString(s)], a)
37+let r = "pool__contract__hash"
38+
39+let s = "last__empty_pool__index"
40+
41+let t = "first__empty__pool__index"
42+
43+func u (v) = makeString(["pool", toString(v)], a)
3844
3945
40-func t (i) = makeString(["pool", toString(i)], a)
46+func w (i) = makeString(["pool", toString(i)], a)
4147
4248
43-func u (i) = makeString(["asset", toString(i)], a)
49+func x (i) = makeString(["asset", toString(i)], a)
4450
4551
46-func v (s) = makeString(["pool", "status", toString(s)], a)
52+func y (v) = makeString(["pool", "status", toString(v)], a)
4753
4854
49-let w = "factory__address"
55+let z = "factory__address"
5056
51-let x = {
52- let y = getString(this, w)
53- if ($isInstanceOf(y, "String"))
57+let A = {
58+ let B = getString(this, z)
59+ if ($isInstanceOf(B, "String"))
5460 then {
55- let f = y
61+ let f = B
5662 addressFromString(f)
5763 }
58- else if ($isInstanceOf(y, "Unit"))
64+ else if ($isInstanceOf(B, "Unit"))
5965 then unit
6066 else throw("Match error")
6167 }
6268
63-let z = valueOrErrorMessage(x, e("invalid factory address"))
69+let C = valueOrErrorMessage(A, e("invalid factory address"))
6470
65-let A = valueOrElse(getBoolean(z, l), false)
71+let D = valueOrElse(getBoolean(C, l), false)
6672
67-let B = valueOrElse(getInteger(z, p), 0)
73+let E = valueOrElse(getInteger(C, s), 0)
6874
69-let C = valueOrElse(getInteger(z, q), 0)
75+let F = valueOrElse(getInteger(C, t), 0)
7076
71-let D = valueOrElse(getInteger(z, n), 0)
77+let G = valueOrElse(getInteger(C, n), 0)
7278
73-func E (F) = if ((F == b))
79+let H = valueOrElse(getInteger(C, o), 0)
80+
81+let I = value(getBinary(C, r))
82+
83+func J (K) = if ((K == b))
7484 then unit
75- else fromBase58String(F)
85+ else fromBase58String(K)
7686
7787
78-func G (F) = if ((F == unit))
88+func L (K) = if ((K == unit))
7989 then b
80- else toBase58String(value(F))
90+ else toBase58String(value(K))
8191
8292
83-func H (I,i) = if ((I == i))
93+func M (N,i) = if ((N == i))
8494 then true
8595 else g("permission denied")
8696
8797
88-func J (I) = H(I, this)
98+func O (N) = M(N, this)
8999
90100
91-func K (I) = H(I, z)
101+func P (N) = M(N, C)
92102
93103
94-func L () = valueOrErrorMessage(getBinary(z, o), e("pool contract script hash is not set"))
104+func Q (i) = {
105+ let B = I
106+ if ($isInstanceOf(B, "ByteVector"))
107+ then {
108+ let R = B
109+ (scriptHash(i) == R)
110+ }
111+ else true
112+ }
95113
96114
97-func M (N) = isDefined(getInteger(z, t(N)))
115+func S (T) = isDefined(getInteger(C, w(T)))
98116
99117
100-@Callable(O)
101-func init (P) = {
102- let Q = J(O.caller)
103- if ((Q == Q))
104- then [StringEntry(w, P)]
118+@Callable(U)
119+func init (V) = {
120+ let W = O(U.caller)
121+ if ((W == W))
122+ then [StringEntry(z, V)]
105123 else throw("Strict value is not equal to itself.")
106124 }
107125
108126
109127
110-@Callable(O)
111-func addEmptyPool (R,S) = {
112- let T = addressFromPublicKey(R)
113- let U = (B + 1)
114- let V = [if (!(A))
128+@Callable(U)
129+func addEmptyPool (X,Y) = {
130+ let Z = addressFromPublicKey(X)
131+ let aa = (E + 1)
132+ let ab = [if (!(D))
115133 then true
116- else g("not allowed (shutdown)"), if (!(M(T)))
134+ else g("not allowed (shutdown)"), if (Q(Z))
135+ then true
136+ else g("pool script hash is not allowed"), if (!(S(Z)))
117137 then true
118138 else g("pool address is already registered")]
119- if ((V == V))
139+ if ((ab == ab))
120140 then {
121- let W = [invoke(z, "integerEntry", [p, U], nil), invoke(z, "stringEntry", [r(U), toString(T)], nil), invoke(z, "integerEntry", [t(T), U], nil), invoke(z, "integerEntry", [v(U), j], nil)]
122- $Tuple2(nil, W)
141+ let ac = [invoke(C, "integerEntry", [s, aa], nil), invoke(C, "stringEntry", [u(aa), toString(Z)], nil), invoke(C, "integerEntry", [w(Z), aa], nil), invoke(C, "integerEntry", [y(aa), j], nil)]
142+ $Tuple2(nil, ac)
123143 }
124144 else throw("Strict value is not equal to itself.")
125145 }
126146
127147
128148
129-@Callable(O)
130-func createPool (R,S) = {
131- let V = [if (!(A))
149+@Callable(U)
150+func createPool (X,Y) = {
151+ let ad = (G + H)
152+ let ab = [if (!(D))
132153 then true
133- else g("not allowed (shutdown)"), K(O.caller), if (((B - C) > 0))
154+ else g("not allowed (shutdown)"), P(U.caller), if (((E - F) > 0))
134155 then true
135- else g("no empty pools available"), if ((O.payments[0].assetId == unit))
156+ else g("no empty pools available"), if ((U.payments[0].assetId == unit))
136157 then true
137- else g("payment should be in WAVES"), if ((O.payments[0].amount > D))
158+ else g("payment should be in WAVES"), if ((U.payments[0].amount >= ad))
138159 then true
139- else g("payment amount should be greater than listing volume"), if (isDefined(S[0]))
160+ else g(("payment amount should be greater than " + toString(ad))), if (isDefined(Y[0]))
140161 then true
141- else g("tokenName is not provided"), if (isDefined(S[1]))
162+ else g("tokenName is not provided"), if (isDefined(Y[1]))
142163 then true
143- else g("tokenDescription is not provided"), if (isDefined(S[2]))
164+ else g("tokenDescription is not provided"), if (isDefined(Y[2]))
144165 then true
145166 else g("tokenQuantity is not provided")]
146- if ((V == V))
167+ if ((ab == ab))
147168 then {
148- let X = (C + 1)
149- let Y = getStringValue(z, r(X))
150- let N = addressFromStringValue(Y)
151- let Z = addressFromPublicKey(R)
152- let aa = take(Y, 8)
153- let ab = toString(Z)
154- let ac = S[0]
155- let ad = S[1]
156- let ae = S[2]
157- let af = invoke(z, "initPoolInvoke", [Y, [aa, ab, ac, ad, ae]], [AttachedPayment(O.payments[0].assetId, O.payments[0].amount)])
158- if ((af == af))
169+ let ae = (F + 1)
170+ let af = getStringValue(C, u(ae))
171+ let T = addressFromStringValue(af)
172+ let ag = addressFromPublicKey(X)
173+ let ah = take(af, 8)
174+ let ai = toString(ag)
175+ let aj = Y[0]
176+ let ak = Y[1]
177+ let al = Y[2]
178+ let am = invoke(C, "initPoolInvoke", [af, [ah, ai, aj, ak, al]], [AttachedPayment(U.payments[0].assetId, U.payments[0].amount)])
179+ if ((am == am))
159180 then {
160- let W = [invoke(z, "integerEntry", [q, X], nil), invoke(z, "integerEntry", [v(X), k], nil)]
161- $Tuple2(nil, W)
181+ let ac = [invoke(C, "integerEntry", [t, ae], nil), invoke(C, "integerEntry", [y(ae), k], nil)]
182+ $Tuple2(nil, ac)
162183 }
163184 else throw("Strict value is not equal to itself.")
164185 }
167188
168189
169190
170-@Callable(O)
171-func notifyStatusUpdate (R,S) = {
172- let N = addressFromPublicKey(R)
173- let V = [if (M(N))
191+@Callable(U)
192+func notifyStatusUpdate (X,Y) = {
193+ let T = addressFromPublicKey(X)
194+ let ab = [if (S(T))
174195 then true
175196 else g("pool not found")]
176- if ((V == V))
197+ if ((ab == ab))
177198 then {
178- let X = getIntegerValue(z, t(N))
179- let ag = parseIntValue(S[0])
180- let W = [invoke(z, "integerEntry", [v(X), ag], nil)]
181- $Tuple2(nil, W)
199+ let ae = getIntegerValue(C, w(T))
200+ let an = parseIntValue(Y[0])
201+ let ac = [invoke(C, "integerEntry", [y(ae), an], nil)]
202+ $Tuple2(nil, ac)
182203 }
183204 else throw("Strict value is not equal to itself.")
184205 }
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 7 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let a = "__"
55
66 let b = "WAVES"
77
88 let c = "meme_im_calculator.ride"
99
1010 let d = 100000000
1111
1212 func e (f) = ((c + ": ") + f)
1313
1414
1515 func g (f) = throw(e(f))
1616
1717
1818 func h (i) = isDefined(addressFromString(i))
1919
2020
2121 let j = 0
2222
2323 let k = 1
2424
2525 let l = "shutdown__flag"
2626
2727 let m = "price__asset"
2828
2929 let n = "listing__volume"
3030
31-let o = "pool__contract__hash"
31+let o = "setup__creationFee"
3232
33-let p = "last__empty_pool__index"
33+let p = "setup__curveTarget"
3434
35-let q = "first__empty__pool__index"
35+let q = "setup__virtualLiquidity"
3636
37-func r (s) = makeString(["pool", toString(s)], a)
37+let r = "pool__contract__hash"
38+
39+let s = "last__empty_pool__index"
40+
41+let t = "first__empty__pool__index"
42+
43+func u (v) = makeString(["pool", toString(v)], a)
3844
3945
40-func t (i) = makeString(["pool", toString(i)], a)
46+func w (i) = makeString(["pool", toString(i)], a)
4147
4248
43-func u (i) = makeString(["asset", toString(i)], a)
49+func x (i) = makeString(["asset", toString(i)], a)
4450
4551
46-func v (s) = makeString(["pool", "status", toString(s)], a)
52+func y (v) = makeString(["pool", "status", toString(v)], a)
4753
4854
49-let w = "factory__address"
55+let z = "factory__address"
5056
51-let x = {
52- let y = getString(this, w)
53- if ($isInstanceOf(y, "String"))
57+let A = {
58+ let B = getString(this, z)
59+ if ($isInstanceOf(B, "String"))
5460 then {
55- let f = y
61+ let f = B
5662 addressFromString(f)
5763 }
58- else if ($isInstanceOf(y, "Unit"))
64+ else if ($isInstanceOf(B, "Unit"))
5965 then unit
6066 else throw("Match error")
6167 }
6268
63-let z = valueOrErrorMessage(x, e("invalid factory address"))
69+let C = valueOrErrorMessage(A, e("invalid factory address"))
6470
65-let A = valueOrElse(getBoolean(z, l), false)
71+let D = valueOrElse(getBoolean(C, l), false)
6672
67-let B = valueOrElse(getInteger(z, p), 0)
73+let E = valueOrElse(getInteger(C, s), 0)
6874
69-let C = valueOrElse(getInteger(z, q), 0)
75+let F = valueOrElse(getInteger(C, t), 0)
7076
71-let D = valueOrElse(getInteger(z, n), 0)
77+let G = valueOrElse(getInteger(C, n), 0)
7278
73-func E (F) = if ((F == b))
79+let H = valueOrElse(getInteger(C, o), 0)
80+
81+let I = value(getBinary(C, r))
82+
83+func J (K) = if ((K == b))
7484 then unit
75- else fromBase58String(F)
85+ else fromBase58String(K)
7686
7787
78-func G (F) = if ((F == unit))
88+func L (K) = if ((K == unit))
7989 then b
80- else toBase58String(value(F))
90+ else toBase58String(value(K))
8191
8292
83-func H (I,i) = if ((I == i))
93+func M (N,i) = if ((N == i))
8494 then true
8595 else g("permission denied")
8696
8797
88-func J (I) = H(I, this)
98+func O (N) = M(N, this)
8999
90100
91-func K (I) = H(I, z)
101+func P (N) = M(N, C)
92102
93103
94-func L () = valueOrErrorMessage(getBinary(z, o), e("pool contract script hash is not set"))
104+func Q (i) = {
105+ let B = I
106+ if ($isInstanceOf(B, "ByteVector"))
107+ then {
108+ let R = B
109+ (scriptHash(i) == R)
110+ }
111+ else true
112+ }
95113
96114
97-func M (N) = isDefined(getInteger(z, t(N)))
115+func S (T) = isDefined(getInteger(C, w(T)))
98116
99117
100-@Callable(O)
101-func init (P) = {
102- let Q = J(O.caller)
103- if ((Q == Q))
104- then [StringEntry(w, P)]
118+@Callable(U)
119+func init (V) = {
120+ let W = O(U.caller)
121+ if ((W == W))
122+ then [StringEntry(z, V)]
105123 else throw("Strict value is not equal to itself.")
106124 }
107125
108126
109127
110-@Callable(O)
111-func addEmptyPool (R,S) = {
112- let T = addressFromPublicKey(R)
113- let U = (B + 1)
114- let V = [if (!(A))
128+@Callable(U)
129+func addEmptyPool (X,Y) = {
130+ let Z = addressFromPublicKey(X)
131+ let aa = (E + 1)
132+ let ab = [if (!(D))
115133 then true
116- else g("not allowed (shutdown)"), if (!(M(T)))
134+ else g("not allowed (shutdown)"), if (Q(Z))
135+ then true
136+ else g("pool script hash is not allowed"), if (!(S(Z)))
117137 then true
118138 else g("pool address is already registered")]
119- if ((V == V))
139+ if ((ab == ab))
120140 then {
121- let W = [invoke(z, "integerEntry", [p, U], nil), invoke(z, "stringEntry", [r(U), toString(T)], nil), invoke(z, "integerEntry", [t(T), U], nil), invoke(z, "integerEntry", [v(U), j], nil)]
122- $Tuple2(nil, W)
141+ let ac = [invoke(C, "integerEntry", [s, aa], nil), invoke(C, "stringEntry", [u(aa), toString(Z)], nil), invoke(C, "integerEntry", [w(Z), aa], nil), invoke(C, "integerEntry", [y(aa), j], nil)]
142+ $Tuple2(nil, ac)
123143 }
124144 else throw("Strict value is not equal to itself.")
125145 }
126146
127147
128148
129-@Callable(O)
130-func createPool (R,S) = {
131- let V = [if (!(A))
149+@Callable(U)
150+func createPool (X,Y) = {
151+ let ad = (G + H)
152+ let ab = [if (!(D))
132153 then true
133- else g("not allowed (shutdown)"), K(O.caller), if (((B - C) > 0))
154+ else g("not allowed (shutdown)"), P(U.caller), if (((E - F) > 0))
134155 then true
135- else g("no empty pools available"), if ((O.payments[0].assetId == unit))
156+ else g("no empty pools available"), if ((U.payments[0].assetId == unit))
136157 then true
137- else g("payment should be in WAVES"), if ((O.payments[0].amount > D))
158+ else g("payment should be in WAVES"), if ((U.payments[0].amount >= ad))
138159 then true
139- else g("payment amount should be greater than listing volume"), if (isDefined(S[0]))
160+ else g(("payment amount should be greater than " + toString(ad))), if (isDefined(Y[0]))
140161 then true
141- else g("tokenName is not provided"), if (isDefined(S[1]))
162+ else g("tokenName is not provided"), if (isDefined(Y[1]))
142163 then true
143- else g("tokenDescription is not provided"), if (isDefined(S[2]))
164+ else g("tokenDescription is not provided"), if (isDefined(Y[2]))
144165 then true
145166 else g("tokenQuantity is not provided")]
146- if ((V == V))
167+ if ((ab == ab))
147168 then {
148- let X = (C + 1)
149- let Y = getStringValue(z, r(X))
150- let N = addressFromStringValue(Y)
151- let Z = addressFromPublicKey(R)
152- let aa = take(Y, 8)
153- let ab = toString(Z)
154- let ac = S[0]
155- let ad = S[1]
156- let ae = S[2]
157- let af = invoke(z, "initPoolInvoke", [Y, [aa, ab, ac, ad, ae]], [AttachedPayment(O.payments[0].assetId, O.payments[0].amount)])
158- if ((af == af))
169+ let ae = (F + 1)
170+ let af = getStringValue(C, u(ae))
171+ let T = addressFromStringValue(af)
172+ let ag = addressFromPublicKey(X)
173+ let ah = take(af, 8)
174+ let ai = toString(ag)
175+ let aj = Y[0]
176+ let ak = Y[1]
177+ let al = Y[2]
178+ let am = invoke(C, "initPoolInvoke", [af, [ah, ai, aj, ak, al]], [AttachedPayment(U.payments[0].assetId, U.payments[0].amount)])
179+ if ((am == am))
159180 then {
160- let W = [invoke(z, "integerEntry", [q, X], nil), invoke(z, "integerEntry", [v(X), k], nil)]
161- $Tuple2(nil, W)
181+ let ac = [invoke(C, "integerEntry", [t, ae], nil), invoke(C, "integerEntry", [y(ae), k], nil)]
182+ $Tuple2(nil, ac)
162183 }
163184 else throw("Strict value is not equal to itself.")
164185 }
165186 else throw("Strict value is not equal to itself.")
166187 }
167188
168189
169190
170-@Callable(O)
171-func notifyStatusUpdate (R,S) = {
172- let N = addressFromPublicKey(R)
173- let V = [if (M(N))
191+@Callable(U)
192+func notifyStatusUpdate (X,Y) = {
193+ let T = addressFromPublicKey(X)
194+ let ab = [if (S(T))
174195 then true
175196 else g("pool not found")]
176- if ((V == V))
197+ if ((ab == ab))
177198 then {
178- let X = getIntegerValue(z, t(N))
179- let ag = parseIntValue(S[0])
180- let W = [invoke(z, "integerEntry", [v(X), ag], nil)]
181- $Tuple2(nil, W)
199+ let ae = getIntegerValue(C, w(T))
200+ let an = parseIntValue(Y[0])
201+ let ac = [invoke(C, "integerEntry", [y(ae), an], nil)]
202+ $Tuple2(nil, ac)
182203 }
183204 else throw("Strict value is not equal to itself.")
184205 }
185206
186207

github/deemru/w8io/c3f4982 
54.66 ms