w8 · tx · GMp···zFE

tx · GMpUpczuYr52ok8PwFgzrrpnkxaNMrJh4NLjg9qxUzFE

3PKygHiLgLC16j5bNP1T3UUudmH98Pp2v8o:  -0.01000000 Waves

2024.03.24 17:39 [4098178] smart account 3PKygHiLgLC16j5bNP1T3UUudmH98Pp2v8o > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "GMpUpczuYr52ok8PwFgzrrpnkxaNMrJh4NLjg9qxUzFE",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1711291255778,
    "version": 2,
    "chainId": 87,
    "sender": "3PKygHiLgLC16j5bNP1T3UUudmH98Pp2v8o",
    "senderPublicKey": "EKWFwVJMAk6xj9i7a2PGBZx557V7M57jEhyaZHH3mAc1",
    "proofs": [
        "3w3MgZt2FZZgwFqbKgXqBJkewseB497kfYjGiJ6EkujfvNuCpLkQ84DWg7Ah38oedEd6VFQfQH3JW1qqpR7KRBzF"
    ],
    "script": "base64:BgIPCAISAwoBCBIGCgQICAgBBwEPZ2V0UmFuZG9tTnVtYmVyBAh2YXJpYW50cwR0eElkFGhhdGNoaW5nRmluaXNoSGVpZ2h0Bm9mZnNldAQPcmFuZG9tU2VlZEJsb2NrCQEFdmFsdWUBCQDtBwEJAGUCBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAABBApyYW5kb21IYXNoCQDUFgEJAMsBAgUEdHhJZAkBBXZhbHVlAQgFD3JhbmRvbVNlZWRCbG9jawN2cmYJAGoCCQCyCQIFCnJhbmRvbUhhc2gFBm9mZnNldAUIdmFyaWFudHMBDGdldFJhbmRvbUdlbgUEZ2VuMQRnZW4yBHN0ZXAEdHhJZBRoYXRjaGluZ0ZpbmlzaEhlaWdodAQJcmFuZG9tTnVtCQEPZ2V0UmFuZG9tTnVtYmVyBAACBQR0eElkBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAUEc3RlcAQDZ2VuAwkAAAIFCXJhbmRvbU51bQAABQRnZW4xBQRnZW4yBQNnZW4BDXRyeUdldEludGVnZXIBA2tleQQDdmFsBAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAUDdmFsAQhpc1N5bWJvbAILYWNjdW11bGF0ZWQDc3ltAwkAAAIFA3N5bQgFC2FjY3VtdWxhdGVkAl8yCQBkAggFC2FjY3VtdWxhdGVkAl8xAAEJAGQCCAULYWNjdW11bGF0ZWQCXzEAAAEQZ2V0QW1vdW50T3JDbGVhcgEGYW1vdW50AwkBCGNvbnRhaW5zAgUGYW1vdW50AgEwAgAFBmFtb3VudAEIY2hhckxpc3QACQDMCAICAUEJAMwIAgIBQgkAzAgCAgFDCQDMCAICAUQJAMwIAgIBRQkAzAgCAgFGCQDMCAICAUcJAMwIAgIBSAkAzAgCAgFJCQDMCAICAUoJAMwIAgIBSwkAzAgCAgFMCQDMCAICAU0JAMwIAgIBTgkAzAgCAgFPCQDMCAICAVAJAMwIAgIBUQkAzAgCAgFSCQDMCAICAVMJAMwIAgIBVAkAzAgCAgFVCQDMCAICAVYJAMwIAgIBVwkAzAgCAgFYCQDMCAICAVkJAMwIAgIBWgUDbmlsAQ1uck9mVHlwZUdlbmVzAQNnZW4ECGdlbm90eXBlCQC1CQIJALMCAgkAsAICBQNnZW4ABQADAgAEBnBhcnRzMQkArAICCQCRAwIFCGdlbm90eXBlAAAJAJEDAgUIZ2Vub3R5cGUAAQQGcGFydHMyCQCsAgIJAJEDAgUIZ2Vub3R5cGUAAgkAkQMCBQhnZW5vdHlwZQADBAZwYXJ0czMJAKwCAgkAkQMCBQhnZW5vdHlwZQAECQCRAwIFCGdlbm90eXBlAAUEBnBhcnRzNAkArAICCQCRAwIFCGdlbm90eXBlAAYJAJEDAgUIZ2Vub3R5cGUABwQGcGFydHM1CQCsAgIJAJEDAgUIZ2Vub3R5cGUACAkAkQMCBQhnZW5vdHlwZQAJBAZwYXJ0czYJAKwCAgkAkQMCBQhnZW5vdHlwZQAKCQCRAwIFCGdlbm90eXBlAAsEBnBhcnRzNwkArAICCQCRAwIFCGdlbm90eXBlAAwJAJEDAgUIZ2Vub3R5cGUADQQGcGFydHM4CQCsAgIJAJEDAgUIZ2Vub3R5cGUADgkAkQMCBQhnZW5vdHlwZQAPBAVwYXJ0cwkAzAgCBQZwYXJ0czEJAMwIAgUGcGFydHMyCQDMCAIFBnBhcnRzMwkAzAgCBQZwYXJ0czQJAMwIAgUGcGFydHM1CQDMCAIFBnBhcnRzNgkAzAgCBQZwYXJ0czcJAMwIAgUGcGFydHM4BQNuaWwKAQ9zb3J0UGFydHNCeVR5cGUCA2FjYwRwYXJ0BApzcGxpdFBhcnRzCQC1CQIFBHBhcnQCAAMJAAACCQCRAwIFCnNwbGl0UGFydHMAAAIBVAkAzQgCCAUDYWNjAl8xCQCRAwIFCnNwbGl0UGFydHMAAQMJAAACCQCRAwIFCnNwbGl0UGFydHMAAAIBRAkAzQgCCAUDYWNjAl8yCQCRAwIFCnNwbGl0UGFydHMAAQkAAgECDFVOS05PV04gVFlQRQQGcmVzdWx0CgACJGwFBXBhcnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEPc29ydFBhcnRzQnlUeXBlAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA4CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAoBE2NvbXBvc2VTdHJpbmdUdXJ0bGUCA2FjYwRjaGFyBAljaGFyQ291bnQKAAIkbAgFBnJlc3VsdAJfMQoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgAABQRjaGFyCgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQhpc1N5bWJvbAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOAkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgJAKwCAgkArAICBQNhY2MJAKQDAQgFCWNoYXJDb3VudAJfMQUEY2hhcgoBEWNvbXBvc2VTdHJpbmdEdWNrAgNhY2MEY2hhcgQJY2hhckNvdW50CgACJGwIBQZyZXN1bHQCXzIKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIAAAUEY2hhcgoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEIaXNTeW1ib2wCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDgJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAICQCsAgIJAKwCAgUDYWNjCQCkAwEIBQljaGFyQ291bnQCXzEFBGNoYXIJAMwIAgkBC1N0cmluZ0VudHJ5AgIMREVCVUdfVFVSVExFCQCRAwIIBQZyZXN1bHQCXzEAAAkAzAgCCQELU3RyaW5nRW50cnkCAgxERUJVR19UVVJUTEUJAJEDAggFBnJlc3VsdAJfMgAABQNuaWwCAWkBA3BvYwEKYXNzZXRJZFN0cgQFYXNzZXQJANkEAQUKYXNzZXRJZFN0cgQPcGFyc2VkQXNzZXRJbmZvCQEFdmFsdWUBCQDsBwEFBWFzc2V0BARib2R5CAUPcGFyc2VkQXNzZXRJbmZvC2Rlc2NyaXB0aW9uCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgIGREVCVUdfBQphc3NldElkU3RyBQRib2R5BQNuaWwBaQEKcG9jTmFtZUdlbgQFbmFtZTEFbmFtZTIEdHhJZAxmaW5pc2hIZWlnaHQEC2NvbG9yUmFuZG9tCQEPZ2V0UmFuZG9tTnVtYmVyBAAECQDZBAEFBHR4SWQFDGZpbmlzaEhlaWdodAALBAVjb2xvcgMJAAACBQtjb2xvclJhbmRvbQAAAgFSAwkAAAIFC2NvbG9yUmFuZG9tAAECAUQDCQAAAgULY29sb3JSYW5kb20AAgIBUwIBRwQKcGFyZW50MUdlbgkAtQkCBQVuYW1lMQIABApwYXJlbnQyR2VuCQC1CQIFBW5hbWUyAgAEA2dlbgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAgVNVE5ULQkBDGdldFJhbmRvbUdlbgUJAKwCAgkAkQMCBQpwYXJlbnQxR2VuAAAJAJEDAgUKcGFyZW50MUdlbgAFCQCsAgIJAJEDAgUKcGFyZW50MkdlbgAACQCRAwIFCnBhcmVudDJHZW4ABQAACQDZBAEFBHR4SWQFDGZpbmlzaEhlaWdodAkBDGdldFJhbmRvbUdlbgUJAKwCAgkAkQMCBQpwYXJlbnQxR2VuAAAJAJEDAgUKcGFyZW50MUdlbgAGCQCsAgIJAJEDAgUKcGFyZW50MkdlbgAACQCRAwIFCnBhcmVudDJHZW4ABgABCQDZBAEFBHR4SWQFDGZpbmlzaEhlaWdodAkBDGdldFJhbmRvbUdlbgUJAKwCAgkAkQMCBQpwYXJlbnQxR2VuAAAJAJEDAgUKcGFyZW50MUdlbgAHCQCsAgIJAJEDAgUKcGFyZW50MkdlbgAACQCRAwIFCnBhcmVudDJHZW4ABwACCQDZBAEFBHR4SWQFDGZpbmlzaEhlaWdodAkBDGdldFJhbmRvbUdlbgUJAKwCAgkAkQMCBQpwYXJlbnQxR2VuAAAJAJEDAgUKcGFyZW50MUdlbgAICQCsAgIJAJEDAgUKcGFyZW50MkdlbgAACQCRAwIFCnBhcmVudDJHZW4ACAADCQDZBAEFBHR4SWQFDGZpbmlzaEhlaWdodAkBDGdldFJhbmRvbUdlbgUJAKwCAgkAkQMCBQpwYXJlbnQxR2VuAAAJAJEDAgUKcGFyZW50MUdlbgAJCQCsAgIJAJEDAgUKcGFyZW50MkdlbgAACQCRAwIFCnBhcmVudDJHZW4ACQAECQDZBAEFBHR4SWQFDGZpbmlzaEhlaWdodAkBDGdldFJhbmRvbUdlbgUJAKwCAgkAkQMCBQpwYXJlbnQxR2VuAAAJAJEDAgUKcGFyZW50MUdlbgAKCQCsAgIJAJEDAgUKcGFyZW50MkdlbgAACQCRAwIFCnBhcmVudDJHZW4ACgAFCQDZBAEFBHR4SWQFDGZpbmlzaEhlaWdodAkBDGdldFJhbmRvbUdlbgUJAKwCAgkAkQMCBQpwYXJlbnQxR2VuAAAJAJEDAgUKcGFyZW50MUdlbgALCQCsAgIJAJEDAgUKcGFyZW50MkdlbgAACQCRAwIFCnBhcmVudDJHZW4ACwAGCQDZBAEFBHR4SWQFDGZpbmlzaEhlaWdodAkBDGdldFJhbmRvbUdlbgUJAKwCAgkAkQMCBQpwYXJlbnQxR2VuAAAJAJEDAgUKcGFyZW50MUdlbgAMCQCsAgIJAJEDAgUKcGFyZW50MkdlbgAACQCRAwIFCnBhcmVudDJHZW4ADAAHCQDZBAEFBHR4SWQFDGZpbmlzaEhlaWdodAICLUcFBWNvbG9yCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQICDERFQlVHX2Ftb3VudAkAZAIJAQ10cnlHZXRJbnRlZ2VyAQIMREVCVUdfYW1vdW50AAEJAMwIAgkBC1N0cmluZ0VudHJ5AgINREVCVUdfcGFyZW50MQUFbmFtZTEJAMwIAgkBC1N0cmluZ0VudHJ5AgINREVCVUdfcGFyZW50MgUFbmFtZTIJAMwIAgkBC1N0cmluZ0VudHJ5AgIKREVCVUdfbmFtZQIFTVROVC0JAMwIAgkBC1N0cmluZ0VudHJ5AgIMREVCVUdfcmVzdWx0BQNnZW4FA25pbAkBDW5yT2ZUeXBlR2VuZXMBBQNnZW4AGYLViw==",
    "height": 4098178,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 9n8J2hEvXGJ1pTEphBw9zVZy6U3D2kum7wivjBZ2qskx
