w8 · tx · 8fx···Jwo

tx · 8fx9EmbZc9oYMAjNT1CFeXVtvxYshG1ZoBYjH22P8Jwo

3MxfEq17wZjAWQfckWycU9o4oTkvf9nfNQX:  -0.01000000 Waves

2021.12.15 07:52 [1834910] smart account 3MxfEq17wZjAWQfckWycU9o4oTkvf9nfNQX > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "8fx9EmbZc9oYMAjNT1CFeXVtvxYshG1ZoBYjH22P8Jwo",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1639543949246,
    "version": 2,
    "chainId": 84,
    "sender": "3MxfEq17wZjAWQfckWycU9o4oTkvf9nfNQX",
    "senderPublicKey": "HUca7AqRs4Zs9sU1AFcufmBC4XpT4sN79aFScNRT4LxQ",
    "proofs": [
        "24URNg8GxbKbk185hY5uxtjT1qG9vmFneYX4R8BXdBG5t9vV1UcZB3vSL51HSNGzdvTxdQ6Bryny5ivGwDmhmhj7"
    ],
    "script": "base64:AAIFAAAAAAAAAAsIAhIAEgMKAQgSAAAAAAYAAAAABXRva2VuAQAAACD7/f1CuDsROS4HrrpzuTX1nPj4tgHygebqJ8ua8SYIHwAAAAAGdG9rZW5kAAAAAAAF9eEAAAAAAAdhaXJkcm9wCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUX+pzJtA2DV6Pr0xhS8z4foIVUAfq2c0IAAAAAAp0ZWFtQWRyZXNzCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUACYJT8ivNONGpFPWk1FdqVPAxApBcmLaAAAAAAhkZWFkbGluZQAAAAF9vHYogAAAAAAMYnVybmRlYWRsaW5lAAAACMRZQFMAAAAAAwAAAAFpAQAAAAVyZXNldAAAAAAJAARMAAAAAgkBAAAAC0RlbGV0ZUVudHJ5AAAAAQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAVidXJudAAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHZHJvcHBlZAAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAFc29sZDEAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAABXNvbGQyAAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAh0ZWFtZ2lmdAAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAGaXNzdWVkCQAAaAAAAAIAAAAAADuaygAAAAAAAAX14QAJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAMYnVybmluZ3N0YWdlAgAAAAd3YWl0aW5nCQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAZfZXJyb3IFAAAAA25pbAAAAAFpAQAAAARmcmVlAAAAAQAAAARpZDU4BAAAAApkcm9wYW1vdW50CQAAaAAAAAIAAAAAAAAAA+gFAAAABnRva2VuZAQAAAAIdGVhbWdpZnQJAABoAAAAAgAAAAAAAAAACgUAAAAGdG9rZW5kBAAAAAR0cmlkCQACWQAAAAEFAAAABGlkNTgEAAAADGNhbGxlckFkcmVzcwkBAAAAB0FkZHJlc3MAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAtjdXJyZW50dGltZQQAAAAHJG1hdGNoMAkAA+0AAAABBQAAAAZoZWlnaHQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACUJsb2NrSW5mbwQAAAAFYmxvY2sFAAAAByRtYXRjaDAIBQAAAAVibG9jawAAAAl0aW1lc3RhbXAJAAACAAAAAQIAAAAQQ2FuJ3QgZmluZCBibG9jawQAAAAHYmFsYW5jZQkAA/AAAAACBQAAAAdhaXJkcm9wBQAAAAV0b2tlbgQAAAAKYnVybmFtb3VudAMDCQAAZgAAAAIFAAAAC2N1cnJlbnR0aW1lBQAAAAxidXJuZGVhZGxpbmUJAAAAAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTgpAAAAAQIAAAAMYnVybmluZ3N0YWdlAgAAAAd3YWl0aW5nBwUAAAAHYmFsYW5jZQAAAAAAAAAAAAQAAAAIaXNlbm91Z2gDCQAAZgAAAAIFAAAAB2JhbGFuY2UFAAAACmRyb3BhbW91bnQGBwMJAAAAAAAAAgUAAAAIaXNlbm91Z2gFAAAACGlzZW5vdWdoBAAAAAh0cmV4aXN0cwQAAAAHJG1hdGNoMAkAA+4AAAABBQAAAAR0cmlkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAN0dHgFAAAAByRtYXRjaDAGBwQAAAAGdHJ0aW1lBAAAAAckbWF0Y2gwCQAD7gAAAAEFAAAABHRyaWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAAA3R0eAUAAAAHJG1hdGNoMAgFAAAAA3R0eAAAAAl0aW1lc3RhbXAAAAAJGE5yn/8EAAAACHRyc2VuZGVyBAAAAAckbWF0Y2gwCQAD7gAAAAEFAAAABHRyaWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAAA3R0eAUAAAAHJG1hdGNoMAgFAAAAA3R0eAAAAAZzZW5kZXIFAAAAB2FpcmRyb3AEAAAACHJlY2VpdmVkAwkAAAAAAAACCQABLwAAAAIJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQiAAAAAQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAAAAAAAAAAAAAgCAAAACHJlY2VpdmVkBgcEAAAACWlzcHJvb3ZlZAMDAwMJAABmAAAAAgUAAAAGdHJ0aW1lBQAAAAhkZWFkbGluZQYJAQAAAAIhPQAAAAIFAAAADGNhbGxlckFkcmVzcwUAAAAIdHJzZW5kZXIGBQAAAAhyZWNlaXZlZAYJAQAAAAEhAAAAAQUAAAAIaXNlbm91Z2gHBgQAAAAGcmVzdWx0AwUAAAAIdHJleGlzdHMDCQAAZgAAAAIFAAAABnRydGltZQUAAAAIZGVhZGxpbmUJAAEsAAAAAgIAAAAidHJhbnNhY3Rpb24gaXMgb3V0IG9mIHRpbWUgcmFuZ2U6IAkAAaQAAAABBQAAAAZ0cnRpbWUJAAEsAAAAAgIAAAAAAwkBAAAAAiE9AAAAAgUAAAAMY2FsbGVyQWRyZXNzBQAAAAh0cnNlbmRlcgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAYaXQgaXMgaW5jb3JyZWN0IHNlbmRlcjogCQAEJQAAAAEFAAAADGNhbGxlckFkcmVzcwIAAAADIC8gCQAEJQAAAAEFAAAACHRyc2VuZGVyCQABLAAAAAICAAAAAAMFAAAACHJlY2VpdmVkAgAAABFhbGxyZWFkeSByZWNlaXZlZAkAASwAAAACAgAAAAADBQAAAAlpc3Byb292ZWQCAAAACHJlY2VpdmVkCQABLAAAAAICAAAAAAMJAQAAAAEhAAAAAQUAAAAIaXNlbm91Z2gCAAAAHWFpcmRyb3AgZW5kZWQ6IHRoZW0gYWxsIGJ1cm50AgAAAAACAAAAFmNhbmB0IGZpbmQgdHJhbnNhY3Rpb24DCQAAZgAAAAIFAAAACmJ1cm5hbW91bnQAAAAAAAAAAAAJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAABl9lcnJvcgkAASwAAAACCQABLAAAAAICAAAAFGFpcmRyb3AgZW5kZWQ6IGxhc3QgCQABpAAAAAEJAABrAAAAAwUAAAAKYnVybmFtb3VudAAAAAAAAAAAAQUAAAAGdG9rZW5kAgAAAAYgYnVybnQJAARMAAAAAgkBAAAABEJ1cm4AAAACBQAAAAV0b2tlbgUAAAAKYnVybmFtb3VudAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAAxidXJuaW5nc3RhZ2UCAAAADnRoZW0gYWxsIGJ1cm50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAVidXJudAkAAGQAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA1NSkAAAABAgAAAAVidXJudAUAAAAKYnVybmFtb3VudAUAAAADbmlsAwUAAAAJaXNwcm9vdmVkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAADGNhbGxlckFkcmVzcwUAAAAKZHJvcGFtb3VudAUAAAAFdG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAKdGVhbUFkcmVzcwUAAAAIdGVhbWdpZnQFAAAABXRva2VuCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwUAAAAGcmVzdWx0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAdkcm9wcGVkCQAAZAAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDU1KQAAAAECAAAAB2Ryb3BwZWQFAAAACmRyb3BhbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAACHRlYW1naWZ0CQAAZAAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDU1KQAAAAECAAAACHRlYW1naWZ0BQAAAAh0ZWFtZ2lmdAkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAGX2Vycm9yBQAAAANuaWwJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAABl9lcnJvcgUAAAAGcmVzdWx0BQAAAANuaWwJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAWkBAAAAA2J1eQAAAAAEAAAAB2JhbGFuY2UJAAPwAAAAAgUAAAAHYWlyZHJvcAUAAAAFdG9rZW4EAAAACnNlbGxhbW91bnQJAABoAAAAAgAAAAAAAAAD6AUAAAAGdG9rZW5kBAAAAAtidXJuYW1vdW50cwkABEwAAAACAAAAAAAAAAAACQAETAAAAAIJAABoAAAAAgAAAAAAAAAACgUAAAAKc2VsbGFtb3VudAkABEwAAAACCQAAaAAAAAIAAAAAAAAAABQFAAAACnNlbGxhbW91bnQJAARMAAAAAgAAAAAAAAAAAAUAAAADbmlsBAAAAAZwcmljZXMJAARMAAAAAgAAAAAAAAAAAAkABEwAAAACCQAAaAAAAAIAAAAAAAAAAAEAAAAAAAX14QAJAARMAAAAAgkAAGgAAAACAAAAAAAAAAACAAAAAAAF9eEACQAETAAAAAIAAAAAAAAAAAAFAAAAA25pbAQAAAAMY2FsbGVyQWRyZXNzCQEAAAAHQWRkcmVzcwAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAACmNhbGxlckRhdGEJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQiAAAAAQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAAEAAAACGRhdGFyZWNzCQAEtQAAAAIFAAAACmNhbGxlckRhdGECAAAAAXwEAAAADmNhbGxlckJ1eWxldmVsCQABkAAAAAEFAAAACGRhdGFyZWNzBAAAAAtjYWxsZXJQcmljZQkAAZEAAAACBQAAAAZwcmljZXMFAAAADmNhbGxlckJ1eWxldmVsBAAAAApidXJuYW1vdW50CQABkQAAAAIFAAAAC2J1cm5hbW91bnRzBQAAAA5jYWxsZXJCdXlsZXZlbAQAAAAJYmFsYW5jZW9rAwkAAGcAAAACBQAAAAdiYWxhbmNlCQAAZAAAAAIFAAAACnNlbGxhbW91bnQFAAAACmJ1cm5hbW91bnQGBwQAAAAMY2FsbGVyQ2FuQnV5AwMJAAAAAAAAAgUAAAAOY2FsbGVyQnV5bGV2ZWwAAAAAAAAAAAEGCQAAAAAAAAIFAAAADmNhbGxlckJ1eWxldmVsAAAAAAAAAAACBgcEAAAABXBtdG9rAwkAAAAAAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAABAwMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQJAABnAAAAAggJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50BQAAAAtjYWxsZXJQcmljZQcGBwcEAAAABG1lc3MDCQEAAAABIQAAAAEFAAAADGNhbGxlckNhbkJ1eQIAAAATbm90IHByb292ZWQgZm9yIGJ1eQkAASwAAAACAgAAAAADCQEAAAABIQAAAAEFAAAABXBtdG9rAgAAABJub3QgZW5vdWdoIHBheW1lbnQJAAEsAAAAAgIAAAAAAwkBAAAAASEAAAABBQAAAAliYWxhbmNlb2sCAAAAH3lvdSBsb3N0Li4uIG5vdCBlbm91Z2ggYmFsbGFuY2UCAAAAAAQAAAAHbmV3ZGF0YQMJAAAAAAAAAgUAAAAOY2FsbGVyQnV5bGV2ZWwAAAAAAAAAAAECAAAAEHJlY2VpdmVkfGJvdWdodDEDCQAAAAAAAAIFAAAADmNhbGxlckJ1eWxldmVsAAAAAAAAAAACAgAAABhyZWNlaXZlZHxib3VnaHQxfGJvdWdodDIFAAAACmNhbGxlckRhdGEEAAAABGRlYWwDAwMFAAAACWJhbGFuY2VvawUAAAAMY2FsbGVyQ2FuQnV5BwUAAAAFcG10b2sHBgcDBQAAAARkZWFsCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwUAAAAHbmV3ZGF0YQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAp0ZWFtQWRyZXNzBQAAAAtjYWxsZXJQcmljZQUAAAAEdW5pdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAxjYWxsZXJBZHJlc3MFAAAACnNlbGxhbW91bnQFAAAABXRva2VuCQAETAAAAAIJAQAAAARCdXJuAAAAAgUAAAAFdG9rZW4FAAAACmJ1cm5hbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAABWJ1cm50CQAAZAAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDU1KQAAAAECAAAABWJ1cm50BQAAAApidXJuYW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAABHNvbGQJAAGkAAAAAQUAAAAOY2FsbGVyQnV5bGV2ZWwJAABkAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTUpAAAAAQkAASwAAAACAgAAAARzb2xkCQABpAAAAAEFAAAADmNhbGxlckJ1eWxldmVsBQAAAApzZWxsYW1vdW50CQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAZfZXJyb3IFAAAAA25pbAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAGX2Vycm9yBQAAAARtZXNzBQAAAANuaWwAAAAAztGlmw==",
    "height": 1834910,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 8NrRa6CfD1vQ3pqb3eTncpsLcndRHfrmzkvSu64T8X1Q
