tx · 69CV1wnJXRFtcAesAXc8s5LFPSJHDwjGF8nshnC6VuU1

3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez:  -0.00600000 Waves

2023.11.10 12:29 [2837071] smart account 3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "69CV1wnJXRFtcAesAXc8s5LFPSJHDwjGF8nshnC6VuU1",
    "fee": 600000,
    "feeAssetId": null,
    "timestamp": 1699608645936,
    "version": 2,
    "chainId": 84,
    "sender": "3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez",
    "senderPublicKey": "Brp6cacBXyKUcZr5Uc6VDKsnFcaEeQ8nQzrZQyobDsuf",
    "proofs": [
        "299ypjZK5GYYRj2EWvjPskVQgqcFc5qPeNiLtn9q6Nmzv4p6fQ1LDTqT7QBvAzNzeSCCYX7rVHLmddnwXnvCiYxz"
    ],
    "script": "base64:BgISCAISABIAEgASAwoBCBIDCgEYEgACZDgAgMLXLwENdHJ5R2V0SW50ZWdlcgIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJoIAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAAAQx0cnlHZXRTdHJpbmcCB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCdCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWIFByRtYXRjaDAFAWICAAAHYnVybnh0bgEgJE91eWp+Mzm4+wz/hKlxXF7KLd4zoMRdafnqRBHsTFQAA1BaMQEaAVeFnSww1fwDPmHFrd6Sv8UqkfOZrhpBQAoAA1BaMgEaAVf1RmgngA1o304mdXq0odMoMeAJv/V5eTcAA1BaMwEaAVdrUh3hZ11iM5xE9ppvCu7VVcjaIPzs5scAA1BaNAEaAVd8ufIkLHkd+cILYV2n5Ut+Pmb4MdnkIOIAA1BaNQEaAVdzM1uLVnknLEeNcZD2LCCz+T9Cl/2cRdIAA1BaNgEaAVdHHWb6sJRhaJYHMq62QOOh/3POTybYR7oAB1dYc3Rha2UBGgFX6zvnfm4FGMKRpJgWF+Fm10UnIO4lSVaoAANXWDEBGgFXK+KucXt9yTC1IHnnFsVrbVdAgaU4Fj0+AANMUDECLEd5aUhkY041OXNaNDZiYUZ2ajY4cnVMbmdyVFBFdldEdHNkNmpIbTRvNDZuAANXWDIBGgFXwRfLSELOBVNDikdciGeU9BfVx8LU1MNSAANMUDICLDNNUEhNSlZ3WUd5ZUJMUnNIMVJzWWhyVG1lbXY3NTJBRUJ3dUZGVjdnNDlaAQVQWmJhbAILUG9vbGFkZHJlc3MHYWRkcmVzcwQLYnVybnh0bkluUFoJAQ10cnlHZXRJbnRlZ2VyAgkBB0FkZHJlc3MBBQtQb29sYWRkcmVzcwkArAICCQCsAgICB2dsb2JhbF8JANgEAQUHYnVybnh0bgIIX2JhbGFuY2UEDmFkZHJlc3NTdGFrZVBaCQENdHJ5R2V0SW50ZWdlcgIJAQdBZGRyZXNzAQULUG9vbGFkZHJlc3MJAKwCAgkApQgBBQdhZGRyZXNzAgxfaW5kZXhTdGFrZWQEDHRvdGFsU3Rha2VQWgkBDXRyeUdldEludGVnZXICCQEHQWRkcmVzcwEFC1Bvb2xhZGRyZXNzAhdnbG9iYWxfcG9vbFRva2VuX2Ftb3VudAkAawMFC2J1cm54dG5JblBaBQ5hZGRyZXNzU3Rha2VQWgUMdG90YWxTdGFrZVBaAQVXWGJhbAMLUG9vbGFkZHJlc3MHYWRkcmVzcwVMUHN0cgQLYnVybnh0bkluV1gJAPAHAgkBB0FkZHJlc3MBBQtQb29sYWRkcmVzcwUHYnVybnh0bgQOYWRkcmVzc1N0YWtlV1gJAQ10cnlHZXRJbnRlZ2VyAgkBB0FkZHJlc3MBBQdXWHN0YWtlCQCsAgIJAKwCAgkArAICAhAlcyVzJXNfX3N0YWtlZF9fCQClCAEFB2FkZHJlc3MCAl9fBQVMUHN0cgQMdG90YWxTdGFrZVdYCQENdHJ5R2V0SW50ZWdlcgIJAQdBZGRyZXNzAQUHV1hzdGFrZQkArAICAhclcyVzJXNfX3N0YWtlZF9fdG90YWxfXwUFTFBzdHIJAGsDBQtidXJueHRuSW5XWAUOYWRkcmVzc1N0YWtlV1gFDHRvdGFsU3Rha2VXWAEMdG90YWxCYWxhbmNlAQdhZGRyZXNzBA5idXJueHRuQmFsYW5jZQkA8AcCBQdhZGRyZXNzBQdidXJueHRuBApQWjFiYWxhbmNlCQEFUFpiYWwCBQNQWjEFB2FkZHJlc3MEClBaMmJhbGFuY2UJAQVQWmJhbAIFA1BaMgUHYWRkcmVzcwQKUFozYmFsYW5jZQkBBVBaYmFsAgUDUFozBQdhZGRyZXNzBApQWjRiYWxhbmNlCQEFUFpiYWwCBQNQWjQFB2FkZHJlc3MEClBaNWJhbGFuY2UJAQVQWmJhbAIFA1BaNQUHYWRkcmVzcwQKUFo2YmFsYW5jZQkBBVBaYmFsAgUDUFo2BQdhZGRyZXNzBApXWDFiYWxhbmNlCQEFV1hiYWwDBQNXWDEFB2FkZHJlc3MFA0xQMQQKV1gyYmFsYW5jZQkBBVdYYmFsAwUDV1gyBQdhZGRyZXNzBQNMUDIEBXRvdGFsCQBkAgkAZAIJAGQCCQBkAgkAZAIJAGQCCQBkAgkAZAIFDmJ1cm54dG5CYWxhbmNlBQpQWjFiYWxhbmNlBQpQWjJiYWxhbmNlBQpQWjNiYWxhbmNlBQpQWjRiYWxhbmNlBQpQWjViYWxhbmNlBQpQWjZiYWxhbmNlBQpXWDFiYWxhbmNlBQpXWDJiYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAg5idXJueHRuQmFsYW5jZQUOYnVybnh0bkJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICClBaMWJhbGFuY2UFClBaMWJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICClBaMmJhbGFuY2UFClBaMmJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICClBaM2JhbGFuY2UFClBaM2JhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICClBaNGJhbGFuY2UFClBaNGJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICClBaNWJhbGFuY2UFClBaNWJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICClBaNmJhbGFuY2UFClBaNmJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICCldYMWJhbGFuY2UFCldYMWJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICCldYMmJhbGFuY2UFCldYMmJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQICBXRvdGFsBQV0b3RhbAUDbmlsBQFpAQhyZWdpc3RlcgADCQEIY29udGFpbnMCCQEMdHJ5R2V0U3RyaW5nAgUEdGhpcwISQWRkcmVzcyByZWdpc3RlcmVkCQClCAEIBQFpBmNhbGxlcgkAAgECEmFscmVhZHkgcmVnaXN0ZXJlZAMJAGYCBQZoZWlnaHQAAQkAAgECE3JlZ2lzdHJhdGlvbiBjbG9zZWQJAMwIAgkBDEludGVnZXJFbnRyeQICEUFtb3VudCBSZWdpc3RlcmVkCQBkAgkBDXRyeUdldEludGVnZXICBQR0aGlzAhFBbW91bnQgUmVnaXN0ZXJlZAABCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgISUmVnaXN0ZXIgYWRkcmVzczogCQCkAwEJAGQCCQENdHJ5R2V0SW50ZWdlcgIFBHRoaXMCEUFtb3VudCBSZWdpc3RlcmVkAAEJAKUIAQgFAWkGY2FsbGVyCQDMCAIJAQtTdHJpbmdFbnRyeQICEkFkZHJlc3MgcmVnaXN0ZXJlZAkArAICCQCsAgIJAQx0cnlHZXRTdHJpbmcCBQR0aGlzAhJBZGRyZXNzIHJlZ2lzdGVyZWQJAKUIAQgFAWkGY2FsbGVyAgEsBQNuaWwBaQEIbWFrZUxpc3QABAlhZGRyZXNzZXMJALMCAgkBDHRyeUdldFN0cmluZwIFBHRoaXMCEkFkZHJlc3MgcmVnaXN0ZXJlZAABBARsaXN0CQC1CQIFCWFkZHJlc3NlcwIBLAQIbGlzdFNpemUJAJADAQUEbGlzdAoBAWYCBWFjY3VtB2FkZHJlc3MDCQBmAgkAaAIAAwUCZDgICQDvBwEJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB2FkZHJlc3MJYXZhaWxhYmxlBQNuaWwJAM4IAgUFYWNjdW0JAMwIAgkBDEludGVnZXJFbnRyeQIFB2FkZHJlc3MICQDvBwEJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB2FkZHJlc3MJYXZhaWxhYmxlBQNuaWwEDWVudGVySW50ZWdlcnMKAAIkbAUEbGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEBZgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQJAM4IAgUDbmlsBQ1lbnRlckludGVnZXJzAWkBEnRvdGFsQmFsYW5jZUNhbGxlcgAJAM4IAgUDbmlsCQEMdG90YWxCYWxhbmNlAQgFAWkGY2FsbGVyAWkBE3RvdGFsQmFsYW5jZUFkZHJlc3MBB2FkZHJlc3MJAM4IAgUDbmlsCQEMdG90YWxCYWxhbmNlAQkBBXZhbHVlAQkApggBBQdhZGRyZXNzAWkBCHRyYW5zZmVyAQlhZGRyZXNzZXMEB2Fzc2V0SWQICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAQGYW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQQYW1vdW50UGVyQWRkcmVzcwkAaQIFBmFtb3VudAkAkAMBBQlhZGRyZXNzZXMKAQFmAgVhY2N1bQdhZGRyZXNzCQDOCAIFBWFjY3VtCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB2FkZHJlc3MFEGFtb3VudFBlckFkZHJlc3MFB2Fzc2V0SWQFA25pbAoAAiRsBQlhZGRyZXNzZXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBAWYCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkAI9R/Gs=",
    "height": 2837071,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: E7M9R9qmhBAPGh1Pb4msHu85YJPUkVfubrVdb5UVsxSb
