tx · 26B55LK7guRV5gm2apmEAnEmnnihYWJUa88HNGsq9PoS

3N1XAEyg1TQGa5FCEerrRhLGi5KyVq26Xm8:  -0.00200000 Waves

2023.01.16 16:32 [2407565] smart account 3N1XAEyg1TQGa5FCEerrRhLGi5KyVq26Xm8 > SELF 0.00000000 Waves

{ "type": 13, "id": "26B55LK7guRV5gm2apmEAnEmnnihYWJUa88HNGsq9PoS", "fee": 200000, "feeAssetId": null, "timestamp": 1673875957439, "version": 2, "chainId": 84, "sender": "3N1XAEyg1TQGa5FCEerrRhLGi5KyVq26Xm8", "senderPublicKey": "ATuPi6fn8277fNiCoRgPTav9QG15CJoW95GEGcDmfYt8", "proofs": [ "3MVWbcJRpkXzkzPGd6V3h8iDfF3msUbbnJ4RJSfMYCnHCVjesAsV7bZ8xr9a3sqxYG7YUjyCfZQeXYzmjUE66ZGc" ], "script": "base64:BgIJCAISABIDCgEIDgAFd2NkSWQCLDVXRTZIQlZzbUFiYXBUbVRLcG15V21VUjY3ZmMxNnliRnJOanh6bURCdFBhAAt3Y2REZWNpbWFscwACARN0b3RhbFNoYXJlQnlVc2VyS0VZAQVvd25lcgkAuQkCCQDMCAICBnNoYXJlcwkAzAgCBQVvd25lcgUDbmlsAgFfARR0b3RhbFNoYXJlQnlVc2VyUkVBRAEFb3duZXIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkBE3RvdGFsU2hhcmVCeVVzZXJLRVkBBQVvd25lcgAAABJ0b3RhbElzc3VlZFdDRF9LRVkCEHRvdGFsX2lzc3VlZF9XQ0QBE3RvdGFsSXNzdWVkV0NEX1JFQUQACQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFEnRvdGFsSXNzdWVkV0NEX0tFWQAAAA50b3RhbFNoYXJlc0tFWQIMdG90YWxfc2hhcmVzAQ90b3RhbFNoYXJlc1JFQUQACQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFDnRvdGFsU2hhcmVzS0VZAAABEXVzZXJTaGFyZUZyYWN0aW9uAQVvd25lcgQLdG90YWxTaGFyZXMJAQ90b3RhbFNoYXJlc1JFQUQAAwkAZgIFC3RvdGFsU2hhcmVzAAAEDnRvdGFsVXNlclNoYXJlCQEUdG90YWxTaGFyZUJ5VXNlclJFQUQBBQVvd25lcgkAawMAgMLXLwUOdG90YWxVc2VyU2hhcmUFC3RvdGFsU2hhcmVzAAAACnBhcmFtQV9LRVkCAUEBC3BhcmFtQV9SRUFEAAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzAgFBAGQBD2NvbXB1dGVMb2dUTURJUgIKaXNzdWVkX3djZAFBCQBlAgCAyrXuAQkAaAIJAG0GBQppc3N1ZWRfd2NkBQt3Y2REZWNpbWFscwAKAAAABgUGSEFMRlVQBQFBAQtjb21wdXRlVE1ESQIKaXNzdWVkX3djZAFBAwkAZgIFCmlzc3VlZF93Y2QAgK3iBAkAawMFCmlzc3VlZF93Y2QJAGwGAAoAAAkBD2NvbXB1dGVMb2dUTURJUgIFCmlzc3VlZF93Y2QFAUEACAAIBQZIQUxGVVAAgMLXLwCAreIEAQdnZXRUTURJAAkBC2NvbXB1dGVUTURJAgkBE3RvdGFsSXNzdWVkV0NEX1JFQUQACQELcGFyYW1BX1JFQUQAAgFpAQ1kZXBvc2l0X3NoYXJlAAQDcG10AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAkQMCCAUBaQhwYXltZW50cwAACQACAQIcQXR0YWNoZWQgcGF5bWVudCBpcyByZXF1aXJlZAMJAQlpc0RlZmluZWQBCAUDcG10B2Fzc2V0SWQJAAIBAhZPbmx5IFdBVkVTIGlzIGFsbG93ZWQuBAdhY2NvdW50CQClCAEIBQFpBmNhbGxlcgQQdG90YWxTaGFyZUJ5VXNlcgkBFHRvdGFsU2hhcmVCeVVzZXJSRUFEAQUHYWNjb3VudAQLdG90YWxTaGFyZXMJAQ90b3RhbFNoYXJlc1JFQUQACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQETdG90YWxTaGFyZUJ5VXNlcktFWQEFB2FjY291bnQJAGQCBRB0b3RhbFNoYXJlQnlVc2VyCAUDcG10BmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUOdG90YWxTaGFyZXNLRVkJAGQCBQt0b3RhbFNoYXJlcwgFA3BtdAZhbW91bnQFA25pbAFpAQR0ZXN0AQdhY2NvdW50CQACAQkArAICAghSZXN1bHQ6IAkApAMBCQERdXNlclNoYXJlRnJhY3Rpb24BBQdhY2NvdW50ACSiZ4w=", "height": 2407565, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 9sp67RQCteudwaeVoYzRjuJteuCopmukCpojTHUg2yXb Next: JAkUNAc9ajxpH4av6EmcMe5nmjxv7VRLuD8KbrD8kNBa Diff:
OldNewDifferences
2121 func totalSharesREAD () = valueOrElse(getInteger(this, totalSharesKEY), 0)
2222
2323
24+func userShareFraction (owner) = {
25+ let totalShares = totalSharesREAD()
26+ if ((totalShares > 0))
27+ then {
28+ let totalUserShare = totalShareByUserREAD(owner)
29+ fraction(100000000, totalUserShare, totalShares)
30+ }
31+ else 0
32+ }
33+
34+
2435 let paramA_KEY = "A"
2536
2637 func paramA_READ () = valueOrElse(getInteger(this, "A"), 100)
2940 func computeLogTMDIR (issued_wcd,A) = (500000000 - (log(issued_wcd, wcdDecimals, 10, 0, 6, HALFUP) * A))
3041
3142
32-func computeTMDIR (issued_wcd,A) = {
33- let logTMDIR = (500000000 - (log(issued_wcd, wcdDecimals, 10, 0, 6, HALFUP) * A))
34- fraction(1, pow(10, 0, logTMDIR, 8, 8, HALFUP), 100000000)
35- }
36-
37-
3843 func computeTMDI (issued_wcd,A) = if ((issued_wcd > 10000000))
39- then (issued_wcd * computeTMDIR(issued_wcd, A))
44+ then fraction(issued_wcd, pow(10, 0, computeLogTMDIR(issued_wcd, A), 8, 8, HALFUP), 100000000)
4045 else 10000000
4146
4247
6166
6267
6368 @Callable(i)
64-func get_tmdi (issued_wcd,A) = throw(("result: " + toString(computeTMDI(issued_wcd, A))))
69+func test (account) = throw(("Result: " + toString(userShareFraction(account))))
6570
6671
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let wcdId = "5WE6HBVsmAbapTmTKpmyWmUR67fc16ybFrNjxzmDBtPa"
55
66 let wcdDecimals = 2
77
88 func totalShareByUserKEY (owner) = makeString(["shares", owner], "_")
99
1010
1111 func totalShareByUserREAD (owner) = valueOrElse(getInteger(this, totalShareByUserKEY(owner)), 0)
1212
1313
1414 let totalIssuedWCD_KEY = "total_issued_WCD"
1515
1616 func totalIssuedWCD_READ () = valueOrElse(getInteger(this, totalIssuedWCD_KEY), 0)
1717
1818
1919 let totalSharesKEY = "total_shares"
2020
2121 func totalSharesREAD () = valueOrElse(getInteger(this, totalSharesKEY), 0)
2222
2323
24+func userShareFraction (owner) = {
25+ let totalShares = totalSharesREAD()
26+ if ((totalShares > 0))
27+ then {
28+ let totalUserShare = totalShareByUserREAD(owner)
29+ fraction(100000000, totalUserShare, totalShares)
30+ }
31+ else 0
32+ }
33+
34+
2435 let paramA_KEY = "A"
2536
2637 func paramA_READ () = valueOrElse(getInteger(this, "A"), 100)
2738
2839
2940 func computeLogTMDIR (issued_wcd,A) = (500000000 - (log(issued_wcd, wcdDecimals, 10, 0, 6, HALFUP) * A))
3041
3142
32-func computeTMDIR (issued_wcd,A) = {
33- let logTMDIR = (500000000 - (log(issued_wcd, wcdDecimals, 10, 0, 6, HALFUP) * A))
34- fraction(1, pow(10, 0, logTMDIR, 8, 8, HALFUP), 100000000)
35- }
36-
37-
3843 func computeTMDI (issued_wcd,A) = if ((issued_wcd > 10000000))
39- then (issued_wcd * computeTMDIR(issued_wcd, A))
44+ then fraction(issued_wcd, pow(10, 0, computeLogTMDIR(issued_wcd, A), 8, 8, HALFUP), 100000000)
4045 else 10000000
4146
4247
4348 func getTMDI () = computeTMDI(totalIssuedWCD_READ(), paramA_READ())
4449
4550
4651 @Callable(i)
4752 func deposit_share () = {
4853 let pmt = if ((size(i.payments) == 1))
4954 then i.payments[0]
5055 else throw("Attached payment is required")
5156 if (isDefined(pmt.assetId))
5257 then throw("Only WAVES is allowed.")
5358 else {
5459 let account = toString(i.caller)
5560 let totalShareByUser = totalShareByUserREAD(account)
5661 let totalShares = totalSharesREAD()
5762 [IntegerEntry(totalShareByUserKEY(account), (totalShareByUser + pmt.amount)), IntegerEntry(totalSharesKEY, (totalShares + pmt.amount))]
5863 }
5964 }
6065
6166
6267
6368 @Callable(i)
64-func get_tmdi (issued_wcd,A) = throw(("result: " + toString(computeTMDI(issued_wcd, A))))
69+func test (account) = throw(("Result: " + toString(userShareFraction(account))))
6570
6671

github/deemru/w8io/169f3d6 
27.85 ms