w8 · tx · Hv3···NYm

tx · Hv3HWxyXhvEozZqoKDihLbkt2tr7EHmBTwfh38zBLNYm

3N7Gg64FJ3ESaqn41qu1ete7zmzbmoP1AAV:  -0.01000000 Waves

2021.12.11 21:06 [1829914] smart account 3N7Gg64FJ3ESaqn41qu1ete7zmzbmoP1AAV > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Hv3HWxyXhvEozZqoKDihLbkt2tr7EHmBTwfh38zBLNYm",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1639246036353,
    "version": 2,
    "chainId": 84,
    "sender": "3N7Gg64FJ3ESaqn41qu1ete7zmzbmoP1AAV",
    "senderPublicKey": "5amLtMwixiEesBDKPy9dkFWntG2fNxhTs5n69JbQE9F7",
    "proofs": [
        "2B9Az7WwTJoUUFN3C8DE77UgwHxKNpFo8atrJpsURiMEfPMKQ9yNySyWymnmJA7iyteSiVwQa6mvFvZKLXXTWJnC"
    ],
    "script": "base64:AAIFAAAAAAAAAAsIAhIAEgMKAQgSAAAAAAMAAAAABXRva2VuAQAAACDnOZgLkNAqR859hHqstm3f+W8Ysf2b79oIcjd5zepeZgAAAAAHYWlyZHJvcAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVL5fGbDUbkI0fER3ZA37DWC9GkZHGFznigAAAAAKdGVhbUFkcmVzcwkBAAAAB0FkZHJlc3MAAAABAQAAABoBVAAmCU/IrzTjRqRT1pNRXalTwMQKQXJi2gAAAAMAAAABaQEAAAAFcmVzZXQAAAAACQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAFYnVybnQAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB2Ryb3BwZWQAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAACHRlYW1naWZ0AAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAxidXJuaW5nc3RhZ2UAAAAAAAAAAAAFAAAAA25pbAAAAAFpAQAAAARjYWxsAAAAAQAAAARpZDU4BAAAAAtjdXJyZW50dGltZQQAAAAHJG1hdGNoMAkAA+0AAAABBQAAAAZoZWlnaHQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACUJsb2NrSW5mbwQAAAAFYmxvY2sFAAAAByRtYXRjaDAIBQAAAAVibG9jawAAAAl0aW1lc3RhbXAJAAACAAAAAQIAAAAQQ2FuJ3QgZmluZCBibG9jawQAAAAHYmFsYW5jZQkAA/AAAAACBQAAAAdhaXJkcm9wBQAAAAV0b2tlbgQAAAAKYnVybmFtb3VudAQAAAAHJG1hdGNoMAkABB8AAAABAgAAAAxidXJuaW5nc3RhZ2UDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAMDCQAAAAAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDU1KQAAAAECAAAADGJ1cm5pbmdzdGFnZQAAAAAAAAAAAAkAAGYAAAACBQAAAAtjdXJyZW50dGltZQAAAAF9o9wqYAcJAABrAAAAAwUAAAAHYmFsYW5jZQAAAAAAAAAACgAAAAAAAAAAZAAAAAAAAAAAAAkAAAIAAAABAgAAAA9ubyBidXJuaW5nc3RhZ2UEAAAACmRyb3BhbW91bnQAAAAAAAAAA+gEAAAACHRlYW1naWZ0AAAAAAAAAAAKBAAAAAR0cmlkCQACWQAAAAEFAAAABGlkNTgEAAAADGNhbGxlckFkcmVzcwkBAAAAB0FkZHJlc3MAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAhkZWFkbGluZQAAAAF9qcX7twQAAAAIaXNlbm91Z2gDCQAAZgAAAAIFAAAAB2JhbGFuY2UFAAAACmRyb3BhbW91bnQGCQAAAgAAAAECAAAACm5vdCBlbm91Z2gDCQAAAAAAAAIFAAAACGlzZW5vdWdoBQAAAAhpc2Vub3VnaAQAAAAIdHJleGlzdHMEAAAAByRtYXRjaDAJAAPuAAAAAQUAAAAEdHJpZAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAATVHJhbnNmZXJUcmFuc2FjdGlvbgQAAAADdHR4BQAAAAckbWF0Y2gwBgcEAAAABnRydGltZQQAAAAHJG1hdGNoMAkAA+4AAAABBQAAAAR0cmlkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAN0dHgFAAAAByRtYXRjaDAIBQAAAAN0dHgAAAAJdGltZXN0YW1wAAAACRhOcp//BAAAAAh0cnNlbmRlcgQAAAAHJG1hdGNoMAkAA+4AAAABBQAAAAR0cmlkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAN0dHgFAAAAByRtYXRjaDAIBQAAAAN0dHgAAAAGc2VuZGVyBQAAAAdhaXJkcm9wBAAAAAhyZWNlaXZlZAMJAAAAAAAAAgkAAS8AAAACCQEAAAALdmFsdWVPckVsc2UAAAACCQAEIgAAAAEJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAAAAAAAAAAAAAIAgAAAAhyZWNlaXZlZAYHBAAAAAlpc3Byb292ZWQDAwMJAABmAAAAAgUAAAAGdHJ0aW1lBQAAAAhkZWFkbGluZQYJAQAAAAIhPQAAAAIFAAAADGNhbGxlckFkcmVzcwUAAAAIdHJzZW5kZXIGBQAAAAhyZWNlaXZlZAcGBAAAAAZyZXN1bHQDBQAAAAh0cmV4aXN0cwMJAABmAAAAAgUAAAAGdHJ0aW1lBQAAAAhkZWFkbGluZQkAASwAAAACAgAAACJ0cmFuc2FjdGlvbiBpcyBvdXQgb2YgdGltZSByYW5nZTogCQABpAAAAAEFAAAABnRydGltZQkAASwAAAACAgAAAAADCQEAAAACIT0AAAACBQAAAAxjYWxsZXJBZHJlc3MFAAAACHRyc2VuZGVyCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAABhpdCBpcyBpbmNvcnJlY3Qgc2VuZGVyOiAJAAQlAAAAAQUAAAAMY2FsbGVyQWRyZXNzAgAAAAMgLyAJAAQlAAAAAQUAAAAIdHJzZW5kZXIJAAEsAAAAAgIAAAAAAwUAAAAIcmVjZWl2ZWQJAQAAABFAZXh0ck5hdGl2ZSgxMDU4KQAAAAEJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwkAASwAAAACAgAAAAADBQAAAAlpc3Byb292ZWQJAAEsAAAAAgIAAAAMcmVjZWl2ZWQgaW4gCQABpAAAAAEFAAAAC2N1cnJlbnR0aW1lAgAAAAACAAAAFWNhbnQgZmluZCB0cmFuc2FjdGlvbgMFAAAACWlzcHJvb3ZlZAMJAABmAAAAAgUAAAAKYnVybmFtb3VudAAAAAAAAAAAAAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAxjYWxsZXJBZHJlc3MFAAAACmRyb3BhbW91bnQFAAAABXRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAACnRlYW1BZHJlc3MFAAAACHRlYW1naWZ0BQAAAAV0b2tlbgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMFAAAABnJlc3VsdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHZHJvcHBlZAkAAGQAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA1NSkAAAABAgAAAAdkcm9wcGVkBQAAAApkcm9wYW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAh0ZWFtZ2lmdAkAAGQAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA1NSkAAAABAgAAAAh0ZWFtZ2lmdAUAAAAIdGVhbWdpZnQFAAAAA25pbAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAxjYWxsZXJBZHJlc3MFAAAACmRyb3BhbW91bnQFAAAABXRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAACnRlYW1BZHJlc3MFAAAACHRlYW1naWZ0BQAAAAV0b2tlbgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMFAAAABnJlc3VsdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHZHJvcHBlZAkAAGQAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA1NSkAAAABAgAAAAdkcm9wcGVkBQAAAApkcm9wYW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAh0ZWFtZ2lmdAkAAGQAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA1NSkAAAABAgAAAAh0ZWFtZ2lmdAUAAAAIdGVhbWdpZnQFAAAAA25pbAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMFAAAABnJlc3VsdAUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFpAQAAAANidXkAAAAABAAAAAtjdXJyZW50dGltZQQAAAAHJG1hdGNoMAkAA+0AAAABBQAAAAZoZWlnaHQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACUJsb2NrSW5mbwQAAAAFYmxvY2sFAAAAByRtYXRjaDAIBQAAAAVibG9jawAAAAl0aW1lc3RhbXAJAAACAAAAAQIAAAAQQ2FuJ3QgZmluZCBibG9jawQAAAAHYmFsYW5jZQkAA/AAAAACBQAAAAdhaXJkcm9wBQAAAAV0b2tlbgQAAAAKc2VsbGFtb3VudAAAAAAAAAAD6AQAAAAGcHJpY2UxAAAAAAAAAAABBAAAAAZwcmljZTIAAAAAAAAAAAoEAAAADGNhbGxlckFkcmVzcwkBAAAAB0FkZHJlc3MAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAliYWxhbmNlb2sDCQAAZwAAAAIFAAAAB2JhbGFuY2UFAAAACnNlbGxhbW91bnQGBwQAAAAKY2FsbGVyRGF0YQkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABCIAAAABCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAAAAQAAAAOY2FsbGVyUmVjZWl2ZWQDCQAAAAAAAAIJAAEvAAAAAgUAAAAKY2FsbGVyRGF0YQAAAAAAAAAACAIAAAAIcmVjZWl2ZWQGBwQAAAAOY2FsbGVyQnV5bGV2ZWwDAwUAAAAOY2FsbGVyUmVjZWl2ZWQJAAAAAAAAAgkAAZAAAAABCQAEtQAAAAIFAAAACmNhbGxlckRhdGECAAAAAXwAAAAAAAAAAAEHAAAAAAAAAAAAAwMFAAAADmNhbGxlclJlY2VpdmVkCQAAAAAAAAIJAAGQAAAAAQkABLUAAAACBQAAAApjYWxsZXJEYXRhAgAAAAF8AAAAAAAAAAACBwAAAAAAAAAAAQAAAAAAAAAAAgQAAAALY2FsbGVyUHJpY2UDCQAAAAAAAAIFAAAADmNhbGxlckJ1eWxldmVsAAAAAAAAAAAABQAAAAZwcmljZTEDCQAAAAAAAAIFAAAADmNhbGxlckJ1eWxldmVsAAAAAAAAAAABBQAAAAZwcmljZTIAAAAAAAAAAAAEAAAABXBtdG9rAwkAAAAAAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAABAwMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQJAABnAAAAAggJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50BQAAAAtjYWxsZXJQcmljZQcGBwcEAAAABG1lc3MDCQEAAAABIQAAAAEFAAAADmNhbGxlclJlY2VpdmVkCQABLAAAAAICAAAAE25vdCBwcm9vdmVkIGZvciBidXkDCQEAAAABIQAAAAEFAAAABXBtdG9rAgAAABJub3QgZW5vdWdoIHBheW1lbnQJAAEsAAAAAgIAAAAAAwkBAAAAASEAAAABBQAAAAliYWxhbmNlb2sCAAAAD2JhbGxhbmNlIGVtcHR5IAIAAAAAAgAAAAADCQAAAAAAAAIFAAAABG1lc3MFAAAABG1lc3MEAAAACGRhdGFyZWNzCQAEtQAAAAIFAAAACmNhbGxlckRhdGECAAAAAXwEAAAAB25ld2RhdGEDBQAAAA5jYWxsZXJSZWNlaXZlZAkAAZEAAAACBQAAAAhkYXRhcmVjcwAAAAAAAAAAAAkAASwAAAACAgAAAAADCQAAAAAAAAIFAAAADmNhbGxlckJ1eWxldmVsAAAAAAAAAAAAAgAAAAh8Ym91Z2h0MQkAASwAAAACAgAAAAADCQAAAAAAAAIFAAAADmNhbGxlckJ1eWxldmVsAAAAAAAAAAABAgAAABB8Ym91Z2h0MXxib3VnaHQyAgAAAAAEAAAABGRlYWwDAwMFAAAACWJhbGFuY2VvawUAAAAOY2FsbGVyUmVjZWl2ZWQHBQAAAAVwbXRvawcGBwMFAAAABGRlYWwJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBQAAAAduZXdkYXRhCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAACnRlYW1BZHJlc3MFAAAAC2NhbGxlclByaWNlBQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAADGNhbGxlckFkcmVzcwUAAAAKc2VsbGFtb3VudAUAAAAFdG9rZW4FAAAAA25pbAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAEX2J1eQUAAAAEbWVzcwUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAADkcHkh",
    "height": 1829914,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2Auxeojrw9j3iAf9qHr9eyyuurhJLnHgaJJPm3wBii1o