Next: EaDf88YUqoRXULMj1nWorGbq8gaiVpiV4H3JcYeFzwkZ

Diff: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
+
let d8 = 100000000
5
+
4
6
 
func tryGetInteger (address,key) = match getInteger(address, key) {
5
7
 
    case b: Int => 
6
8
 
        b
86
88
 
    let addresses = dropRight(tryGetString(this, "Address registered"), 1)
87
89
 
    let list = split(addresses, ",")
88
90
 
    let listSize = size(list)
89
-
    let firstOfList = list[0]
90
-
    let lastOfList = list[(listSize - 1)]
91
-
    let address1 = value(addressFromString(firstOfList))
92
-
    let balance1 = wavesBalance(address1).available
93
-
    func f (accum,address) =     (accum ++ [IntegerEntry(address, wavesBalance(addressFromStringValue(address)).available)])
91
+
    func f (accum,address) =     if (((3 * d8) > wavesBalance(addressFromStringValue(address)).available))
92
+
        then nil
93
+
        else (accum ++ [IntegerEntry(address, wavesBalance(addressFromStringValue(address)).available)])
94
94
 
95
95
 
    let enterIntegers = {
96
96
 
        let $l = list
106
106
 
107
107
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
108
108
 
        }
109
-
    ([StringEntry("addresses", addresses), IntegerEntry("listSize", listSize), StringEntry("firstOfList", firstOfList), StringEntry("lastOfList", lastOfList)] ++ enterIntegers)
109
+
    (nil ++ enterIntegers)
110
110
 
    }
