tx · E4KrhfLXtqvpnVEHnu45yJiJYEXXbWw3hwWUhifwPuhh

3MxfEq17wZjAWQfckWycU9o4oTkvf9nfNQX:  -0.01000000 Waves

2021.12.13 10:15 [1832169] smart account 3MxfEq17wZjAWQfckWycU9o4oTkvf9nfNQX > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "E4KrhfLXtqvpnVEHnu45yJiJYEXXbWw3hwWUhifwPuhh",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1639379758634,
    "version": 2,
    "chainId": 84,
    "sender": "3MxfEq17wZjAWQfckWycU9o4oTkvf9nfNQX",
    "senderPublicKey": "HUca7AqRs4Zs9sU1AFcufmBC4XpT4sN79aFScNRT4LxQ",
    "proofs": [
        "4aCLxb89YW2cHDnVqddjCnQ8CuJbSzzMMMsPLuwEknAsFtxtsijHNkjnAwzwSof5i2GTCrxfH9pyoZG2eGKksPE4"
    ],
    "script": "base64:AAIFAAAAAAAAAAsIAhIAEgMKAQgSAAAAAAYAAAAABXRva2VuAQAAACDZi0CLArkkcZNdMZg+wWZc78jMPXwRedDDRg0bRciTFwAAAAAGdG9rZW5kAAAAAAAF9eEAAAAAAAdhaXJkcm9wCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUX+pzJtA2DV6Pr0xhS8z4foIVUAfq2c0IAAAAAAp0ZWFtQWRyZXNzCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUACYJT8ivNONGpFPWk1FdqVPAxApBcmLaAAAAAAhkZWFkbGluZQAAAAF9roOaAAAAAAAMYnVybmRlYWRsaW5lAAAACMRU9bEAAAAAAwAAAAFpAQAAAAVyZXNldAAAAAAJAARMAAAAAgkBAAAAC0RlbGV0ZUVudHJ5AAAAAQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAVidXJudAAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHZHJvcHBlZAAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAFc29sZDEAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAABXNvbGQyAAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAh0ZWFtZ2lmdAAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAGaXNzdWVkCQAAaAAAAAIAAAAAADuaygAAAAAAAAX14QAJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAMYnVybmluZ3N0YWdlAgAAAAd3YWl0aW5nCQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAZfZXJyb3IFAAAAA25pbAAAAAFpAQAAAARmcmVlAAAAAQAAAARpZDU4BAAAAApkcm9wYW1vdW50CQAAaAAAAAIAAAAAAAAAA+gFAAAABnRva2VuZAQAAAAIdGVhbWdpZnQJAABoAAAAAgAAAAAAAAAACgUAAAAGdG9rZW5kBAAAAAR0cmlkCQACWQAAAAEFAAAABGlkNTgEAAAADGNhbGxlckFkcmVzcwkBAAAAB0FkZHJlc3MAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAtjdXJyZW50dGltZQQAAAAHJG1hdGNoMAkAA+0AAAABBQAAAAZoZWlnaHQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACUJsb2NrSW5mbwQAAAAFYmxvY2sFAAAAByRtYXRjaDAIBQAAAAVibG9jawAAAAl0aW1lc3RhbXAJAAACAAAAAQIAAAAQQ2FuJ3QgZmluZCBibG9jawQAAAAHYmFsYW5jZQkAA/AAAAACBQAAAAdhaXJkcm9wBQAAAAV0b2tlbgQAAAAKYnVybmFtb3VudAMDCQAAZgAAAAIFAAAAC2N1cnJlbnR0aW1lBQAAAAxidXJuZGVhZGxpbmUJAAAAAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTgpAAAAAQIAAAAMYnVybmluZ3N0YWdlAgAAAAd3YWl0aW5nBwUAAAAHYmFsYW5jZQAAAAAAAAAAAAQAAAAIaXNlbm91Z2gDCQAAZgAAAAIFAAAAB2JhbGFuY2UFAAAACmRyb3BhbW91bnQGBwMJAAAAAAAAAgUAAAAIaXNlbm91Z2gFAAAACGlzZW5vdWdoBAAAAAh0cmV4aXN0cwQAAAAHJG1hdGNoMAkAA+4AAAABBQAAAAR0cmlkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAN0dHgFAAAAByRtYXRjaDAGBwQAAAAGdHJ0aW1lBAAAAAckbWF0Y2gwCQAD7gAAAAEFAAAABHRyaWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAAA3R0eAUAAAAHJG1hdGNoMAgFAAAAA3R0eAAAAAl0aW1lc3RhbXAAAAAJGE5yn/8EAAAACHRyc2VuZGVyBAAAAAckbWF0Y2gwCQAD7gAAAAEFAAAABHRyaWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAAA3R0eAUAAAAHJG1hdGNoMAgFAAAAA3R0eAAAAAZzZW5kZXIFAAAAB2FpcmRyb3AEAAAACHJlY2VpdmVkAwkAAAAAAAACCQABLwAAAAIJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQiAAAAAQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAAAAAAAAAAAAAgCAAAACHJlY2VpdmVkBgcEAAAACWlzcHJvb3ZlZAMDAwMJAABmAAAAAgUAAAAGdHJ0aW1lBQAAAAhkZWFkbGluZQYJAQAAAAIhPQAAAAIFAAAADGNhbGxlckFkcmVzcwUAAAAIdHJzZW5kZXIGBQAAAAhyZWNlaXZlZAYJAQAAAAEhAAAAAQUAAAAIaXNlbm91Z2gHBgQAAAAGcmVzdWx0AwUAAAAIdHJleGlzdHMDCQAAZgAAAAIFAAAABnRydGltZQUAAAAIZGVhZGxpbmUJAAEsAAAAAgIAAAAidHJhbnNhY3Rpb24gaXMgb3V0IG9mIHRpbWUgcmFuZ2U6IAkAAaQAAAABBQAAAAZ0cnRpbWUJAAEsAAAAAgIAAAAAAwkBAAAAAiE9AAAAAgUAAAAMY2FsbGVyQWRyZXNzBQAAAAh0cnNlbmRlcgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAYaXQgaXMgaW5jb3JyZWN0IHNlbmRlcjogCQAEJQAAAAEFAAAADGNhbGxlckFkcmVzcwIAAAADIC8gCQAEJQAAAAEFAAAACHRyc2VuZGVyCQABLAAAAAICAAAAAAMFAAAACHJlY2VpdmVkAgAAABFhbGxyZWFkeSByZWNlaXZlZAkAASwAAAACAgAAAAADBQAAAAlpc3Byb292ZWQCAAAACHJlY2VpdmVkCQABLAAAAAICAAAAAAMJAQAAAAEhAAAAAQUAAAAIaXNlbm91Z2gJAAEsAAAAAgkAASwAAAACAgAAAA9haXJkcm9wIGVuZGVkOiAJAAGkAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTUpAAAAAQIAAAAFYnVybnQCAAAABiBidXJudAIAAAAAAgAAABZjYW5gdCBmaW5kIHRyYW5zYWN0aW9uAwkAAGYAAAACBQAAAApidXJuYW1vdW50AAAAAAAAAAAACQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAZfZXJyb3IJAAEsAAAAAgkAASwAAAACAgAAAA9haXJkcm9wIGVuZGVkOiAJAAGkAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTUpAAAAAQIAAAAFYnVybnQCAAAABiBidXJudAkABEwAAAACCQEAAAAEQnVybgAAAAIFAAAABXRva2VuBQAAAApidXJuYW1vdW50CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAICAAAADGJ1cm5pbmdzdGFnZQIAAAAOdGhlbSBhbGwgYnVybnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAABWJ1cm50CQAAZAAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDU1KQAAAAECAAAABWJ1cm50BQAAAApidXJuYW1vdW50BQAAAANuaWwDBQAAAAlpc3Byb292ZWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAMY2FsbGVyQWRyZXNzBQAAAApkcm9wYW1vdW50BQAAAAV0b2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAp0ZWFtQWRyZXNzBQAAAAh0ZWFtZ2lmdAUAAAAFdG9rZW4JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBQAAAAZyZXN1bHQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB2Ryb3BwZWQJAABkAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTUpAAAAAQIAAAAHZHJvcHBlZAUAAAAKZHJvcGFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAIdGVhbWdpZnQJAABkAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTUpAAAAAQIAAAAIdGVhbWdpZnQFAAAACHRlYW1naWZ0CQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAZfZXJyb3IFAAAAA25pbAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAGX2Vycm9yBQAAAAZyZXN1bHQFAAAAA25pbAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAABaQEAAAADYnV5AAAAAAQAAAALY3VycmVudHRpbWUEAAAAByRtYXRjaDAJAAPtAAAAAQUAAAAGaGVpZ2h0AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAlCbG9ja0luZm8EAAAABWJsb2NrBQAAAAckbWF0Y2gwCAUAAAAFYmxvY2sAAAAJdGltZXN0YW1wCQAAAgAAAAECAAAAEENhbid0IGZpbmQgYmxvY2sEAAAAB2JhbGFuY2UJAAPwAAAAAgUAAAAHYWlyZHJvcAUAAAAFdG9rZW4EAAAACnNlbGxhbW91bnQJAABoAAAAAgAAAAAAAAAD6AUAAAAGdG9rZW5kBAAAAAtidXJuYW1vdW50MQkAAGgAAAACAAAAAAAAAAAKBQAAAApzZWxsYW1vdW50BAAAAAtidXJuYW1vdW50MgkAAGgAAAACAAAAAAAAAAAUBQAAAApzZWxsYW1vdW50BAAAAAZwcmljZTEJAABoAAAAAgAAAAAAAAAAAQAAAAAABfXhAAQAAAAGcHJpY2UyCQAAaAAAAAIAAAAAAAAAAAIAAAAAAAX14QAEAAAADGNhbGxlckFkcmVzcwkBAAAAB0FkZHJlc3MAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAApjYWxsZXJEYXRhCQEAAAALdmFsdWVPckVsc2UAAAACCQAEIgAAAAEJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAABAAAAA5jYWxsZXJSZWNlaXZlZAMJAAAAAAAAAgkAAS8AAAACBQAAAApjYWxsZXJEYXRhAAAAAAAAAAAIAgAAAAhyZWNlaXZlZAYHBAAAAA5jYWxsZXJCdXlsZXZlbAMDBQAAAA5jYWxsZXJSZWNlaXZlZAkAAAAAAAACCQABkAAAAAEJAAS1AAAAAgUAAAAKY2FsbGVyRGF0YQIAAAABfAAAAAAAAAAAAQcAAAAAAAAAAAADAwUAAAAOY2FsbGVyUmVjZWl2ZWQJAAAAAAAAAgkAAZAAAAABCQAEtQAAAAIFAAAACmNhbGxlckRhdGECAAAAAXwAAAAAAAAAAAIHAAAAAAAAAAABAAAAAAAAAABjBAAAAApidXJuYW1vdW50AwkAAAAAAAACBQAAAA5jYWxsZXJCdXlsZXZlbAAAAAAAAAAAAQUAAAALYnVybmFtb3VudDEDCQAAAAAAAAIFAAAADmNhbGxlckJ1eWxldmVsAAAAAAAAAAACBQAAAAtidXJuYW1vdW50MgAAAAAAAAAAAAQAAAAJYmFsYW5jZW9rAwkAAGcAAAACBQAAAAdiYWxhbmNlCQAAZAAAAAIFAAAACnNlbGxhbW91bnQFAAAACmJ1cm5hbW91bnQGBwQAAAAMY2FsbGVyQ2FuQnV5AwMFAAAADmNhbGxlclJlY2VpdmVkAwkAAAAAAAACBQAAAA5jYWxsZXJCdXlsZXZlbAAAAAAAAAAAAAYJAAAAAAAAAgUAAAAOY2FsbGVyQnV5bGV2ZWwAAAAAAAAAAAEHBgcEAAAAC2NhbGxlclByaWNlAwkAAAAAAAACBQAAAA5jYWxsZXJCdXlsZXZlbAAAAAAAAAAAAAUAAAAGcHJpY2UxAwkAAAAAAAACBQAAAA5jYWxsZXJCdXlsZXZlbAAAAAAAAAAAAQUAAAAGcHJpY2UyAAAAAAAAAAAABAAAAAVwbXRvawMJAAAAAAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAdhc3NldElkCQAAZwAAAAIICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAUAAAALY2FsbGVyUHJpY2UHBgcHBAAAAARtZXNzAwkBAAAAASEAAAABBQAAAAxjYWxsZXJDYW5CdXkCAAAAE25vdCBwcm9vdmVkIGZvciBidXkJAAEsAAAAAgIAAAAAAwkBAAAAASEAAAABBQAAAAVwbXRvawIAAAASbm90IGVub3VnaCBwYXltZW50CQABLAAAAAICAAAAAAMJAQAAAAEhAAAAAQUAAAAJYmFsYW5jZW9rAgAAACN5b3UgYXJlIGxvc3QuLi4gbm90IGVub3VnaCBiYWxsYW5jZQIAAAAABAAAAAhkYXRhcmVjcwkABLUAAAACBQAAAApjYWxsZXJEYXRhAgAAAAF8BAAAAAduZXdkYXRhAwkAAAAAAAACBQAAAA5jYWxsZXJCdXlsZXZlbAAAAAAAAAAAAAkAASwAAAACCQABkQAAAAIFAAAACGRhdGFyZWNzAAAAAAAAAAAAAgAAAAh8Ym91Z2h0MQMJAAAAAAAAAgUAAAAOY2FsbGVyQnV5bGV2ZWwAAAAAAAAAAAEJAAEsAAAAAgkAAZEAAAACBQAAAAhkYXRhcmVjcwAAAAAAAAAAAAIAAAAQfGJvdWdodDF8Ym91Z2h0MgIAAAAABAAAAARkZWFsAwMDBQAAAAliYWxhbmNlb2sFAAAADGNhbGxlckNhbkJ1eQcFAAAABXBtdG9rBwYHAwUAAAAEZGVhbAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMFAAAAB25ld2RhdGEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAKdGVhbUFkcmVzcwUAAAALY2FsbGVyUHJpY2UFAAAABHVuaXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAMY2FsbGVyQWRyZXNzBQAAAApzZWxsYW1vdW50BQAAAAV0b2tlbgkABEwAAAACCQEAAAAEQnVybgAAAAIFAAAABXRva2VuBQAAAApidXJuYW1vdW50CQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEJAAEsAAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAZfZXJyb3IFAAAAA25pbAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwIAAAAGX2Vycm9yBQAAAARtZXNzBQAAAANuaWwAAAAADgD9sQ==",
    "height": 1832169,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 45TQ1ASm7ScBMWgse5qhMHiPExM6GBMNWhLisdQnZRvi
