tx · DHmPQRQZusRfPYWQRp6piiQKYWX99o85eQnEN1BS4TLB

3Ms51ykUrUmxn2hKgoA7UdAc5woV414f9xM:  -0.01000000 Waves

2019.07.25 17:15 [601683] smart account 3Ms51ykUrUmxn2hKgoA7UdAc5woV414f9xM > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DHmPQRQZusRfPYWQRp6piiQKYWX99o85eQnEN1BS4TLB",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1564064124824,
    "version": 1,
    "sender": "3Ms51ykUrUmxn2hKgoA7UdAc5woV414f9xM",
    "senderPublicKey": "6UX8bHJG9ibbiep7XYC71DtzjhTMKTvXBqAcjACaztNG",
    "proofs": [
        "4tezfiv5JwUkVBZVAXdFbkRQfvfpvo8zZ5yvkLmSYCCca9QYMWviDWw8Ky85ZJRoUh1drDhT4pnnj3W22feHdBbi"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAAZAAAAAA1pc3N1ZXJBc3NldElkAQAAACAx/huHpi4/N+npJeR1h3QRe1FGyHBBT/yjW43Tsd5SQQAAAAARaW52ZXN0bWVudEFzc2V0SWQBAAAABBOr2TMAAAAAGGludmVzdG1lbnRBc3NldElkSXNXYXZlcwYAAAAADm93bmVyUHVibGljS2V5AQAAAAcYBDc88OZCAAAAAAxvd25lckFkZHJlc3MJAQAAABRhZGRyZXNzRnJvbVB1YmxpY0tleQAAAAEFAAAADm93bmVyUHVibGljS2V5AAAAABJvd25lckFkZHJlc3NTdHJpbmcCAAAAIzNONDhkTFR2OVRTNzN5Y1dnaWJIZGhvaGcyNXJqb3hBZEVKAAAAABFhY2NvdW50VGhhdEFsbG93cwkBAAAAB0FkZHJlc3MAAAABAQAAABoBVMYbTDAWhUaVMk5pP6sw+hs730/Z1xCPOwAAAAAVYWNjb3VudFRoYXRBbGxvd0RBcHBzCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFUxhtMMBaFRpUyTmk/qzD6GzvfT9nXEI87AAAAAAthc3NldERpZ2l0cwAAAAAAAA9CQAAAAAAQc3VtQWNjb3VudEFzc2V0cwAAAAAABfXhAAAAAAAMaXNzdWVyQXNzZXRzAAAAAAAAAAAAAAAAAApzdGFydEJsb2NrAAAAAAAACS5RAAAAABJpbmNyZWFzZVByaWNlQmxvY2sAAAAAAAAJNloAAAAACGVuZEJsb2NrAAAAAAAACTZaAAAAAAVwcmljZQAAAAAABfXhAAAAAAALcHJpY2VTZWNvbmQAAAAAAAX14QAAAAAADXNvZnRDYXBBbW91bnQAAAAAAlQL5AAAAAAADWhhcmRDYXBBbW91bnQAAAAAAlQL5AAAAAAAEmtleVN1bUFtb3VudFByZWZpeAIAAAAKc3VtQW1vdW50IAAAAAAWa2V5U3VtUGFpZEFtb3VudFByZWZpeAIAAAALcGFpZEFtb3VudCAAAAAAEmtleVN1bUFzc2V0c1ByZWZpeAIAAAAKc3VtQXNzZXRzIAAAAAAVa2V5QWxsb3dBY2NvdW50UHJlZml4AgAAAAZhbGxvdyAAAAAADWtleURpc3RBc3NldHMCAAAABmFzc2V0cwAAAAASa2V5Q29sbGVjdGVkQW1vdW50AgAAAAZhbW91bnQAAAAACWtleUlzc3VlcgIAAAAGaXNzdWVyAAAAAgAAAAFpAQAAAAdkZXBvc2l0AAAAAAQAAAAMY3VycmVudFByaWNlAwkAAGYAAAACBQAAABJpbmNyZWFzZVByaWNlQmxvY2sFAAAABmhlaWdodAUAAAAFcHJpY2UFAAAAC3ByaWNlU2Vjb25kBAAAAA1hY2NvdW50QW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAEmtleUNvbGxlY3RlZEFtb3VudAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAAAwkAAGYAAAACBQAAAApzdGFydEJsb2NrBQAAAAZoZWlnaHQJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAcVGhlIFRva2Vuc2FsZSB3b3JrcyBiZXR3ZWVuIAkAAaQAAAABBQAAAApzdGFydEJsb2NrAgAAAAUgYW5kIAkAAaQAAAABBQAAAAhlbmRCbG9jawMDCQAAZgAAAAIFAAAABmhlaWdodAUAAAAIZW5kQmxvY2sGCQAAZwAAAAIFAAAADWFjY291bnRBbW91bnQFAAAADWhhcmRDYXBBbW91bnQJAAACAAAAAQIAAABmVGhlIHJlcXVpcmVkIGFtb3VudCBoYXMgYWxyZWFkeSBiZWVuIGFjY3VtdWxhdGVkLiBJZiB5b3UgYXJlIGFuIGludmVzdG9yLCB5b3UgY2FuIHdpdGhkcmF3IHlvdXIgZnVuZHMuBAAAAAdwYXltZW50BAAAAAckbWF0Y2gwCAUAAAABaQAAAAdwYXltZW50AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9BdHRhY2hlZFBheW1lbnQEAAAAAXAFAAAAByRtYXRjaDAEAAAAC2lzUGF5bWVudE9rBAAAAAckbWF0Y2gxCAUAAAABcAAAAAdhc3NldElkAwkAAAEAAAACBQAAAAckbWF0Y2gxAgAAAApCeXRlVmVjdG9yBAAAAAdhc3NldElkBQAAAAckbWF0Y2gxAwkBAAAAASEAAAABBQAAABhpbnZlc3RtZW50QXNzZXRJZElzV2F2ZXMJAAAAAAAAAgUAAAAHYXNzZXRJZAUAAAARaW52ZXN0bWVudEFzc2V0SWQHCQAAAAAAAAIFAAAAGGludmVzdG1lbnRBc3NldElkSXNXYXZlcwYDBQAAAAtpc1BheW1lbnRPawgFAAAAAXAAAAAGYW1vdW50CQAAAgAAAAECAAAAHkludmFsaWQgYXNzZXQgSUQgb2YgaW52ZXN0bWVudAkAAAIAAAABAgAAABhQYXltZW50IG11c3QgYmUgYXR0YWNoZWQEAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAOaXNBY2NvdW50QWxsb3cEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAARYWNjb3VudFRoYXRBbGxvd3MFAAAACmN1cnJlbnRLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQD/////////AQMJAABmAAAAAgD//////////wUAAAAOaXNBY2NvdW50QWxsb3cJAAACAAAAAQIAAAAoWW91ciBhY2NvdW50IGhhcyBubyByaWdodCB0byBzZW5kIGZ1bmRzLgQAAAANYWNjb3VudEFzc2V0cwQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAA1rZXlEaXN0QXNzZXRzAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAAEHN1bUFjY291bnRBc3NldHMDCQAAZgAAAAIAAAAAAAAAAAAJAABlAAAAAgUAAAANYWNjb3VudEFzc2V0cwkAAGkAAAACCQAAaAAAAAIFAAAAB3BheW1lbnQFAAAAC2Fzc2V0RGlnaXRzBQAAAAxjdXJyZW50UHJpY2UJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAAMFBheW1lbnQgaXMgdG9vIGJpZy4gTWF4aW11bSBwb3NzaWJsZSBwYXltZW50IGlzIAkAAaQAAAABCQAAaQAAAAIJAABoAAAAAgUAAAANYWNjb3VudEFzc2V0cwUAAAAMY3VycmVudFByaWNlBQAAAAthc3NldERpZ2l0cwIAAAAIIHdhdmVsZXQEAAAADWN1cnJlbnRBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAABJrZXlTdW1BbW91bnRQcmVmaXgFAAAACmN1cnJlbnRLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAJbmV3QW1vdW50CQAAZAAAAAIFAAAADWN1cnJlbnRBbW91bnQFAAAAB3BheW1lbnQEAAAADWN1cnJlbnRBc3NldHMEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAABJrZXlTdW1Bc3NldHNQcmVmaXgFAAAACmN1cnJlbnRLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAJbmV3QXNzZXRzCQAAZAAAAAIFAAAADWN1cnJlbnRBc3NldHMJAABpAAAAAgkAAGgAAAACBQAAAAdwYXltZW50BQAAAAthc3NldERpZ2l0cwUAAAAMY3VycmVudFByaWNlBAAAABBuZXdBY2NvdW50QXNzZXRzCQAAZQAAAAIFAAAADWFjY291bnRBc3NldHMJAABpAAAAAgkAAGgAAAACBQAAAAdwYXltZW50BQAAAAthc3NldERpZ2l0cwUAAAAMY3VycmVudFByaWNlBAAAABBuZXdBY2NvdW50QW1vdW50CQAAZAAAAAIFAAAADWFjY291bnRBbW91bnQFAAAAB3BheW1lbnQJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAASa2V5U3VtQW1vdW50UHJlZml4BQAAAApjdXJyZW50S2V5BQAAAAluZXdBbW91bnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAASa2V5U3VtQXNzZXRzUHJlZml4BQAAAApjdXJyZW50S2V5BQAAAAluZXdBc3NldHMJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAADWtleURpc3RBc3NldHMFAAAAEG5ld0FjY291bnRBc3NldHMJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAAEmtleUNvbGxlY3RlZEFtb3VudAUAAAAQbmV3QWNjb3VudEFtb3VudAUAAAADbmlsAAAAAWkBAAAACndpdGhkcmF3YWwAAAAABAAAAAtpc0RBcHBBbGxvdwQAAAAHJG1hdGNoMAkABBoAAAACBQAAABVhY2NvdW50VGhhdEFsbG93REFwcHMJAAQlAAAAAQUAAAAEdGhpcwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAAAwkAAAAAAAACBQAAAAtpc0RBcHBBbGxvdwAAAAAAAAAAAAkAAAIAAAABAgAAAEJXaXRoZHJhd2FscyBhcmUgbm90IGF2YWlsYWJsZSB1bnRpbCB0aGUgaXNzdWVyIHBhc3NlcyB2ZXJpZmljYXRpb24EAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAANY3VycmVudEFzc2V0cwQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAAEmtleVN1bUFzc2V0c1ByZWZpeAUAAAAKY3VycmVudEtleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAA1jdXJyZW50QW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAASa2V5U3VtQW1vdW50UHJlZml4BQAAAApjdXJyZW50S2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAADWFjY291bnRBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAASa2V5Q29sbGVjdGVkQW1vdW50AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAADWFjY291bnRBc3NldHMEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAANa2V5RGlzdEFzc2V0cwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAAAwkBAAAAASEAAAABAwkAAGYAAAACBQAAAAZoZWlnaHQFAAAACGVuZEJsb2NrBgkAAGcAAAACBQAAAA1hY2NvdW50QW1vdW50BQAAAA1oYXJkQ2FwQW1vdW50CQAAAgAAAAEJAAEsAAAAAgIAAAAbVGhlIFRva2Vuc2FsZSBlbmQgb24gYmxvY2sgCQABpAAAAAEFAAAACGVuZEJsb2NrAwMDCQAAAAAAAAIFAAAACmN1cnJlbnRLZXkFAAAAEm93bmVyQWRkcmVzc1N0cmluZwkAAGcAAAACBQAAAA1hY2NvdW50QW1vdW50BQAAAA1zb2Z0Q2FwQW1vdW50BwkAAAAAAAACBQAAAAtpc0RBcHBBbGxvdwAAAAAAAAAAAQcEAAAAF2N1cnJlbnRJc3N1ZXJQYWlkQXNzZXRzBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAACWtleUlzc3VlcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAAAwkAAAAAAAACBQAAABdjdXJyZW50SXNzdWVyUGFpZEFzc2V0cwAAAAAAAAAAAAkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAACWtleUlzc3VlcgkAAGQAAAACBQAAAA1hY2NvdW50QXNzZXRzBQAAAAxpc3N1ZXJBc3NldHMFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAxvd25lckFkZHJlc3MJAABkAAAAAgUAAAANYWNjb3VudEFzc2V0cwUAAAAMaXNzdWVyQXNzZXRzBQAAAA1pc3N1ZXJBc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAADG93bmVyQWRkcmVzcwUAAAANYWNjb3VudEFtb3VudAUAAAARaW52ZXN0bWVudEFzc2V0SWQFAAAAA25pbAkAAAIAAAABAgAAACdUaGUgaXNzdWVyIGhhcyBhbHJlYWR5IHRha2VuIGl0cyBzaGFyZSEDCQAAAAAAAAIFAAAADWN1cnJlbnRBbW91bnQAAAAAAAAAAAAJAAACAAAAAQIAAAAQRG9uJ3QgaGF2ZSBtb25leQMDCQAAZwAAAAIFAAAADWFjY291bnRBbW91bnQFAAAADXNvZnRDYXBBbW91bnQJAAAAAAAAAgUAAAALaXNEQXBwQWxsb3cAAAAAAAAAAAEHCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAABJrZXlTdW1BbW91bnRQcmVmaXgFAAAACmN1cnJlbnRLZXkAAAAAAAAAAAAJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAASa2V5U3VtQXNzZXRzUHJlZml4BQAAAApjdXJyZW50S2V5AAAAAAAAAAAABQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAA1jdXJyZW50QXNzZXRzBQAAAA1pc3N1ZXJBc3NldElkBQAAAANuaWwJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAAEmtleVN1bUFtb3VudFByZWZpeAUAAAAKY3VycmVudEtleQAAAAAAAAAAAAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAABJrZXlTdW1Bc3NldHNQcmVmaXgFAAAACmN1cnJlbnRLZXkAAAAAAAAAAAAFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAADWN1cnJlbnRBbW91bnQFAAAAEWludmVzdG1lbnRBc3NldElkBQAAAANuaWwAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAABAAAAAckbWF0Y2gwBQAAAAJ0eAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAAAnR4AAAAD3NlbmRlclB1YmxpY0tleQd1i7go",
    "chainId": 84,
    "height": 601683,
    "spentComplexity": 0
}

