w8 · tx · 5rQ···ceA

tx · 5rQbDpMuwqQLRnGMRUcbecepLpaBQw5aq4W2axGrbceA

3MxfEq17wZjAWQfckWycU9o4oTkvf9nfNQX:  -0.01000000 Waves

2021.12.12 16:43 [1831116] smart account 3MxfEq17wZjAWQfckWycU9o4oTkvf9nfNQX > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5rQbDpMuwqQLRnGMRUcbecepLpaBQw5aq4W2axGrbceA",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1639316642194,
    "version": 2,
    "chainId": 84,
    "sender": "3MxfEq17wZjAWQfckWycU9o4oTkvf9nfNQX",
    "senderPublicKey": "HUca7AqRs4Zs9sU1AFcufmBC4XpT4sN79aFScNRT4LxQ",
    "proofs": [
        "653Fg66rzxvfycxS1nqXYnvBGDFT7k8WM5wr8gArAwcjscGycAujysBum1BmKbyhPVT1oG5s65rDkMUDheVKFcmE"
    ],
    "script": "base64:AAIFAAAAAAAAAAsIAhIAEgMKAQgSAAAAAAQAAAAABXRva2VuAQAAACA7Jny2nzFIkOmS/dy/eTheDQdpxX81oDDtGoXKk37pSwAAAAAGdG9rZW5kAAAAAAAF9eEAAAAAAAdhaXJkcm9wCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUX+pzJtA2DV6Pr0xhS8z4foIVUAfq2c0IAAAAAAp0ZWFtQWRyZXNzCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUACYJT8ivNONGpFPWk1FdqVPAxApBcmLaAAAAAwAAAAFpAQAAAAVyZXNldAAAAAAJAARMAAAAAgkBAAAAC0RlbGV0ZUVudHJ5AAAAAQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAVidXJudAAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHZHJvcHBlZAAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAFc29sZDEAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAABXNvbGQyAAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAh0ZWFtZ2lmdAAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAGaXNzdWVkAAAAAAA7msoACQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAICAAAADGJ1cm5pbmdzdGFnZQIAAAAHd2FpdGluZwkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAGX2Vycm9yBQAAAANuaWwAAAABaQEAAAAEZnJlZQAAAAEAAAAEaWQ1OAQAAAAKZHJvcGFtb3VudAkAAGgAAAACAAAAAAAAAAPoBQAAAAZ0b2tlbmQEAAAACHRlYW1naWZ0CQAAaAAAAAIAAAAAAAAAAAoFAAAABnRva2VuZAQAAAAEdHJpZAkAAlkAAAABBQAAAARpZDU4BAAAAAxjYWxsZXJBZHJlc3MJAQAAAAdBZGRyZXNzAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAIZGVhZGxpbmUAAAABfa6DmgAEAAAADGJ1cm5kZWFkbGluZQAAAAF9rrqIgAQAAAALY3VycmVudHRpbWUEAAAAByRtYXRjaDAJAAPtAAAAAQUAAAAGaGVpZ2h0AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAlCbG9ja0luZm8EAAAABWJsb2NrBQAAAAckbWF0Y2gwCAUAAAAFYmxvY2sAAAAJdGltZXN0YW1wCQAAAgAAAAECAAAAEENhbid0IGZpbmQgYmxvY2sEAAAAB2JhbGFuY2UJAAPwAAAAAgUAAAAHYWlyZHJvcAUAAAAFdG9rZW4EAAAACmJ1cm5hbW91bnQDAwkAAGYAAAACBQAAAAtjdXJyZW50dGltZQUAAAAMYnVybmRlYWRsaW5lCQAAAAAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDU4KQAAAAECAAAADGJ1cm5pbmdzdGFnZQIAAAAHd2FpdGluZwcJAABlAAAAAgkAAGUAAAACBQAAAAdiYWxhbmNlBQAAAApkcm9wYW1vdW50BQAAAAh0ZWFtZ2lmdAAAAAAAAAAAAAQAAAAIaXNlbm91Z2gDCQAAZgAAAAIFAAAAB2JhbGFuY2UFAAAACmRyb3BhbW91bnQGCQAAAgAAAAECAAAACm5vdCBlbm91Z2gDCQAAAAAAAAIFAAAACGlzZW5vdWdoBQAAAAhpc2Vub3VnaAQAAAAIdHJleGlzdHMEAAAAByRtYXRjaDAJAAPuAAAAAQUAAAAEdHJpZAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAATVHJhbnNmZXJUcmFuc2FjdGlvbgQAAAADdHR4BQAAAAckbWF0Y2gwBgcEAAAABnRydGltZQQAAAAHJG1hdGNoMAkAA+4AAAABBQAAAAR0cmlkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAN0dHgFAAAAByRtYXRjaDAIBQAAAAN0dHgAAAAJdGltZXN0YW1wAAAACRhOcp//BAAAAAh0cnNlbmRlcgQAAAAHJG1hdGNoMAkAA+4AAAABBQAAAAR0cmlkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAN0dHgFAAAAByRtYXRjaDAIBQAAAAN0dHgAAAAGc2VuZGVyBQAAAAdhaXJkcm9wBAAAAAhyZWNlaXZlZAMJAAAAAAAAAgkAAS8AAAACCQEAAAALdmFsdWVPckVsc2UAAAACCQAEIgAAAAEJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAAAAAAAAAAAAAIAgAAAAhyZWNlaXZlZAYHBAAAAAlpc3Byb292ZWQDAwMJAABmAAAAAgUAAAAGdHJ0aW1lBQAAAAhkZWFkbGluZQYJAQAAAAIhPQAAAAIFAAAADGNhbGxlckFkcmVzcwUAAAAIdHJzZW5kZXIGBQAAAAhyZWNlaXZlZAcGBAAAAAZyZXN1bHQDBQAAAAh0cmV4aXN0cwMJAABmAAAAAgUAAAAGdHJ0aW1lBQAAAAhkZWFkbGluZQkAASwAAAACAgAAACJ0cmFuc2FjdGlvbiBpcyBvdXQgb2YgdGltZSByYW5nZTogCQABpAAAAAEFAAAABnRydGltZQkAASwAAAACAgAAAAADCQEAAAACIT0AAAACBQAAAAxjYWxsZXJBZHJlc3MFAAAACHRyc2VuZGVyCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAABhpdCBpcyBpbmNvcnJlY3Qgc2VuZGVyOiAJAAQlAAAAAQUAAAAMY2FsbGVyQWRyZXNzAgAAAAMgLyAJAAQlAAAAAQUAAAAIdHJzZW5kZXIJAAEsAAAAAgIAAAAAAwUAAAAIcmVjZWl2ZWQJAQAAABFAZXh0ck5hdGl2ZSgxMDU4KQAAAAEJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwkAASwAAAACAgAAAAADBQAAAAlpc3Byb292ZWQCAAAACHJlY2VpdmVkAgAAAAACAAAAFmNhbmB0IGZpbmQgdHJhbnNhY3Rpb24DBQAAAAlpc3Byb292ZWQDCQAAZgAAAAIFAAAACmJ1cm5hbW91bnQAAAAAAAAAAAAJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAMY2FsbGVyQWRyZXNzBQAAAApkcm9wYW1vdW50BQAAAAV0b2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAp0ZWFtQWRyZXNzBQAAAAh0ZWFtZ2lmdAUAAAAFdG9rZW4JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBQAAAAZyZXN1bHQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB2Ryb3BwZWQJAABkAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTUpAAAAAQIAAAAHZHJvcHBlZAUAAAAKZHJvcGFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAIdGVhbWdpZnQJAABkAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTUpAAAAAQIAAAAIdGVhbWdpZnQFAAAACHRlYW1naWZ0CQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAZfZXJyb3IJAARMAAAAAgkBAAAABEJ1cm4AAAACBQAAAAV0b2tlbgUAAAAKYnVybmFtb3VudAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAAxidXJuaW5nc3RhZ2UCAAAACnRvdGFsYnVybnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAABWJ1cm50CQAAZAAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDU1KQAAAAECAAAABWJ1cm50BQAAAApidXJuYW1vdW50BQAAAANuaWwJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAMY2FsbGVyQWRyZXNzBQAAAApkcm9wYW1vdW50BQAAAAV0b2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAp0ZWFtQWRyZXNzBQAAAAh0ZWFtZ2lmdAUAAAAFdG9rZW4JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBQAAAAZyZXN1bHQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB2Ryb3BwZWQJAABkAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTUpAAAAAQIAAAAHZHJvcHBlZAUAAAAKZHJvcGFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAIdGVhbWdpZnQJAABkAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTUpAAAAAQIAAAAIdGVhbWdpZnQFAAAACHRlYW1naWZ0CQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAZfZXJyb3IFAAAAA25pbAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAGX2Vycm9yBQAAAAZyZXN1bHQFAAAAA25pbAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAABaQEAAAADYnV5AAAAAAQAAAALY3VycmVudHRpbWUEAAAAByRtYXRjaDAJAAPtAAAAAQUAAAAGaGVpZ2h0AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAlCbG9ja0luZm8EAAAABWJsb2NrBQAAAAckbWF0Y2gwCAUAAAAFYmxvY2sAAAAJdGltZXN0YW1wCQAAAgAAAAECAAAAEENhbid0IGZpbmQgYmxvY2sEAAAAB2JhbGFuY2UJAAPwAAAAAgUAAAAHYWlyZHJvcAUAAAAFdG9rZW4EAAAACnNlbGxhbW91bnQJAABoAAAAAgAAAAAAAAAD6AUAAAAGdG9rZW5kBAAAAAZwcmljZTEJAABoAAAAAgAAAAAAAAAAAQAAAAAABfXhAAQAAAAGcHJpY2UyCQAAaAAAAAIAAAAAAAAAAAIAAAAAAAX14QAEAAAADGNhbGxlckFkcmVzcwkBAAAAB0FkZHJlc3MAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAliYWxhbmNlb2sDCQAAZwAAAAIFAAAAB2JhbGFuY2UFAAAACnNlbGxhbW91bnQGBwQAAAAKY2FsbGVyRGF0YQkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABCIAAAABCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAAAAQAAAAOY2FsbGVyUmVjZWl2ZWQDCQAAAAAAAAIJAAEvAAAAAgUAAAAKY2FsbGVyRGF0YQAAAAAAAAAACAIAAAAIcmVjZWl2ZWQGBwQAAAAOY2FsbGVyQnV5bGV2ZWwDAwUAAAAOY2FsbGVyUmVjZWl2ZWQJAAAAAAAAAgkAAZAAAAABCQAEtQAAAAIFAAAACmNhbGxlckRhdGECAAAAAXwAAAAAAAAAAAEHAAAAAAAAAAAAAwMFAAAADmNhbGxlclJlY2VpdmVkCQAAAAAAAAIJAAGQAAAAAQkABLUAAAACBQAAAApjYWxsZXJEYXRhAgAAAAF8AAAAAAAAAAACBwAAAAAAAAAAAQAAAAAAAAAAYwQAAAAMY2FsbGVyQ2FuQnV5AwMFAAAADmNhbGxlclJlY2VpdmVkAwkAAAAAAAACBQAAAA5jYWxsZXJCdXlsZXZlbAAAAAAAAAAAAAYJAAAAAAAAAgUAAAAOY2FsbGVyQnV5bGV2ZWwAAAAAAAAAAAEHBgcEAAAAC2NhbGxlclByaWNlAwkAAAAAAAACBQAAAA5jYWxsZXJCdXlsZXZlbAAAAAAAAAAAAAUAAAAGcHJpY2UxAwkAAAAAAAACBQAAAA5jYWxsZXJCdXlsZXZlbAAAAAAAAAAAAQUAAAAGcHJpY2UyAAAAAAAAAAAABAAAAAVwbXRvawMJAAAAAAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAdhc3NldElkCQAAZwAAAAIICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAUAAAALY2FsbGVyUHJpY2UHBgcHBAAAAARtZXNzAwkBAAAAASEAAAABBQAAAAxjYWxsZXJDYW5CdXkCAAAAE25vdCBwcm9vdmVkIGZvciBidXkJAAEsAAAAAgIAAAAAAwkBAAAAASEAAAABBQAAAAVwbXRvawIAAAASbm90IGVub3VnaCBwYXltZW50CQABLAAAAAICAAAAAAMJAQAAAAEhAAAAAQUAAAAJYmFsYW5jZW9rAgAAAA9iYWxsYW5jZSBlbXB0eSACAAAAAAQAAAAIZGF0YXJlY3MJAAS1AAAAAgUAAAAKY2FsbGVyRGF0YQIAAAABfAQAAAAHbmV3ZGF0YQMJAAAAAAAAAgUAAAAOY2FsbGVyQnV5bGV2ZWwAAAAAAAAAAAAJAAEsAAAAAgkAAZEAAAACBQAAAAhkYXRhcmVjcwAAAAAAAAAAAAIAAAAIfGJvdWdodDEDCQAAAAAAAAIFAAAADmNhbGxlckJ1eWxldmVsAAAAAAAAAAABCQABLAAAAAIJAAGRAAAAAgUAAAAIZGF0YXJlY3MAAAAAAAAAAAACAAAAEHxib3VnaHQxfGJvdWdodDICAAAAAAQAAAAEZGVhbAMDAwUAAAAJYmFsYW5jZW9rBQAAAAxjYWxsZXJDYW5CdXkHBQAAAAVwbXRvawcGBwMFAAAABGRlYWwJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBQAAAAduZXdkYXRhCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAACnRlYW1BZHJlc3MFAAAAC2NhbGxlclByaWNlBQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAADGNhbGxlckFkcmVzcwUAAAAKc2VsbGFtb3VudAUAAAAFdG9rZW4JAARMAAAAAgkBAAAAC0RlbGV0ZUVudHJ5AAAAAQkAASwAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMCAAAABl9lcnJvcgUAAAADbmlsCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAZfZXJyb3IFAAAABG1lc3MFAAAAA25pbAAAAAAAnwes",
    "height": 1831116,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: F26Zt2DiR1LfK693YDsaVQSgmohtVpWzXzZAAPFfdod6
Next: A8dQzQ8x91SPbQr8nqaYe3wy5z7onWnxxRL7KfRPtveU

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

Old	New		Differences
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let token = base58'4yu6Ms41FW8T9ABJ724ZUBKA1QrA8LQskK6csQiC8ynJ'
5	5
6		-	let tokend = 8
	6	+	let tokend = 100000000
7	7
8	8		let airdrop = Address(base58'3MxfEq17wZjAWQfckWycU9o4oTkvf9nfNQX')
9	9

15	15
16	16
17	17		@Callable(i)
18		-	func ~~call~~ (id58) = {
	18	+	func free (id58) = {
19	19		let dropamount = (1000 * tokend)
20	20		let teamgift = (10 * tokend)
21	21		let trid = fromBase58String(id58)

32	32		let burnamount = if (if ((currenttime > burndeadline))
33	33		then (getStringValue("burningstage") == "waiting")
34	34		else false)
35		-	then balance
	35	+	then ((balance - dropamount) - teamgift)
36	36		else 0
37	37		let isenough = if ((balance > dropamount))
38	38		then true

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

github/deemru/w8io/169f3d6 
89.20 ms ◑