Next: EV5jWVqUz6Gkdt1ru91Bqtc1gU3p6xrpGhJUu3wYWXu8

Diff: 
Old New Differences
114 114          ((K + toString(X._1)) + W)
115 115          }
116 116  
117 -     nil
117 + [StringEntry("DEBUG_TURTLE", N._1[0]), StringEntry("DEBUG_TURTLE", N._2[0])]
118 118      }
119 119  
120 120  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  func a (b,c,d,e) = {
5 5      let f = value(blockInfoByHeight((d - 1)))
6 6      let g = sha256_16Kb((c + value(f.vrf)))
7 7      (toInt(g, e) % b)
8 8      }
9 9  
10 10  
11 11  func h (i,j,k,c,d) = {
12 12      let l = a(2, c, d, k)
13 13      let m = if ((l == 0))
14 14          then i
15 15          else j
16 16      m
17 17      }
18 18  
19 19  
20 20  func n (o) = {
21 21      let p = {
22 22          let q = getInteger(this, o)
23 23          if ($isInstanceOf(q, "Int"))
24 24              then {
25 25                  let r = q
26 26                  r
27 27                  }
28 28              else 0
29 29          }
30 30      p
31 31      }
32 32  
33 33  
34 34  func s (t,u) = if ((u == t._2))
35 35      then (t._1 + 1)
36 36      else (t._1 + 0)
37 37  
38 38  
39 39  func v (w) = if (contains(w, "0"))
40 40      then ""
41 41      else w
42 42  
43 43  
44 44  func x () = ["A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z"]
45 45  
46 46  
47 47  func y (m) = {
48 48      let z = split(dropRight(drop(m, 5), 3), "")
49 49      let A = (z[0] + z[1])
50 50      let B = (z[2] + z[3])
51 51      let C = (z[4] + z[5])
52 52      let D = (z[6] + z[7])
53 53      let E = (z[8] + z[9])
54 54      let F = (z[10] + z[11])
55 55      let G = (z[12] + z[13])
56 56      let H = (z[14] + z[15])
57 57      let I = [A, B, C, D, E, F, G, H]
58 58      func J (K,L) =     {
59 59          let M = split(L, "")
60 60          if ((M[0] == "T"))
61 61              then (K._1 :+ M[1])
62 62              else if ((M[0] == "D"))
63 63                  then (K._2 :+ M[1])
64 64                  else throw("UNKNOWN TYPE")
65 65          }
66 66  
67 67      let N = {
68 68          let O = I
69 69          let P = size(O)
70 70          let Q = $Tuple2(nil, nil)
71 71          func R (S,T) =         if ((T >= P))
72 72              then S
73 73              else J(S, O[T])
74 74  
75 75          func U (S,T) =         if ((T >= P))
76 76              then S
77 77              else throw("List size exceeds 8")
78 78  
79 79          U(R(R(R(R(R(R(R(R(Q, 0), 1), 2), 3), 4), 5), 6), 7), 8)
80 80          }
81 81      func V (K,W) =     {
82 82          let X = {
83 83              let O = N._1
84 84              let P = size(O)
85 85              let Q = $Tuple2(0, W)
86 86              func Y (S,T) =             if ((T >= P))
87 87                  then S
88 88                  else s(S, O[T])
89 89  
90 90              func Z (S,T) =             if ((T >= P))
91 91                  then S
92 92                  else throw("List size exceeds 8")
93 93  
94 94              Z(Y(Y(Y(Y(Y(Y(Y(Y(Q, 0), 1), 2), 3), 4), 5), 6), 7), 8)
95 95              }
96 96          ((K + toString(X._1)) + W)
97 97          }
98 98  
99 99      func aa (K,W) =     {
100 100          let X = {
101 101              let O = N._2
102 102              let P = size(O)
103 103              let Q = $Tuple2(0, W)
104 104              func Y (S,T) =             if ((T >= P))
105 105                  then S
106 106                  else s(S, O[T])
107 107  
108 108              func Z (S,T) =             if ((T >= P))
109 109                  then S
110 110                  else throw("List size exceeds 8")
111 111  
112 112              Z(Y(Y(Y(Y(Y(Y(Y(Y(Q, 0), 1), 2), 3), 4), 5), 6), 7), 8)
113 113              }
114 114          ((K + toString(X._1)) + W)
115 115          }
116 116  
117 -     nil
117 + [StringEntry("DEBUG_TURTLE", N._1[0]), StringEntry("DEBUG_TURTLE", N._2[0])]
118 118      }
119 119  
120 120  
121 121  @Callable(ab)
122 122  func poc (ac) = {
123 123      let ad = fromBase58String(ac)
124 124      let ae = value(assetInfo(ad))
125 125      let af = ae.description
126 126  [StringEntry(("DEBUG_" + ac), af)]
127 127      }
128 128  
129 129  
130 130  
131 131  @Callable(ab)
132 132  func pocNameGen (ag,ah,c,ai) = {
133 133      let aj = a(4, fromBase58String(c), ai, 11)
134 134      let ak = if ((aj == 0))
135 135          then "R"
136 136          else if ((aj == 1))
137 137              then "D"
138 138              else if ((aj == 2))
139 139                  then "S"
140 140                  else "G"
141 141      let al = split(ag, "")
142 142      let am = split(ah, "")
143 143      let m = (((((((((("MTNT-" + h((al[0] + al[5]), (am[0] + am[5]), 0, fromBase58String(c), ai)) + h((al[0] + al[6]), (am[0] + am[6]), 1, fromBase58String(c), ai)) + h((al[0] + al[7]), (am[0] + am[7]), 2, fromBase58String(c), ai)) + h((al[0] + al[8]), (am[0] + am[8]), 3, fromBase58String(c), ai)) + h((al[0] + al[9]), (am[0] + am[9]), 4, fromBase58String(c), ai)) + h((al[0] + al[10]), (am[0] + am[10]), 5, fromBase58String(c), ai)) + h((al[0] + al[11]), (am[0] + am[11]), 6, fromBase58String(c), ai)) + h((al[0] + al[12]), (am[0] + am[12]), 7, fromBase58String(c), ai)) + "-G") + ak)
144 144      ([IntegerEntry("DEBUG_amount", (n("DEBUG_amount") + 1)), StringEntry("DEBUG_parent1", ag), StringEntry("DEBUG_parent2", ah), StringEntry("DEBUG_name", "MTNT-"), StringEntry("DEBUG_result", m)] ++ y(m))
145 145      }
146 146  
147 147