Next: none

Diff: 
Old New Differences
9 9  
10 10  let teamAdress = Address(base58'3MovsLjXpJr9HD2vBqmAf7Gze6jwuRxX1fX')
11 11  
12 - let deadline = 1639310400000
12 + let deadline = 1639544400000
13 13  
14 14  let burndeadline = 9639404000000
15 15  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let token = base58'HxfxmhGzE6eXC2xStY7WMJfHrNd2GYrXWqM2YM72vqN6'
5 5  
6 6  let tokend = 100000000
7 7  
8 8  let airdrop = Address(base58'3MxfEq17wZjAWQfckWycU9o4oTkvf9nfNQX')
9 9  
10 10  let teamAdress = Address(base58'3MovsLjXpJr9HD2vBqmAf7Gze6jwuRxX1fX')
11 11  
12 - let deadline = 1639310400000
12 + let deadline = 1639544400000
13 13  
14 14  let burndeadline = 9639404000000
15 15  
16 16  @Callable(i)
17 17  func reset () = [DeleteEntry(toBase58String(i.caller.bytes)), IntegerEntry("burnt", 0), IntegerEntry("dropped", 0), IntegerEntry("sold1", 0), IntegerEntry("sold2", 0), IntegerEntry("teamgift", 0), IntegerEntry("issued", (1000000000 * 100000000)), StringEntry("burningstage", "waiting"), DeleteEntry((toBase58String(i.caller.bytes) + "_error"))]
18 18  
19 19  
20 20  
21 21  @Callable(i)
22 22  func free (id58) = {
23 23      let dropamount = (1000 * tokend)
24 24      let teamgift = (10 * tokend)
25 25      let trid = fromBase58String(id58)
26 26      let callerAdress = Address(i.caller.bytes)
27 27      let currenttime =     match blockInfoByHeight(height) {
28 28          case block: BlockInfo => 
29 29              block.timestamp
30 30          case _ => 
31 31              throw("Can't find block")
32 32      }
33 33      let balance = assetBalance(airdrop, token)
34 34      let burnamount = if (if ((currenttime > burndeadline))
35 35          then (getStringValue("burningstage") == "waiting")
36 36          else false)
37 37          then balance
38 38          else 0
39 39      let isenough = if ((balance > dropamount))
40 40          then true
41 41          else false
42 42      if ((isenough == isenough))
43 43          then {
44 44              let trexists =             match transferTransactionById(trid) {
45 45                  case ttx: TransferTransaction => 
46 46                      true
47 47                  case _ => 
48 48                      false
49 49              }
50 50              let trtime =             match transferTransactionById(trid) {
51 51                  case ttx: TransferTransaction => 
52 52                      ttx.timestamp
53 53                  case _ => 
54 54                      9999999999999
55 55              }
56 56              let trsender =             match transferTransactionById(trid) {
57 57                  case ttx: TransferTransaction => 
58 58                      ttx.sender
59 59                  case _ => 
60 60                      airdrop
61 61              }
62 62              let received = if ((take(valueOrElse(getString(toBase58String(i.caller.bytes)), ""), 8) == "received"))
63 63                  then true
64 64                  else false
65 65              let isprooved = if (if (if (if ((trtime > deadline))
66 66                  then true
67 67                  else (callerAdress != trsender))
68 68                  then true
69 69                  else received)
70 70                  then true
71 71                  else !(isenough))
72 72                  then false
73 73                  else true
74 74              let result = if (trexists)
75 75                  then if ((trtime > deadline))
76 76                      then ("transaction is out of time range: " + toString(trtime))
77 77                      else ("" + (if ((callerAdress != trsender))
78 78                          then ((("it is incorrect sender: " + toString(callerAdress)) + " / ") + toString(trsender))
79 79                          else ("" + (if (received)
80 80                              then "allready received"
81 81                              else ("" + (if (isprooved)
82 82                                  then "received"
83 83                                  else ("" + (if (!(isenough))
84 84                                      then "airdrop ended: them all burnt"
85 85                                      else ""))))))))
86 86                  else "can`t find transaction"
87 87              if ((burnamount > 0))
88 88                  then [StringEntry((toBase58String(i.caller.bytes) + "_error"), (("airdrop ended: last " + toString(fraction(burnamount, 1, tokend))) + " burnt")), Burn(token, burnamount), StringEntry("burningstage", "them all burnt"), IntegerEntry("burnt", (getIntegerValue("burnt") + burnamount))]
89 89                  else if (isprooved)
90 90                      then [ScriptTransfer(callerAdress, dropamount, token), ScriptTransfer(teamAdress, teamgift, token), StringEntry(toBase58String(i.caller.bytes), result), IntegerEntry("dropped", (getIntegerValue("dropped") + dropamount)), IntegerEntry("teamgift", (getIntegerValue("teamgift") + teamgift)), DeleteEntry((toBase58String(i.caller.bytes) + "_error"))]
91 91                      else [StringEntry((toBase58String(i.caller.bytes) + "_error"), result)]
92 92              }
93 93          else throw("Strict value is not equal to itself.")
94 94      }
95 95  
96 96  
97 97  
98 98  @Callable(i)
99 99  func buy () = {
100 100      let balance = assetBalance(airdrop, token)
101 101      let sellamount = (1000 * tokend)
102 102      let burnamounts = [0, (10 * sellamount), (20 * sellamount), 0]
103 103      let prices = [0, (1 * 100000000), (2 * 100000000), 0]
104 104      let callerAdress = Address(i.caller.bytes)
105 105      let callerData = valueOrElse(getString(toBase58String(i.caller.bytes)), "")
106 106      let datarecs = split(callerData, "|")
107 107      let callerBuylevel = size(datarecs)
108 108      let callerPrice = prices[callerBuylevel]
109 109      let burnamount = burnamounts[callerBuylevel]
110 110      let balanceok = if ((balance >= (sellamount + burnamount)))
111 111          then true
112 112          else false
113 113      let callerCanBuy = if (if ((callerBuylevel == 1))
114 114          then true
115 115          else (callerBuylevel == 2))
116 116          then true
117 117          else false
118 118      let pmtok = if ((size(i.payments) == 1))
119 119          then if (if (!(isDefined(i.payments[0].assetId)))
120 120              then (i.payments[0].amount >= callerPrice)
121 121              else false)
122 122              then true
123 123              else false
124 124          else false
125 125      let mess = if (!(callerCanBuy))
126 126          then "not prooved for buy"
127 127          else ("" + (if (!(pmtok))
128 128              then "not enough payment"
129 129              else ("" + (if (!(balanceok))
130 130                  then "you lost... not enough ballance"
131 131                  else ""))))
132 132      let newdata = if ((callerBuylevel == 1))
133 133          then "received|bought1"
134 134          else if ((callerBuylevel == 2))
135 135              then "received|bought1|bought2"
136 136              else callerData
137 137      let deal = if (if (if (balanceok)
138 138          then callerCanBuy
139 139          else false)
140 140          then pmtok
141 141          else false)
142 142          then true
143 143          else false
144 144      if (deal)
145 145          then [StringEntry(toBase58String(i.caller.bytes), newdata), ScriptTransfer(teamAdress, callerPrice, unit), ScriptTransfer(callerAdress, sellamount, token), Burn(token, burnamount), IntegerEntry("burnt", (getIntegerValue("burnt") + burnamount)), IntegerEntry(("sold" + toString(callerBuylevel)), (getIntegerValue(("sold" + toString(callerBuylevel))) + sellamount)), DeleteEntry((toBase58String(i.caller.bytes) + "_error"))]
146 146          else [StringEntry((toBase58String(i.caller.bytes) + "_error"), mess)]
147 147      }
148 148  
149 149