111
111
 
112
112
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
+
let d8 = 100000000
5
+
4
6
 
func tryGetInteger (address,key) = match getInteger(address, key) {
5
7
 
    case b: Int => 
6
8
 
        b
7
9
 
    case _ => 
8
10
 
        0
9
11
 
}
10
12
 
11
13
 
12
14
 
func tryGetString (address,key) = match getString(address, key) {
13
15
 
    case b: String => 
14
16
 
        b
15
17
 
    case _ => 
16
18
 
        ""
17
19
 
}
18
20
 
19
21
 
20
22
 
let burnxtn = base58'3SjxA2YLdfF9fTRbzLm9xFn27C6MW34W1YsdJ6Axefns'
21
23
 
22
24
 
let PZ1 = base58'3PE7NtJdmVq4yo47LKDqurQ8RLDCouvJCPB'
23
25
 
24
26
 
let PZ2 = base58'3PQHndCUVrv3wBuQjbvVP9SnGmfbfitGxfx'
25
27
 
26
28
 
let PZ3 = base58'3PBiMQLnX8wd4bssXCgF8KuUqHv1H4zWHGi'
27
29
 
28
30
 
let PZ4 = base58'3PDJPGn6vBEBqWN4E3fNcxoKBoDXbsmoaM7'
29
31
 