Next: GZBXMGoGGfhso1RoFvizUwrFNtXiPCVceEKnTx5k2nma

Diff: 
Old New Differences
139 139                  then "ballance empty "
140 140                  else ""))))
141 141          else ""
142 -     let datarecs = split(callerData, "|")
143 -     let newdata = if (callerReceived)
144 -         then datarecs[0]
145 -         else ("" + (if ((callerBuylevel == 0))
146 -             then "|bought1"
147 -             else ("" + (if ((callerBuylevel == 1))
148 -                 then "|bought1|bought2"
149 -                 else ""))))
150 -     let deal = if (if (if (balanceok)
151 -         then callerReceived
152 -         else false)
153 -         then pmtok
154 -         else false)
155 -         then true
156 -         else false
157 -     if (deal)
158 -         then [StringEntry(toBase58String(i.caller.bytes), newdata), ScriptTransfer(teamAdress, callerPrice, unit), ScriptTransfer(callerAdress, sellamount, token)]
159 -         else [StringEntry((toBase58String(i.caller.bytes) + "_buy"), mess)]
142 +     if ((mess == mess))
143 +         then {
144 +             let datarecs = split(callerData, "|")
145 +             let newdata = if (callerReceived)
146 +                 then datarecs[0]
147 +                 else ("" + (if ((callerBuylevel == 0))
148 +                     then "|bought1"
149 +                     else ("" + (if ((callerBuylevel == 1))
150 +                         then "|bought1|bought2"
151 +                         else ""))))
152 +             let deal = if (if (if (balanceok)
153 +                 then callerReceived
154 +                 else false)
155 +                 then pmtok
156 +                 else false)
157 +                 then true
158 +                 else false
159 +             if (deal)
160 +                 then [StringEntry(toBase58String(i.caller.bytes), newdata), ScriptTransfer(teamAdress, callerPrice, unit), ScriptTransfer(callerAdress, sellamount, token)]
161 +                 else [StringEntry((toBase58String(i.caller.bytes) + "_buy"), mess)]
162 +             }
163 +         else throw("Strict value is not equal to itself.")
160 164      }
161 165  
162 166  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let token = base58'GZc7eKnq2KJwqetRmUzSqr2ZaCGseDZufSocz83sUNoo'
5 5  
6 6  let airdrop = Address(base58'3N7Gg64FJ3ESaqn41qu1ete7zmzbmoP1AAV')
7 7  
8 8  let teamAdress = Address(base58'3MovsLjXpJr9HD2vBqmAf7Gze6jwuRxX1fX')
9 9  
10 10  @Callable(i)
11 11  func reset () = [DeleteEntry(toBase58String(i.caller.bytes)), IntegerEntry("burnt", 0), IntegerEntry("dropped", 0), IntegerEntry("teamgift", 0), IntegerEntry("burningstage", 0)]
12 12  
13 13  
14 14  
15 15  @Callable(i)
16 16  func call (id58) = {
17 17      let currenttime =     match blockInfoByHeight(height) {
18 18          case block: BlockInfo => 
19 19              block.timestamp
20 20          case _ => 
21 21              throw("Can't find block")
22 22      }
23 23      let balance = assetBalance(airdrop, token)
24 24      let burnamount =     match getInteger("burningstage") {
25 25          case a: Int => 
26 26              if (if ((getIntegerValue("burningstage") == 0))
27 27                  then (currenttime > 1639131654752)
28 28                  else false)
29 29                  then fraction(balance, 10, 100)
30 30                  else 0
31 31          case _ => 
32 32              throw("no burningstage")
33 33      }
34 34      let dropamount = 1000
35 35      let teamgift = 10
36 36      let trid = fromBase58String(id58)
37 37      let callerAdress = Address(i.caller.bytes)
38 38      let deadline = 1639230864311
39 39      let isenough = if ((balance > dropamount))
40 40          then true
41 41          else throw("not enough")
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 ((trtime > deadline))
66 66                  then true
67 67                  else (callerAdress != trsender))
68 68                  then true
69 69                  else received)
70 70                  then false
71 71                  else true
72 72              let result = if (trexists)
73 73                  then if ((trtime > deadline))
74 74                      then ("transaction is out of time range: " + toString(trtime))
75 75                      else ("" + (if ((callerAdress != trsender))
76 76                          then ((("it is incorrect sender: " + toString(callerAdress)) + " / ") + toString(trsender))
77 77                          else ("" + (if (received)
78 78                              then getStringValue(toBase58String(i.caller.bytes))
79 79                              else ("" + (if (isprooved)
80 80                                  then ("received in " + toString(currenttime))
81 81                                  else ""))))))
82 82                  else "cant find transaction"
83 83              if (isprooved)
84 84                  then if ((burnamount > 0))
85 85                      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))]
86 86                      else [ScriptTransfer(callerAdress, dropamount, token), ScriptTransfer(teamAdress, teamgift, token), StringEntry(toBase58String(i.caller.bytes), result), IntegerEntry("dropped", (getIntegerValue("dropped") + dropamount)), IntegerEntry("teamgift", (getIntegerValue("teamgift") + teamgift))]
87 87                  else [StringEntry(toBase58String(i.caller.bytes), result)]
88 88              }
89 89          else throw("Strict value is not equal to itself.")
90 90      }
91 91  
92 92  
93 93  
94 94  @Callable(i)
95 95  func buy () = {
96 96      let currenttime =     match blockInfoByHeight(height) {
97 97          case block: BlockInfo => 
98 98              block.timestamp
99 99          case _ => 
100 100              throw("Can't find block")
101 101      }
102 102      let balance = assetBalance(airdrop, token)
103 103      let sellamount = 1000
104 104      let price1 = 1
105 105      let price2 = 10
106 106      let callerAdress = Address(i.caller.bytes)
107 107      let balanceok = if ((balance >= sellamount))
108 108          then true
109 109          else false
110 110      let callerData = valueOrElse(getString(toBase58String(i.caller.bytes)), "")
111 111      let callerReceived = if ((take(callerData, 8) == "received"))
112 112          then true
113 113          else false
114 114      let callerBuylevel = if (if (callerReceived)
115 115          then (size(split(callerData, "|")) == 1)
116 116          else false)
117 117          then 0
118 118          else if (if (callerReceived)
119 119              then (size(split(callerData, "|")) == 2)
120 120              else false)
121 121              then 1
122 122              else 2
123 123      let callerPrice = if ((callerBuylevel == 0))
124 124          then price1
125 125          else if ((callerBuylevel == 1))
126 126              then price2
127 127              else 0
128 128      let pmtok = if ((size(i.payments) == 1))
129 129          then if (if (!(isDefined(i.payments[0].assetId)))
130 130              then (i.payments[0].amount >= callerPrice)
131 131              else false)
132 132              then true
133 133              else false
134 134          else false
135 135      let mess = if (!(callerReceived))
136 136          then ("not prooved for buy" + (if (!(pmtok))
137 137              then "not enough payment"
138 138              else ("" + (if (!(balanceok))
139 139                  then "ballance empty "
140 140                  else ""))))
141 141          else ""
142 -     let datarecs = split(callerData, "|")
143 -     let newdata = if (callerReceived)
144 -         then datarecs[0]
145 -         else ("" + (if ((callerBuylevel == 0))
146 -             then "|bought1"
147 -             else ("" + (if ((callerBuylevel == 1))
148 -                 then "|bought1|bought2"
149 -                 else ""))))
150 -     let deal = if (if (if (balanceok)
151 -         then callerReceived
152 -         else false)
153 -         then pmtok
154 -         else false)
155 -         then true
156 -         else false
157 -     if (deal)
158 -         then [StringEntry(toBase58String(i.caller.bytes), newdata), ScriptTransfer(teamAdress, callerPrice, unit), ScriptTransfer(callerAdress, sellamount, token)]
159 -         else [StringEntry((toBase58String(i.caller.bytes) + "_buy"), mess)]
142 +     if ((mess == mess))
143 +         then {
144 +             let datarecs = split(callerData, "|")
145 +             let newdata = if (callerReceived)
146 +                 then datarecs[0]
147 +                 else ("" + (if ((callerBuylevel == 0))
148 +                     then "|bought1"
149 +                     else ("" + (if ((callerBuylevel == 1))
150 +                         then "|bought1|bought2"
151 +                         else ""))))
152 +             let deal = if (if (if (balanceok)
153 +                 then callerReceived
154 +                 else false)
155 +                 then pmtok
156 +                 else false)
157 +                 then true
158 +                 else false
159 +             if (deal)
160 +                 then [StringEntry(toBase58String(i.caller.bytes), newdata), ScriptTransfer(teamAdress, callerPrice, unit), ScriptTransfer(callerAdress, sellamount, token)]
161 +                 else [StringEntry((toBase58String(i.caller.bytes) + "_buy"), mess)]
162 +             }
163 +         else throw("Strict value is not equal to itself.")
160 164      }
161 165  
162 166

