tx · DRAt3X1CNpqBtnQDvXKiexoHbr5weNK4Gzn5HdkYHAMU

3P3w8TSPSRDVMLAzJcTeHnKAQsPnQgArUKy:  -0.00500000 Waves

2023.11.29 11:31 [3930308] smart account 3P3w8TSPSRDVMLAzJcTeHnKAQsPnQgArUKy > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DRAt3X1CNpqBtnQDvXKiexoHbr5weNK4Gzn5HdkYHAMU",
    "fee": 500000,
    "feeAssetId": null,
    "timestamp": 1701246806321,
    "version": 1,
    "sender": "3P3w8TSPSRDVMLAzJcTeHnKAQsPnQgArUKy",
    "senderPublicKey": "BnSujow6hJrVGBci5QG71JU7GKwyCVdhyxrrM4LPrYP7",
    "proofs": [
        "3HFYP2PpXt3ScUq3KhpTdeUefxtHd8NkaSKXJ8zYMs74BKW9KDWXvpw9Ha8gMNy9WoyKJTQx62i1Fed814cnbS8s"
    ],
    "script": "base64:BgIrCAISCwoJAQEBAQEBCAgIEgQKAggBEgMKAQgSAwoBCBIDCgEIEgMKAQgSAAwBBWFzSW50AQV2YWx1ZQQHJG1hdGNoMAUFdmFsdWUDCQABAgUHJG1hdGNoMAIDSW50BANpbnQFByRtYXRjaDAFA2ludAkAAgECGXdyb25nIHR5cGUsIGV4cGVjdGVkOiBJbnQBEHdyaXRlQ29uc3RTdHJpbmcCA2tleQV2YWx1ZQMJAQEhAQkBCWlzRGVmaW5lZAEJAJ0IAgUEdGhpcwUDa2V5CQELU3RyaW5nRW50cnkCBQNrZXkFBXZhbHVlCQACAQkArAICAhVhbHJlYWR5IGluaXRpYWxpemVkOiAFA2tleQASY29uZmlnQWRkcmVzc1N0b3JlAgZjb25maWcADWNvbmZpZ0FkZHJlc3MJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwUSY29uZmlnQWRkcmVzc1N0b3JlAidjaGlsZHJlbi5tYWluOiBjb25maWcgYWRkcmVzcyBub3QgZm91bmQCFmludmFsaWQgY29uZmlnIGFkZHJlc3MABkhFSUdIVAUGaGVpZ2h0AQdhbGxvd2VkAQJvcAkA/AcEBQ1jb25maWdBZGRyZXNzAglvcEFsbG93ZWQJAMwIAgUCb3AFA25pbAUDbmlsAApwd3JBc3NldElkCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ1jb25maWdBZGRyZXNzAgxwb3dlckFzc2V0SWQCFnB3ciBhc3NldCBpZCBub3QgZm91bmQAD3N0YWtpbmdDb250cmFjdAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ1jb25maWdBZGRyZXNzAhBjb250cmFjdF9zdGFraW5nAhNubyBzdGFraW5nX2NvbnRyYWN0AhdpbnZhbGlkIHN0YWtpbmcgYWRkcmVzcwAIbWluUG93ZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQ1jb25maWdBZGRyZXNzCQCsAgIJAKUIAQUEdGhpcwIeX21pbl9wb3dlcl9yZXF1aXJlZF90b19wcm9qZWN0AiFubyBfbWluX3Bvd2VyX3JlcXVpcmVkX3RvX3Byb2plY3QAEGNoaWxkcmVuQ29udHJhY3QJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUNY29uZmlnQWRkcmVzcwIRY29udHJhY3RfY2hpbGRyZW4CFG5vIGNoaWxkcmVuX2NvbnRyYWN0AhhpbnZhbGlkIGNoaWxkcmVuIGFkZHJlc3MACHdhdmVzREFPCQELdmFsdWVPckVsc2UCCQCdCAIFDWNvbmZpZ0FkZHJlc3MCCHdhdmVzREFPAiMzUEV3UmNZTkFVdG9GdktwQmhLb2l3YWpuWmZkb0RSNmg0aAAHZmFjdG9yeQkBC3ZhbHVlT3JFbHNlAgkAnQgCBQ1jb25maWdBZGRyZXNzAg5taW5lcnNfZmFjdG9yeQIjM1BKVm03eExQYWJtWW9oYm52ZGdHRFlITXduWnhGMngxOG0HAWkBB3Byb2plY3QJBHNraW4HbWF4U2tpbg1taW5Db21taXRtZW50CGxvY2tUaW1lC2ludmVzdG1lbnRzDm1heEludmVzdG1lbnRzEGludmVzdG1lbnRzVG9rZW4LY29tbWl0bWVudHMIdHJlYXN1cmUEAWEJAQdhbGxvd2VkAQIHcHJvamVjdAMJAAACBQFhBQFhBAR1c2VyCQClCAEIBQFpBmNhbGxlcgQFcG93ZXIJAQVhc0ludAEJAPwHBAUPc3Rha2luZ0NvbnRyYWN0Agl1c2VyUG93ZXIJAMwIAgUEdXNlcgUDbmlsBQNuaWwDCQAAAgUFcG93ZXIFBXBvd2VyAwkAZgIFCG1pblBvd2VyBQVwb3dlcgkAAgEJAKwCAgI2Tm90IGVub3VnaCBzdGFrZWQgcG93ZXIgdG8gY3JlYXRlIGEgcHJvamVjdC4gUmVxdWlyZWQgCQCkAwEFCG1pblBvd2VyBAFwCQD8BwQFEGNoaWxkcmVuQ29udHJhY3QCCnByb2plY3RGb3IJAMwIAgUEdXNlcgkAzAgCBQRza2luCQDMCAIFB21heFNraW4JAMwIAgUNbWluQ29tbWl0bWVudAkAzAgCBQhsb2NrVGltZQkAzAgCBQtpbnZlc3RtZW50cwkAzAgCBQ5tYXhJbnZlc3RtZW50cwkAzAgCBRBpbnZlc3RtZW50c1Rva2VuCQDMCAIFC2NvbW1pdG1lbnRzCQDMCAIFCHRyZWFzdXJlBQNuaWwFA25pbAMJAAACBQFwBQFwBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEGY29tbWl0AgVjaGlsZAZhbW91bnQEAWEJAQdhbGxvd2VkAQIGY29tbWl0AwkAAAIFAWEFAWEEB2FjY291bnQJAKUIAQgFAWkGY2FsbGVyBAFzCQD8BwQFD3N0YWtpbmdDb250cmFjdAILdW5zdGFrZUZyb20JAMwIAgUHYWNjb3VudAkAzAgCBQZhbW91bnQFA25pbAUDbmlsAwkAAAIFAXMFAXMEAWMJAPwHBAUQY2hpbGRyZW5Db250cmFjdAIJY29tbWl0Rm9yCQDMCAIFBWNoaWxkCQDMCAIFB2FjY291bnQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUKcHdyQXNzZXRJZAUGYW1vdW50BQNuaWwDCQAAAgUBYwUBYwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBDmNvbW1pdEZvck1pbmVyAQNmb3IDCQECIT0CCQClCAEIBQFpBmNhbGxlcgUHZmFjdG9yeQkAAgECBmRlbmllZAQBYwkA/AcEBRBjaGlsZHJlbkNvbnRyYWN0Ag5jb21taXRGb3JNaW5lcgkAzAgCBQh3YXZlc0RBTwkAzAgCBQNmb3IFA25pbAgFAWkIcGF5bWVudHMDCQAAAgUBYwUBYwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCnVuZG9Db21taXQBBWNoaWxkBAZwYXVzZWQJAQdhbGxvd2VkAQIKdW5kb0NvbW1pdAMJAAACBQZwYXVzZWQFBnBhdXNlZAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEBHNraW4JAQVhc0ludAEJAPwHBAUQY2hpbGRyZW5Db250cmFjdAINdW5kb0NvbW1pdEZvcgkAzAgCBQVjaGlsZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAMJAAACBQRza2luBQRza2luBAFzCQD8BwQFD3N0YWtpbmdDb250cmFjdAIIc3Rha2VGb3IJAMwIAgUHYWRkcmVzcwUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQpwd3JBc3NldElkBQRza2luBQNuaWwDCQAAAgUBcwUBcwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCGNvbXBsZXRlAQVjaGlsZAQGcGF1c2VkCQEHYWxsb3dlZAECCGNvbXBsZXRlAwkAAAIFBnBhdXNlZAUGcGF1c2VkBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgQEc2tpbgkBBWFzSW50AQkA/AcEBRBjaGlsZHJlbkNvbnRyYWN0Agtjb21wbGV0ZUZvcgkAzAgCBQVjaGlsZAkAzAgCBQdhZGRyZXNzBQNuaWwFA25pbAMJAAACBQRza2luBQRza2luBAFzCQD8BwQFD3N0YWtpbmdDb250cmFjdAIIc3Rha2VGb3IJAMwIAgUHYWRkcmVzcwUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQpwd3JBc3NldElkBQRza2luBQNuaWwDCQAAAgUBcwUBcwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBBGluaXQBBGNvbmYJAMwIAgkBEHdyaXRlQ29uc3RTdHJpbmcCBRJjb25maWdBZGRyZXNzU3RvcmUFBGNvbmYFA25pbAFpARR1bmRvQ29tbWl0Rm9yTnVtZXJpcwAEBXVzZXJzCQDMCAICIzNQM0p2a3lua0d1V0NhVDlXWjUxVDFtdUpkdHFyRW9neEUzCQDMCAICIzNQNjg2UGhIektwVXdXRHRCZ3Y1NHBBYzFuN0ZMeU42S3dGCQDMCAICIzNQOURnYWtNYWpNdVo3WnVaOHh5ZXdReGJKR3k2UENuaGliCQDMCAICIzNQRjJnbVoxU3BpUnJ1anhNcFJNSFFvaFRyTlpWRlNEb3R4CQDMCAICIzNQSEZBYXZ4ajJlUEpxRkI0NkgyYVJHQTdvUUw2a3oxckpKCQDMCAICIzNQSFhQZ3FQWFBNdkxnaFVSblhrOU5ndWd3NnY1QWt6ZzRXCQDMCAICIzNQSmRHRTFwZjFKalp1V2hXVTh1d2JqdVFjM0NDZEw1TWMzCQDMCAICIzNQTDg4enk5VjJ0ckNhRFV4QWRaMzlGdHJIMmZ5dzNZdzdNCQDMCAICIzNQTHl3UGlNWW13YktORUJKTHZBYmpFbmtIMW1MczU3UmpICQDMCAICIzNQTUdRc21ROHg2eGc0RGM1SHBzaVJqVm9VQmVabnpkREJOCQDMCAICIzNQUUt6elhEcmdiRHhUZUxEQ3RtTUtxalIyVWhwdlNRZTV6BQNuaWwEBWNoaWxkAiMzUDRCRDNicUFUV1JCTEpoTUwzRW5UYXNOdXhuNkF5Ym1lbQoBBHVuZG8CA2ZvbwR1c2VyBARza2luCQEFYXNJbnQBCQD8BwQFEGNoaWxkcmVuQ29udHJhY3QCDXVuZG9Db21taXRGb3IJAMwIAgUFY2hpbGQJAMwIAgUEdXNlcgUDbmlsBQNuaWwDCQAAAgUEc2tpbgUEc2tpbgQBcwkA/AcEBQ9zdGFraW5nQ29udHJhY3QCCHN0YWtlRm9yCQDMCAIFBHVzZXIFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUKcHdyQXNzZXRJZAUEc2tpbgUDbmlsAwkAAAIFAXMFAXMAAAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQBYQoAAiRsBQV1c2VycwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEEdW5kbwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTEJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAwkAAAIFAWEFAWEFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgBpiwIn",
    "chainId": 87,
    "height": 3930308,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: J3DCyeV2p8Y1Pn2Kt8tCPSeDCuAumyR8CYnNQBhKKJt9