Next: HgWPajucG6fmBLaeJ1Rbd5w8E838Fy2RjCBkGXmcJKva

Diff: 
Old
New
Differences
105
105
 
    }
106
106
 
    let balance = assetBalance(airdrop, token)
107
107
 
    let sellamount = (1000 * tokend)
108
+
    let burnamount1 = (10 * sellamount)
109
+
    let burnamount2 = (20 * sellamount)
108
110
 
    let price1 = (1 * 100000000)
109
111
 
    let price2 = (2 * 100000000)
110
112
 
    let callerAdress = Address(i.caller.bytes)
111
-
    let balanceok = if ((balance >= sellamount))
112
-
        then true
113
-
        else false
114
113
 
    let callerData = valueOrElse(getString(toBase58String(i.caller.bytes)), "")
115
114
 
    let callerReceived = if ((take(callerData, 8) == "received"))
116
115
 
        then true
124
123
 
            else false)
125
124
 
            then 1
126
125
 
            else 99
126
+
    let burnamount = if ((callerBuylevel == 1))
127
+
        then burnamount1
128
+
        else if ((callerBuylevel == 2))
129
+
            then burnamount2
130
+
            else 0
131
+
    let balanceok = if ((balance >= (sellamount + burnamount)))
132
+
        then true
133
+
        else false
