tx · 6Tax1QssHCw6M1TVopG9uyakXtHHoBCSaXKqUPDvkdhx

3N4Cinou7W65jPtxbCQfkWvoufpE7EtDxEi:  -0.01800000 Waves

2022.03.02 07:03 [1945849] smart account 3N4Cinou7W65jPtxbCQfkWvoufpE7EtDxEi > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "6Tax1QssHCw6M1TVopG9uyakXtHHoBCSaXKqUPDvkdhx",
    "fee": 1800000,
    "feeAssetId": null,
    "timestamp": 1646193857215,
    "version": 2,
    "chainId": 84,
    "sender": "3N4Cinou7W65jPtxbCQfkWvoufpE7EtDxEi",
    "senderPublicKey": "9LwVd54LSaLqmYkBabSayYmCmRWHb32zKseLNJeKhaLD",
    "proofs": [
        "661dsgNRhhtZRKUHUCwJA2E4UQBM31hpD24TsYsUZwJwtv15EDcwz632ytnejkaaivhZC6gYtXDyqgZCjqWy5J9U"
    ],
    "script": "base64:AAIEAAAAAAAAAAgIAhIECgIICAAAAAcAAAAAEGtleVBvb2xzTGlzdE5hbWUCAAAABXBvb2xzAAAAABFrZXlQcmVmaXhQb29sTmFtZQIAAAAFcG9vbF8AAAAAEmtleVByZWZpeFBvb2xJbmRleAIAAAAGaW5kZXhfAAAAAAVwb29scwQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAABBrZXlQb29sc0xpc3ROYW1lAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAABnN0cmluZwUAAAAHJG1hdGNoMAkABLUAAAACBQAAAAZzdHJpbmcCAAAAASwEAAAAB25vdGhpbmcFAAAAByRtYXRjaDAFAAAAA25pbAEAAAAKaXNTZWxmQ2FsbAAAAAEAAAABaQMJAAAAAAAAAggFAAAAAWkAAAAGY2FsbGVyBQAAAAR0aGlzBQAAAAR1bml0CQAAAgAAAAECAAAAL09ubHkgdGhlIE9yYWNsZSBpdHNlbGYgY2FuIGludm9rZSB0aGlzIGZ1bmN0aW9uAQAAABJnZXRQb29sTmFtZUlmVmFsaWQAAAABAAAACHBvb2xOYW1lBAAAAA91bmRlcnNjb3JlSW5kZXgJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAASzAAAAAgUAAAAIcG9vbE5hbWUCAAAAAV8A//////////8EAAAAE3VuZGVyc2NvcmVMYXN0SW5kZXgJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAS3AAAAAgUAAAAIcG9vbE5hbWUCAAAAAV8A//////////8EAAAAE2hhc1NpbmdsZVVuZGVyc2NvcmUDAwkAAAAAAAACBQAAAA91bmRlcnNjb3JlSW5kZXgFAAAAE3VuZGVyc2NvcmVMYXN0SW5kZXgJAABmAAAAAgUAAAAPdW5kZXJzY29yZUluZGV4AAAAAAAAAAAABwkBAAAAAiE9AAAAAgUAAAAPdW5kZXJzY29yZUluZGV4CQAAZQAAAAIJAAExAAAAAQUAAAAIcG9vbE5hbWUAAAAAAAAAAAEHAwUAAAATaGFzU2luZ2xlVW5kZXJzY29yZQUAAAAIcG9vbE5hbWUJAAACAAAAAQIAAABOUG9vbCBuYW1lIG11c3QgY29uc2lzdCBvZiB0d28gYXNzZXQgbmFtZXMgc2VwYXJhdGVkIGJ5IGFuIHVuZGVyc2NvcmUgY2hhcmFjdGVyAQAAABFnZXRBZGRyZXNzSWZWYWxpZAAAAAEAAAAHYWRkcmVzcwkABCUAAAABCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQmAAAAAQUAAAAHYWRkcmVzcwkAASwAAAACCQABLAAAAAICAAAADUNhbid0IHBhcnNlICIFAAAAB2FkZHJlc3MCAAAADCIgYXMgYWRkcmVzcwAAAAEAAAABaQEAAAAHYWRkUG9vbAAAAAIAAAALcG9vbEFkZHJlc3MAAAAIcG9vbE5hbWUJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAQAAAAppc1NlbGZDYWxsAAAAAQUAAAABaQQAAAAQdmFsaWRhdGVkQWRkcmVzcwkBAAAAEWdldEFkZHJlc3NJZlZhbGlkAAAAAQUAAAALcG9vbEFkZHJlc3MEAAAAB2tleU5hbWUJAAEsAAAAAgUAAAARa2V5UHJlZml4UG9vbE5hbWUFAAAAEHZhbGlkYXRlZEFkZHJlc3MEAAAACGtleUluZGV4CQABLAAAAAIFAAAAEmtleVByZWZpeFBvb2xJbmRleAUAAAAQdmFsaWRhdGVkQWRkcmVzcwQAAAAYcG9zc2libHlBbHJlYWR5QWRkZWRQb29sCQAEHQAAAAIFAAAABHRoaXMFAAAAB2tleU5hbWUDCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAAYcG9zc2libHlBbHJlYWR5QWRkZWRQb29sCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAATUG9vbCB3aXRoIGFkZHJlc3MgIgUAAAAQdmFsaWRhdGVkQWRkcmVzcwIAAAAgIiBpcyBhbHJlYWR5IGRlZmluZWQgd2l0aCBuYW1lICIJAQAAAAV2YWx1ZQAAAAEFAAAAGHBvc3NpYmx5QWxyZWFkeUFkZGVkUG9vbAIAAAABIgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAIa2V5SW5kZXgJAAGQAAAAAQUAAAAFcG9vbHMJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAHa2V5TmFtZQkBAAAAEmdldFBvb2xOYW1lSWZWYWxpZAAAAAEFAAAACHBvb2xOYW1lCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAEGtleVBvb2xzTGlzdE5hbWUJAAS5AAAAAgkABE0AAAACBQAAAAVwb29scwUAAAAQdmFsaWRhdGVkQWRkcmVzcwIAAAABLAUAAAADbmlsAAAAAIHEMAE=",
    "height": 1945849,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: HpKSdFS7iTCjUGMJgR89xsY8cpi4hd6azAsjJmHHEFzR
