tx · 9nSDMuskYRASLBFmCZN89KibzWqkTnpNFQ8ErPPXeQ7J

3P9VVzzkP1Cfsk3LtTeuUaQqUt5D7sLthLe:  -0.01000000 Waves

2022.07.01 20:33 [3186503] smart account 3P9VVzzkP1Cfsk3LtTeuUaQqUt5D7sLthLe > SELF 0.00000000 Waves

{ "type": 13, "id": "9nSDMuskYRASLBFmCZN89KibzWqkTnpNFQ8ErPPXeQ7J", "fee": 1000000, "feeAssetId": null, "timestamp": 1656696819340, "version": 2, "chainId": 87, "sender": "3P9VVzzkP1Cfsk3LtTeuUaQqUt5D7sLthLe", "senderPublicKey": "HiH9eknsCZ417kt2aJnJ9HrnrWCYcdRoGsFi8yANmYx8", "proofs": [ "4zZiVmN1seTkrwBVe2z9U9xLxP8ueL9dPuDnsedytE7RmRWCM6ZNtWTrJYXYbwqdFbAX2TojerbwcjJwe7GmcG9B" ], "script": "base64:AAIFAAAAAAAAAA4IAhIDCgEEEgUKAwQIAQAAAA0AAAAAB3BsdXRvSWQBAAAAIAgLS31S8qASJW+T7s99SrIspsrLF1j9hxE9vHm2pxfdAAAAAApwbHV0b0lkU3RyAgAAACtZUUZZb013QVJNUXpaczN3cXVjQlRkSk5XU2JzWWszR0F3N3dzcVU0Z3lBAAAAABFwYXJhbWV0ZXJzQWRkcmVzcwkBAAAAB0FkZHJlc3MAAAABAQAAABoBV+7WJYtq2Ae0X0s1eNtV5rMlFw/bMdew9AAAAAANaXNzdWVyQWRkcmVzcwkBAAAAB0FkZHJlc3MAAAABAQAAABoBV5Da8Qa6EpviskTtonnWCUCOWpItluugFgAAAAAPdHJlYXN1cnlBZGRyZXNzCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFXX5Gl3s+bwG2ui4Xkp8K/2xW2tUCM95diAAAAAAt0ZWFtQWRkcmVzcwkBAAAAB0FkZHJlc3MAAAABAQAAABoBV9fhI1GOfKuIWtXXKJd12Ih104+uIwWm4QAAAAAGU2NhbGU4AAAAAAAF9eEAAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQAAAANrZXkEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAXgFAAAAByRtYXRjaDAFAAAAAXgAAAAAAAAAAAABAAAAEnRyeUdldEludFBhcmFtZXRlcgAAAAEAAAADa2V5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAAEXBhcmFtZXRlcnNBZGRyZXNzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABeAUAAAAHJG1hdGNoMAUAAAABeAAAAAAAAAAAAAEAAAASdHJ5R2V0U3RyUGFyYW1ldGVyAAAAAQAAAANrZXkEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAARcGFyYW1ldGVyc0FkZHJlc3MFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAF4BQAAAAckbWF0Y2gwBQAAAAF4AgAAAAABAAAAFWNhbGN1bGF0ZUJ1eWJhY2tSYXRpbwAAAAAEAAAADHRyZWFzdXJ5U2l6ZQkBAAAAEnRyeUdldEludFBhcmFtZXRlcgAAAAECAAAAEnN0YXRzX3RyZWFzdXJ5U2l6ZQAAAAAAAAATiAEAAAASY2FsY3VsYXRlUG9vbFByaWNlAAAAAgAAAAtwb29sQWRkcmVzcwAAAAhhc3NldFN0cgQAAAAIYTBXZWlnaHQJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAAC3Bvb2xBZGRyZXNzCQABLAAAAAIJAAEsAAAAAgIAAAAHc3RhdGljXwUAAAAIYXNzZXRTdHICAAAAB193ZWlnaHQEAAAACGExV2VpZ2h0CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAtwb29sQWRkcmVzcwkAASwAAAACCQABLAAAAAICAAAAB3N0YXRpY18FAAAACnBsdXRvSWRTdHICAAAAB193ZWlnaHQEAAAACWEwQmFsYW5jZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAALcG9vbEFkZHJlc3MJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfBQAAAAhhc3NldFN0cgIAAAAIX2JhbGFuY2UEAAAACWExQmFsYW5jZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAALcG9vbEFkZHJlc3MJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfBQAAAApwbHV0b0lkU3RyAgAAAAhfYmFsYW5jZQkAAGsAAAADBQAAAAZTY2FsZTgJAABoAAAAAgUAAAAJYTFCYWxhbmNlBQAAAAhhMFdlaWdodAkAAGgAAAACBQAAAAlhMEJhbGFuY2UFAAAACGExV2VpZ2h0AQAAABNjYWxjdWxhdGVJc3N1ZVBsdXRvAAAAAgAAAAdhc3NldElkAAAABmFtb3VudAQAAAAUb25ib2FyZGluZ1BhcmFtZXRlcnMEAAAAByRtYXRjaDAJAAP8AAAABAUAAAARcGFyYW1ldGVyc0FkZHJlc3MCAAAAF2dldE9uYm9hcmRpbmdQYXJhbWV0ZXJzCQAETAAAAAIHBQAAAANuaWwFAAAAA25pbAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAJTGlzdFtBbnldBAAAAAJpbgUAAAAHJG1hdGNoMAUAAAACaW4JAAACAAAAAQIAAAAWY2Fubm90IGxvYWQgcGFyYW1ldGVycwMJAAAAAAAAAgUAAAAUb25ib2FyZGluZ1BhcmFtZXRlcnMFAAAAFG9uYm9hcmRpbmdQYXJhbWV0ZXJzBAAAAAxidXliYWNrUmF0aW8EAAAAByRtYXRjaDAJAAGRAAAAAgUAAAAUb25ib2FyZGluZ1BhcmFtZXRlcnMAAAAAAAAAAAQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABeAUAAAAHJG1hdGNoMAUAAAABeAkAAAIAAAABAgAAABdjYW5ub3QgcGFyc2UgcGFyYW1ldGVycwQAAAAHcHJlbWl1bQQAAAAHJG1hdGNoMAkAAZEAAAACBQAAABRvbmJvYXJkaW5nUGFyYW1ldGVycwAAAAAAAAAAAQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAF4BQAAAAckbWF0Y2gwBQAAAAF4CQAAAgAAAAECAAAAF2Nhbm5vdCBwYXJzZSBwYXJhbWV0ZXJzBAAAAAt0ZWFtUHJlbWl1bQQAAAAHJG1hdGNoMAkAAZEAAAACBQAAABRvbmJvYXJkaW5nUGFyYW1ldGVycwAAAAAAAAAAAwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAF4BQAAAAckbWF0Y2gwBQAAAAF4CQAAAgAAAAECAAAAF2Nhbm5vdCBwYXJzZSBwYXJhbWV0ZXJzBAAAAAphc3NldElkU3RyCQACWAAAAAEFAAAAB2Fzc2V0SWQEAAAAB3Bvb2xTdHIJAQAAABJ0cnlHZXRTdHJQYXJhbWV0ZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAGYXNzZXRfBQAAAAphc3NldElkU3RyAgAAAAVfcG9vbAQAAAALcG9vbEFkZHJlc3MJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAB3Bvb2xTdHIEAAAAD2Ftb3VudFRvQnV5YmFjawkAAGsAAAADBQAAAAZhbW91bnQFAAAADGJ1eWJhY2tSYXRpbwAAAAAAAAAnEAQAAAANYW1vdW50VG9Jc3N1ZQkAAGUAAAACBQAAAAZhbW91bnQFAAAAD2Ftb3VudFRvQnV5YmFjawQAAAADaW52CQAD/AAAAAQFAAAAC3Bvb2xBZGRyZXNzAgAAAARzd2FwCQAETAAAAAIFAAAACnBsdXRvSWRTdHIJAARMAAAAAgAAAAAAAAAAAAUAAAADbmlsCQAETAAAAAIJAQAAAA9BdHRhY2hlZFBheW1lbnQAAAACBQAAAAdhc3NldElkBQAAAA9hbW91bnRUb0J1eWJhY2sFAAAAA25pbAMJAAAAAAAAAgUAAAADaW52BQAAAANpbnYEAAAAC3BsdXRvQm91Z2h0BAAAAAckbWF0Y2gwBQAAAANpbnYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABeAUAAAAHJG1hdGNoMAUAAAABeAAAAAAAAAAAAAQAAAARYXNzZXRQcmljZVRvUGx1dG8JAQAAABJjYWxjdWxhdGVQb29sUHJpY2UAAAACBQAAAAtwb29sQWRkcmVzcwUAAAAKYXNzZXRJZFN0cgQAAAALcGx1dG9Jc3N1ZWQJAABrAAAAAwUAAAANYW1vdW50VG9Jc3N1ZQUAAAARYXNzZXRQcmljZVRvUGx1dG8FAAAABlNjYWxlOAQAAAAKdG90YWxQbHV0bwkAAGQAAAACBQAAAAtwbHV0b0JvdWdodAUAAAALcGx1dG9Jc3N1ZWQEAAAAEnByZW1pdW1QbHV0b0lzc3VlZAkAAGsAAAADBQAAAAp0b3RhbFBsdXRvBQAAAAdwcmVtaXVtAAAAAAAAACcQBAAAAA90ZWFtUGx1dG9Jc3N1ZWQJAABrAAAAAwUAAAAKdG90YWxQbHV0bwUAAAALdGVhbVByZW1pdW0AAAAAAAAAJxAEAAAABGludjIJAAP8AAAABAUAAAANaXNzdWVyQWRkcmVzcwIAAAAMcmVxdWVzdElzc3VlCQAETAAAAAIJAABkAAAAAgkAAGQAAAACBQAAAAtwbHV0b0lzc3VlZAUAAAAScHJlbWl1bVBsdXRvSXNzdWVkBQAAAA90ZWFtUGx1dG9Jc3N1ZWQFAAAAA25pbAUAAAADbmlsAwkAAAAAAAACBQAAAARpbnYyBQAAAARpbnYyCQAETAAAAAIFAAAAC3BsdXRvSXNzdWVkCQAETAAAAAIFAAAAC3BsdXRvQm91Z2h0CQAETAAAAAIFAAAAEnByZW1pdW1QbHV0b0lzc3VlZAkABEwAAAACBQAAAA90ZWFtUGx1dG9Jc3N1ZWQJAARMAAAAAgUAAAANYW1vdW50VG9Jc3N1ZQUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAgAAAAFpAQAAAAppc3N1ZVBsdXRvAAAAAQAAAAVkZWJ1ZwQAAAAHYXNzZXRJZAkBAAAABXZhbHVlAAAAAQgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAHYXNzZXRJZAQAAAAGcmVzdWx0CQEAAAATY2FsY3VsYXRlSXNzdWVQbHV0bwAAAAIFAAAAB2Fzc2V0SWQJAQAAAAV2YWx1ZQAAAAEICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAMJAAAAAAAAAgUAAAAGcmVzdWx0BQAAAAZyZXN1bHQDBQAAAAVkZWJ1ZwkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGlzc3VlZDogCQABpAAAAAEJAAGRAAAAAgUAAAAGcmVzdWx0AAAAAAAAAAAAAgAAAAo7IGJvdWdodDogCQABpAAAAAEJAAGRAAAAAgUAAAAGcmVzdWx0AAAAAAAAAAABAgAAAAs7IHByZW1pdW06IAkAAaQAAAABCQABkQAAAAIFAAAABnJlc3VsdAAAAAAAAAAAAgIAAAAIOyB0ZWFtOiAJAAGkAAAAAQkAAZEAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAMJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAPdHJlYXN1cnlBZGRyZXNzCQABkQAAAAIFAAAABnJlc3VsdAAAAAAAAAAABAUAAAAHYXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIJAABkAAAAAgkAAGQAAAACCQABkQAAAAIFAAAABnJlc3VsdAAAAAAAAAAAAAkAAZEAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAEJAAGRAAAAAgUAAAAGcmVzdWx0AAAAAAAAAAACBQAAAAdwbHV0b0lkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAC3RlYW1BZGRyZXNzCQABkQAAAAIFAAAABnJlc3VsdAAAAAAAAAAAAwUAAAAHcGx1dG9JZAUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFpAQAAABJldmFsdWF0ZUlzc3VlUGx1dG8AAAADAAAABWRlYnVnAAAACmFzc2V0SWRTdHIAAAAGYW1vdW50BAAAAAdhc3NldElkCQACWQAAAAEFAAAACmFzc2V0SWRTdHIEAAAABnJlc3VsdAkBAAAAE2NhbGN1bGF0ZUlzc3VlUGx1dG8AAAACBQAAAAdhc3NldElkBQAAAAZhbW91bnQDCQAAAAAAAAIFAAAABnJlc3VsdAUAAAAGcmVzdWx0AwUAAAAFZGVidWcJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhpc3N1ZWQ6IAkAAaQAAAABCQABkQAAAAIFAAAABnJlc3VsdAAAAAAAAAAAAAIAAAAKOyBib3VnaHQ6IAkAAaQAAAABCQABkQAAAAIFAAAABnJlc3VsdAAAAAAAAAAAAQIAAAALOyBwcmVtaXVtOiAJAAGkAAAAAQkAAZEAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAICAAAACDsgdGVhbTogCQABpAAAAAEJAAGRAAAAAgUAAAAGcmVzdWx0AAAAAAAAAAADCQAFFAAAAAIFAAAAA25pbAkAAGQAAAACCQABkQAAAAIFAAAABnJlc3VsdAAAAAAAAAAAAAkAAZEAAAACBQAAAAZyZXN1bHQAAAAAAAAAAAEJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXntIxhR", "height": 3186503, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 79Z1Zp1DG2tpmF8uxFoV3siQ2LvaijSWJwt6GFZ3Jfqc Next: 5RidNqKmo6KneS4rLvZqimdJtHqyCdpT3C2GGLB5GsV2 Diff:
OldNewDifferences
6363 }
6464
6565
66-@Callable(w)
67-func issuePluto (x) = {
68- let y = {
66+func w (x,y) = {
67+ let z = {
6968 let j = invoke(c, "getOnboardingParameters", [false], nil)
7069 if ($isInstanceOf(j, "List[Any]"))
7170 then {
72- let z = j
73- z
71+ let A = j
72+ A
7473 }
7574 else throw("cannot load parameters")
7675 }
77- if ((y == y))
76+ if ((z == z))
7877 then {
79- let A = {
80- let j = y[4]
81- if ($isInstanceOf(j, "Int"))
82- then {
83- let k = j
84- k
85- }
86- else throw("cannot parse parameters")
87- }
8878 let B = {
89- let j = y[1]
79+ let j = z[4]
9080 if ($isInstanceOf(j, "Int"))
9181 then {
9282 let k = j
9585 else throw("cannot parse parameters")
9686 }
9787 let C = {
98- let j = y[3]
88+ let j = z[1]
9989 if ($isInstanceOf(j, "Int"))
10090 then {
10191 let k = j
10393 }
10494 else throw("cannot parse parameters")
10595 }
106- let D = value(w.payments[0].assetId)
107- let E = toBase58String(D)
108- let F = w.payments[0].amount
109- let G = m((("asset_" + E) + "_pool"))
110- let q = addressFromStringValue(G)
111- let H = fraction(F, A, 10000)
112- let I = (F - H)
113- let J = invoke(q, "swap", [b, 0], [AttachedPayment(D, H)])
114- if ((J == J))
96+ let D = {
97+ let j = z[3]
98+ if ($isInstanceOf(j, "Int"))
99+ then {
100+ let k = j
101+ k
102+ }
103+ else throw("cannot parse parameters")
104+ }
105+ let E = toBase58String(x)
106+ let F = m((("asset_" + E) + "_pool"))
107+ let q = addressFromStringValue(F)
108+ let G = fraction(y, B, 10000)
109+ let H = (y - G)
110+ let I = invoke(q, "swap", [b, 0], [AttachedPayment(x, G)])
111+ if ((I == I))
115112 then {
116- let K = {
117- let j = J
113+ let J = {
114+ let j = I
118115 if ($isInstanceOf(j, "Int"))
119116 then {
120117 let k = j
122119 }
123120 else 0
124121 }
125- let L = p(q, E)
126- let M = fraction(I, L, g)
127- let N = (K + M)
128- let O = fraction(N, B, 10000)
129- let P = fraction(N, C, 10000)
130- let Q = invoke(d, "requestIssue", [((M + O) + P)], nil)
131- if ((Q == Q))
132- then if (x)
133- then throw(((((((("issued: " + toString(M)) + "; bought: ") + toString(K)) + "; premium: ") + toString(O)) + "; team: ") + toString(P)))
134- else [ScriptTransfer(e, I, D), ScriptTransfer(w.caller, (N + O), a), ScriptTransfer(f, P, a)]
122+ let K = p(q, E)
123+ let L = fraction(H, K, g)
124+ let M = (J + L)
125+ let N = fraction(M, C, 10000)
126+ let O = fraction(M, D, 10000)
127+ let P = invoke(d, "requestIssue", [((L + N) + O)], nil)
128+ if ((P == P))
129+ then [L, J, N, O, H]
135130 else throw("Strict value is not equal to itself.")
136131 }
137132 else throw("Strict value is not equal to itself.")
140135 }
141136
142137
143-@Verifier(R)
144-func S () = sigVerify(R.bodyBytes, R.proofs[0], R.senderPublicKey)
138+@Callable(Q)
139+func issuePluto (R) = {
140+ let x = value(Q.payments[0].assetId)
141+ let S = w(x, value(Q.payments[0].amount))
142+ if ((S == S))
143+ then if (R)
144+ then throw(((((((("issued: " + toString(S[0])) + "; bought: ") + toString(S[1])) + "; premium: ") + toString(S[2])) + "; team: ") + toString(S[3])))
145+ else [ScriptTransfer(e, S[4], x), ScriptTransfer(Q.caller, ((S[0] + S[1]) + S[2]), a), ScriptTransfer(f, S[3], a)]
146+ else throw("Strict value is not equal to itself.")
147+ }
148+
149+
150+
151+@Callable(Q)
152+func evaluateIssuePluto (R,E,y) = {
153+ let x = fromBase58String(E)
154+ let S = w(x, y)
155+ if ((S == S))
156+ then if (R)
157+ then throw(((((((("issued: " + toString(S[0])) + "; bought: ") + toString(S[1])) + "; premium: ") + toString(S[2])) + "; team: ") + toString(S[3])))
158+ else $Tuple2(nil, (S[0] + S[1]))
159+ else throw("Strict value is not equal to itself.")
160+ }
161+
162+
163+@Verifier(T)
164+func U () = sigVerify(T.bodyBytes, T.proofs[0], T.senderPublicKey)
145165
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let a = base58'YQFYoMwARMQzZs3wqucBTdJNWSbsYk3GAw7wsqU4gyA'
55
66 let b = "YQFYoMwARMQzZs3wqucBTdJNWSbsYk3GAw7wsqU4gyA"
77
88 let c = Address(base58'3PPhk65Ab4UDgbxYUDW7YSXkzHfWtj7WBrB')
99
1010 let d = Address(base58'3PF8pKC8CdmW9sEJUxQVSfezYRSJeThoNR3')
1111
1212 let e = Address(base58'3PAeDQGNbYa3W2EacZkJG3dSiDnHsQarqzZ')
1313
1414 let f = Address(base58'3PMcMiMEs6w56NRGacksXtFG5zS7doE9fpL')
1515
1616 let g = 100000000
1717
1818 func h (i) = {
1919 let j = getInteger(this, i)
2020 if ($isInstanceOf(j, "Int"))
2121 then {
2222 let k = j
2323 k
2424 }
2525 else 0
2626 }
2727
2828
2929 func l (i) = {
3030 let j = getInteger(c, i)
3131 if ($isInstanceOf(j, "Int"))
3232 then {
3333 let k = j
3434 k
3535 }
3636 else 0
3737 }
3838
3939
4040 func m (i) = {
4141 let j = getString(c, i)
4242 if ($isInstanceOf(j, "String"))
4343 then {
4444 let k = j
4545 k
4646 }
4747 else ""
4848 }
4949
5050
5151 func n () = {
5252 let o = l("stats_treasurySize")
5353 5000
5454 }
5555
5656
5757 func p (q,r) = {
5858 let s = getIntegerValue(q, (("static_" + r) + "_weight"))
5959 let t = getIntegerValue(q, (("static_" + b) + "_weight"))
6060 let u = getIntegerValue(q, (("global_" + r) + "_balance"))
6161 let v = getIntegerValue(q, (("global_" + b) + "_balance"))
6262 fraction(g, (v * s), (u * t))
6363 }
6464
6565
66-@Callable(w)
67-func issuePluto (x) = {
68- let y = {
66+func w (x,y) = {
67+ let z = {
6968 let j = invoke(c, "getOnboardingParameters", [false], nil)
7069 if ($isInstanceOf(j, "List[Any]"))
7170 then {
72- let z = j
73- z
71+ let A = j
72+ A
7473 }
7574 else throw("cannot load parameters")
7675 }
77- if ((y == y))
76+ if ((z == z))
7877 then {
79- let A = {
80- let j = y[4]
81- if ($isInstanceOf(j, "Int"))
82- then {
83- let k = j
84- k
85- }
86- else throw("cannot parse parameters")
87- }
8878 let B = {
89- let j = y[1]
79+ let j = z[4]
9080 if ($isInstanceOf(j, "Int"))
9181 then {
9282 let k = j
9383 k
9484 }
9585 else throw("cannot parse parameters")
9686 }
9787 let C = {
98- let j = y[3]
88+ let j = z[1]
9989 if ($isInstanceOf(j, "Int"))
10090 then {
10191 let k = j
10292 k
10393 }
10494 else throw("cannot parse parameters")
10595 }
106- let D = value(w.payments[0].assetId)
107- let E = toBase58String(D)
108- let F = w.payments[0].amount
109- let G = m((("asset_" + E) + "_pool"))
110- let q = addressFromStringValue(G)
111- let H = fraction(F, A, 10000)
112- let I = (F - H)
113- let J = invoke(q, "swap", [b, 0], [AttachedPayment(D, H)])
114- if ((J == J))
96+ let D = {
97+ let j = z[3]
98+ if ($isInstanceOf(j, "Int"))
99+ then {
100+ let k = j
101+ k
102+ }
103+ else throw("cannot parse parameters")
104+ }
105+ let E = toBase58String(x)
106+ let F = m((("asset_" + E) + "_pool"))
107+ let q = addressFromStringValue(F)
108+ let G = fraction(y, B, 10000)
109+ let H = (y - G)
110+ let I = invoke(q, "swap", [b, 0], [AttachedPayment(x, G)])
111+ if ((I == I))
115112 then {
116- let K = {
117- let j = J
113+ let J = {
114+ let j = I
118115 if ($isInstanceOf(j, "Int"))
119116 then {
120117 let k = j
121118 k
122119 }
123120 else 0
124121 }
125- let L = p(q, E)
126- let M = fraction(I, L, g)
127- let N = (K + M)
128- let O = fraction(N, B, 10000)
129- let P = fraction(N, C, 10000)
130- let Q = invoke(d, "requestIssue", [((M + O) + P)], nil)
131- if ((Q == Q))
132- then if (x)
133- then throw(((((((("issued: " + toString(M)) + "; bought: ") + toString(K)) + "; premium: ") + toString(O)) + "; team: ") + toString(P)))
134- else [ScriptTransfer(e, I, D), ScriptTransfer(w.caller, (N + O), a), ScriptTransfer(f, P, a)]
122+ let K = p(q, E)
123+ let L = fraction(H, K, g)
124+ let M = (J + L)
125+ let N = fraction(M, C, 10000)
126+ let O = fraction(M, D, 10000)
127+ let P = invoke(d, "requestIssue", [((L + N) + O)], nil)
128+ if ((P == P))
129+ then [L, J, N, O, H]
135130 else throw("Strict value is not equal to itself.")
136131 }
137132 else throw("Strict value is not equal to itself.")
138133 }
139134 else throw("Strict value is not equal to itself.")
140135 }
141136
142137
143-@Verifier(R)
144-func S () = sigVerify(R.bodyBytes, R.proofs[0], R.senderPublicKey)
138+@Callable(Q)
139+func issuePluto (R) = {
140+ let x = value(Q.payments[0].assetId)
141+ let S = w(x, value(Q.payments[0].amount))
142+ if ((S == S))
143+ then if (R)
144+ then throw(((((((("issued: " + toString(S[0])) + "; bought: ") + toString(S[1])) + "; premium: ") + toString(S[2])) + "; team: ") + toString(S[3])))
145+ else [ScriptTransfer(e, S[4], x), ScriptTransfer(Q.caller, ((S[0] + S[1]) + S[2]), a), ScriptTransfer(f, S[3], a)]
146+ else throw("Strict value is not equal to itself.")
147+ }
148+
149+
150+
151+@Callable(Q)
152+func evaluateIssuePluto (R,E,y) = {
153+ let x = fromBase58String(E)
154+ let S = w(x, y)
155+ if ((S == S))
156+ then if (R)
157+ then throw(((((((("issued: " + toString(S[0])) + "; bought: ") + toString(S[1])) + "; premium: ") + toString(S[2])) + "; team: ") + toString(S[3])))
158+ else $Tuple2(nil, (S[0] + S[1]))
159+ else throw("Strict value is not equal to itself.")
160+ }
161+
162+
163+@Verifier(T)
164+func U () = sigVerify(T.bodyBytes, T.proofs[0], T.senderPublicKey)
145165

github/deemru/w8io/3ef1775 
50.36 ms