w8 · tx · BFt···Gcc

tx · BFtHo5qJAoL9W1g44otAcvNheoCQPH6bBKRkTAatuGcc

3N4boZRUJ2LxY5jLyp6hmxGktqnawQidu6H:  -0.01000000 Waves

2023.01.10 16:32 [2398904] smart account 3N4boZRUJ2LxY5jLyp6hmxGktqnawQidu6H > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BFtHo5qJAoL9W1g44otAcvNheoCQPH6bBKRkTAatuGcc",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1673357533656,
    "version": 2,
    "chainId": 84,
    "sender": "3N4boZRUJ2LxY5jLyp6hmxGktqnawQidu6H",
    "senderPublicKey": "BDeCphaaC4MZvfmbJqQZ78EvuEBZTJ1VEW7fbxue8BUu",
    "proofs": [
        "4hwKxXFvrWVTPe6GQkLCHoeNeMwFRiDcZk2jVPs6kLgKTmGtZq6YniAaeU735jEgTLHwqcDcCGkkcxka7UViKfcX"
    ],
    "script": "base64:BgKjBwgCEgkKBwgIAQgICAESBAoCAQESACIJc2VwYXJhdG9yIgdrR29hbFAxIgdrR29hbFAyIgtrRGVmbGVjdGlvbiIIa1ZlcnRleDEiCGtWZXJ0ZXgyIghrVmVydGV4MyIHa01heEJldCIJcmFuZG9taXplIgVieXRlcyIFcmFuZ2UiBGhhc2giBWluZGV4IghnZXRQb2ludCIBeCIBeSIRZ2V0R29hbExpbmVQb2ludHMiAnAxIgJwMiINZ2V0RGVmbGVjdGlvbiIJZ2V0TWF4QmV0IhBnZXRQb2x5Z29uUG9pbnRzIgJwMyIHZ2V0TGluZSIBYSIBYiIBYyIMZ2V0T3J0aG9MaW5lIgRuVmVjIgZnZXRWZWMiBXN0YXJ0IgNlbmQiCm11bFZlY3RvcnMiAnZBIgJ2QiINZ2V0TGluZUxlbmd0aCILY2FsY0Nyb3NzZXMiBWFjY3VtIgluZXh0VmFsdWUiBXZwMXAyIgV2cDFwMyIFdnAxcDQiBXZwM3A0IgV2cDNwMSIFdnAzcDIiAnYxIgJ2MiICdjMiAnY0Ighpc0luc2lkZSIIc2VnbWVudDEiCHNlZ21lbnQyIghzZWdtZW50MyIKc2VnbWVudFJheSIDYXJyIgVjb3VudCICJGwiAiRzIgUkYWNjMCIFJGYwXzEiAiRhIgIkaSIFJGYwXzIiDWlzUG9pbnRJbkxpbmUiBGxpbmUiE2lzUG9pbnRJbkRlZmxlY3Rpb24iCyR0MDU5NTQ2MDU2IgJhMSICYjEiAmMxIgskdDA2MDU5NjE5NCIFYU5vcm0iBWJOb3JtIgVjTm9ybSIBZCICZHgiAmR5IgR4UmVzIgR5UmVzIgdsaW5lTGVuIhBpc1BvaW50SW5Qb2x5Z29uIgd2ZXJ0ZXgxIgd2ZXJ0ZXgyIgd2ZXJ0ZXgzIhRjYWxjUmV3YXJkTXVsdGlwbGllciIGaW5MaW5lIglpblBvbHlnb24iDGluRGVmbGVjdGlvbiIPdmFsaWRhdGVQYXltZW50IgxwYXltZW50QXNzZXQiDXBheW1lbnRBbW91bnQiAWkiBmdvYWxQMSIGZ29hbFAyIgpkZWZsZWN0aW9uIgZtYXhCZXQiA3AxeCIDcDF5IgskdDA4OTEwOTAyOCILJHQwOTI1ODkzNzkiCyR0MDkzODQ5NDgzIgJwNCICcDUiAnA2IgskdDA5NDg4OTU4MCIKbXVsdGlwbGllciIGcmV3YXJkIgNyZXMaAAFhAgFfAAFiAgZnb2FsUDEAAWMCBmdvYWxQMgABZAIKZGVmbGVjdGlvbgABZQIHdmVydGV4MQABZgIHdmVydGV4MgABZwIHdmVydGV4MwABaAIGbWF4QmV0AQFpAgFqAWsEAWwJAPcDAQUBagQBbQkAsQkBBQFsCQBqAgUBbQUBawEBbgEBagQBbwkBAWkCCQDJAQIFAWoJAGkCCQDIAQEFAWoAAgBkBAFwCQEBaQIJAMwBAgUBagkAaQIJAMgBAQUBagACAGQJAJQKAgUBbwUBcAEBcQAEAXIJALUJAgkBEUBleHRyTmF0aXZlKDEwNTMpAgUEdGhpcwUBYgUBYQQBcwkAtQkCCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzBQFjBQFhCQCUCgIJAJQKAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAXIAAAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAXIAAQkAlAoCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUBcwAACQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUBcwABAQF0AAkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwUBZAEBdQAJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMFAWgBAXYABAFyCQC1CQIJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMFAWUFAWEEAXMJALUJAgkBEUBleHRyTmF0aXZlKDEwNTMpAgUEdGhpcwUBZgUBYQQBdwkAtQkCCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzBQFnBQFhCQCVCgMJAJQKAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAXIAAAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAXIAAQkAlAoCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUBcwAACQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUBcwABCQCUCgIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQF3AAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQF3AAEBAXgCAXIBcwQBeQkAZQIIBQFzAl8yCAUBcgJfMgQBegkAZQIIBQFyAl8xCAUBcwJfMQQBQQkAZQIJAGgCCAUBcgJfMgkAZAIIBQFzAl8xCAUBcgJfMQkAaAIIBQFyAl8xCQBkAggFAXICXzIIBQFzAl8yCQCVCgMFAXkFAXoFAUEBAUICAXIBQwQBeQgFAUMCXzIEAXoJAQEtAQgFAUMCXzEEAUEJAGUCCQBoAggFAUMCXzEIBQFyAl8yCQBoAggFAUMCXzIIBQFyAl8xCQCVCgMFAXkFAXoFAUEBAUQCAUUBRgQBbwkAZQIIBQFGAl8xCAUBRQJfMQQBcAkAZQIIBQFGAl8yCAUBRQJfMgkAlAoCBQFvBQFwAQFHAgFIAUkJAGUCCQBoAggFAUgCXzEIBQFJAl8yCQBoAggFAUgCXzIIBQFJAl8xAQFKAgFyAXMEAXkJAGwGCQBlAggFAXMCXzEIBQFyAl8xAAAAAgAAAAAFBERPV04EAXoJAGwGCQBlAggFAXMCXzIIBQFyAl8yAAAAAgAAAAAFBERPV04JAQRzcXJ0BAkAZAIFAXkFAXoAAAAABQRET1dOAQFLAgFMAU0EAU4JAQFEAggJAJEDAgUBTQAAAl8xCAkAkQMCBQFNAAACXzIEAU8JAQFEAggJAJEDAgUBTQAAAl8xCAkAkQMCBQFNAAECXzEEAVAJAQFEAggJAJEDAgUBTQAAAl8xCAkAkQMCBQFNAAECXzIEAVEJAQFEAggJAJEDAgUBTQABAl8xCAkAkQMCBQFNAAECXzIEAVIJAQFEAggJAJEDAgUBTQABAl8xCAkAkQMCBQFNAAACXzEEAVMJAQFEAggJAJEDAgUBTQABAl8xCAkAkQMCBQFNAAACXzIEAVQJAQFHAgUBUQUBUgQBVQkBAUcCBQFRBQFTBAFWCQEBRwIFAU4FAU8EAVcJAQFHAgUBTgUBUAMDCQBmAgAACQBoAgUBVAUBVQkAZgIAAAkAaAIFAVYFAVcHCQBkAgUBTAABBQFMAQFYBAFyAVkBWgJhYQQCYWIJAJQKAgUBcgkAlAoCCAUBcgJfMQAABAJhYwkAzAgCCQDMCAIFAmFiCQDMCAIFAVkFA25pbAkAzAgCCQDMCAIFAmFiCQDMCAIFAVoFA25pbAkAzAgCCQDMCAIFAmFiCQDMCAIFAmFhBQNuaWwFA25pbAQCYWQKAAJhZQUCYWMKAAJhZgkAkAMBBQJhZQoAAmFnAAAKAQJhaAICYWkCYWoDCQBnAgUCYWoFAmFmBQJhaQkBAUsCBQJhaQkAkQMCBQJhZQUCYWoKAQJhawICYWkCYWoDCQBnAgUCYWoFAmFmBQJhaQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDMJAQJhawIJAQJhaAIJAQJhaAIJAQJhaAIFAmFnAAAAAQACAAMJAAACCQBqAgUCYWQAAgABAQJhbAIBcgJhbQkAAAIJAGQCCQBkAgkAaAIIBQFyAl8xCAUCYW0CXzEJAGgCCAUBcgJfMggFAmFtAl8yCAUCYW0CXzMAAAECYW4CAXICYW0EAmFvBQJhbQQCYXAIBQJhbwJfMQQCYXEIBQJhbwJfMgQCYXIIBQJhbwJfMwQCYXMJAQFCAgUBcgkAlAoCBQJhcAUCYXEEAmF0CAUCYXMCXzEEAmF1CAUCYXMCXzIEAmF2CAUCYXMCXzMEAmF3CQEBRwIJAJQKAgUCYXAFAmFxCQCUCgIFAmF0BQJhdQQCYXgJAQFHAgkAlAoCCQEBLQEFAmFyBQJhcQkAlAoCCQEBLQEFAmF2BQJhdQQCYXkJAQFHAgkAlAoCBQJhcAkBAS0BBQJhcgkAlAoCBQJhdAkBAS0BBQJhdgQCYXoJAGsDAAEFAmF4BQJhdwQCYUEJAGsDAAEFAmF5BQJhdwQCYUIJAQFKAgUBcgkAlAoCBQJhegUCYUEJAGcCCQEBdAAFAmFCAQJhQwQBcgJhRAJhRQJhRgQBWQkAlAoCBQJhRAUCYUUEAVoJAJQKAgUCYUUFAmFGBAJhYQkAlAoCBQJhRgUCYUQDAwMJAAACBQFyBQJhRAYJAAACBQFyBQJhRQYJAAACBQFyBQJhRgYJAQFYBAUBcgUBWQUBWgUCYWEBAmFHAwJhSAJhSQJhSgMDBQJhSAUCYUkHAAoDAwUCYUoFAmFJBwAIAwUCYUgABgMFAmFJAAQDBQJhSgACAAEBAmFLAgJhTAJhTQMDCQAAAgUCYUwFBHVuaXQJAGcCCQEBdQAFAmFNBwUEdW5pdAkAAgECEUluY29ycmVjdCBwYXltZW50AwJhTgEQc2V0TG90dGVyeVBhcmFtcwcCYU8CYVACYVECYUQCYUUCYUYCYVIJAMwIAgkBC1N0cmluZ0VudHJ5AgUBYgUCYU8JAMwIAgkBC1N0cmluZ0VudHJ5AgUBYwUCYVAJAMwIAgkBDEludGVnZXJFbnRyeQIFAWQFAmFRCQDMCAIJAQtTdHJpbmdFbnRyeQIFAWUFAmFECQDMCAIJAQtTdHJpbmdFbnRyeQIFAWYFAmFFCQDMCAIJAQtTdHJpbmdFbnRyeQIFAWcFAmFGCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQFoBQJhUgUDbmlsAmFOAQh0cnlUb1dpbgICYVMCYVQEAmFVCQCUCgIICQCRAwIIBQJhTghwYXltZW50cwAAB2Fzc2V0SWQJAQV2YWx1ZQEICQCRAwIIBQJhTghwYXltZW50cwAABmFtb3VudAQCYUwIBQJhVQJfMQQCYU0IBQJhVQJfMgkBC3ZhbHVlT3JFbHNlAgkBAmFLAgUCYUwFAmFNBAFyCQCUCgIFAmFTBQJhVAQCYVYJAQFxAAQBcwgFAmFWAl8xBAF3CAUCYVYCXzIEAmFXCQEBdgAEAmFYCAUCYVcCXzEEAmFZCAUCYVcCXzIEAmFaCAUCYVcCXzMEAmJhCQEBeAIFAXMFAXcEAmFwCAUCYmECXzEEAmFxCAUCYmECXzIEAmFyCAUCYmECXzMEAmFICQECYWwCBQFyCQCVCgMFAmFwBQJhcQUCYXIEAmFJCQECYUMEBQFyBQJhWAUCYVkFAmFaBAJhSgkBAmFuAgUBcgkAlQoDBQJhcAUCYXEFAmFyAwMDBQJhSAYFAmFKBgUCYUkEAmJiCQECYUcDBQJhSAUCYUkFAmFKBAJiYwkAaAIFAmFNBQJiYgkAzAgCCQEMSW50ZWdlckVudHJ5AgIKbXVsdGlwbGllcgUCYmIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAmFODG9yaWdpbkNhbGxlcgUCYmMFBHVuaXQFA25pbAUDbmlsAmFOAQlzdGFydEdhbWUABAFyCQEBbgEIBQJhTg10cmFuc2FjdGlvbklkBAJiZAkA/AcEBQR0aGlzAgh0cnlUb1dpbgkAzAgCCAUBcgJfMQkAzAgCCAUBcgJfMgUDbmlsCQDMCAIJAJEDAggFAmFOCHBheW1lbnRzAAAFA25pbAMJAAACBQJiZAUCYmQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgCJWtfd",
    "height": 2398904,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DYFuVVcPjdoGKxuJm7q9scAnevLJVBChBQhqdgF9NwAT