127
134
 
    let callerCanBuy = if (if (callerReceived)
128
135
 
        then if ((callerBuylevel == 0))
129
136
 
            then true
148
155
 
        else ("" + (if (!(pmtok))
149
156
 
            then "not enough payment"
150
157
 
            else ("" + (if (!(balanceok))
151
-
                then "ballance empty "
158
+
                then "you are lost... not enough ballance"
152
159
 
                else ""))))
153
160
 
    let datarecs = split(callerData, "|")
154
161
 
    let newdata = if ((callerBuylevel == 0))
164
171
 
        then true
165
172
 
        else false
166
173
 
    if (deal)
167
-
        then [StringEntry(toBase58String(i.caller.bytes), newdata), ScriptTransfer(teamAdress, callerPrice, unit), ScriptTransfer(callerAdress, sellamount, token), DeleteEntry((toBase58String(i.caller.bytes) + "_error"))]
174
+
        then [StringEntry(toBase58String(i.caller.bytes), newdata), ScriptTransfer(teamAdress, callerPrice, unit), ScriptTransfer(callerAdress, sellamount, token), Burn(token, burnamount), DeleteEntry((toBase58String(i.caller.bytes) + "_error"))]
168
175
 
        else [StringEntry((toBase58String(i.caller.bytes) + "_error"), mess)]
169
176
 
    }