Old	New		Differences
139	139		then "ballance empty "
140	140		else ""))))
141	141		else ""
142		-	let datarecs = split(callerData, "\|")
143		-	let newdata = if (callerReceived)
144		-	then datarecs[0]
145		-	else ("" + (if ((callerBuylevel == 0))
146		-	then "\|bought1"
147		-	else ("" + (if ((callerBuylevel == 1))
148		-	then "\|bought1\|bought2"
149		-	else ""))))
150		-	let deal = if (if (if (balanceok)
151		-	then callerReceived
152		-	else false)
153		-	then pmtok
154		-	else false)
155		-	then true
156		-	else false
157		-	if (deal)
158		-	then [StringEntry(toBase58String(i.caller.bytes), newdata), ScriptTransfer(teamAdress, callerPrice, unit), ScriptTransfer(callerAdress, sellamount, token)]
159		-	else [StringEntry((toBase58String(i.caller.bytes) + "_buy"), mess)]
	142	+	if ((mess == mess))
	143	+	then {
	144	+	let datarecs = split(callerData, "\|")
	145	+	let newdata = if (callerReceived)
	146	+	then datarecs[0]
	147	+	else ("" + (if ((callerBuylevel == 0))
	148	+	then "\|bought1"
	149	+	else ("" + (if ((callerBuylevel == 1))
	150	+	then "\|bought1\|bought2"
	151	+	else ""))))
	152	+	let deal = if (if (if (balanceok)
	153	+	then callerReceived
	154	+	else false)
	155	+	then pmtok
	156	+	else false)
	157	+	then true
	158	+	else false
	159	+	if (deal)
	160	+	then [StringEntry(toBase58String(i.caller.bytes), newdata), ScriptTransfer(teamAdress, callerPrice, unit), ScriptTransfer(callerAdress, sellamount, token)]
	161	+	else [StringEntry((toBase58String(i.caller.bytes) + "_buy"), mess)]
	162	+	}
	163	+	else throw("Strict value is not equal to itself.")
