tx · 4rRo4pETo5ohsQRmkpHb3C2ippV5oxsbQ5cYaC8DJvk1

3P9VVzzkP1Cfsk3LtTeuUaQqUt5D7sLthLe:  -0.01400000 Waves

2022.05.29 22:03 [3138862] smart account 3P9VVzzkP1Cfsk3LtTeuUaQqUt5D7sLthLe > SELF 0.00000000 Waves

{ "type": 13, "id": "4rRo4pETo5ohsQRmkpHb3C2ippV5oxsbQ5cYaC8DJvk1", "fee": 1400000, "feeAssetId": null, "timestamp": 1653851026602, "version": 2, "chainId": 87, "sender": "3P9VVzzkP1Cfsk3LtTeuUaQqUt5D7sLthLe", "senderPublicKey": "HiH9eknsCZ417kt2aJnJ9HrnrWCYcdRoGsFi8yANmYx8", "proofs": [ "5qTE8kxYdm77wbf9AWAup7JETCePJyYTGXm8HV3ot1dnRNWmZQFdR1RjfP2wT5ayz6ZwSsQZ37VpPJPiYMr1gopk" ], "script": "base64:AAIFAAAAAAAAAAgIAhIECgIBCAAAAAoAAAAAB3BsdXRvSWQBAAAAIAgLS31S8qASJW+T7s99SrIspsrLF1j9hxE9vHm2pxfdAAAAAApwbHV0b0lkU3RyAgAAACtZUUZZb013QVJNUXpaczN3cXVjQlRkSk5XU2JzWWszR0F3N3dzcVU0Z3lBAAAAABFwYXJhbWV0ZXJzQWRkcmVzcwkBAAAAB0FkZHJlc3MAAAABAQAAABoBV+7WJYtq2Ae0X0s1eNtV5rMlFw/bMdew9AAAAAANaXNzdWVyQWRkcmVzcwkBAAAAB0FkZHJlc3MAAAABAQAAABoBV5Da8Qa6EpviskTtonnWCUCOWpItluugFgAAAAAGU2NhbGU4AAAAAAAF9eEAAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQAAAANrZXkEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAXgFAAAAByRtYXRjaDAFAAAAAXgAAAAAAAAAAAABAAAAEnRyeUdldEludFBhcmFtZXRlcgAAAAEAAAADa2V5BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAAEXBhcmFtZXRlcnNBZGRyZXNzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABeAUAAAAHJG1hdGNoMAUAAAABeAAAAAAAAAAAAAEAAAASdHJ5R2V0U3RyUGFyYW1ldGVyAAAAAQAAAANrZXkEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAARcGFyYW1ldGVyc0FkZHJlc3MFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAF4BQAAAAckbWF0Y2gwBQAAAAF4AgAAAAABAAAAFWNhbGN1bGF0ZUJ1eWJhY2tSYXRpbwAAAAAEAAAADHRyZWFzdXJ5U2l6ZQkBAAAAEnRyeUdldEludFBhcmFtZXRlcgAAAAECAAAAEnN0YXRzX3RyZWFzdXJ5U2l6ZQAAAAAAAAATiAEAAAASY2FsY3VsYXRlUG9vbFByaWNlAAAAAgAAAAtwb29sQWRkcmVzcwAAAAhhc3NldFN0cgQAAAAIYTBXZWlnaHQJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAAC3Bvb2xBZGRyZXNzCQABLAAAAAIJAAEsAAAAAgIAAAAHc3RhdGljXwUAAAAIYXNzZXRTdHICAAAAB193ZWlnaHQEAAAACGExV2VpZ2h0CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAtwb29sQWRkcmVzcwkAASwAAAACCQABLAAAAAICAAAAB3N0YXRpY18FAAAACnBsdXRvSWRTdHICAAAAB193ZWlnaHQEAAAACWEwQmFsYW5jZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAALcG9vbEFkZHJlc3MJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfBQAAAAhhc3NldFN0cgIAAAAIX2JhbGFuY2UEAAAACWExQmFsYW5jZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAALcG9vbEFkZHJlc3MJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfBQAAAApwbHV0b0lkU3RyAgAAAAhfYmFsYW5jZQkAAGsAAAADBQAAAAZTY2FsZTgJAABoAAAAAgUAAAAJYTFCYWxhbmNlBQAAAAhhMFdlaWdodAkAAGgAAAACBQAAAAlhMEJhbGFuY2UFAAAACGExV2VpZ2h0AAAAAQAAAAFpAQAAAAppc3N1ZVBsdXRvAAAAAgAAAAZhbW91bnQAAAAKYXNzZXRJZFN0cgQAAAAHYXNzZXRJZAkAAlkAAAABBQAAAAphc3NldElkU3RyBAAAAAdwb29sU3RyCQEAAAASdHJ5R2V0U3RyUGFyYW1ldGVyAAAAAQkAASwAAAACCQABLAAAAAICAAAABmFzc2V0XwUAAAAKYXNzZXRJZFN0cgIAAAAFX3Bvb2wEAAAAC3Bvb2xBZGRyZXNzCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAdwb29sU3RyBAAAAA1hbW91bnRUb0lzc3VlCQAAawAAAAMFAAAABmFtb3VudAkBAAAAFWNhbGN1bGF0ZUJ1eWJhY2tSYXRpbwAAAAAAAAAAAAAAJxAEAAAAD2Ftb3VudFRvQnV5YmFjawkAAGUAAAACBQAAAAZhbW91bnQFAAAADWFtb3VudFRvSXNzdWUEAAAAEWFzc2V0UHJpY2VUb1BsdXRvCQEAAAASY2FsY3VsYXRlUG9vbFByaWNlAAAAAgUAAAALcG9vbEFkZHJlc3MFAAAACmFzc2V0SWRTdHIEAAAAC3BsdXRvSXNzdWVkCQAAawAAAAMFAAAADWFtb3VudFRvSXNzdWUFAAAAEWFzc2V0UHJpY2VUb1BsdXRvBQAAAAZTY2FsZTgEAAAABGludjIJAAP8AAAABAUAAAANaXNzdWVyQWRkcmVzcwIAAAAMcmVxdWVzdElzc3VlCQAETAAAAAIFAAAAC3BsdXRvSXNzdWVkBQAAAANuaWwFAAAAA25pbAMJAAAAAAAAAgUAAAAEaW52MgUAAAAEaW52MgQAAAADaW52CQAD/AAAAAQFAAAAC3Bvb2xBZGRyZXNzAgAAAARzd2FwCQAETAAAAAIFAAAACnBsdXRvSWRTdHIJAARMAAAAAgAAAAAAAAAAAAUAAAADbmlsCQAETAAAAAIJAQAAAA9BdHRhY2hlZFBheW1lbnQAAAACBQAAAAdhc3NldElkBQAAAA9hbW91bnRUb0J1eWJhY2sFAAAAA25pbAMJAAAAAAAAAgUAAAADaW52BQAAAANpbnYEAAAAC3BsdXRvQm91Z2h0BAAAAAckbWF0Y2gwBQAAAANpbnYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABeAUAAAAHJG1hdGNoMAUAAAABeAAAAAAAAAAAAAQAAAAKdG90YWxQbHV0bwkAAGQAAAACBQAAAAtwbHV0b0JvdWdodAUAAAALcGx1dG9Jc3N1ZWQJAAUUAAAAAgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAACnRvdGFsUGx1dG8FAAAAB3BsdXRvSWQFAAAAA25pbAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIaXNzdWVkOiAJAAGkAAAAAQUAAAALcGx1dG9Jc3N1ZWQCAAAACjsgYm91Z2h0OiAJAAGkAAAAAQUAAAALcGx1dG9Cb3VnaHQJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5tiE45Q==", "height": 3138862, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 5iYzoBd9Xydwd1PxhVY7uuc7RmXKXk6x3xVBdZV5zJjQ Next: CMi24piJqJ5E1RScy1BjkF1vkRZFAYVmwDeY2sT3wHxZ Diff:
OldNewDifferences
5757 let poolAddress = addressFromStringValue(poolStr)
5858 let amountToIssue = fraction(amount, calculateBuybackRatio(), 10000)
5959 let amountToBuyback = (amount - amountToIssue)
60- let inv = invoke(poolAddress, "swap", [plutoIdStr, 0], [AttachedPayment(assetId, amountToBuyback)])
61- if ((inv == inv))
60+ let assetPriceToPluto = calculatePoolPrice(poolAddress, assetIdStr)
61+ let plutoIssued = fraction(amountToIssue, assetPriceToPluto, Scale8)
62+ let inv2 = invoke(issuerAddress, "requestIssue", [plutoIssued], nil)
63+ if ((inv2 == inv2))
6264 then {
63- let plutoBought = match inv {
64- case x: Int =>
65- x
66- case _ =>
67- 0
68- }
69- let assetPriceToPluto = calculatePoolPrice(poolAddress, assetIdStr)
70- let plutoIssued = fraction(amountToIssue, assetPriceToPluto, Scale8)
71- let inv2 = invoke(issuerAddress, "requestIssue", [plutoIssued], nil)
72- if ((inv2 == inv2))
65+ let inv = invoke(poolAddress, "swap", [plutoIdStr, 0], [AttachedPayment(assetId, amountToBuyback)])
66+ if ((inv == inv))
7367 then {
68+ let plutoBought = match inv {
69+ case x: Int =>
70+ x
71+ case _ =>
72+ 0
73+ }
7474 let totalPluto = (plutoBought + plutoIssued)
7575 $Tuple2([ScriptTransfer(i.caller, totalPluto, plutoId)], ((("issued: " + toString(plutoIssued)) + "; bought: ") + toString(plutoBought)))
7676 }
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let plutoId = base58'YQFYoMwARMQzZs3wqucBTdJNWSbsYk3GAw7wsqU4gyA'
55
66 let plutoIdStr = "YQFYoMwARMQzZs3wqucBTdJNWSbsYk3GAw7wsqU4gyA"
77
88 let parametersAddress = Address(base58'3PPhk65Ab4UDgbxYUDW7YSXkzHfWtj7WBrB')
99
1010 let issuerAddress = Address(base58'3PF8pKC8CdmW9sEJUxQVSfezYRSJeThoNR3')
1111
1212 let Scale8 = 100000000
1313
1414 func tryGetInteger (key) = match getInteger(this, key) {
1515 case x: Int =>
1616 x
1717 case _ =>
1818 0
1919 }
2020
2121
2222 func tryGetIntParameter (key) = match getInteger(parametersAddress, key) {
2323 case x: Int =>
2424 x
2525 case _ =>
2626 0
2727 }
2828
2929
3030 func tryGetStrParameter (key) = match getString(parametersAddress, key) {
3131 case x: String =>
3232 x
3333 case _ =>
3434 ""
3535 }
3636
3737
3838 func calculateBuybackRatio () = {
3939 let treasurySize = tryGetIntParameter("stats_treasurySize")
4040 5000
4141 }
4242
4343
4444 func calculatePoolPrice (poolAddress,assetStr) = {
4545 let a0Weight = getIntegerValue(poolAddress, (("static_" + assetStr) + "_weight"))
4646 let a1Weight = getIntegerValue(poolAddress, (("static_" + plutoIdStr) + "_weight"))
4747 let a0Balance = getIntegerValue(poolAddress, (("global_" + assetStr) + "_balance"))
4848 let a1Balance = getIntegerValue(poolAddress, (("global_" + plutoIdStr) + "_balance"))
4949 fraction(Scale8, (a1Balance * a0Weight), (a0Balance * a1Weight))
5050 }
5151
5252
5353 @Callable(i)
5454 func issuePluto (amount,assetIdStr) = {
5555 let assetId = fromBase58String(assetIdStr)
5656 let poolStr = tryGetStrParameter((("asset_" + assetIdStr) + "_pool"))
5757 let poolAddress = addressFromStringValue(poolStr)
5858 let amountToIssue = fraction(amount, calculateBuybackRatio(), 10000)
5959 let amountToBuyback = (amount - amountToIssue)
60- let inv = invoke(poolAddress, "swap", [plutoIdStr, 0], [AttachedPayment(assetId, amountToBuyback)])
61- if ((inv == inv))
60+ let assetPriceToPluto = calculatePoolPrice(poolAddress, assetIdStr)
61+ let plutoIssued = fraction(amountToIssue, assetPriceToPluto, Scale8)
62+ let inv2 = invoke(issuerAddress, "requestIssue", [plutoIssued], nil)
63+ if ((inv2 == inv2))
6264 then {
63- let plutoBought = match inv {
64- case x: Int =>
65- x
66- case _ =>
67- 0
68- }
69- let assetPriceToPluto = calculatePoolPrice(poolAddress, assetIdStr)
70- let plutoIssued = fraction(amountToIssue, assetPriceToPluto, Scale8)
71- let inv2 = invoke(issuerAddress, "requestIssue", [plutoIssued], nil)
72- if ((inv2 == inv2))
65+ let inv = invoke(poolAddress, "swap", [plutoIdStr, 0], [AttachedPayment(assetId, amountToBuyback)])
66+ if ((inv == inv))
7367 then {
68+ let plutoBought = match inv {
69+ case x: Int =>
70+ x
71+ case _ =>
72+ 0
73+ }
7474 let totalPluto = (plutoBought + plutoIssued)
7575 $Tuple2([ScriptTransfer(i.caller, totalPluto, plutoId)], ((("issued: " + toString(plutoIssued)) + "; bought: ") + toString(plutoBought)))
7676 }
7777 else throw("Strict value is not equal to itself.")
7878 }
7979 else throw("Strict value is not equal to itself.")
8080 }
8181
8282
8383 @Verifier(tx)
8484 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
8585

github/deemru/w8io/3ef1775 
31.47 ms