tx · 9YhdhF59bKVXCBEFwTYseRGCbc2h46RGpakR82MWURs9

3N3evGP2tTeuXuq3iHz13Wrjm7BonuiSMd2:  -0.05000000 Waves

2022.12.22 14:37 [2371448] smart account 3N3evGP2tTeuXuq3iHz13Wrjm7BonuiSMd2 > SELF 0.00000000 Waves

{ "type": 13, "id": "9YhdhF59bKVXCBEFwTYseRGCbc2h46RGpakR82MWURs9", "fee": 5000000, "feeAssetId": null, "timestamp": 1671709059933, "version": 2, "chainId": 84, "sender": "3N3evGP2tTeuXuq3iHz13Wrjm7BonuiSMd2", "senderPublicKey": "3XEAduJnZeFRL74JfaQk7MgrGDo9a9xREYyfLvyivREU", "proofs": [ "pEj2UqZCq3t9iLtEPxcRq2TPoF4hmah7btfrdWSMxDpEki6W4bXp2mPi5U38WoGbFMgx6iRPAW5GMWVUJacWgBj" ], "script": "base64:BgIRCAISAwoBCBIDCgEIEgMKAQgGAA9NRVNTQUdFX0NPVU5URVICD21lc3NhZ2VfY291bnRlcgANRk9MTE9XX1NUUklORwIHZm9sbG93cwAQVFdFRVRfS0VZX1NUUklORwIGdHdlZXRfARFnZXRNZXNzYWdlQ291bnRlcgAJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUPTUVTU0FHRV9DT1VOVEVSAAABKWdldExhdGVzdFR3ZWV0SWZGcm9tU29tZW9uZUFkZHJlc3NGb2xsb3dzAgVhY2N1bQZvZmZzZXQEB2FkZHJlc3MCIzNNdVN2eHpmenFMVERQcTFqNW1USHdLNXRMeDVDaERjUU1pBA5tZXNzYWdlQ291bnRlcgkBEWdldE1lc3NhZ2VDb3VudGVyAAQHdHdlZXRJZAkBC3ZhbHVlT3JFbHNlAgkAoggBCQCsAgIFEFRXRUVUX0tFWV9TVFJJTkcJAKQDAQkAZQIFDm1lc3NhZ2VDb3VudGVyBQZvZmZzZXQCAAQFcGFydHMJALUJAgUHdHdlZXRJZAIBXwQGc2VuZGVyCQCRAwIFBXBhcnRzAAAEE2tleVRvQ2hlY2tGb2xsb3dpbmcJAKwCAgkArAICCQCsAgIJAKwCAgUHYWRkcmVzcwIBXwUNRk9MTE9XX1NUUklORwIBXwUGc2VuZGVyBAlmb2xsb3dpbmcJAQt2YWx1ZU9yRWxzZQIJAKAIAQUTa2V5VG9DaGVja0ZvbGxvd2luZwcDBQlmb2xsb3dpbmcJAM0IAgUFYWNjdW0JAKIIAQUHdHdlZXRJZAUFYWNjdW0BJWdldExhdGVzdFR3ZWV0c0Zyb21Gb2xsb3dpbmdBZGRyZXNzZXMBB2FkZHJlc3MEBGxpc3QJAMwIAgAACQDMCAIAAQkAzAgCAAIFA25pbAoAAiRsBQRsaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJASlnZXRMYXRlc3RUd2VldElmRnJvbVNvbWVvbmVBZGRyZXNzRm9sbG93cwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMwkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwMBaQEGZm9sbG93AQdhZGRyZXNzBAZzZW5kZXIJAKUIAQgFAWkGY2FsbGVyBAlmb2xsb3dLZXkJAKwCAgkArAICCQCsAgIJAKwCAgUGc2VuZGVyAgFfBQ1GT0xMT1dfU1RSSU5HAgFfBQdhZGRyZXNzCQDMCAIJAQxCb29sZWFuRW50cnkCBQlmb2xsb3dLZXkGBQNuaWwBaQEIdW5mb2xsb3cBB2FkZHJlc3MEBnNlbmRlcgkApQgBCAUBaQZjYWxsZXIECWZvbGxvd0tleQkArAICCQCsAgIJAKwCAgkArAICBQZzZW5kZXICAV8FDUZPTExPV19TVFJJTkcCAV8FB2FkZHJlc3MJAMwIAgkBC0RlbGV0ZUVudHJ5AQUJZm9sbG93S2V5BQNuaWwBaQEFdHdlZXQBB21lc3NhZ2UEDm1lc3NhZ2VDb3VudGVyCQBkAgkBEWdldE1lc3NhZ2VDb3VudGVyAAABBAZzZW5kZXIJAKUIAQgFAWkGY2FsbGVyBAR0eElkCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQEBm1zZ0tleQkArAICCQCsAgIFBnNlbmRlcgIBXwUEdHhJZAQIdHdlZXRLZXkJAKwCAgUQVFdFRVRfS0VZX1NUUklORwkApAMBBQ5tZXNzYWdlQ291bnRlcgkAzAgCCQELU3RyaW5nRW50cnkCBQZtc2dLZXkFB21lc3NhZ2UJAMwIAgkBC1N0cmluZ0VudHJ5AgUIdHdlZXRLZXkFBm1zZ0tleQkAzAgCCQEMSW50ZWdlckVudHJ5AgUPTUVTU0FHRV9DT1VOVEVSBQ5tZXNzYWdlQ291bnRlcgUDbmlsAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleTUXtsI=", "height": 2371448, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: G73z9UzfxhSayKNW6cqW12MYi1xjMQkjCHVeKz2VNw1W Next: 8RDBbqchKHDpMCkXTgXAKcs2CjwrDVh84iKKwqUy1RHn Diff:
OldNewDifferences
1010 func getMessageCounter () = valueOrElse(getInteger(MESSAGE_COUNTER), 0)
1111
1212
13-func getLatestTweetIfFromSomeoneAddressFollows (address,offset) = {
13+func getLatestTweetIfFromSomeoneAddressFollows (accum,offset) = {
14+ let address = "3MuSvxzfzqLTDPq1j5mTHwK5tLx5ChDcQMi"
1415 let messageCounter = getMessageCounter()
1516 let tweetId = valueOrElse(getString((TWEET_KEY_STRING + toString((messageCounter - offset)))), "")
1617 let parts = split(tweetId, "_")
1819 let keyToCheckFollowing = ((((address + "_") + FOLLOW_STRING) + "_") + sender)
1920 let following = valueOrElse(getBoolean(keyToCheckFollowing), false)
2021 if (following)
21- then getString(tweetId)
22- else ""
22+ then (accum :+ getString(tweetId))
23+ else accum
24+ }
25+
26+
27+func getLatestTweetsFromFollowingAddresses (address) = {
28+ let list = [0, 1, 2]
29+ let $l = list
30+ let $s = size($l)
31+ let $acc0 = nil
32+ func $f0_1 ($a,$i) = if (($i >= $s))
33+ then $a
34+ else getLatestTweetIfFromSomeoneAddressFollows($a, $l[$i])
35+
36+ func $f0_2 ($a,$i) = if (($i >= $s))
37+ then $a
38+ else throw("List size exceeds 3")
39+
40+ $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
2341 }
2442
2543
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let MESSAGE_COUNTER = "message_counter"
55
66 let FOLLOW_STRING = "follows"
77
88 let TWEET_KEY_STRING = "tweet_"
99
1010 func getMessageCounter () = valueOrElse(getInteger(MESSAGE_COUNTER), 0)
1111
1212
13-func getLatestTweetIfFromSomeoneAddressFollows (address,offset) = {
13+func getLatestTweetIfFromSomeoneAddressFollows (accum,offset) = {
14+ let address = "3MuSvxzfzqLTDPq1j5mTHwK5tLx5ChDcQMi"
1415 let messageCounter = getMessageCounter()
1516 let tweetId = valueOrElse(getString((TWEET_KEY_STRING + toString((messageCounter - offset)))), "")
1617 let parts = split(tweetId, "_")
1718 let sender = parts[0]
1819 let keyToCheckFollowing = ((((address + "_") + FOLLOW_STRING) + "_") + sender)
1920 let following = valueOrElse(getBoolean(keyToCheckFollowing), false)
2021 if (following)
21- then getString(tweetId)
22- else ""
22+ then (accum :+ getString(tweetId))
23+ else accum
24+ }
25+
26+
27+func getLatestTweetsFromFollowingAddresses (address) = {
28+ let list = [0, 1, 2]
29+ let $l = list
30+ let $s = size($l)
31+ let $acc0 = nil
32+ func $f0_1 ($a,$i) = if (($i >= $s))
33+ then $a
34+ else getLatestTweetIfFromSomeoneAddressFollows($a, $l[$i])
35+
36+ func $f0_2 ($a,$i) = if (($i >= $s))
37+ then $a
38+ else throw("List size exceeds 3")
39+
40+ $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
2341 }
2442
2543
2644 @Callable(i)
2745 func follow (address) = {
2846 let sender = toString(i.caller)
2947 let followKey = ((((sender + "_") + FOLLOW_STRING) + "_") + address)
3048 [BooleanEntry(followKey, true)]
3149 }
3250
3351
3452
3553 @Callable(i)
3654 func unfollow (address) = {
3755 let sender = toString(i.caller)
3856 let followKey = ((((sender + "_") + FOLLOW_STRING) + "_") + address)
3957 [DeleteEntry(followKey)]
4058 }
4159
4260
4361
4462 @Callable(i)
4563 func tweet (message) = {
4664 let messageCounter = (getMessageCounter() + 1)
4765 let sender = toString(i.caller)
4866 let txId = toBase58String(i.transactionId)
4967 let msgKey = ((sender + "_") + txId)
5068 let tweetKey = (TWEET_KEY_STRING + toString(messageCounter))
5169 [StringEntry(msgKey, message), StringEntry(tweetKey, msgKey), IntegerEntry(MESSAGE_COUNTER, messageCounter)]
5270 }
5371
5472
5573 @Verifier(tx)
5674 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
5775

github/deemru/w8io/873ac7e 
44.35 ms