tx · GdXe6VdvU4ibEwf6gB4mnT77upe1tJLuy58odhjkttYt 3P52TtidVCVeSQiC38weUFGZWcP1r5VRw1B: -0.00500000 Waves 2023.12.08 16:26 [3943625] smart account 3P52TtidVCVeSQiC38weUFGZWcP1r5VRw1B > SELF 0.00000000 Waves
{ "type": 13, "id": "GdXe6VdvU4ibEwf6gB4mnT77upe1tJLuy58odhjkttYt", "fee": 500000, "feeAssetId": null, "timestamp": 1702042017523, "version": 2, "chainId": 87, "sender": "3P52TtidVCVeSQiC38weUFGZWcP1r5VRw1B", "senderPublicKey": "87q18YNQT35ZcKk6Q3aSFCAv4dvkkBf4iuzic7qHbikw", "proofs": [ "LF6L46ucENia5jpHXoHjGjdazhACgHoDGQoANDmdQ32rMNsWEriJwQbVMScLUyKb6SeubaCbo5pZXC7YNKP8mkf" ], "script": "base64:BgIMCAISAwoBCBIDCgEICAAGY2FsbGVyCQERQGV4dHJOYXRpdmUoMTA2MikBAiMzUE1ibnFpZmZyeDVOUkFzZ3VuNmJHZEU0VDRNOWd4V0xnZwAFYWRtaW4JARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNQOU1VcmJlUWtlZjVkS3BIdzdRTjdqdjd5NHE3WFZVaTZKAARwb29sCQERQGV4dHJOYXRpdmUoMTA2MikBAiMzUERCck5QR1JHUW03d2J4c2o3Z1BzZk1QVHhUNWVQMU1VZwABUgkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM1A2OHpOaXVmc3UxdmlacHUxYVkzY2RhaFJSS2N2VjVOOTMBDWdldEFzc2V0Qnl0ZXMBCmFzc2V0SWRTdHIDCQAAAgUKYXNzZXRJZFN0cgIFV0FWRVMFBHVuaXQJANkEAQUKYXNzZXRJZFN0cgEKZ2V0QmFsYW5jZQEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgRVbml0BAF4BQckbWF0Y2gwCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQkA8AcCBQR0aGlzCQEFdmFsdWUBBQdhc3NldElkAQ5nZXRBc3NldFN0cmluZwEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFiBQckbWF0Y2gwCQDYBAEFAWICBVdBVkVTAQFiAgFjAWQEBHR5cGUJALwJAgUBZAIBOgMJAAACBQR0eXBlBQR0eXBlBAF0CQCRAwIFBHR5cGUAAAMJAAACBQF0BQF0BANhZGQJALwJAgkAkQMCBQR0eXBlAAECASwDCQAAAgUDYWRkBQNhZGQEBmFtb3VudAgFAWMCXzEDCQAAAgUGYW1vdW50BQZhbW91bnQEB2Fzc2V0SWQIBQFjAl8yAwkAAAIFB2Fzc2V0SWQFB2Fzc2V0SWQEA2JhbAkBCmdldEJhbGFuY2UBCQENZ2V0QXNzZXRCeXRlcwEJAJEDAgUDYWRkAAEDCQAAAgUDYmFsBQNiYWwEBXN3YXAxAwkAAAIFAXQCATAJAPwHBAkBB0FkZHJlc3MBCQDZBAEJAJEDAgUDYWRkAAACCGV4Y2hhbmdlCQDMCAIAAQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQENZ2V0QXNzZXRCeXRlcwEFB2Fzc2V0SWQFBmFtb3VudAUDbmlsAwkAAAIFAXQCATEJAPwHBAUBUgIEc3dhcAkAzAgCAAEJAMwIAgkAkQMCBQNhZGQAAQkAzAgCCQClCAEFBHRoaXMFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDWdldEFzc2V0Qnl0ZXMBBQdhc3NldElkBQZhbW91bnQFA25pbAMJAAACBQF0AgEyCQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUDYWRkAAACBHN3YXAJAMwIAgkAkQMCBQNhZGQAAQkAzAgCAAEFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDWdldEFzc2V0Qnl0ZXMBBQdhc3NldElkBQZhbW91bnQFA25pbAMJAAACBQF0AgEzCQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUDYWRkAAACGVN3YXBXQVZFU1RvQXNzZXRQYWlyRW50cnkJAMwIAgkAkQMCBQNhZGQAAQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQENZ2V0QXNzZXRCeXRlcwEFB2Fzc2V0SWQFBmFtb3VudAUDbmlsAwkAAAIFAXQCATQJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQNhZGQAAAIZU3dhcEFzc2V0VG9XQVZFU1BhaXJFbnRyeQkAzAgCBQdhc3NldElkBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQ1nZXRBc3NldEJ5dGVzAQUHYXNzZXRJZAUGYW1vdW50BQNuaWwDCQAAAgUBdAIBNQkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBCQCRAwIFA2FkZAAAAhdTd2FwWFROVG9Bc3NldFBhaXJFbnRyeQkAzAgCCQCRAwIFA2FkZAABBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQ1nZXRBc3NldEJ5dGVzAQUHYXNzZXRJZAUGYW1vdW50BQNuaWwDCQAAAgUBdAIBNgkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBCQCRAwIFA2FkZAAAAhdTd2FwQXNzZXRUb1hUTlBhaXJFbnRyeQkAzAgCBQdhc3NldElkBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQ1nZXRBc3NldEJ5dGVzAQUHYXNzZXRJZAUGYW1vdW50BQNuaWwFA25pbAMJAAACBQVzd2FwMQUFc3dhcDEEBG5iYWwJAGUCCQEKZ2V0QmFsYW5jZQEJAQ1nZXRBc3NldEJ5dGVzAQkAkQMCBQNhZGQAAQUDYmFsAwkAAAIFBG5iYWwFBG5iYWwJAJQKAgUEbmJhbAkAkQMCBQNhZGQAAQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgIBaQEEc3dhcAEFaW5wdXQDCQECIT0CCAUBaQZjYWxsZXIFBmNhbGxlcgkAAgECASEEAWEJALwJAgUFaW5wdXQCATsDCQAAAgUBYQUBYQQBcwkAlAoCCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAkBDmdldEFzc2V0U3RyaW5nAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkAwkAAAIFAXMFAXMEAXAICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AwkAAAIFAXAFAXAEA2JhbAkBCmdldEJhbGFuY2UBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQDCQAAAgUDYmFsBQNiYWwEAXoKAAIkbAUBYQoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFAXMKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBAWICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoDCQAAAgUBegUBegQEbmJhbAkAZQIJAQpnZXRCYWxhbmNlAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQNiYWwDCQAAAgUEbmJhbAUEbmJhbAMJAGYCBQRuYmFsAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQBkAgUBcAUEbmJhbAgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQNuaWwJAAIBCQCkAwEFBG5iYWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEBdwEFaW5wdXQDCQECIT0CCAUBaQxvcmlnaW5DYWxsZXIFBmNhbGxlcgkAAgECASEDCQECIT0CCAUBaQZjYWxsZXIFBHBvb2wJAAIBAgEhBAFhCQC8CQIFBWlucHV0AgE7AwkAAAIFAWEFAWEEAXMJAJQKAggJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQJAQ5nZXRBc3NldFN0cmluZwEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAMJAAACBQFzBQFzBAFwCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAMJAAACBQFwBQFwBANiYWwJAQpnZXRCYWxhbmNlAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkAwkAAAIFA2JhbAUDYmFsBAF6CgACJGwFAWEKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQFzCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQFiAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAwkAAAIFAXoFAXoEBG5iYWwJAGUCCQEKZ2V0QmFsYW5jZQEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUDYmFsAwkAAAIFBG5iYWwFBG5iYWwDCQBmAgUEbmJhbAAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBWFkbWluBQRuYmFsCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUEcG9vbAUBcAgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQNuaWwJAAIBCQCkAwEFBG5iYWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAnR4AQZ2ZXJpZnkACQDFEwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5w7nBaQ==", "height": 3943625, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 5ZrGLhNJemdPTtYQyjspanPztepk46cQJwbJ1ZinJFi9 Next: 5RhD3AGa8t9XduusSfjubRd6bcA718VVa4i1zLY7sWoi Diff:
Old | New | Differences | |
---|---|---|---|
59 | 59 | then invoke(addressFromStringValue(add[0]), "SwapWAVESToAssetPairEntry", [add[1]], [AttachedPayment(getAssetBytes(assetId), amount)]) | |
60 | 60 | else if ((t == "4")) | |
61 | 61 | then invoke(addressFromStringValue(add[0]), "SwapAssetToWAVESPairEntry", [assetId], [AttachedPayment(getAssetBytes(assetId), amount)]) | |
62 | - | else nil | |
62 | + | else if ((t == "5")) | |
63 | + | then invoke(addressFromStringValue(add[0]), "SwapXTNToAssetPairEntry", [add[1]], [AttachedPayment(getAssetBytes(assetId), amount)]) | |
64 | + | else if ((t == "6")) | |
65 | + | then invoke(addressFromStringValue(add[0]), "SwapAssetToXTNPairEntry", [assetId], [AttachedPayment(getAssetBytes(assetId), amount)]) | |
66 | + | else nil | |
63 | 67 | if ((swap1 == swap1)) | |
64 | 68 | then { | |
65 | 69 | let nbal = (getBalance(getAssetBytes(add[1])) - bal) |
Old | New | Differences | |
---|---|---|---|
1 | 1 | {-# STDLIB_VERSION 6 #-} | |
2 | 2 | {-# SCRIPT_TYPE ACCOUNT #-} | |
3 | 3 | {-# CONTENT_TYPE DAPP #-} | |
4 | 4 | let caller = addressFromStringValue("3PMbnqiffrx5NRAsgun6bGdE4T4M9gxWLgg") | |
5 | 5 | ||
6 | 6 | let admin = addressFromStringValue("3P9MUrbeQkef5dKpHw7QN7jv7y4q7XVUi6J") | |
7 | 7 | ||
8 | 8 | let pool = addressFromStringValue("3PDBrNPGRGQm7wbxsj7gPsfMPTxT5eP1MUg") | |
9 | 9 | ||
10 | 10 | let R = addressFromStringValue("3P68zNiufsu1viZpu1aY3cdahRRKcvV5N93") | |
11 | 11 | ||
12 | 12 | func getAssetBytes (assetIdStr) = if ((assetIdStr == "WAVES")) | |
13 | 13 | then unit | |
14 | 14 | else fromBase58String(assetIdStr) | |
15 | 15 | ||
16 | 16 | ||
17 | 17 | func getBalance (assetId) = match assetId { | |
18 | 18 | case x: Unit => | |
19 | 19 | wavesBalance(this).available | |
20 | 20 | case _ => | |
21 | 21 | assetBalance(this, value(assetId)) | |
22 | 22 | } | |
23 | 23 | ||
24 | 24 | ||
25 | 25 | func getAssetString (assetId) = match assetId { | |
26 | 26 | case b: ByteVector => | |
27 | 27 | toBase58String(b) | |
28 | 28 | case _ => | |
29 | 29 | "WAVES" | |
30 | 30 | } | |
31 | 31 | ||
32 | 32 | ||
33 | 33 | func b (c,d) = { | |
34 | 34 | let type = split_4C(d, ":") | |
35 | 35 | if ((type == type)) | |
36 | 36 | then { | |
37 | 37 | let t = type[0] | |
38 | 38 | if ((t == t)) | |
39 | 39 | then { | |
40 | 40 | let add = split_4C(type[1], ",") | |
41 | 41 | if ((add == add)) | |
42 | 42 | then { | |
43 | 43 | let amount = c._1 | |
44 | 44 | if ((amount == amount)) | |
45 | 45 | then { | |
46 | 46 | let assetId = c._2 | |
47 | 47 | if ((assetId == assetId)) | |
48 | 48 | then { | |
49 | 49 | let bal = getBalance(getAssetBytes(add[1])) | |
50 | 50 | if ((bal == bal)) | |
51 | 51 | then { | |
52 | 52 | let swap1 = if ((t == "0")) | |
53 | 53 | then invoke(Address(fromBase58String(add[0])), "exchange", [1], [AttachedPayment(getAssetBytes(assetId), amount)]) | |
54 | 54 | else if ((t == "1")) | |
55 | 55 | then invoke(R, "swap", [1, add[1], toString(this)], [AttachedPayment(getAssetBytes(assetId), amount)]) | |
56 | 56 | else if ((t == "2")) | |
57 | 57 | then invoke(addressFromStringValue(add[0]), "swap", [add[1], 1], [AttachedPayment(getAssetBytes(assetId), amount)]) | |
58 | 58 | else if ((t == "3")) | |
59 | 59 | then invoke(addressFromStringValue(add[0]), "SwapWAVESToAssetPairEntry", [add[1]], [AttachedPayment(getAssetBytes(assetId), amount)]) | |
60 | 60 | else if ((t == "4")) | |
61 | 61 | then invoke(addressFromStringValue(add[0]), "SwapAssetToWAVESPairEntry", [assetId], [AttachedPayment(getAssetBytes(assetId), amount)]) | |
62 | - | else nil | |
62 | + | else if ((t == "5")) | |
63 | + | then invoke(addressFromStringValue(add[0]), "SwapXTNToAssetPairEntry", [add[1]], [AttachedPayment(getAssetBytes(assetId), amount)]) | |
64 | + | else if ((t == "6")) | |
65 | + | then invoke(addressFromStringValue(add[0]), "SwapAssetToXTNPairEntry", [assetId], [AttachedPayment(getAssetBytes(assetId), amount)]) | |
66 | + | else nil | |
63 | 67 | if ((swap1 == swap1)) | |
64 | 68 | then { | |
65 | 69 | let nbal = (getBalance(getAssetBytes(add[1])) - bal) | |
66 | 70 | if ((nbal == nbal)) | |
67 | 71 | then $Tuple2(nbal, add[1]) | |
68 | 72 | else throw("Strict value is not equal to itself.") | |
69 | 73 | } | |
70 | 74 | else throw("Strict value is not equal to itself.") | |
71 | 75 | } | |
72 | 76 | else throw("Strict value is not equal to itself.") | |
73 | 77 | } | |
74 | 78 | else throw("Strict value is not equal to itself.") | |
75 | 79 | } | |
76 | 80 | else throw("Strict value is not equal to itself.") | |
77 | 81 | } | |
78 | 82 | else throw("Strict value is not equal to itself.") | |
79 | 83 | } | |
80 | 84 | else throw("Strict value is not equal to itself.") | |
81 | 85 | } | |
82 | 86 | else throw("Strict value is not equal to itself.") | |
83 | 87 | } | |
84 | 88 | ||
85 | 89 | ||
86 | 90 | @Callable(i) | |
87 | 91 | func swap (input) = if ((i.caller != caller)) | |
88 | 92 | then throw("!") | |
89 | 93 | else { | |
90 | 94 | let a = split_4C(input, ";") | |
91 | 95 | if ((a == a)) | |
92 | 96 | then { | |
93 | 97 | let s = $Tuple2(i.payments[0].amount, getAssetString(i.payments[0].assetId)) | |
94 | 98 | if ((s == s)) | |
95 | 99 | then { | |
96 | 100 | let p = i.payments[0].amount | |
97 | 101 | if ((p == p)) | |
98 | 102 | then { | |
99 | 103 | let bal = getBalance(i.payments[0].assetId) | |
100 | 104 | if ((bal == bal)) | |
101 | 105 | then { | |
102 | 106 | let z = { | |
103 | 107 | let $l = a | |
104 | 108 | let $s = size($l) | |
105 | 109 | let $acc0 = s | |
106 | 110 | func $f0_1 ($a,$i) = if (($i >= $s)) | |
107 | 111 | then $a | |
108 | 112 | else b($a, $l[$i]) | |
109 | 113 | ||
110 | 114 | func $f0_2 ($a,$i) = if (($i >= $s)) | |
111 | 115 | then $a | |
112 | 116 | else throw("List size exceeds 10") | |
113 | 117 | ||
114 | 118 | $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10) | |
115 | 119 | } | |
116 | 120 | if ((z == z)) | |
117 | 121 | then { | |
118 | 122 | let nbal = (getBalance(i.payments[0].assetId) - bal) | |
119 | 123 | if ((nbal == nbal)) | |
120 | 124 | then if ((nbal > 0)) | |
121 | 125 | then [ScriptTransfer(i.caller, (p + nbal), i.payments[0].assetId)] | |
122 | 126 | else throw(toString(nbal)) | |
123 | 127 | else throw("Strict value is not equal to itself.") | |
124 | 128 | } | |
125 | 129 | else throw("Strict value is not equal to itself.") | |
126 | 130 | } | |
127 | 131 | else throw("Strict value is not equal to itself.") | |
128 | 132 | } | |
129 | 133 | else throw("Strict value is not equal to itself.") | |
130 | 134 | } | |
131 | 135 | else throw("Strict value is not equal to itself.") | |
132 | 136 | } | |
133 | 137 | else throw("Strict value is not equal to itself.") | |
134 | 138 | } | |
135 | 139 | ||
136 | 140 | ||
137 | 141 | ||
138 | 142 | @Callable(i) | |
139 | 143 | func w (input) = if ((i.originCaller != caller)) | |
140 | 144 | then throw("!") | |
141 | 145 | else if ((i.caller != pool)) | |
142 | 146 | then throw("!") | |
143 | 147 | else { | |
144 | 148 | let a = split_4C(input, ";") | |
145 | 149 | if ((a == a)) | |
146 | 150 | then { | |
147 | 151 | let s = $Tuple2(i.payments[0].amount, getAssetString(i.payments[0].assetId)) | |
148 | 152 | if ((s == s)) | |
149 | 153 | then { | |
150 | 154 | let p = i.payments[0].amount | |
151 | 155 | if ((p == p)) | |
152 | 156 | then { | |
153 | 157 | let bal = getBalance(i.payments[0].assetId) | |
154 | 158 | if ((bal == bal)) | |
155 | 159 | then { | |
156 | 160 | let z = { | |
157 | 161 | let $l = a | |
158 | 162 | let $s = size($l) | |
159 | 163 | let $acc0 = s | |
160 | 164 | func $f0_1 ($a,$i) = if (($i >= $s)) | |
161 | 165 | then $a | |
162 | 166 | else b($a, $l[$i]) | |
163 | 167 | ||
164 | 168 | func $f0_2 ($a,$i) = if (($i >= $s)) | |
165 | 169 | then $a | |
166 | 170 | else throw("List size exceeds 10") | |
167 | 171 | ||
168 | 172 | $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10) | |
169 | 173 | } | |
170 | 174 | if ((z == z)) | |
171 | 175 | then { | |
172 | 176 | let nbal = (getBalance(i.payments[0].assetId) - bal) | |
173 | 177 | if ((nbal == nbal)) | |
174 | 178 | then if ((nbal > 0)) | |
175 | 179 | then [ScriptTransfer(admin, nbal, i.payments[0].assetId), ScriptTransfer(pool, p, i.payments[0].assetId)] | |
176 | 180 | else throw(toString(nbal)) | |
177 | 181 | else throw("Strict value is not equal to itself.") | |
178 | 182 | } | |
179 | 183 | else throw("Strict value is not equal to itself.") | |
180 | 184 | } | |
181 | 185 | else throw("Strict value is not equal to itself.") | |
182 | 186 | } | |
183 | 187 | else throw("Strict value is not equal to itself.") | |
184 | 188 | } | |
185 | 189 | else throw("Strict value is not equal to itself.") | |
186 | 190 | } | |
187 | 191 | else throw("Strict value is not equal to itself.") | |
188 | 192 | } | |
189 | 193 | ||
190 | 194 | ||
191 | 195 | @Verifier(tx) | |
192 | 196 | func verify () = sigVerify_16Kb(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey) | |
193 | 197 |
github/deemru/w8io/3ef1775 30.51 ms ◑