170
177
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let token = base58'FeCdHqomybB47PWv1JVvfFpQ6WPmHGYgped6WAxpU7Nv'
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
12
 
let deadline = 1639310400000
13
13
 
14
14
 
let burndeadline = 9639332000000
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: " + toString(getIntegerValue("burnt"))) + " 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: " + toString(getIntegerValue("burnt"))) + " 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 currenttime =     match blockInfoByHeight(height) {
101
101
 
        case block: BlockInfo => 
102
102
 
            block.timestamp
103
103
 
        case _ => 
104
104
 
            throw("Can't find block")
105
105
 
    }
106
106
 
    let balance = assetBalance(airdrop, token)
107
107
 
    let sellamount = (1000 * tokend)
108
+
    let burnamount1 = (10 * sellamount)
109
+
    let burnamount2 = (20 * sellamount)
108
110
 
    let price1 = (1 * 100000000)
109
111
 
    let price2 = (2 * 100000000)
110
112
 
    let callerAdress = Address(i.caller.bytes)
111
-
    let balanceok = if ((balance >= sellamount))
112
-
        then true
113
-
        else false
114
113
 
    let callerData = valueOrElse(getString(toBase58String(i.caller.bytes)), "")
115
114
 
    let callerReceived = if ((take(callerData, 8) == "received"))