Next: BAVuciyzztPd55K4U4E4d8JoaVpQ2h7MxVJuz6xnoNRY

Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = "_"
5 5  
6 6  let b = "goalP1"
7 7  
8 8  let c = "goalP2"
9 9  
10 10  let d = "deflection"
11 11  
12 12  let e = "vertex1"
13 13  
14 14  let f = "vertex2"
15 15  
16 16  let g = "vertex3"
17 17  
18 18  let h = "maxBet"
19 19  
20 20  func i (j,k) = {
21 21      let l = sha256(j)
22 22      let m = toInt(l)
23 23      (m % k)
24 24      }
25 25  
26 26  
27 27  func n (j) = {
28 28      let o = i(take(j, (size(j) / 2)), 100)
29 29      let p = i(takeRight(j, (size(j) / 2)), 100)
30 30      $Tuple2(o, p)
31 31      }
32 32  
33 33  
34 34  func q () = {
35 35      let r = split(getStringValue(this, b), a)
36 36      let s = split(getStringValue(this, c), a)
37 37      $Tuple2($Tuple2(parseIntValue(r[0]), parseIntValue(r[1])), $Tuple2(parseIntValue(s[0]), parseIntValue(s[1])))
38 38      }
39 39  
40 40  
41 41  func t () = getIntegerValue(this, d)
42 42  
43 43  
44 44  func u () = getIntegerValue(this, h)
45 45  
46 46  
47 47  func v () = {
48 48      let r = split(getStringValue(this, e), a)
49 49      let s = split(getStringValue(this, f), a)
50 50      let w = split(getStringValue(this, g), a)
51 51      $Tuple3($Tuple2(parseIntValue(r[0]), parseIntValue(r[1])), $Tuple2(parseIntValue(s[0]), parseIntValue(s[1])), $Tuple2(parseIntValue(w[0]), parseIntValue(w[1])))
52 52      }
53 53  
54 54  
55 55  func x (r,s) = {
56 56      let y = (s._2 - r._2)
57 57      let z = (r._1 - s._1)
58 58      let A = ((r._2 * (s._1 + r._1)) - (r._1 * (r._2 + s._2)))
59 59      $Tuple3(y, z, A)
60 60      }
61 61  
62 62  
63 63  func B (r,C) = {
64 64      let y = C._2
65 65      let z = -(C._1)
66 66      let A = ((C._1 * r._2) - (C._2 * r._1))
67 67      $Tuple3(y, z, A)
68 68      }
69 69  
70 70  
71 71  func D (E,F) = {
72 72      let o = (F._1 - E._1)
73 73      let p = (F._2 - E._2)
74 74      $Tuple2(o, p)
75 75      }
76 76  
77 77  
78 78  func G (H,I) = ((H._1 * I._2) - (H._2 * I._1))
79 79  
80 80  
81 81  func J (r,s) = {
82 82      let y = pow((s._1 - r._1), 0, 2, 0, 0, DOWN)
83 83      let z = pow((s._2 - r._2), 0, 2, 0, 0, DOWN)
84 84      sqrt((y + z), 0, 0, DOWN)
85 85      }
86 86  
87 87  
88 88  func K (L,M) = {
89 89      let N = D(M[0]._1, M[0]._2)
90 90      let O = D(M[0]._1, M[1]._1)
91 91      let P = D(M[0]._1, M[1]._2)
92 92      let Q = D(M[1]._1, M[1]._2)
93 93      let R = D(M[1]._1, M[0]._1)
94 94      let S = D(M[1]._1, M[0]._2)
95 95      let T = G(Q, R)
96 96      let U = G(Q, S)
97 97      let V = G(N, O)
98 98      let W = G(N, P)
99 99      if (if ((0 > (T * U)))
100 100          then (0 > (V * W))
101 101          else false)
102 102          then (L + 1)
103 103          else L
104 104      }
105 105  
106 106  
107 107  func X (r,Y,Z,aa) = {
108 108      let ab = $Tuple2(r, $Tuple2(r._1, 0))
109 109      let ac = [[ab, Y], [ab, Z], [ab, aa]]
110 110      let ad = {
111 111          let ae = ac
112 112          let af = size(ae)
113 113          let ag = 0
114 114          func ah (ai,aj) =         if ((aj >= af))
115 115              then ai
116 116              else K(ai, ae[aj])
117 117  
118 118          func ak (ai,aj) =         if ((aj >= af))
119 119              then ai
120 120              else throw("List size exceeds 3")
121 121  
122 122          ak(ah(ah(ah(ag, 0), 1), 2), 3)
123 123          }
124 124      ((ad % 2) == 1)
125 125      }
126 126  
127 127  
128 128  func al (r,am) = ((((r._1 * am._1) + (r._2 * am._2)) + am._3) == 0)
129 129  
130 130  
131 131  func an (r,am) = {
132 132      let ao = am
133 133      let ap = ao._1
134 134      let aq = ao._2
135 135      let ar = ao._3
136 136      let as = B(r, $Tuple2(ap, aq))
137 137      let at = as._1
138 138      let au = as._2
139 139      let av = as._3
140 140      let aw = G($Tuple2(ap, aq), $Tuple2(at, au))
141 141      let ax = G($Tuple2(-(ar), aq), $Tuple2(-(av), au))
142 142      let ay = G($Tuple2(ap, -(ar)), $Tuple2(at, -(av)))
143 143      let az = fraction(1, ax, aw)
144 144      let aA = fraction(1, ay, aw)
145 145      let aB = J(r, $Tuple2(az, aA))
146 146      (t() >= aB)
147 147      }
148 148  
149 149  
150 150  func aC (r,aD,aE,aF) = {
151 151      let Y = $Tuple2(aD, aE)
152 152      let Z = $Tuple2(aE, aF)
153 153      let aa = $Tuple2(aF, aD)
154 154      if (if (if ((r == aD))
155 155          then true
156 156          else (r == aE))
157 157          then true
158 158          else (r == aF))
159 159          then true
160 160          else X(r, Y, Z, aa)
161 161      }
162 162  
163 163  
164 164  func aG (aH,aI,aJ) = if (if (aH)
165 165      then aI
166 166      else false)
167 167      then 10
168 168      else if (if (aJ)
169 169          then aI
170 170          else false)
171 171          then 8
172 172          else if (aH)
173 173              then 6
174 174              else if (aI)
175 175                  then 4
176 176                  else if (aJ)
177 177                      then 2
178 178                      else 1
179 179  
180 180  
181 181  func aK (aL,aM) = if (if ((aL == unit))
182 182      then (u() >= aM)
183 183      else false)
184 184      then unit
185 185      else throw("Incorrect payment")
186 186  
187 187  
188 188  @Callable(aN)
189 189  func setLotteryParams (aO,aP,aQ,aD,aE,aF,aR) = [StringEntry(b, aO), StringEntry(c, aP), IntegerEntry(d, aQ), StringEntry(e, aD), StringEntry(f, aE), StringEntry(g, aF), IntegerEntry(h, aR)]
190 190  
191 191  
192 192  
193 193  @Callable(aN)
194 194  func tryToWin (aS,aT) = {
195 195      let aU = $Tuple2(aN.payments[0].assetId, value(aN.payments[0].amount))
196 196      let aL = aU._1
197 197      let aM = aU._2
198 198      valueOrElse(aK(aL, aM), {
199 199          let r = $Tuple2(aS, aT)
200 200          let aV = q()
201 201          let s = aV._1
202 202          let w = aV._2
203 203          let aW = v()
204 204          let aX = aW._1
205 205          let aY = aW._2
206 206          let aZ = aW._3
207 207          let ba = x(s, w)
208 208          let ap = ba._1
209 209          let aq = ba._2
210 210          let ar = ba._3
211 211          let aH = al(r, $Tuple3(ap, aq, ar))
212 212          let aI = aC(r, aX, aY, aZ)
213 213          let aJ = an(r, $Tuple3(ap, aq, ar))
214 214          if (if (if (aH)
215 215              then true
216 216              else aJ)
217 217              then true
218 218              else aI)
219 219              then {
220 220                  let bb = aG(aH, aI, aJ)
221 221                  let bc = (aM * bb)
222 222  [IntegerEntry("multiplier", bb), ScriptTransfer(aN.originCaller, bc, unit)]
223 223                  }
224 224              else nil
225 225          })
226 226      }
227 227  
228 228  
229 229  
230 230  @Callable(aN)
231 231  func startGame () = {
232 232      let r = n(aN.transactionId)
233 233      let bd = invoke(this, "tryToWin", [r._1, r._2], [aN.payments[0]])
234 234      if ((bd == bd))
235 235          then nil
236 236          else throw("Strict value is not equal to itself.")
237 237      }
238 238  
239 239