Next: 9gSkGCmWygurkXGCXczXHdx64hsadwji4NbF4bQG2nGd

Diff: 
Old
New
Differences
137
137
 
func init (conf) = [writeConstString(configAddressStore, conf)]
138
138
 
139
139
 
140
+
141
+
@Callable(i)
142
+
func undoCommitForNumeris () = {
143
+
    let users = ["3P3JvkynkGuWCaT9WZ51T1muJdtqrEogxE3", "3P686PhHzKpUwWDtBgv54pAc1n7FLyN6KwF", "3P9DgakMajMuZ7ZuZ8xyewQxbJGy6PCnhib", "3PF2gmZ1SpiRrujxMpRMHQohTrNZVFSDotx", "3PHFAavxj2ePJqFB46H2aRGA7oQL6kz1rJJ", "3PHXPgqPXPMvLghURnXk9Ngugw6v5Akzg4W", "3PJdGE1pf1JjZuWhWU8uwbjuQc3CCdL5Mc3", "3PL88zy9V2trCaDUxAdZ39FtrH2fyw3Yw7M", "3PLywPiMYmwbKNEBJLvAbjEnkH1mLs57RjH", "3PMGQsmQ8x6xg4Dc5HpsiRjVoUBeZnzdDBN", "3PQKzzXDrgbDxTeLDCtmMKqjR2UhpvSQe5z"]
144
+
    let child = "3P4BD3bqATWRBLJhML3EnTasNuxn6Aybmem"
145
+
    func undo (foo,user) =     {
146
+
        let skin = asInt(invoke(childrenContract, "undoCommitFor", [child, user], nil))
147
+
        if ((skin == skin))
148
+
            then {
149
+
                let s = invoke(stakingContract, "stakeFor", [user], [AttachedPayment(pwrAssetId, skin)])
150
+
                if ((s == s))
151
+
                    then 0
152
+
                    else throw("Strict value is not equal to itself.")
153
+
                }
154
+
            else throw("Strict value is not equal to itself.")
155
+
        }
156
+
157
+
    let a = {
158
+
        let $l = users
159
+
        let $s = size($l)
160
+
        let $acc0 = 0
161
+
        func $f0_1 ($a,$i) =         if (($i >= $s))
162
+
            then $a
163
+
            else undo($a, $l[$i])
164
+
165
+
        func $f0_2 ($a,$i) =         if (($i >= $s))
166
+
            then $a
167
+
            else throw("List size exceeds 11")
168
+
169
+
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11)
170
+
        }
