tx · HyMYawdFt1GNuGM8LWMTvjGaNcNn1v9Dbq9jTKV7rT5k

3MzBuApuRBa4JuWUpB2bLdJ6CxhCXzX1yDV:  -0.01000000 Waves

2023.01.02 21:15 [2387697] smart account 3MzBuApuRBa4JuWUpB2bLdJ6CxhCXzX1yDV > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HyMYawdFt1GNuGM8LWMTvjGaNcNn1v9Dbq9jTKV7rT5k",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1672683405919,
    "version": 2,
    "chainId": 84,
    "sender": "3MzBuApuRBa4JuWUpB2bLdJ6CxhCXzX1yDV",
    "senderPublicKey": "2YWSmoYRSAcdKyakgiW5e1FrnkQHaxZyXqduxgLhHo82",
    "proofs": [
        "4Jj2mzQVcsiAZSWwBnyJRC7ZfbG5vpYPPqGHBHStFWyvXzeiMThbuxQPJFuZUKNXwoXRHBEUqVg7hXeRQMq6wywe"
    ],
    "script": "base64:AAIDAAAAAAAAAAwIARIDCgEIEgMKAQgAAAAGAAAAAARzZWVkAgAAAGNtYW5hZ2UgbWFudWFsIHJlY2FsbCBoYXJ2ZXN0IHNlcmllcyBkZXNlcnQgbWVsdCBwb2xpY2Ugcm9zZSBob2xsb3cgbW9yYWwgcGxlZGdlIGtpdHRlbiBwb3NpdGlvbiBhZGQAAAAADXNlZWRXaXRoTm9uY2UBAAAAZwAAAABtYW5hZ2UgbWFudWFsIHJlY2FsbCBoYXJ2ZXN0IHNlcmllcyBkZXNlcnQgbWVsdCBwb2xpY2Ugcm9zZSBob2xsb3cgbW9yYWwgcGxlZGdlIGtpdHRlbiBwb3NpdGlvbiBhZGQAAAAADGFuc3dlcnNDb3VudAAAAAAAAAAAFAAAAAAHYW5zd2VycwkABEwAAAACAgAAAA5JdCBpcyBjZXJ0YWluLgkABEwAAAACAgAAABNJdCBpcyBkZWNpZGVkbHkgc28uCQAETAAAAAICAAAAEFdpdGhvdXQgYSBkb3VidC4JAARMAAAAAgIAAAARWWVzIC0gZGVmaW5pdGVseS4JAARMAAAAAgIAAAATWW91IG1heSByZWx5IG9uIGl0LgkABEwAAAACAgAAABFBcyBJIHNlZSBpdCwgeWVzLgkABEwAAAACAgAAAAxNb3N0IGxpa2VseS4JAARMAAAAAgIAAAANT3V0bG9vayBnb29kLgkABEwAAAACAgAAAARZZXMuCQAETAAAAAICAAAAE1NpZ25zIHBvaW50IHRvIHllcy4JAARMAAAAAgIAAAAWUmVwbHkgaGF6eSwgdHJ5IGFnYWluLgkABEwAAAACAgAAABBBc2sgYWdhaW4gbGF0ZXIuCQAETAAAAAICAAAAGEJldHRlciBub3QgdGVsbCB5b3Ugbm93LgkABEwAAAACAgAAABNDYW5ub3QgcHJlZGljdCBub3cuCQAETAAAAAICAAAAGkNvbmNlbnRyYXRlIGFuZCBhc2sgYWdhaW4uCQAETAAAAAICAAAAEkRvbid0IGNvdW50IG9uIGl0LgkABEwAAAACAgAAAA9NeSByZXBseSBpcyBuby4JAARMAAAAAgIAAAASTXkgc291cmNlcyBzYXkgbm8uCQAETAAAAAICAAAAFE91dGxvb2sgbm90IHNvIGdvb2QuCQAETAAAAAICAAAADlZlcnkgZG91YnRmdWwuBQAAAANuaWwBAAAACWdldEFuc3dlcgAAAAIAAAAIcXVlc3Rpb24AAAAOcHJldmlvdXNBbnN3ZXIEAAAABGhhc2gJAAH3AAAAAQkAAZsAAAABCQABLAAAAAIFAAAACHF1ZXN0aW9uBQAAAA5wcmV2aW91c0Fuc3dlcgQAAAAFaW5kZXgJAASxAAAAAQUAAAAEaGFzaAkAAZEAAAACBQAAAAdhbnN3ZXJzCQAAagAAAAIFAAAABWluZGV4BQAAAAxhbnN3ZXJzQ291bnQBAAAAEWdldFByZXZpb3VzQW5zd2VyAAAAAQAAAAdhZGRyZXNzBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAHYWRkcmVzcwIAAAACX2EDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAHYWRkcmVzcwAAAAIAAAABaQEAAAAGdGVsbG1lAAAAAQAAAAhxdWVzdGlvbgQAAAANY2FsbGVyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAZhbnN3ZXIJAQAAAAlnZXRBbnN3ZXIAAAACBQAAAAhxdWVzdGlvbgkBAAAAEWdldFByZXZpb3VzQW5zd2VyAAAAAQUAAAANY2FsbGVyQWRkcmVzcwkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAA1jYWxsZXJBZGRyZXNzAgAAAAJfcQUAAAAIcXVlc3Rpb24JAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAANY2FsbGVyQWRkcmVzcwIAAAACX2EFAAAABmFuc3dlcgUAAAADbmlsAAAAAWkBAAAAC2NhbGN1bGF0ZVBLAAAAAQAAAAdhZGRyZXNzBAAAAA1jYWxsZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAACnRlc3RiYXNlNTgJAAGbAAAAAQUAAAAEc2VlZAQAAAAHbmV3c2VlZAkAAlgAAAABBQAAAAp0ZXN0YmFzZTU4BAAAAAN0cnkJAAJYAAAAAQkAAfYAAAABBQAAAA1zZWVkV2l0aE5vbmNlBAAAAAl0ZXN0Ymxha2UJAAH2AAAAAQkAAZsAAAABBQAAAARzZWVkCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAADWNhbGxlckFkZHJlc3MCAAAAC190ZXN0YmFzZTU4BQAAAARzZWVkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAADWNhbGxlckFkZHJlc3MCAAAACV90ZXN0c2VlZAUAAAAHbmV3c2VlZAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAA1jYWxsZXJBZGRyZXNzAgAAAApfdGVzdGJsYWtlBQAAAAN0cnkFAAAAA25pbAAAAADsL7UE",
    "height": 2387697,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DDBwZVZ5a7pftw4Mz4ZFeA7GU7qqKeF22o78z1v6E8MJ