30
32
 
let PZ5 = base58'3PCS1xhGQi2eM5mYcCBhUSHvB31Kk5gZoCm'
31
33
 
32
34
 
let PZ6 = base58'3P8Quvmgt3VEWAjBR3bsfgCqzUh7zTmTC4q'
33
35
 
34
36
 
let WXstake = base58'3PPNhHYkkEy13gRWDCaruQyhNbX2GrjYSyV'
35
37
 
36
38
 
let WX1 = base58'3P5vwLbXddLWpsRspftMxLuzfsjk3dLT3n5'
37
39
 
38
40
 
let LP1 = "GyiHdcN59sZ46baFvj68ruLngrTPEvWDtsd6jHm4o46n"
39
41
 
40
42
 
let WX2 = base58'3PKXseWa31VUSWUvm2YiRKxW2VM9RsVk3ry'
41
43
 
42
44
 
let LP2 = "3MPHMJVwYGyeBLRsH1RsYhrTmemv752AEBwuFFV7g49Z"
43
45
 
44
46
 
func PZbal (Pooladdress,address) = {
45
47
 
    let burnxtnInPZ = tryGetInteger(Address(Pooladdress), (("global_" + toBase58String(burnxtn)) + "_balance"))
46
48
 
    let addressStakePZ = tryGetInteger(Address(Pooladdress), (toString(address) + "_indexStaked"))
47
49
 
    let totalStakePZ = tryGetInteger(Address(Pooladdress), "global_poolToken_amount")
48
50
 
    fraction(burnxtnInPZ, addressStakePZ, totalStakePZ)
49
51
 
    }
50
52
 
51
53
 
52
54
 
func WXbal (Pooladdress,address,LPstr) = {
53
55
 
    let burnxtnInWX = assetBalance(Address(Pooladdress), burnxtn)
54
56
 
    let addressStakeWX = tryGetInteger(Address(WXstake), ((("%s%s%s__staked__" + toString(address)) + "__") + LPstr))
55
57
 
    let totalStakeWX = tryGetInteger(Address(WXstake), ("%s%s%s__staked__total__" + LPstr))
56
58
 
    fraction(burnxtnInWX, addressStakeWX, totalStakeWX)
57
59
 
    }
58
60
 
59
61
 
60
62
 
func totalBalance (address) = {
61
63
 
    let burnxtnBalance = assetBalance(address, burnxtn)
62
64
 
    let PZ1balance = PZbal(PZ1, address)
63
65
 
    let PZ2balance = PZbal(PZ2, address)
64
66
 
    let PZ3balance = PZbal(PZ3, address)
65
67
 
    let PZ4balance = PZbal(PZ4, address)
66
68
 
    let PZ5balance = PZbal(PZ5, address)
67
69
 
    let PZ6balance = PZbal(PZ6, address)
68
70
 
    let WX1balance = WXbal(WX1, address, LP1)
69
71
 
    let WX2balance = WXbal(WX2, address, LP2)
70
72
 
    let total = ((((((((burnxtnBalance + PZ1balance) + PZ2balance) + PZ3balance) + PZ4balance) + PZ5balance) + PZ6balance) + WX1balance) + WX2balance)
71
73
 
[IntegerEntry("burnxtnBalance", burnxtnBalance), IntegerEntry("PZ1balance", PZ1balance), IntegerEntry("PZ2balance", PZ2balance), IntegerEntry("PZ3balance", PZ3balance), IntegerEntry("PZ4balance", PZ4balance), IntegerEntry("PZ5balance", PZ5balance), IntegerEntry("PZ6balance", PZ6balance), IntegerEntry("WX1balance", WX1balance), IntegerEntry("WX2balance", WX2balance), IntegerEntry("total", total)]
72
74
 
    }