Next: 6uBys4rvihK3X8h8YPUEAVKdF37Fnd67RtH5NgmhCieW

Full: 
Old
New
Differences
1
-
{-# STDLIB_VERSION 5 #-}
1
+
{-# STDLIB_VERSION 4 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
+
let keyPoolsListName = "pools"
5
+
6
+
let keyPrefixPoolName = "pool_"
7
+
8
+
let keyPrefixPoolIndex = "index_"
9
+
10
+
let pools = match getString(this, keyPoolsListName) {
11
+
    case string: String => 
12
+
        split(string, ",")
13
+
    case nothing => 
14
+
        nil
15
+
}
16
+
17
+
func isSelfCall (i) = if ((i.caller == this))
18
+
    then unit
19
+
    else throw("Only the Oracle itself can invoke this function")
20
+
21
+
22
+
func getPoolNameIfValid (poolName) = {
23
+
    let underscoreIndex = valueOrElse(indexOf(poolName, "_"), -1)
24
+
    let underscoreLastIndex = valueOrElse(lastIndexOf(poolName, "_"), -1)
25
+
    let hasSingleUnderscore = if (if ((underscoreIndex == underscoreLastIndex))
26
+
        then (underscoreIndex > 0)
27
+
        else false)
28
+
        then (underscoreIndex != (size(poolName) - 1))
29
+
        else false
30
+
    if (hasSingleUnderscore)
31
+
        then poolName
32
+
        else throw("Pool name must consist of two asset names separated by an underscore character")
33
+
    }
34
+
35
+
36
+
func getAddressIfValid (address) = toString(valueOrErrorMessage(addressFromString(address), (("Can't parse \"" + address) + "\" as address")))
4
37
 
5
38
 
6
39
 
@Callable(i)
7
-
func call () = {
8
-
    let rounds = "110_130_150"
9
-
    let startBlock = 130
10
-
    let testValue = value(indexOf("Apple", "e"))
11
-
    let previousRounds = dropRight(rounds, ((size(rounds) + 1) - value(indexOf(rounds, toString(startBlock)))))
12
-
    let theIndexOfTheClosestRound = if ((valueOrElse(lastIndexOf(previousRounds, "_"), 0) != 0))
13
-
        then (value(lastIndexOf(previousRounds, "_")) + 1)
14
-
        else 0
15
-
    let closestRound = drop(previousRounds, theIndexOfTheClosestRound)
16
-
    $Tuple2([IntegerEntry("first", (size(rounds) + 1)), IntegerEntry("testValue", testValue), IntegerEntry("next", value(indexOf(rounds, toString(startBlock)))), StringEntry("previousRounds", previousRounds), IntegerEntry("theIndexOfTheClosestRound", theIndexOfTheClosestRound), StringEntry("closestRound", closestRound)], unit)
17
-
    }
40
+
func addPool (poolAddress,poolName) = valueOrElse(isSelfCall(i), {
41
+
    let validatedAddress = getAddressIfValid(poolAddress)
42
+
    let keyName = (keyPrefixPoolName + validatedAddress)
43
+
    let keyIndex = (keyPrefixPoolIndex + validatedAddress)
44
+
    let possiblyAlreadyAddedPool = getString(this, keyName)
45
+
    if (isDefined(possiblyAlreadyAddedPool))
46
+
        then throw((((("Pool with address \"" + validatedAddress) + "\" is already defined with name \"") + value(possiblyAlreadyAddedPool)) + "\""))
47
+
        else [IntegerEntry(keyIndex, size(pools)), StringEntry(keyName, getPoolNameIfValid(poolName)), StringEntry(keyPoolsListName, makeString((pools :+ validatedAddress), ","))]
48
+
    })
18
49
 
19
-
20
-
@Verifier(tx)
21
-
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
22
50
 

github/deemru/w8io/c3f4982 
22.60 ms ◑