116
115
 
        then true
117
116
 
        else false
118
117
 
    let callerBuylevel = if (if (callerReceived)
119
118
 
        then (size(split(callerData, "|")) == 1)
120
119
 
        else false)
121
120
 
        then 0
122
121
 
        else if (if (callerReceived)
123
122
 
            then (size(split(callerData, "|")) == 2)
124
123
 
            else false)
125
124
 
            then 1
126
125
 
            else 99
126
+
    let burnamount = if ((callerBuylevel == 1))
127
+
        then burnamount1
128
+
        else if ((callerBuylevel == 2))
129
+
            then burnamount2
130
+
            else 0
131
+
    let balanceok = if ((balance >= (sellamount + burnamount)))
132
+
        then true
133
+
        else false
127
134
 
    let callerCanBuy = if (if (callerReceived)
128
135
 
        then if ((callerBuylevel == 0))
129
136
 
            then true
130
137
 
            else (callerBuylevel == 1)
131
138
 
        else false)
132
139
 
        then true
133
140
 
        else false
134
141
 
    let callerPrice = if ((callerBuylevel == 0))
135
142
 
        then price1
136
143
 
        else if ((callerBuylevel == 1))
137
144
 
            then price2
138
145
 
            else 0
139
146
 
    let pmtok = if ((size(i.payments) == 1))
140
147
 
        then if (if (!(isDefined(i.payments[0].assetId)))
141
148
 
            then (i.payments[0].amount >= callerPrice)
142
149
 
            else false)
143
150
 
            then true
144
151
 
            else false
145
152
 
        else false
146
153
 
    let mess = if (!(callerCanBuy))
147
154
 
        then "not prooved for buy"
148
155
 
        else ("" + (if (!(pmtok))
149
156
 
            then "not enough payment"
150
157
 
            else ("" + (if (!(balanceok))
151
-
                then "ballance empty "
158
+
                then "you are lost... not enough ballance"
152
159
 
                else ""))))
153
160
 
    let datarecs = split(callerData, "|")
154
161
 
    let newdata = if ((callerBuylevel == 0))
155
162
 
        then (datarecs[0] + "|bought1")
156
163
 
        else if ((callerBuylevel == 1))
157
164
 
            then (datarecs[0] + "|bought1|bought2")
158
165
 
            else ""
159
166
 
    let deal = if (if (if (balanceok)
160
167
 
        then callerCanBuy
161
168
 
        else false)
162
169
 
        then pmtok
163
170
 
        else false)
164
171
 
        then true
165
172
 
        else false
166
173
 
    if (deal)
167
-
        then [StringEntry(toBase58String(i.caller.bytes), newdata), ScriptTransfer(teamAdress, callerPrice, unit), ScriptTransfer(callerAdress, sellamount, token), DeleteEntry((toBase58String(i.caller.bytes) + "_error"))]
174
+
        then [StringEntry(toBase58String(i.caller.bytes), newdata), ScriptTransfer(teamAdress, callerPrice, unit), ScriptTransfer(callerAdress, sellamount, token), Burn(token, burnamount), DeleteEntry((toBase58String(i.caller.bytes) + "_error"))]
168
175
 
        else [StringEntry((toBase58String(i.caller.bytes) + "_error"), mess)]
169
176
 
    }
170
177
 
171
178
 

github/deemru/w8io/873ac7e 
72.96 ms ◑