View: original | compacted
Prev: none
Next: none

Full: 

OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 3 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let issuerAssetId = base58'4N9iFRqzPQQBki9fEgVBWBHTUfKk2JfDHmewu6fvDyPv'
5+
6+let investmentAssetId = base58'WAVES'
7+
8+let investmentAssetIdIsWaves = true
9+
10+let ownerPublicKey = base58'undefined'
11+
12+let ownerAddress = addressFromPublicKey(ownerPublicKey)
13+
14+let ownerAddressString = "3N48dLTv9TS73ycWgibHdhohg25rjoxAdEJ"
15+
16+let accountThatAllows = Address(base58'3N7yaGaFS8BvgRrc9trhNy7v5H4qCcxW3Fp')
17+
18+let accountThatAllowDApps = Address(base58'3N7yaGaFS8BvgRrc9trhNy7v5H4qCcxW3Fp')
19+
20+let assetDigits = 1000000
21+
22+let sumAccountAssets = 100000000
23+
24+let issuerAssets = 0
25+
26+let startBlock = 601681
27+
28+let increasePriceBlock = 603738
29+
30+let endBlock = 603738
31+
32+let price = 100000000
33+
34+let priceSecond = 100000000
35+
36+let softCapAmount = 10000000000
37+
38+let hardCapAmount = 10000000000
39+
40+let keySumAmountPrefix = "sumAmount "
41+
42+let keySumPaidAmountPrefix = "paidAmount "
43+
44+let keySumAssetsPrefix = "sumAssets "
45+
46+let keyAllowAccountPrefix = "allow "
47+
48+let keyDistAssets = "assets"
49+
50+let keyCollectedAmount = "amount"
51+
52+let keyIssuer = "issuer"
53+
54+@Callable(i)
55+func deposit () = {
56+    let currentPrice = if ((increasePriceBlock > height))
57+        then price
58+        else priceSecond
59+    let accountAmount =     match getInteger(this, keyCollectedAmount) {
60+        case a: Int => 
61+            a
62+        case _ => 
63+            0
64+    }
65+    if ((startBlock > height))
66+        then throw(((("The Tokensale works between " + toString(startBlock)) + " and ") + toString(endBlock)))
67+        else if (if ((height > endBlock))
68+            then true
69+            else (accountAmount >= hardCapAmount))
70+            then throw("The required amount has already been accumulated. If you are an investor, you can withdraw your funds.")
71+            else {
72+                let payment =                 match i.payment {
73+                    case p: AttachedPayment => 
74+                        let isPaymentOk =                         match p.assetId {
75+                            case assetId: ByteVector => 
76+                                if (!(investmentAssetIdIsWaves))
77+                                    then (assetId == investmentAssetId)
78+                                    else false
79+                            case _ => 
80+                                (investmentAssetIdIsWaves == true)
81+                        }
82+                        if (isPaymentOk)
83+                            then p.amount
84+                            else throw("Invalid asset ID of investment")
85+                    case _ => 
86+                        throw("Payment must be attached")
87+                }
88+                let currentKey = toBase58String(i.caller.bytes)
89+                let isAccountAllow =                 match getInteger(accountThatAllows, currentKey) {
90+                    case a: Int => 
91+                        a
92+                    case _ => 
93+                        -255
94+                }
95+                if ((-1 > isAccountAllow))
96+                    then throw("Your account has no right to send funds.")
97+                    else {
98+                        let accountAssets =                         match getInteger(this, keyDistAssets) {
99+                            case a: Int => 
100+                                a
101+                            case _ => 
102+                                sumAccountAssets
103+                        }
104+                        if ((0 > (accountAssets - ((payment * assetDigits) / currentPrice))))
105+                            then throw((("Payment is too big. Maximum possible payment is " + toString(((accountAssets * currentPrice) / assetDigits))) + " wavelet"))
106+                            else {
107+                                let currentAmount =                                 match getInteger(this, (keySumAmountPrefix + currentKey)) {
108+                                    case a: Int => 
109+                                        a
110+                                    case _ => 
111+                                        0
112+                                }
113+                                let newAmount = (currentAmount + payment)
114+                                let currentAssets =                                 match getInteger(this, (keySumAssetsPrefix + currentKey)) {
115+                                    case a: Int => 
116+                                        a
117+                                    case _ => 
118+                                        0
119+                                }
120+                                let newAssets = (currentAssets + ((payment * assetDigits) / currentPrice))
121+                                let newAccountAssets = (accountAssets - ((payment * assetDigits) / currentPrice))
122+                                let newAccountAmount = (accountAmount + payment)
123+                                WriteSet([DataEntry((keySumAmountPrefix + currentKey), newAmount), DataEntry((keySumAssetsPrefix + currentKey), newAssets), DataEntry(keyDistAssets, newAccountAssets), DataEntry(keyCollectedAmount, newAccountAmount)])
124+                                }
125+                        }
126+                }
127+    }
128+
129+
130+
131+@Callable(i)
132+func withdrawal () = {
133+    let isDAppAllow =     match getInteger(accountThatAllowDApps, toString(this)) {
134+        case a: Int => 
135+            a
136+        case _ => 
137+            0
138+    }
139+    if ((isDAppAllow == 0))
140+        then throw("Withdrawals are not available until the issuer passes verification")
141+        else {
142+            let currentKey = toBase58String(i.caller.bytes)
143+            let currentAssets =             match getInteger(this, (keySumAssetsPrefix + currentKey)) {
144+                case a: Int => 
145+                    a
146+                case _ => 
147+                    0
148+            }
149+            let currentAmount =             match getInteger(this, (keySumAmountPrefix + currentKey)) {
150+                case a: Int => 
151+                    a
152+                case _ => 
153+                    0
154+            }
155+            let accountAmount =             match getInteger(this, keyCollectedAmount) {
156+                case a: Int => 
157+                    a
158+                case _ => 
159+                    0
160+            }
161+            let accountAssets =             match getInteger(this, keyDistAssets) {
162+                case a: Int => 
163+                    a
164+                case _ => 
165+                    0
166+            }
167+            if (!(if ((height > endBlock))
168+                then true
169+                else (accountAmount >= hardCapAmount)))
170+                then throw(("The Tokensale end on block " + toString(endBlock)))
171+                else if (if (if ((currentKey == ownerAddressString))
172+                    then (accountAmount >= softCapAmount)
173+                    else false)
174+                    then (isDAppAllow == 1)
175+                    else false)
176+                    then {
177+                        let currentIssuerPaidAssets =                         match getInteger(this, keyIssuer) {
178+                            case a: Int => 
179+                                a
180+                            case _ => 
181+                                0
182+                        }
183+                        if ((currentIssuerPaidAssets == 0))
184+                            then ScriptResult(WriteSet([DataEntry(keyIssuer, (accountAssets + issuerAssets))]), TransferSet([ScriptTransfer(ownerAddress, (accountAssets + issuerAssets), issuerAssetId), ScriptTransfer(ownerAddress, accountAmount, investmentAssetId)]))
185+                            else throw("The issuer has already taken its share!")
186+                        }
187+                    else if ((currentAmount == 0))
188+                        then throw("Don't have money")
189+                        else if (if ((accountAmount >= softCapAmount))
190+                            then (isDAppAllow == 1)
191+                            else false)
192+                            then ScriptResult(WriteSet([DataEntry((keySumAmountPrefix + currentKey), 0), DataEntry((keySumAssetsPrefix + currentKey), 0)]), TransferSet([ScriptTransfer(i.caller, currentAssets, issuerAssetId)]))
193+                            else ScriptResult(WriteSet([DataEntry((keySumAmountPrefix + currentKey), 0), DataEntry((keySumAssetsPrefix + currentKey), 0)]), TransferSet([ScriptTransfer(i.caller, currentAmount, investmentAssetId)]))
194+            }
195+    }
196+
197+
198+@Verifier(tx)
199+func verify () = match tx {
200+    case tx: SetScriptTransaction => 
201+        sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
202+    case _ => 
203+        false
204+}
205+
github/deemru/w8io/873ac7e 
19.39 ms ◑