Old	New		Differences
9	9
10	10		let teamAdress = Address(base58'3MovsLjXpJr9HD2vBqmAf7Gze6jwuRxX1fX')
11	11
12		-	let deadline = ~~1639310400000~~
	12	+	let deadline = 1639544400000
13	13
14	14		let burndeadline = 9639404000000
15	15

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let token = base58'HxfxmhGzE6eXC2xStY7WMJfHrNd2GYrXWqM2YM72vqN6'
5	5
6	6		let tokend = 100000000
7	7
8	8		let airdrop = Address(base58'3MxfEq17wZjAWQfckWycU9o4oTkvf9nfNQX')
9	9
10	10		let teamAdress = Address(base58'3MovsLjXpJr9HD2vBqmAf7Gze6jwuRxX1fX')
11	11
12		-	let deadline = ~~1639310400000~~
	12	+	let deadline = 1639544400000
13	13
14	14		let burndeadline = 9639404000000
15	15
16	16		@Callable(i)
17	17		func reset () = [DeleteEntry(toBase58String(i.caller.bytes)), IntegerEntry("burnt", 0), IntegerEntry("dropped", 0), IntegerEntry("sold1", 0), IntegerEntry("sold2", 0), IntegerEntry("teamgift", 0), IntegerEntry("issued", (1000000000 * 100000000)), StringEntry("burningstage", "waiting"), DeleteEntry((toBase58String(i.caller.bytes) + "_error"))]
18	18
19	19
20	20
21	21		@Callable(i)
22	22		func free (id58) = {
23	23		let dropamount = (1000 * tokend)
24	24		let teamgift = (10 * tokend)
25	25		let trid = fromBase58String(id58)
26	26		let callerAdress = Address(i.caller.bytes)
27	27		let currenttime = match blockInfoByHeight(height) {
28	28		case block: BlockInfo =>
29	29		block.timestamp
30	30		case _ =>
31	31		throw("Can't find block")
32	32		}
33	33		let balance = assetBalance(airdrop, token)
34	34		let burnamount = if (if ((currenttime > burndeadline))
35	35		then (getStringValue("burningstage") == "waiting")
36	36		else false)
37	37		then balance
38	38		else 0
39	39		let isenough = if ((balance > dropamount))
40	40		then true
41	41		else false
42	42		if ((isenough == isenough))
43	43		then {
44	44		let trexists = match transferTransactionById(trid) {
45	45		case ttx: TransferTransaction =>
46	46		true
47	47		case _ =>
48	48		false
49	49		}
50	50		let trtime = match transferTransactionById(trid) {
51	51		case ttx: TransferTransaction =>
52	52		ttx.timestamp
53	53		case _ =>
54	54		9999999999999
55	55		}
56	56		let trsender = match transferTransactionById(trid) {
57	57		case ttx: TransferTransaction =>
58	58		ttx.sender
59	59		case _ =>
60	60		airdrop
61	61		}
62	62		let received = if ((take(valueOrElse(getString(toBase58String(i.caller.bytes)), ""), 8) == "received"))
63	63		then true
64	64		else false
65	65		let isprooved = if (if (if (if ((trtime > deadline))
66	66		then true
67	67		else (callerAdress != trsender))
68	68		then true
69	69		else received)
70	70		then true
71	71		else !(isenough))
72	72		then false
73	73		else true
74	74		let result = if (trexists)
75	75		then if ((trtime > deadline))
76	76		then ("transaction is out of time range: " + toString(trtime))
77	77		else ("" + (if ((callerAdress != trsender))
78	78		then ((("it is incorrect sender: " + toString(callerAdress)) + " / ") + toString(trsender))
79	79		else ("" + (if (received)
80	80		then "allready received"
81	81		else ("" + (if (isprooved)
82	82		then "received"
83	83		else ("" + (if (!(isenough))
84	84		then "airdrop ended: them all burnt"
85	85		else ""))))))))
86	86		else "can`t find transaction"
87	87		if ((burnamount > 0))
88	88		then [StringEntry((toBase58String(i.caller.bytes) + "_error"), (("airdrop ended: last " + toString(fraction(burnamount, 1, tokend))) + " burnt")), Burn(token, burnamount), StringEntry("burningstage", "them all burnt"), IntegerEntry("burnt", (getIntegerValue("burnt") + burnamount))]
89	89		else if (isprooved)
90	90		then [ScriptTransfer(callerAdress, dropamount, token), ScriptTransfer(teamAdress, teamgift, token), StringEntry(toBase58String(i.caller.bytes), result), IntegerEntry("dropped", (getIntegerValue("dropped") + dropamount)), IntegerEntry("teamgift", (getIntegerValue("teamgift") + teamgift)), DeleteEntry((toBase58String(i.caller.bytes) + "_error"))]
91	91		else [StringEntry((toBase58String(i.caller.bytes) + "_error"), result)]
92	92		}
93	93		else throw("Strict value is not equal to itself.")
94	94		}
95	95
96	96
97	97
98	98		@Callable(i)
99	99		func buy () = {
100	100		let balance = assetBalance(airdrop, token)
101	101		let sellamount = (1000 * tokend)
102	102		let burnamounts = [0, (10 * sellamount), (20 * sellamount), 0]
103	103		let prices = [0, (1 * 100000000), (2 * 100000000), 0]
104	104		let callerAdress = Address(i.caller.bytes)
105	105		let callerData = valueOrElse(getString(toBase58String(i.caller.bytes)), "")
106	106		let datarecs = split(callerData, "\|")
107	107		let callerBuylevel = size(datarecs)
108	108		let callerPrice = prices[callerBuylevel]
109	109		let burnamount = burnamounts[callerBuylevel]
110	110		let balanceok = if ((balance >= (sellamount + burnamount)))
111	111		then true
112	112		else false
113	113		let callerCanBuy = if (if ((callerBuylevel == 1))
114	114		then true
115	115		else (callerBuylevel == 2))
116	116		then true
117	117		else false
118	118		let pmtok = if ((size(i.payments) == 1))
119	119		then if (if (!(isDefined(i.payments[0].assetId)))
120	120		then (i.payments[0].amount >= callerPrice)
121	121		else false)
122	122		then true
123	123		else false
124	124		else false
125	125		let mess = if (!(callerCanBuy))
126	126		then "not prooved for buy"
127	127		else ("" + (if (!(pmtok))
128	128		then "not enough payment"
129	129		else ("" + (if (!(balanceok))
130	130		then "you lost... not enough ballance"
131	131		else ""))))
132	132		let newdata = if ((callerBuylevel == 1))
133	133		then "received\|bought1"
134	134		else if ((callerBuylevel == 2))
135	135		then "received\|bought1\|bought2"
136	136		else callerData
137	137		let deal = if (if (if (balanceok)
138	138		then callerCanBuy
139	139		else false)
140	140		then pmtok
141	141		else false)
142	142		then true
143	143		else false
144	144		if (deal)
145	145		then [StringEntry(toBase58String(i.caller.bytes), newdata), ScriptTransfer(teamAdress, callerPrice, unit), ScriptTransfer(callerAdress, sellamount, token), Burn(token, burnamount), IntegerEntry("burnt", (getIntegerValue("burnt") + burnamount)), IntegerEntry(("sold" + toString(callerBuylevel)), (getIntegerValue(("sold" + toString(callerBuylevel))) + sellamount)), DeleteEntry((toBase58String(i.caller.bytes) + "_error"))]
146	146		else [StringEntry((toBase58String(i.caller.bytes) + "_error"), mess)]
147	147		}
148	148
149	149

github/deemru/w8io/873ac7e 
23.47 ms ◑