160	164		}
161	165
162	166

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let token = base58'GZc7eKnq2KJwqetRmUzSqr2ZaCGseDZufSocz83sUNoo'
5	5
6	6		let airdrop = Address(base58'3N7Gg64FJ3ESaqn41qu1ete7zmzbmoP1AAV')
7	7
8	8		let teamAdress = Address(base58'3MovsLjXpJr9HD2vBqmAf7Gze6jwuRxX1fX')
9	9
10	10		@Callable(i)
11	11		func reset () = [DeleteEntry(toBase58String(i.caller.bytes)), IntegerEntry("burnt", 0), IntegerEntry("dropped", 0), IntegerEntry("teamgift", 0), IntegerEntry("burningstage", 0)]
12	12
13	13
14	14
15	15		@Callable(i)
16	16		func call (id58) = {
17	17		let currenttime = match blockInfoByHeight(height) {
18	18		case block: BlockInfo =>
19	19		block.timestamp
20	20		case _ =>
21	21		throw("Can't find block")
22	22		}
23	23		let balance = assetBalance(airdrop, token)
24	24		let burnamount = match getInteger("burningstage") {
25	25		case a: Int =>
26	26		if (if ((getIntegerValue("burningstage") == 0))
27	27		then (currenttime > 1639131654752)
28	28		else false)
29	29		then fraction(balance, 10, 100)
30	30		else 0
31	31		case _ =>
32	32		throw("no burningstage")
33	33		}
34	34		let dropamount = 1000
35	35		let teamgift = 10
36	36		let trid = fromBase58String(id58)
37	37		let callerAdress = Address(i.caller.bytes)
38	38		let deadline = 1639230864311
39	39		let isenough = if ((balance > dropamount))
40	40		then true
41	41		else throw("not enough")
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 ((trtime > deadline))
66	66		then true
67	67		else (callerAdress != trsender))
68	68		then true
69	69		else received)
70	70		then false
71	71		else true
72	72		let result = if (trexists)
73	73		then if ((trtime > deadline))
74	74		then ("transaction is out of time range: " + toString(trtime))
75	75		else ("" + (if ((callerAdress != trsender))
76	76		then ((("it is incorrect sender: " + toString(callerAdress)) + " / ") + toString(trsender))
77	77		else ("" + (if (received)
78	78		then getStringValue(toBase58String(i.caller.bytes))
79	79		else ("" + (if (isprooved)
80	80		then ("received in " + toString(currenttime))
81	81		else ""))))))
82	82		else "cant find transaction"
83	83		if (isprooved)
84	84		then if ((burnamount > 0))
85	85		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))]
86	86		else [ScriptTransfer(callerAdress, dropamount, token), ScriptTransfer(teamAdress, teamgift, token), StringEntry(toBase58String(i.caller.bytes), result), IntegerEntry("dropped", (getIntegerValue("dropped") + dropamount)), IntegerEntry("teamgift", (getIntegerValue("teamgift") + teamgift))]
87	87		else [StringEntry(toBase58String(i.caller.bytes), result)]
88	88		}
89	89		else throw("Strict value is not equal to itself.")
90	90		}
91	91
92	92
93	93
94	94		@Callable(i)
95	95		func buy () = {
96	96		let currenttime = match blockInfoByHeight(height) {
97	97		case block: BlockInfo =>
98	98		block.timestamp
99	99		case _ =>
100	100		throw("Can't find block")
101	101		}
102	102		let balance = assetBalance(airdrop, token)
103	103		let sellamount = 1000
104	104		let price1 = 1
105	105		let price2 = 10
106	106		let callerAdress = Address(i.caller.bytes)
107	107		let balanceok = if ((balance >= sellamount))
108	108		then true
109	109		else false
110	110		let callerData = valueOrElse(getString(toBase58String(i.caller.bytes)), "")
111	111		let callerReceived = if ((take(callerData, 8) == "received"))
112	112		then true
113	113		else false
114	114		let callerBuylevel = if (if (callerReceived)
115	115		then (size(split(callerData, "\|")) == 1)
116	116		else false)
117	117		then 0
118	118		else if (if (callerReceived)
119	119		then (size(split(callerData, "\|")) == 2)
120	120		else false)
121	121		then 1
122	122		else 2
123	123		let callerPrice = if ((callerBuylevel == 0))
124	124		then price1
125	125		else if ((callerBuylevel == 1))
126	126		then price2
127	127		else 0
128	128		let pmtok = if ((size(i.payments) == 1))
129	129		then if (if (!(isDefined(i.payments[0].assetId)))
130	130		then (i.payments[0].amount >= callerPrice)
131	131		else false)
132	132		then true
133	133		else false
134	134		else false
135	135		let mess = if (!(callerReceived))
136	136		then ("not prooved for buy" + (if (!(pmtok))
137	137		then "not enough payment"
138	138		else ("" + (if (!(balanceok))
139	139		then "ballance empty "
140	140		else ""))))
141	141		else ""
142		-	let datarecs = split(callerData, "\|")
143		-	let newdata = if (callerReceived)
144		-	then datarecs[0]
145		-	else ("" + (if ((callerBuylevel == 0))
146		-	then "\|bought1"
147		-	else ("" + (if ((callerBuylevel == 1))
148		-	then "\|bought1\|bought2"
149		-	else ""))))
150		-	let deal = if (if (if (balanceok)
151		-	then callerReceived
152		-	else false)
153		-	then pmtok
154		-	else false)
155		-	then true
156		-	else false
157		-	if (deal)
158		-	then [StringEntry(toBase58String(i.caller.bytes), newdata), ScriptTransfer(teamAdress, callerPrice, unit), ScriptTransfer(callerAdress, sellamount, token)]
159		-	else [StringEntry((toBase58String(i.caller.bytes) + "_buy"), mess)]
	142	+	if ((mess == mess))
	143	+	then {
	144	+	let datarecs = split(callerData, "\|")
	145	+	let newdata = if (callerReceived)
	146	+	then datarecs[0]
	147	+	else ("" + (if ((callerBuylevel == 0))
	148	+	then "\|bought1"
	149	+	else ("" + (if ((callerBuylevel == 1))
	150	+	then "\|bought1\|bought2"
	151	+	else ""))))
	152	+	let deal = if (if (if (balanceok)
	153	+	then callerReceived
	154	+	else false)
	155	+	then pmtok
	156	+	else false)
	157	+	then true
	158	+	else false
	159	+	if (deal)
	160	+	then [StringEntry(toBase58String(i.caller.bytes), newdata), ScriptTransfer(teamAdress, callerPrice, unit), ScriptTransfer(callerAdress, sellamount, token)]
	161	+	else [StringEntry((toBase58String(i.caller.bytes) + "_buy"), mess)]
	162	+	}
	163	+	else throw("Strict value is not equal to itself.")
160	164		}
161	165
162	166

github/deemru/w8io/026f985 
28.87 ms ◑