w8 · tx · Bki···FeC

tx · BkiLHpjdec5nztZ8vBr7DMwfHqynV1tyLS8zMM8NkFeC

3Mr7HCJPTazuYjJbfbbpRMvZX8xrNTjT1Kx:  -0.01000000 Waves

2023.02.17 10:14 [2453298] smart account 3Mr7HCJPTazuYjJbfbbpRMvZX8xrNTjT1Kx > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BkiLHpjdec5nztZ8vBr7DMwfHqynV1tyLS8zMM8NkFeC",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1676618061555,
    "version": 2,
    "chainId": 84,
    "sender": "3Mr7HCJPTazuYjJbfbbpRMvZX8xrNTjT1Kx",
    "senderPublicKey": "D35PGQCSSdrp9pvujggj7b2DaCK1BhcU3kho7tikKJYs",
    "proofs": [
        "RiNvbfuKZKhqKqJeUGuMjFLLEwgRt7SgiH62DJSpCrRUgEig57Jv2r5VQp3HiMCTfnDdf1vq3Vn4uGHzJMidDo2"
    ],
    "script": "base64:BgIaCAISABIDCgEBEgQKAhgREgQKAggBEgMKAQgBAAR0VVNEASCrJEpqtkJG69L843mwYbrDrmlXTVJ6ykUcp0AdEbApDgUBaQEHZGVwb3NpdAADCQAAAgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUUGF5bWVudCBub3QgYXR0YWNoZWQEA3BtdAkAkQMCCQEFdmFsdWUBCAUBaQhwYXltZW50cwAAAwkBAiE9AggFA3BtdAdhc3NldElkBQR0VVNECQACAQIXaG9sZGVkIHBheW1lbnQgbm90IHRVU0QDCQBmAgDoBwgFA3BtdAZhbW91bnQJAAIBAhZob2xkZWQgcGF5bWVudCA8IDEwLjAwBApjdXJyZW50S2V5CQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEDWN1cnJlbnRBbW91bnQEByRtYXRjaDAJAJoIAgUEdGhpcwUKY3VycmVudEtleQMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQJbmV3QW1vdW50CQBkAgUNY3VycmVudEFtb3VudAgFA3BtdAZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIFCmN1cnJlbnRLZXkFCW5ld0Ftb3VudAUDbmlsAWkBCHdpdGhkcmF3AQZhbW91bnQECmN1cnJlbnRLZXkJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQNY3VycmVudEFtb3VudAQHJG1hdGNoMAkAmggCBQR0aGlzBQpjdXJyZW50S2V5AwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABAluZXdBbW91bnQJAGUCBQ1jdXJyZW50QW1vdW50BQZhbW91bnQDCQBmAgAABQZhbW91bnQJAAIBAh5DYW4ndCB3aXRoZHJhdyBuZWdhdGl2ZSBhbW91bnQDCQBmAgAABQluZXdBbW91bnQJAAIBAhJOb3QgZW5vdWdoIGJhbGFuY2UJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUKY3VycmVudEtleQUJbmV3QW1vdW50CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUGYW1vdW50BQR1bml0BQNuaWwFBHVuaXQBaQEKc2V0T3B0aW9ucwIEb3B0cwR2YWxzBAhvcHRfc2l6ZQkAkAMBBQRvcHRzAwkAZwIAZAUIb3B0X3NpemUEDG9wdGlvbnNfYWRkcgkBB0FkZHJlc3MBARoBVEFb+Cv2F+oqocvEivH7x7uyIGEx/ocgwQQJYWRtaW5MaXN0BAckbWF0Y2gwCQCdCAIFDG9wdGlvbnNfYWRkcgIKYWRtaW5fbGlzdAMJAAECBQckbWF0Y2gwAgRVbml0AgV1bnNldAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXgFByRtYXRjaDAFAXgJAAIBAgtNYXRjaCBlcnJvcgoBDmFkZFN0cmluZ0VudHJ5AgVhY2N1bQluZXh0VmFsdWUECyR0MDI3MDMyNzI2BQVhY2N1bQQGcmVzdWx0CAULJHQwMjcwMzI3MjYCXzEEAWoIBQskdDAyNzAzMjcyNgJfMgkAlAoCCQDNCAIFBnJlc3VsdAkBDEludGVnZXJFbnRyeQIJAJEDAgUEb3B0cwUBagUJbmV4dFZhbHVlCQBkAgUBagABBAFyCgACJGwFBHZhbHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ5hZGRTdHJpbmdFbnRyeQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQEEGNhbGxlckFkZHJlc3NTdHIJAKUIAQgFAWkGY2FsbGVyAwkBAiE9AgUJYWRtaW5MaXN0AgV1bnNldAQEdGVzdAkAnQgCCQERQGV4dHJOYXRpdmUoMTA2MikBBQlhZG1pbkxpc3QFEGNhbGxlckFkZHJlc3NTdHIEB2lzQWRtaW4EByRtYXRjaDAFBHRlc3QDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAF4BQckbWF0Y2gwBQF4AwkAAQIFByRtYXRjaDACBFVuaXQCCG5vIGFkbWluCQACAQILTWF0Y2ggZXJyb3IKAQdhZGRfZWxtAQdvcHRpb25zBANvcHQJALUJAgUHb3B0aW9ucwIBfAkBC1N0cmluZ0VudHJ5AgkAkQMCBQNvcHQAAAkAkQMCBQNvcHQAAQMJAQIhPQIFB2lzQWRtaW4CCG5vIGFkbWluBQFyCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIPWW91IG5vdCBhZG1pbjogBQlhZG1pbkxpc3QCCywgaXNBZG1pbjogBQdpc0FkbWluAhQsIGNhbGxlckFkZHJlc3NTdHI6IAUQY2FsbGVyQWRkcmVzc1N0cgICLCAJAAIBAhBVbnNldCBhZG1pbiBsaXN0CQACAQIvVGhlIG51bWJlciBvZiBsaXN0IGVsZW1lbnRzIG11c3Qgbm90IGV4Y2VlZCAxMDABaQEJc2V0T3B0aW9uAgh2YXJpYWJsZQV2YWx1ZQQMb3B0aW9uc19hZGRyCQEHQWRkcmVzcwEBGgFUQVv4K/YX6iqhy8SK8fvHu7IgYTH+hyDBBAlhZG1pbkxpc3QEByRtYXRjaDAJAJ0IAgUMb3B0aW9uc19hZGRyAgphZG1pbl9saXN0AwkAAQIFByRtYXRjaDACBFVuaXQCBXVuc2V0AwkAAQIFByRtYXRjaDACBlN0cmluZwQBeAUHJG1hdGNoMAUBeAkAAgECC01hdGNoIGVycm9yBBBjYWxsZXJBZGRyZXNzU3RyCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIFCWFkbWluTGlzdAIFdW5zZXQEBHRlc3QJAJ0IAgkBEUBleHRyTmF0aXZlKDEwNjIpAQUJYWRtaW5MaXN0BRBjYWxsZXJBZGRyZXNzU3RyBAdpc0FkbWluBAckbWF0Y2gwBQR0ZXN0AwkAAQIFByRtYXRjaDACBlN0cmluZwQBeAUHJG1hdGNoMAUBeAMJAAECBQckbWF0Y2gwAgRVbml0AghubyBhZG1pbgkAAgECC01hdGNoIGVycm9yAwkBAiE9AgUHaXNBZG1pbgIIbm8gYWRtaW4JAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUIdmFyaWFibGUFBXZhbHVlBQNuaWwFBHVuaXQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAg9Zb3Ugbm90IGFkbWluOiAFCWFkbWluTGlzdAILLCBpc0FkbWluOiAFB2lzQWRtaW4CFCwgY2FsbGVyQWRkcmVzc1N0cjogBRBjYWxsZXJBZGRyZXNzU3RyAgIsIAkAAgECEFVuc2V0IGFkbWluIGxpc3QBaQEJZGVsT3B0aW9uAQh2YXJpYWJsZQQMb3B0aW9uc19hZGRyCQEHQWRkcmVzcwEBGgFUQVv4K/YX6iqhy8SK8fvHu7IgYTH+hyDBBAlhZG1pbkxpc3QEByRtYXRjaDAJAJ0IAgUMb3B0aW9uc19hZGRyAgphZG1pbl9saXN0AwkAAQIFByRtYXRjaDACBFVuaXQCBXVuc2V0AwkAAQIFByRtYXRjaDACBlN0cmluZwQBeAUHJG1hdGNoMAUBeAkAAgECC01hdGNoIGVycm9yBBBjYWxsZXJBZGRyZXNzU3RyCQClCAEIBQFpBmNhbGxlcgMJAQIhPQIFCWFkbWluTGlzdAIFdW5zZXQEBHRlc3QJAJ0IAgkBEUBleHRyTmF0aXZlKDEwNjIpAQUJYWRtaW5MaXN0BRBjYWxsZXJBZGRyZXNzU3RyBAdpc0FkbWluBAckbWF0Y2gwBQR0ZXN0AwkAAQIFByRtYXRjaDACBlN0cmluZwQBeAUHJG1hdGNoMAUBeAMJAAECBQckbWF0Y2gwAgRVbml0AghubyBhZG1pbgkAAgECC01hdGNoIGVycm9yAwkBAiE9AgUHaXNBZG1pbgIIbm8gYWRtaW4JAJQKAgkAzAgCCQELRGVsZXRlRW50cnkBBQh2YXJpYWJsZQUDbmlsBQR1bml0CQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIPWW91IG5vdCBhZG1pbjogBQlhZG1pbkxpc3QCCywgaXNBZG1pbjogBQdpc0FkbWluAhQsIGNhbGxlckFkZHJlc3NTdHI6IAUQY2FsbGVyQWRkcmVzc1N0cgICLCAJAAIBAhBVbnNldCBhZG1pbiBsaXN0AQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleeN7OqA=",
    "height": 2453298,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3QC6LXWqgbeGjsau8BkuVdzwmPJ68uZNMKKXXT53qeim