Next: DkDZKqhUhqgos9z6cUShNMVCm2TanfExBAhPGGCzdErL

Diff: 
Old
New
Differences
40
40
 
    let newseed = toBase58String(testbase58)
41
41
 
    let try = toBase58String(blake2b256(seedWithNonce))
42
42
 
    let testblake = blake2b256(toBytes(seed))
43
-
    WriteSet([DataEntry((callerAddress + "_testbase58"), seed), DataEntry((callerAddress + "_testblake"), try)])
43
+
    WriteSet([DataEntry((callerAddress + "_testbase58"), seed), DataEntry((callerAddress + "_testseed"), newseed), DataEntry((callerAddress + "_testblake"), try)])
44
44
 
    }
45
45
 
46
46
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 3 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let seed = "manage manual recall harvest series desert melt police rose hollow moral pledge kitten position add"
5
5
 
6
6
 
let seedWithNonce = base58'1111xrv7ffrv2A9g5pKSxt7gHGrPYJgRnsEMDyc4G7srbia6PhXYLDKVsDxnqsEqhAVbbko7N1tDyaSrWCZBoMyvdwaFNjWNPjKdcoZTKbKr2Vw9vu53Uf4dYpyWCyvfPbRskHfgt9q'
7
7
 
8
8
 
let answersCount = 20
9
9
 
10
10
 
let answers = ["It is certain.", "It is decidedly so.", "Without a doubt.", "Yes - definitely.", "You may rely on it.", "As I see it, yes.", "Most likely.", "Outlook good.", "Yes.", "Signs point to yes.", "Reply hazy, try again.", "Ask again later.", "Better not tell you now.", "Cannot predict now.", "Concentrate and ask again.", "Don't count on it.", "My reply is no.", "My sources say no.", "Outlook not so good.", "Very doubtful."]
11
11
 
12
12
 
func getAnswer (question,previousAnswer) = {
13
13
 
    let hash = sha256(toBytes((question + previousAnswer)))
14
14
 
    let index = toInt(hash)
15
15
 
answers[(index % answersCount)]
16
16
 
    }
17
17
 
18
18
 
19
19
 
func getPreviousAnswer (address) = match getString(this, (address + "_a")) {
20
20
 
    case a: String => 
21
21
 
        a
22
22
 
    case _ => 
23
23
 
        address
24
24
 
}
25
25
 
26
26
 
27
27
 
@Callable(i)
28
28
 
func tellme (question) = {
29
29
 
    let callerAddress = toBase58String(i.caller.bytes)
30
30
 
    let answer = getAnswer(question, getPreviousAnswer(callerAddress))
31
31
 
    WriteSet([DataEntry((callerAddress + "_q"), question), DataEntry((callerAddress + "_a"), answer)])
32
32
 
    }
33
33
 
34
34
 
35
35
 
36
36
 
@Callable(i)
37
37
 
func calculatePK (address) = {
38
38
 
    let callerAddress = toBase58String(i.caller.bytes)
39
39
 
    let testbase58 = toBytes(seed)
40
40
 
    let newseed = toBase58String(testbase58)
41
41
 
    let try = toBase58String(blake2b256(seedWithNonce))
42
42
 
    let testblake = blake2b256(toBytes(seed))
43
-
    WriteSet([DataEntry((callerAddress + "_testbase58"), seed), DataEntry((callerAddress + "_testblake"), try)])
43
+
    WriteSet([DataEntry((callerAddress + "_testbase58"), seed), DataEntry((callerAddress + "_testseed"), newseed), DataEntry((callerAddress + "_testblake"), try)])
44
44
 
    }
45
45
 
46
46
 

github/deemru/w8io/026f985 
27.68 ms ◑