Old	New		Differences
114	114		((K + toString(X._1)) + W)
115	115		}
116	116
117		-	~~nil~~
	117	+	[StringEntry("DEBUG_TURTLE", N._1[0]), StringEntry("DEBUG_TURTLE", N._2[0])]
118	118		}
119	119
120	120

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		func a (b,c,d,e) = {
5	5		let f = value(blockInfoByHeight((d - 1)))
6	6		let g = sha256_16Kb((c + value(f.vrf)))
7	7		(toInt(g, e) % b)
8	8		}
9	9
10	10
11	11		func h (i,j,k,c,d) = {
12	12		let l = a(2, c, d, k)
13	13		let m = if ((l == 0))
14	14		then i
15	15		else j
16	16		m
17	17		}
18	18
19	19
20	20		func n (o) = {
21	21		let p = {
22	22		let q = getInteger(this, o)
23	23		if ($isInstanceOf(q, "Int"))
24	24		then {
25	25		let r = q
26	26		r
27	27		}
28	28		else 0
29	29		}
30	30		p
31	31		}
32	32
33	33
34	34		func s (t,u) = if ((u == t._2))
35	35		then (t._1 + 1)
36	36		else (t._1 + 0)
37	37
38	38
39	39		func v (w) = if (contains(w, "0"))
40	40		then ""
41	41		else w
42	42
43	43
44	44		func x () = ["A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z"]
45	45
46	46
47	47		func y (m) = {
48	48		let z = split(dropRight(drop(m, 5), 3), "")
49	49		let A = (z[0] + z[1])
50	50		let B = (z[2] + z[3])
51	51		let C = (z[4] + z[5])
52	52		let D = (z[6] + z[7])
53	53		let E = (z[8] + z[9])
54	54		let F = (z[10] + z[11])
55	55		let G = (z[12] + z[13])
56	56		let H = (z[14] + z[15])
57	57		let I = [A, B, C, D, E, F, G, H]
58	58		func J (K,L) = {
59	59		let M = split(L, "")
60	60		if ((M[0] == "T"))
61	61		then (K._1 :+ M[1])
62	62		else if ((M[0] == "D"))
63	63		then (K._2 :+ M[1])
64	64		else throw("UNKNOWN TYPE")
65	65		}
66	66
67	67		let N = {
68	68		let O = I
69	69		let P = size(O)
70	70		let Q = $Tuple2(nil, nil)
71	71		func R (S,T) = if ((T >= P))
72	72		then S
73	73		else J(S, O[T])
74	74
75	75		func U (S,T) = if ((T >= P))
76	76		then S
77	77		else throw("List size exceeds 8")
78	78
79	79		U(R(R(R(R(R(R(R(R(Q, 0), 1), 2), 3), 4), 5), 6), 7), 8)
80	80		}
81	81		func V (K,W) = {
82	82		let X = {
83	83		let O = N._1
84	84		let P = size(O)
85	85		let Q = $Tuple2(0, W)
86	86		func Y (S,T) = if ((T >= P))
87	87		then S
88	88		else s(S, O[T])
89	89
90	90		func Z (S,T) = if ((T >= P))
91	91		then S
92	92		else throw("List size exceeds 8")
93	93
94	94		Z(Y(Y(Y(Y(Y(Y(Y(Y(Q, 0), 1), 2), 3), 4), 5), 6), 7), 8)
95	95		}
96	96		((K + toString(X._1)) + W)
97	97		}
98	98
99	99		func aa (K,W) = {
100	100		let X = {
101	101		let O = N._2
102	102		let P = size(O)
103	103		let Q = $Tuple2(0, W)
104	104		func Y (S,T) = if ((T >= P))
105	105		then S
106	106		else s(S, O[T])
107	107
108	108		func Z (S,T) = if ((T >= P))
109	109		then S
110	110		else throw("List size exceeds 8")
111	111
112	112		Z(Y(Y(Y(Y(Y(Y(Y(Y(Q, 0), 1), 2), 3), 4), 5), 6), 7), 8)
113	113		}
114	114		((K + toString(X._1)) + W)
115	115		}
116	116
117		-	~~nil~~
	117	+	[StringEntry("DEBUG_TURTLE", N._1[0]), StringEntry("DEBUG_TURTLE", N._2[0])]
118	118		}
119	119
120	120
121	121		@Callable(ab)
122	122		func poc (ac) = {
123	123		let ad = fromBase58String(ac)
124	124		let ae = value(assetInfo(ad))
125	125		let af = ae.description
126	126		[StringEntry(("DEBUG_" + ac), af)]
127	127		}
128	128
129	129
130	130
131	131		@Callable(ab)
132	132		func pocNameGen (ag,ah,c,ai) = {
133	133		let aj = a(4, fromBase58String(c), ai, 11)
134	134		let ak = if ((aj == 0))
135	135		then "R"
136	136		else if ((aj == 1))
137	137		then "D"
138	138		else if ((aj == 2))
139	139		then "S"
140	140		else "G"
141	141		let al = split(ag, "")
142	142		let am = split(ah, "")
143	143		let m = (((((((((("MTNT-" + h((al[0] + al[5]), (am[0] + am[5]), 0, fromBase58String(c), ai)) + h((al[0] + al[6]), (am[0] + am[6]), 1, fromBase58String(c), ai)) + h((al[0] + al[7]), (am[0] + am[7]), 2, fromBase58String(c), ai)) + h((al[0] + al[8]), (am[0] + am[8]), 3, fromBase58String(c), ai)) + h((al[0] + al[9]), (am[0] + am[9]), 4, fromBase58String(c), ai)) + h((al[0] + al[10]), (am[0] + am[10]), 5, fromBase58String(c), ai)) + h((al[0] + al[11]), (am[0] + am[11]), 6, fromBase58String(c), ai)) + h((al[0] + al[12]), (am[0] + am[12]), 7, fromBase58String(c), ai)) + "-G") + ak)
144	144		([IntegerEntry("DEBUG_amount", (n("DEBUG_amount") + 1)), StringEntry("DEBUG_parent1", ag), StringEntry("DEBUG_parent2", ah), StringEntry("DEBUG_name", "MTNT-"), StringEntry("DEBUG_result", m)] ++ y(m))
145	145		}
146	146
147	147

github/deemru/w8io/3ef1775 
29.25 ms ◑