73
75
 
74
76
 
75
77
 
@Callable(i)
76
78
 
func register () = if (contains(tryGetString(this, "Address registered"), toString(i.caller)))
77
79
 
    then throw("already registered")
78
80
 
    else if ((height > 1))
79
81
 
        then throw("registration closed")
80
82
 
        else [IntegerEntry("Amount Registered", (tryGetInteger(this, "Amount Registered") + 1)), StringEntry(("Register address: " + toString((tryGetInteger(this, "Amount Registered") + 1))), toString(i.caller)), StringEntry("Address registered", ((tryGetString(this, "Address registered") + toString(i.caller)) + ","))]
81
83
 
82
84
 
83
85
 
84
86
 
@Callable(i)
85
87
 
func makeList () = {
86
88
 
    let addresses = dropRight(tryGetString(this, "Address registered"), 1)
87
89
 
    let list = split(addresses, ",")
88
90
 
    let listSize = size(list)
89
-
    let firstOfList = list[0]
90
-
    let lastOfList = list[(listSize - 1)]
91
-
    let address1 = value(addressFromString(firstOfList))
92
-
    let balance1 = wavesBalance(address1).available
93
-
    func f (accum,address) =     (accum ++ [IntegerEntry(address, wavesBalance(addressFromStringValue(address)).available)])
91
+
    func f (accum,address) =     if (((3 * d8) > wavesBalance(addressFromStringValue(address)).available))
92
+
        then nil
93
+
        else (accum ++ [IntegerEntry(address, wavesBalance(addressFromStringValue(address)).available)])
94
94
 
95
95
 
    let enterIntegers = {
96
96
 
        let $l = list
97
97
 
        let $s = size($l)
98
98
 
        let $acc0 = nil
99
99
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
100
100
 
            then $a
101
101
 
            else f($a, $l[$i])
102
102
 
103
103
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
104
104
 
            then $a
105
105
 
            else throw("List size exceeds 100")
106
106
 
107
107
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
108
108
 
        }
109
-
    ([StringEntry("addresses", addresses), IntegerEntry("listSize", listSize), StringEntry("firstOfList", firstOfList), StringEntry("lastOfList", lastOfList)] ++ enterIntegers)
109
+
    (nil ++ enterIntegers)
110
110
 
    }
111
111
 
112
112
 
113
113
 
114
114
 
@Callable(i)
115
115
 
func totalBalanceCaller () = (nil ++ totalBalance(i.caller))
116
116
 
117
117
 
118
118
 
119
119
 
@Callable(i)
120
120
 
func totalBalanceAddress (address) = (nil ++ totalBalance(value(addressFromString(address))))
121
121
 
122
122
 
123
123
 
124
124
 
@Callable(i)
125
125
 
func transfer (addresses) = {
126
126
 
    let assetId = i.payments[0].assetId
127
127
 
    let amount = i.payments[0].amount
128
128
 
    let amountPerAddress = (amount / size(addresses))
129
129
 
    func f (accum,address) =     (accum ++ [ScriptTransfer(addressFromStringValue(address), amountPerAddress, assetId)])
130
130
 
131
131
 
    let $l = addresses
132
132
 
    let $s = size($l)
133
133
 
    let $acc0 = nil
134
134
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
135
135
 
        then $a
136
136
 
        else f($a, $l[$i])
137
137
 
138
138
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
139
139
 
        then $a
140
140
 
        else throw("List size exceeds 100")
141
141
 
142
142
 
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
143
143
 
    }
144
144
 
145
145
 

github/deemru/w8io/026f985 
32.80 ms ◑