171
+
    if ((a == a))
172
+
        then nil
173
+
        else throw("Strict value is not equal to itself.")
174
+
    }
175
+
176
+

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
func asInt (value) = match value {
5
5
 
    case int: Int => 
6
6
 
        int
7
7
 
    case _ => 
8
8
 
        throw("wrong type, expected: Int")
9
9
 
}
10
10
 
11
11
 
12
12
 
func writeConstString (key,value) = if (!(isDefined(getString(this, key))))
13
13
 
    then StringEntry(key, value)
14
14
 
    else throw(("already initialized: " + key))
15
15
 
16
16
 
17
17
 
let configAddressStore = "config"
18
18
 
19
19
 
let configAddress = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(this, configAddressStore), "children.main: config address not found")), "invalid config address")
20
20
 
21
21
 
let HEIGHT = height
22
22
 
23
23
 
func allowed (op) = invoke(configAddress, "opAllowed", [op], nil)
24
24
 
25
25
 
26
26
 
let pwrAssetId = fromBase58String(valueOrErrorMessage(getString(configAddress, "powerAssetId"), "pwr asset id not found"))
27
27
 
28
28
 
let stakingContract = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(configAddress, "contract_staking"), "no staking_contract")), "invalid staking address")
29
29
 
30
30
 
let minPower = valueOrErrorMessage(getInteger(configAddress, (toString(this) + "_min_power_required_to_project")), "no _min_power_required_to_project")
31
31
 