Next: 9z4fuKP2rKKt7NUaTNMkRma1h24tyU7QvRyTViZKxgTp

Diff: 
Old New Differences
11 11          if ((c.assetId != a))
12 12              then throw("holded payment not tUSD")
13 13              else if ((1000 > c.amount))
14 -                 then throw("holded payment not tUSD")
14 +                 then throw("holded payment < 10.00")
15 15                  else {
16 16                      let d = toBase58String(b.caller.bytes)
17 17                      let e = {
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = base58'CX4p6XcuSBUvv44r1avCqYka5PYAVzBK5hSXaT7maU85'
5 5  
6 6  @Callable(b)
7 7  func deposit () = if ((size(b.payments) == 0))
8 8      then throw("Payment not attached")
9 9      else {
10 10          let c = value(b.payments)[0]
11 11          if ((c.assetId != a))
12 12              then throw("holded payment not tUSD")
13 13              else if ((1000 > c.amount))
14 -                 then throw("holded payment not tUSD")
14 +                 then throw("holded payment < 10.00")
15 15                  else {
16 16                      let d = toBase58String(b.caller.bytes)
17 17                      let e = {
18 18                          let f = getInteger(this, d)
19 19                          if ($isInstanceOf(f, "Int"))
20 20                              then {
21 21                                  let g = f
22 22                                  g
23 23                                  }
24 24                              else 0
25 25                          }
26 26                      let h = (e + c.amount)
27 27  [IntegerEntry(d, h)]
28 28                      }
29 29          }
30 30  
31 31  
32 32  
33 33  @Callable(b)
34 34  func withdraw (i) = {
35 35      let d = toBase58String(b.caller.bytes)
36 36      let e = {
37 37          let f = getInteger(this, d)
38 38          if ($isInstanceOf(f, "Int"))
39 39              then {
40 40                  let g = f
41 41                  g
42 42                  }
43 43              else 0
44 44          }
45 45      let h = (e - i)
46 46      if ((0 > i))
47 47          then throw("Can't withdraw negative amount")
48 48          else if ((0 > h))
49 49              then throw("Not enough balance")
50 50              else $Tuple2([IntegerEntry(d, h), ScriptTransfer(b.caller, i, unit)], unit)
51 51      }
52 52  
53 53  
54 54  
55 55  @Callable(b)
56 56  func setOptions (j,k) = {
57 57      let l = size(j)
58 58      if ((100 >= l))
59 59          then {
60 60              let m = Address(base58'3MusfsY6PqDh1YnF7YyTi5ffVT16Dm2bqf6')
61 61              let n = {
62 62                  let f = getString(m, "admin_list")
63 63                  if ($isInstanceOf(f, "Unit"))
64 64                      then "unset"
65 65                      else if ($isInstanceOf(f, "String"))
66 66                          then {
67 67                              let o = f
68 68                              o
69 69                              }
70 70                          else throw("Match error")
71 71                  }
72 72              func p (q,r) =             {
73 73                  let s = q
74 74                  let t = s._1
75 75                  let u = s._2
76 76                  $Tuple2((t :+ IntegerEntry(j[u], r)), (u + 1))
77 77                  }
78 78  
79 79              let v = {
80 80                  let w = k
81 81                  let x = size(w)
82 82                  let y = $Tuple2(nil, 0)
83 83                  func z (A,B) =                 if ((B >= x))
84 84                      then A
85 85                      else p(A, w[B])
86 86  
87 87                  func C (A,B) =                 if ((B >= x))
88 88                      then A
89 89                      else throw("List size exceeds 100")
90 90  
91 91                  C(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(y, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
92 92                  }
93 93              let D = toString(b.caller)
94 94              if ((n != "unset"))
95 95                  then {
96 96                      let E = getString(addressFromStringValue(n), D)
97 97                      let F = {
98 98                          let f = E
99 99                          if ($isInstanceOf(f, "String"))
100 100                              then {
101 101                                  let o = f
102 102                                  o
103 103                                  }
104 104                              else if ($isInstanceOf(f, "Unit"))
105 105                                  then "no admin"
106 106                                  else throw("Match error")
107 107                          }
108 108                      func G (H) =                     {
109 109                          let I = split(H, "|")
110 110                          StringEntry(I[0], I[1])
111 111                          }
112 112  
113 113                      if ((F != "no admin"))
114 114                          then v
115 115                          else throw((((((("You not admin: " + n) + ", isAdmin: ") + F) + ", callerAddressStr: ") + D) + ", "))
116 116                      }
117 117                  else throw("Unset admin list")
118 118              }
119 119          else throw("The number of list elements must not exceed 100")
120 120      }
121 121  
122 122  
123 123  
124 124  @Callable(b)
125 125  func setOption (J,K) = {
126 126      let m = Address(base58'3MusfsY6PqDh1YnF7YyTi5ffVT16Dm2bqf6')
127 127      let n = {
128 128          let f = getString(m, "admin_list")
129 129          if ($isInstanceOf(f, "Unit"))
130 130              then "unset"
131 131              else if ($isInstanceOf(f, "String"))
132 132                  then {
133 133                      let o = f
134 134                      o
135 135                      }
136 136                  else throw("Match error")
137 137          }
138 138      let D = toString(b.caller)
139 139      if ((n != "unset"))
140 140          then {
141 141              let E = getString(addressFromStringValue(n), D)
142 142              let F = {
143 143                  let f = E
144 144                  if ($isInstanceOf(f, "String"))
145 145                      then {
146 146                          let o = f
147 147                          o
148 148                          }
149 149                      else if ($isInstanceOf(f, "Unit"))
150 150                          then "no admin"
151 151                          else throw("Match error")
152 152                  }
153 153              if ((F != "no admin"))
154 154                  then $Tuple2([IntegerEntry(J, K)], unit)
155 155                  else throw((((((("You not admin: " + n) + ", isAdmin: ") + F) + ", callerAddressStr: ") + D) + ", "))
156 156              }
157 157          else throw("Unset admin list")
158 158      }
159 159  
160 160  
161 161  
162 162  @Callable(b)
163 163  func delOption (J) = {
164 164      let m = Address(base58'3MusfsY6PqDh1YnF7YyTi5ffVT16Dm2bqf6')
165 165      let n = {
166 166          let f = getString(m, "admin_list")
167 167          if ($isInstanceOf(f, "Unit"))
168 168              then "unset"
169 169              else if ($isInstanceOf(f, "String"))
170 170                  then {
171 171                      let o = f
172 172                      o
173 173                      }
174 174                  else throw("Match error")
175 175          }
176 176      let D = toString(b.caller)
177 177      if ((n != "unset"))
178 178          then {
179 179              let E = getString(addressFromStringValue(n), D)
180 180              let F = {
181 181                  let f = E
182 182                  if ($isInstanceOf(f, "String"))
183 183                      then {
184 184                          let o = f
185 185                          o
186 186                          }
187 187                      else if ($isInstanceOf(f, "Unit"))
188 188                          then "no admin"
189 189                          else throw("Match error")
190 190                  }
191 191              if ((F != "no admin"))
192 192                  then $Tuple2([DeleteEntry(J)], unit)
193 193                  else throw((((((("You not admin: " + n) + ", isAdmin: ") + F) + ", callerAddressStr: ") + D) + ", "))
194 194              }
195 195          else throw("Unset admin list")
196 196      }
197 197  
198 198  
199 199  @Verifier(L)
200 200  func M () = sigVerify(L.bodyBytes, L.proofs[0], L.senderPublicKey)
201 201

Old	New		Differences
11	11		if ((c.assetId != a))
12	12		then throw("holded payment not tUSD")
13	13		else if ((1000 > c.amount))
14		-	then throw("holded payment ~~not tUSD~~")
	14	+	then throw("holded payment < 10.00")
15	15		else {
16	16		let d = toBase58String(b.caller.bytes)
17	17		let e = {

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let a = base58'CX4p6XcuSBUvv44r1avCqYka5PYAVzBK5hSXaT7maU85'
5	5
6	6		@Callable(b)
7	7		func deposit () = if ((size(b.payments) == 0))
8	8		then throw("Payment not attached")
9	9		else {
10	10		let c = value(b.payments)[0]
11	11		if ((c.assetId != a))
12	12		then throw("holded payment not tUSD")
13	13		else if ((1000 > c.amount))
14		-	then throw("holded payment ~~not tUSD~~")
	14	+	then throw("holded payment < 10.00")
15	15		else {
16	16		let d = toBase58String(b.caller.bytes)
17	17		let e = {
18	18		let f = getInteger(this, d)
19	19		if ($isInstanceOf(f, "Int"))
20	20		then {
21	21		let g = f
22	22		g
23	23		}
24	24		else 0
25	25		}
26	26		let h = (e + c.amount)
27	27		[IntegerEntry(d, h)]
28	28		}
29	29		}
30	30
31	31
32	32
33	33		@Callable(b)
34	34		func withdraw (i) = {
35	35		let d = toBase58String(b.caller.bytes)
36	36		let e = {
37	37		let f = getInteger(this, d)
38	38		if ($isInstanceOf(f, "Int"))
39	39		then {
40	40		let g = f
41	41		g
42	42		}
43	43		else 0
44	44		}
45	45		let h = (e - i)
46	46		if ((0 > i))
47	47		then throw("Can't withdraw negative amount")
48	48		else if ((0 > h))
49	49		then throw("Not enough balance")
50	50		else $Tuple2([IntegerEntry(d, h), ScriptTransfer(b.caller, i, unit)], unit)
51	51		}
52	52
53	53
54	54
55	55		@Callable(b)
56	56		func setOptions (j,k) = {
57	57		let l = size(j)
58	58		if ((100 >= l))
59	59		then {
60	60		let m = Address(base58'3MusfsY6PqDh1YnF7YyTi5ffVT16Dm2bqf6')
61	61		let n = {
62	62		let f = getString(m, "admin_list")
63	63		if ($isInstanceOf(f, "Unit"))
64	64		then "unset"
65	65		else if ($isInstanceOf(f, "String"))
66	66		then {
67	67		let o = f
68	68		o
69	69		}
70	70		else throw("Match error")
71	71		}
72	72		func p (q,r) = {
73	73		let s = q
74	74		let t = s._1
75	75		let u = s._2
76	76		$Tuple2((t :+ IntegerEntry(j[u], r)), (u + 1))
77	77		}
78	78
79	79		let v = {
80	80		let w = k
81	81		let x = size(w)
82	82		let y = $Tuple2(nil, 0)
83	83		func z (A,B) = if ((B >= x))
84	84		then A
85	85		else p(A, w[B])
86	86
87	87		func C (A,B) = if ((B >= x))
88	88		then A
89	89		else throw("List size exceeds 100")
90	90
91	91		C(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(z(y, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
92	92		}
93	93		let D = toString(b.caller)
94	94		if ((n != "unset"))
95	95		then {
96	96		let E = getString(addressFromStringValue(n), D)
97	97		let F = {
98	98		let f = E
99	99		if ($isInstanceOf(f, "String"))
100	100		then {
101	101		let o = f
102	102		o
103	103		}
104	104		else if ($isInstanceOf(f, "Unit"))
105	105		then "no admin"
106	106		else throw("Match error")
107	107		}
108	108		func G (H) = {
109	109		let I = split(H, "\|")
110	110		StringEntry(I[0], I[1])
111	111		}
112	112
113	113		if ((F != "no admin"))
114	114		then v
115	115		else throw((((((("You not admin: " + n) + ", isAdmin: ") + F) + ", callerAddressStr: ") + D) + ", "))
116	116		}
117	117		else throw("Unset admin list")
118	118		}
119	119		else throw("The number of list elements must not exceed 100")
120	120		}
121	121
122	122
123	123
124	124		@Callable(b)
125	125		func setOption (J,K) = {
126	126		let m = Address(base58'3MusfsY6PqDh1YnF7YyTi5ffVT16Dm2bqf6')
127	127		let n = {
128	128		let f = getString(m, "admin_list")
129	129		if ($isInstanceOf(f, "Unit"))
130	130		then "unset"
131	131		else if ($isInstanceOf(f, "String"))
132	132		then {
133	133		let o = f
134	134		o
135	135		}
136	136		else throw("Match error")
137	137		}
138	138		let D = toString(b.caller)
139	139		if ((n != "unset"))
140	140		then {
141	141		let E = getString(addressFromStringValue(n), D)
142	142		let F = {
143	143		let f = E
144	144		if ($isInstanceOf(f, "String"))
145	145		then {
146	146		let o = f
147	147		o
148	148		}
149	149		else if ($isInstanceOf(f, "Unit"))
150	150		then "no admin"
151	151		else throw("Match error")
152	152		}
153	153		if ((F != "no admin"))
154	154		then $Tuple2([IntegerEntry(J, K)], unit)
155	155		else throw((((((("You not admin: " + n) + ", isAdmin: ") + F) + ", callerAddressStr: ") + D) + ", "))
156	156		}
157	157		else throw("Unset admin list")
158	158		}
159	159
160	160
161	161
162	162		@Callable(b)
163	163		func delOption (J) = {
164	164		let m = Address(base58'3MusfsY6PqDh1YnF7YyTi5ffVT16Dm2bqf6')
165	165		let n = {
166	166		let f = getString(m, "admin_list")
167	167		if ($isInstanceOf(f, "Unit"))
168	168		then "unset"
169	169		else if ($isInstanceOf(f, "String"))
170	170		then {
171	171		let o = f
172	172		o
173	173		}
174	174		else throw("Match error")
175	175		}
176	176		let D = toString(b.caller)
177	177		if ((n != "unset"))
178	178		then {
179	179		let E = getString(addressFromStringValue(n), D)
180	180		let F = {
181	181		let f = E
182	182		if ($isInstanceOf(f, "String"))
183	183		then {
184	184		let o = f
185	185		o
186	186		}
187	187		else if ($isInstanceOf(f, "Unit"))
188	188		then "no admin"
189	189		else throw("Match error")
190	190		}
191	191		if ((F != "no admin"))
192	192		then $Tuple2([DeleteEntry(J)], unit)
193	193		else throw((((((("You not admin: " + n) + ", isAdmin: ") + F) + ", callerAddressStr: ") + D) + ", "))
194	194		}
195	195		else throw("Unset admin list")
196	196		}
197	197
198	198
199	199		@Verifier(L)
200	200		func M () = sigVerify(L.bodyBytes, L.proofs[0], L.senderPublicKey)
201	201

github/deemru/w8io/169f3d6 
40.20 ms ◑