Old	New	Differences
1	1	{-# STDLIB_VERSION 6 #-}
2	2	{-# SCRIPT_TYPE ACCOUNT #-}
3	3	{-# CONTENT_TYPE DAPP #-}
4	4	let a = "_"
5	5
6	6	let b = "goalP1"
7	7
8	8	let c = "goalP2"
9	9
10	10	let d = "deflection"
11	11
12	12	let e = "vertex1"
13	13
14	14	let f = "vertex2"
15	15
16	16	let g = "vertex3"
17	17
18	18	let h = "maxBet"
19	19
20	20	func i (j,k) = {
21	21	let l = sha256(j)
22	22	let m = toInt(l)
23	23	(m % k)
24	24	}
25	25
26	26
27	27	func n (j) = {
28	28	let o = i(take(j, (size(j) / 2)), 100)
29	29	let p = i(takeRight(j, (size(j) / 2)), 100)
30	30	$Tuple2(o, p)
31	31	}
32	32
33	33
34	34	func q () = {
35	35	let r = split(getStringValue(this, b), a)
36	36	let s = split(getStringValue(this, c), a)
37	37	$Tuple2($Tuple2(parseIntValue(r[0]), parseIntValue(r[1])), $Tuple2(parseIntValue(s[0]), parseIntValue(s[1])))
38	38	}
39	39
40	40
41	41	func t () = getIntegerValue(this, d)
42	42
43	43
44	44	func u () = getIntegerValue(this, h)
45	45
46	46
47	47	func v () = {
48	48	let r = split(getStringValue(this, e), a)
49	49	let s = split(getStringValue(this, f), a)
50	50	let w = split(getStringValue(this, g), a)
51	51	$Tuple3($Tuple2(parseIntValue(r[0]), parseIntValue(r[1])), $Tuple2(parseIntValue(s[0]), parseIntValue(s[1])), $Tuple2(parseIntValue(w[0]), parseIntValue(w[1])))
52	52	}
53	53
54	54
55	55	func x (r,s) = {
56	56	let y = (s._2 - r._2)
57	57	let z = (r._1 - s._1)
58	58	let A = ((r._2 * (s._1 + r._1)) - (r._1 * (r._2 + s._2)))
59	59	$Tuple3(y, z, A)
60	60	}
61	61
62	62
63	63	func B (r,C) = {
64	64	let y = C._2
65	65	let z = -(C._1)
66	66	let A = ((C._1 * r._2) - (C._2 * r._1))
67	67	$Tuple3(y, z, A)
68	68	}
69	69
70	70
71	71	func D (E,F) = {
72	72	let o = (F._1 - E._1)
73	73	let p = (F._2 - E._2)
74	74	$Tuple2(o, p)
75	75	}
76	76
77	77
78	78	func G (H,I) = ((H._1 * I._2) - (H._2 * I._1))
79	79
80	80
81	81	func J (r,s) = {
82	82	let y = pow((s._1 - r._1), 0, 2, 0, 0, DOWN)
83	83	let z = pow((s._2 - r._2), 0, 2, 0, 0, DOWN)
84	84	sqrt((y + z), 0, 0, DOWN)
85	85	}
86	86
87	87
88	88	func K (L,M) = {
89	89	let N = D(M[0]._1, M[0]._2)
90	90	let O = D(M[0]._1, M[1]._1)
91	91	let P = D(M[0]._1, M[1]._2)
92	92	let Q = D(M[1]._1, M[1]._2)
93	93	let R = D(M[1]._1, M[0]._1)
94	94	let S = D(M[1]._1, M[0]._2)
95	95	let T = G(Q, R)
96	96	let U = G(Q, S)
97	97	let V = G(N, O)
98	98	let W = G(N, P)
99	99	if (if ((0 > (T * U)))
100	100	then (0 > (V * W))
101	101	else false)
102	102	then (L + 1)
103	103	else L
104	104	}
105	105
106	106
107	107	func X (r,Y,Z,aa) = {
108	108	let ab = $Tuple2(r, $Tuple2(r._1, 0))
109	109	let ac = [[ab, Y], [ab, Z], [ab, aa]]
110	110	let ad = {
111	111	let ae = ac
112	112	let af = size(ae)
113	113	let ag = 0
114	114	func ah (ai,aj) = if ((aj >= af))
115	115	then ai
116	116	else K(ai, ae[aj])
117	117
118	118	func ak (ai,aj) = if ((aj >= af))
119	119	then ai
120	120	else throw("List size exceeds 3")
121	121
122	122	ak(ah(ah(ah(ag, 0), 1), 2), 3)
123	123	}
124	124	((ad % 2) == 1)
125	125	}
126	126
127	127
128	128	func al (r,am) = ((((r._1 * am._1) + (r._2 * am._2)) + am._3) == 0)
129	129
130	130
131	131	func an (r,am) = {
132	132	let ao = am
133	133	let ap = ao._1
134	134	let aq = ao._2
135	135	let ar = ao._3
136	136	let as = B(r, $Tuple2(ap, aq))
137	137	let at = as._1
138	138	let au = as._2
139	139	let av = as._3
140	140	let aw = G($Tuple2(ap, aq), $Tuple2(at, au))
141	141	let ax = G($Tuple2(-(ar), aq), $Tuple2(-(av), au))
142	142	let ay = G($Tuple2(ap, -(ar)), $Tuple2(at, -(av)))
143	143	let az = fraction(1, ax, aw)
144	144	let aA = fraction(1, ay, aw)
145	145	let aB = J(r, $Tuple2(az, aA))
146	146	(t() >= aB)
147	147	}
148	148
149	149
150	150	func aC (r,aD,aE,aF) = {
151	151	let Y = $Tuple2(aD, aE)
152	152	let Z = $Tuple2(aE, aF)
153	153	let aa = $Tuple2(aF, aD)
154	154	if (if (if ((r == aD))
155	155	then true
156	156	else (r == aE))
157	157	then true
158	158	else (r == aF))
159	159	then true
160	160	else X(r, Y, Z, aa)
161	161	}
162	162
163	163
164	164	func aG (aH,aI,aJ) = if (if (aH)
165	165	then aI
166	166	else false)
167	167	then 10
168	168	else if (if (aJ)
169	169	then aI
170	170	else false)
171	171	then 8
172	172	else if (aH)
173	173	then 6
174	174	else if (aI)
175	175	then 4
176	176	else if (aJ)
177	177	then 2
178	178	else 1
179	179
180	180
181	181	func aK (aL,aM) = if (if ((aL == unit))
182	182	then (u() >= aM)
183	183	else false)
184	184	then unit
185	185	else throw("Incorrect payment")
186	186
187	187
188	188	@Callable(aN)
189	189	func setLotteryParams (aO,aP,aQ,aD,aE,aF,aR) = [StringEntry(b, aO), StringEntry(c, aP), IntegerEntry(d, aQ), StringEntry(e, aD), StringEntry(f, aE), StringEntry(g, aF), IntegerEntry(h, aR)]
190	190
191	191
192	192
193	193	@Callable(aN)
194	194	func tryToWin (aS,aT) = {
195	195	let aU = $Tuple2(aN.payments[0].assetId, value(aN.payments[0].amount))
196	196	let aL = aU._1
197	197	let aM = aU._2
198	198	valueOrElse(aK(aL, aM), {
199	199	let r = $Tuple2(aS, aT)
200	200	let aV = q()
201	201	let s = aV._1
202	202	let w = aV._2
203	203	let aW = v()
204	204	let aX = aW._1
205	205	let aY = aW._2
206	206	let aZ = aW._3
207	207	let ba = x(s, w)
208	208	let ap = ba._1
209	209	let aq = ba._2
210	210	let ar = ba._3
211	211	let aH = al(r, $Tuple3(ap, aq, ar))
212	212	let aI = aC(r, aX, aY, aZ)
213	213	let aJ = an(r, $Tuple3(ap, aq, ar))
214	214	if (if (if (aH)
215	215	then true
216	216	else aJ)
217	217	then true
218	218	else aI)
219	219	then {
220	220	let bb = aG(aH, aI, aJ)
221	221	let bc = (aM * bb)
222	222	[IntegerEntry("multiplier", bb), ScriptTransfer(aN.originCaller, bc, unit)]
223	223	}
224	224	else nil
225	225	})
226	226	}
227	227
228	228
229	229
230	230	@Callable(aN)
231	231	func startGame () = {
232	232	let r = n(aN.transactionId)
233	233	let bd = invoke(this, "tryToWin", [r._1, r._2], [aN.payments[0]])
234	234	if ((bd == bd))
235	235	then nil
236	236	else throw("Strict value is not equal to itself.")
237	237	}
238	238
239	239

github/deemru/w8io/169f3d6 
62.27 ms ◑