32
32
 
let childrenContract = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(configAddress, "contract_children"), "no children_contract")), "invalid children address")
33
33
 
34
34
 
let wavesDAO = valueOrElse(getString(configAddress, "wavesDAO"), "3PEwRcYNAUtoFvKpBhKoiwajnZfdoDR6h4h")
35
35
 
36
36
 
let factory = valueOrElse(getString(configAddress, "miners_factory"), "3PJVm7xLPabmYohbnvdgGDYHMwnZxF2x18m")
37
37
 
38
38
 
@Callable(i)
39
39
 
func project (skin,maxSkin,minCommitment,lockTime,investments,maxInvestments,investmentsToken,commitments,treasure) = {
40
40
 
    let a = allowed("project")
41
41
 
    if ((a == a))
42
42
 
        then {
43
43
 
            let user = toString(i.caller)
44
44
 
            let power = asInt(invoke(stakingContract, "userPower", [user], nil))
45
45
 
            if ((power == power))
46
46
 
                then if ((minPower > power))
47
47
 
                    then throw(("Not enough staked power to create a project. Required " + toString(minPower)))
48
48
 
                    else {
49
49
 
                        let p = invoke(childrenContract, "projectFor", [user, skin, maxSkin, minCommitment, lockTime, investments, maxInvestments, investmentsToken, commitments, treasure], nil)
50
50
 
                        if ((p == p))
51
51
 
                            then nil
52
52
 
                            else throw("Strict value is not equal to itself.")
53
53
 
                        }
54
54
 
                else throw("Strict value is not equal to itself.")
55
55
 
            }
56
56
 
        else throw("Strict value is not equal to itself.")
57
57
 
    }
58
58
 
59
59
 
60
60
 
61
61
 
@Callable(i)
62
62
 
func commit (child,amount) = {
63
63
 
    let a = allowed("commit")
64
64
 
    if ((a == a))
65
65
 
        then {
66
66
 
            let account = toString(i.caller)
67
67
 
            let s = invoke(stakingContract, "unstakeFrom", [account, amount], nil)
68
68
 
            if ((s == s))
69
69
 
                then {
70
70
 
                    let c = invoke(childrenContract, "commitFor", [child, account], [AttachedPayment(pwrAssetId, amount)])
71
71
 
                    if ((c == c))
72
72
 
                        then nil
73
73
 
                        else throw("Strict value is not equal to itself.")
74
74
 
                    }
75
75
 
                else throw("Strict value is not equal to itself.")
76
76
 
            }
77
77
 
        else throw("Strict value is not equal to itself.")
78
78
 
    }
79
79
 
80
80
 
81
81
 
82
82
 
@Callable(i)
83
83
 
func commitForMiner (for) = if ((toString(i.caller) != factory))
84
84
 
    then throw("denied")
85
85
 
    else {
86
86
 
        let c = invoke(childrenContract, "commitForMiner", [wavesDAO, for], i.payments)
87
87
 
        if ((c == c))
88
88
 
            then nil
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 undoCommit (child) = {
96
96
 
    let paused = allowed("undoCommit")
97
97
 
    if ((paused == paused))
98
98
 
        then {
99
99
 
            let address = toString(i.caller)
100
100
 
            let skin = asInt(invoke(childrenContract, "undoCommitFor", [child, address], nil))
101
101
 
            if ((skin == skin))
102
102
 
                then {
103
103
 
                    let s = invoke(stakingContract, "stakeFor", [address], [AttachedPayment(pwrAssetId, skin)])
104
104
 
                    if ((s == s))
105
105
 
                        then nil
106
106
 
                        else throw("Strict value is not equal to itself.")
107
107
 
                    }
108
108
 
                else throw("Strict value is not equal to itself.")
109
109
 
            }
110
110
 
        else throw("Strict value is not equal to itself.")
111
111
 
    }
112
112
 
113
113
 
114
114
 
115
115
 
@Callable(i)
116
116
 
func complete (child) = {
117
117
 
    let paused = allowed("complete")
118
118
 
    if ((paused == paused))
119
119
 
        then {
120
120
 
            let address = toString(i.caller)
121
121
 
            let skin = asInt(invoke(childrenContract, "completeFor", [child, address], nil))
122
122
 
            if ((skin == skin))
123
123
 
                then {
124
124
 
                    let s = invoke(stakingContract, "stakeFor", [address], [AttachedPayment(pwrAssetId, skin)])
125
125
 
                    if ((s == s))
126
126
 
                        then nil
127
127
 
                        else throw("Strict value is not equal to itself.")
128
128
 
                    }
129
129
 
                else throw("Strict value is not equal to itself.")
130
130
 
            }
131
131
 
        else throw("Strict value is not equal to itself.")
132
132
 
    }
133
133
 
134
134
 
135
135
 
136
136
 
@Callable(i)
137
137
 
func init (conf) = [writeConstString(configAddressStore, conf)]
138
138
 
139
139
 
140
+
141
+
@Callable(i)
142
+
func undoCommitForNumeris () = {
143
+
    let users = ["3P3JvkynkGuWCaT9WZ51T1muJdtqrEogxE3", "3P686PhHzKpUwWDtBgv54pAc1n7FLyN6KwF", "3P9DgakMajMuZ7ZuZ8xyewQxbJGy6PCnhib", "3PF2gmZ1SpiRrujxMpRMHQohTrNZVFSDotx", "3PHFAavxj2ePJqFB46H2aRGA7oQL6kz1rJJ", "3PHXPgqPXPMvLghURnXk9Ngugw6v5Akzg4W", "3PJdGE1pf1JjZuWhWU8uwbjuQc3CCdL5Mc3", "3PL88zy9V2trCaDUxAdZ39FtrH2fyw3Yw7M", "3PLywPiMYmwbKNEBJLvAbjEnkH1mLs57RjH", "3PMGQsmQ8x6xg4Dc5HpsiRjVoUBeZnzdDBN", "3PQKzzXDrgbDxTeLDCtmMKqjR2UhpvSQe5z"]
144
+
    let child = "3P4BD3bqATWRBLJhML3EnTasNuxn6Aybmem"
145
+
    func undo (foo,user) =     {
146
+
        let skin = asInt(invoke(childrenContract, "undoCommitFor", [child, user], nil))
147
+
        if ((skin == skin))
148
+
            then {
149
+
                let s = invoke(stakingContract, "stakeFor", [user], [AttachedPayment(pwrAssetId, skin)])
150
+
                if ((s == s))
151
+
                    then 0
152
+
                    else throw("Strict value is not equal to itself.")
153
+
                }
154
+
            else throw("Strict value is not equal to itself.")
155
+
        }
156
+
157
+
    let a = {
158
+
        let $l = users
159
+
        let $s = size($l)
160
+
        let $acc0 = 0
161
+
        func $f0_1 ($a,$i) =         if (($i >= $s))
162
+
            then $a
163
+
            else undo($a, $l[$i])
164
+
165
+
        func $f0_2 ($a,$i) =         if (($i >= $s))
166
+
            then $a
167
+
            else throw("List size exceeds 11")
168
+
169
+
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11)
170
+
        }
171
+
    if ((a == a))
172
+
        then nil
173
+
        else throw("Strict value is not equal to itself.")
174
+
    }
175
+
176
+

github/deemru/w8io/0e76f2f 
31.97 ms ◑