tx · FcvMxqSuYQnRSvsiAS2Yrg9Zrh6pfeP7GVtSrfYQJmKx

3Mqx3EbkFTCmig4pAcR9ZJE7Mhv1hPKdGsJ:  -0.00900000 Waves

2024.10.03 15:19 [3310662] smart account 3Mqx3EbkFTCmig4pAcR9ZJE7Mhv1hPKdGsJ > SELF 0.00000000 Waves

{ "type": 13, "id": "FcvMxqSuYQnRSvsiAS2Yrg9Zrh6pfeP7GVtSrfYQJmKx", "fee": 900000, "feeAssetId": null, "timestamp": 1727958005308, "version": 2, "chainId": 84, "sender": "3Mqx3EbkFTCmig4pAcR9ZJE7Mhv1hPKdGsJ", "senderPublicKey": "4xhh2o8LRDLF2yUUw8RkUT5JsPYrPJfLLeWkTdkSeVnS", "proofs": [ "3SwucSRhGrVMSYa1MpYWhm2WsfwpvNo8z47JTPH1m1dRbvBjCxfex5fqY5FZvshm6k5AvQ3Dwi6XDYHgUbhs1dFn" ], "script": "base64:BgIWCAISAwoBCBIDCgEBEgQKAgEBEgASABgAC1NUQVJUX1BSSUNFAKDCHgAIUVVPVElFTlQAAgAIREVDSU1BTFMAgMLXLwEXc3RhdGljS2V5X29yYWNsZUFkZHJlc3MAAhRzdGF0aWNfb3JhY2xlQWRkcmVzcwEUc3RhdGljS2V5X2VnZ0Fzc2V0SWQAAhFzdGF0aWNfZWdnQXNzZXRJZAESc3RhdGljS2V5X2V4dHJhRmVlAAIPc3RhdGljX2V4dHJhRmVlARdzdGF0aWNLZXlfZmVlQWdncmVnYXRvcgACFHN0YXRpY19mZWVBZ2dyZWdhdG9yARhzdGF0aWNLZXlfY291cG9uc0FkZHJlc3MAAhVzdGF0aWNfY291cG9uc0FkZHJlc3MBFXN0YXRpY0tleV9idXJuQWRkcmVzcwACEnN0YXRpY19idXJuQWRkcmVzcwEOa2V5VXNlckFkZHJlc3MBB2FkZHJlc3MJAKwCAgUHYWRkcmVzcwIGX2xldmVsARNrZXlVc2VyU3BlbnRPbkxldmVsAQdhZGRyZXNzCQCsAgIFB2FkZHJlc3MCDV9zcGVudE9uTGV2ZWwBFmtleVVzZXJTa2lsbFJlc2V0VGltZXMBB2FkZHJlc3MJAKwCAgUHYWRkcmVzcwIRX3NraWxsc1Jlc2V0VGltZXMBE2tleVVzZXJTcGVudE9uUmVzZXQBB2FkZHJlc3MJAKwCAgUHYWRkcmVzcwINX3NwZW50T25SZXNldAENdHJ5R2V0SW50ZWdlcgEDa2V5BAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCdCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWEFByRtYXRjaDAFAWECAAEMdHJ5R2V0U3RyaW5nAQNrZXkJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIFBHRoaXMFA2tleQEJZ2V0T3JhY2xlAAkBB0FkZHJlc3MBCQDZBAEJAQx0cnlHZXRTdHJpbmcBCQEXc3RhdGljS2V5X29yYWNsZUFkZHJlc3MAAQ1nZXRFZ2dBc3NldElkAAkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAkBFHN0YXRpY0tleV9lZ2dBc3NldElkAAEQZ2V0RmVlQWdncmVnYXRvcgAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAkBF3N0YXRpY0tleV9mZWVBZ2dyZWdhdG9yAAERZ2V0Q291cG9uc0FkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQAJARhzdGF0aWNLZXlfY291cG9uc0FkZHJlc3MAAQ5nZXRCdXJuQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAkBFXN0YXRpY0tleV9idXJuQWRkcmVzcwABEGNhbGN1bGF0ZUxldmVsVXABC2Z1dHVyZUxldmVsBAJwMQkAbAYFC1NUQVJUX1BSSUNFAAgJAGkCAJBOBQtmdXR1cmVMZXZlbAAEAAgFB0NFSUxJTkcEAnAyCQBsBgULZnV0dXJlTGV2ZWwAAAkAaQIAkE4FCFFVT1RJRU5UAAQACAUHQ0VJTElORwQFdG90YWwJAGsDBQJwMQUCcDIFCERFQ0lNQUxTBAVkZWJ1ZwkAuQkCCQDMCAIJAKwCAgIJbmV3TGV2ZWw9CQCkAwEFC2Z1dHVyZUxldmVsCQDMCAIJAKwCAgIDcDE9CQCkAwEFAnAxCQDMCAIJAKwCAgIDcDI9CQCkAwEFAnAyCQDMCAIJAKwCAgIGdG90YWw9CQCkAwEFBXRvdGFsBQNuaWwCATsJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCAgVERUJVRwUFZGVidWcFA25pbAUFdG90YWwBDmNhbGN1bGF0ZVJlc2V0AgxjdXJyZW50TGV2ZWwKcmVzZXRUaW1lcwQHREVWSURFUgAEBA9yZXNldFRpbWVzVG9Vc2UJAGQCBQpyZXNldFRpbWVzAAEEBnJlc3VsdAkAawMFD3Jlc2V0VGltZXNUb1VzZQkAaAIFDGN1cnJlbnRMZXZlbAUIREVDSU1BTFMFB0RFVklERVIEBWRlYnVnCQC5CQIJAMwIAgkArAICAgZsZXZlbD0JAKQDAQUMY3VycmVudExldmVsCQDMCAIJAKwCAgILcmVzZXRUaW1lcz0JAKQDAQUKcmVzZXRUaW1lcwkAzAgCCQCsAgICEHJlc2V0VGltZXNUb1VzZT0JAKQDAQUPcmVzZXRUaW1lc1RvVXNlCQDMCAIJAKwCAgIHcmVzdWx0PQkApAMBBQZyZXN1bHQFA25pbAIBOwkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQICBURFQlVHBQVkZWJ1ZwUDbmlsBQZyZXN1bHQBFmNoZWNrQWRkaXRpb25hbFBheW1lbnQBB3BheW1lbnQDCQEJaXNEZWZpbmVkAQgFB3BheW1lbnQHYXNzZXRJZAkAAgECGkxTQ0FQOiBQbGVhc2UgYXR0YWNoIHdhdmVzBAlmZWVBbW91bnQJARFAZXh0ck5hdGl2ZSgxMDUwKQIJAQlnZXRPcmFjbGUACQESc3RhdGljS2V5X2V4dHJhRmVlAAMJAQIhPQIIBQdwYXltZW50BmFtb3VudAUJZmVlQW1vdW50CQACAQkArAICCQCsAgICHUxTQ0FQOiBQbGVhc2UgYXR0YWNoIGV4YWN0bHkgCQCkAwEFCWZlZUFtb3VudAITIGFtb3VudCBvZiB3YXZlbGV0cwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQEQZ2V0RmVlQWdncmVnYXRvcgAFCWZlZUFtb3VudAUEdW5pdAUDbmlsBQFpAQ9jb25maWd1cmVPcmFjbGUBBm9yYWNsZQMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECD1JDTzogYWRtaW4gb25seQkAzAgCCQELU3RyaW5nRW50cnkCCQEXc3RhdGljS2V5X29yYWNsZUFkZHJlc3MABQZvcmFjbGUFA25pbAFpAQtsZXZlbFVwTWF0aAELZnV0dXJlTGV2ZWwJARBjYWxjdWxhdGVMZXZlbFVwAQULZnV0dXJlTGV2ZWwBaQEPcmVzZXRTa2lsbHNNYXRoAgxjdXJyZW50TGV2ZWwKcmVzZXRUaW1lcwkBDmNhbGN1bGF0ZVJlc2V0AgUMY3VycmVudExldmVsBQpyZXNldFRpbWVzAWkBB2xldmVsVXAABBRrZXlVc2VyQWRkcmVzc0ZpbGxlZAkBDmtleVVzZXJBZGRyZXNzAQkApQgBCAUBaQZjYWxsZXIEGWtleVVzZXJTcGVudE9uTGV2ZWxGaWxsZWQJARNrZXlVc2VyU3BlbnRPbkxldmVsAQkApQgBCAUBaQZjYWxsZXIEC2xldmVsT2ZVc2VyCQENdHJ5R2V0SW50ZWdlcgEFFGtleVVzZXJBZGRyZXNzRmlsbGVkBA50b3RhbFNwZW50VXNlcgkBDXRyeUdldEludGVnZXIBBRlrZXlVc2VyU3BlbnRPbkxldmVsRmlsbGVkBAlwcmljZUNhbGMJARBjYWxjdWxhdGVMZXZlbFVwAQkAZAIFC2xldmVsT2ZVc2VyAAEEBXByaWNlCAUJcHJpY2VDYWxjAl8yBAxmaXJzdFBheW1lbnQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQGYW1vdW50CAUMZmlyc3RQYXltZW50BmFtb3VudAMJAQIhPQIIBQxmaXJzdFBheW1lbnQHYXNzZXRJZAkBDWdldEVnZ0Fzc2V0SWQACQACAQkArAICAkFMTFU6IFlvdSBjYW4gYXR0YWNoIG9ubHkgRUdHIHRva2VucyB3aXRoIHRoZSBmb2xsb3dpbmcgYXNzZXQgaWQ6IAkA2AQBCQENZ2V0RWdnQXNzZXRJZAADCQECIT0CBQZhbW91bnQFBXByaWNlCQACAQkArAICAilMTFU6IFBsZWFzZSBhdHRhY2ggdGhlIGV4YWN0IGFzc2V0IGFtb3VudAkApAMBBQVwcmljZQQMcmVjb3JkQWN0aW9uCQD8BwQJARFnZXRDb3Vwb25zQWRkcmVzcwACDHJlY29yZEFjdGlvbgkAzAgCAgdMRVZFTFVQBQNuaWwFA25pbAMJAAACBQxyZWNvcmRBY3Rpb24FDHJlY29yZEFjdGlvbgQIYnVybkNhbGwJAPwHBAkBDmdldEJ1cm5BZGRyZXNzAAIUYnVybkF0dGFjaGVkUGF5bWVudHMFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDWdldEVnZ0Fzc2V0SWQABQZhbW91bnQFA25pbAMJAAACBQhidXJuQ2FsbAUIYnVybkNhbGwJAM4IAgkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRRrZXlVc2VyQWRkcmVzc0ZpbGxlZAkAZAIFC2xldmVsT2ZVc2VyAAEJAMwIAgkBDEludGVnZXJFbnRyeQIFGWtleVVzZXJTcGVudE9uTGV2ZWxGaWxsZWQJAGQCBQ50b3RhbFNwZW50VXNlcgUGYW1vdW50BQNuaWwIBQlwcmljZUNhbGMCXzEJARZjaGVja0FkZGl0aW9uYWxQYXltZW50AQkAkQMCCAUBaQhwYXltZW50cwABCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBBXJlc2V0AAQUa2V5VXNlckFkZHJlc3NGaWxsZWQJAQ5rZXlVc2VyQWRkcmVzcwEJAKUIAQgFAWkGY2FsbGVyBAtsZXZlbE9mVXNlcgkBDXRyeUdldEludGVnZXIBBRRrZXlVc2VyQWRkcmVzc0ZpbGxlZAQca2V5VXNlclNraWxsUmVzZXRUaW1lc0ZpbGxlZAkBFmtleVVzZXJTa2lsbFJlc2V0VGltZXMBCQClCAEIBQFpBmNhbGxlcgQMcmVzZXRzT2ZVc2VyCQENdHJ5R2V0SW50ZWdlcgEFHGtleVVzZXJTa2lsbFJlc2V0VGltZXNGaWxsZWQEGWtleVVzZXJTcGVudE9uUmVzZXRGaWxsZWQJARNrZXlVc2VyU3BlbnRPblJlc2V0AQkApQgBCAUBaQZjYWxsZXIEFGFtb3VudE9mU3BlbmRPblJlc2V0CQENdHJ5R2V0SW50ZWdlcgEFGWtleVVzZXJTcGVudE9uUmVzZXRGaWxsZWQEGGNhbGN1bGF0ZVJlc2V0Q2FsY3VsYXRlZAkBDmNhbGN1bGF0ZVJlc2V0AgULbGV2ZWxPZlVzZXIFDHJlc2V0c09mVXNlcgQFcHJpY2UIBRhjYWxjdWxhdGVSZXNldENhbGN1bGF0ZWQCXzIEDGZpcnN0UGF5bWVudAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABAZhbW91bnQIBQxmaXJzdFBheW1lbnQGYW1vdW50AwkBAiE9AggFDGZpcnN0UGF5bWVudAdhc3NldElkCQENZ2V0RWdnQXNzZXRJZAAJAAIBCQCsAgICQExSOiBZb3UgY2FuIGF0dGFjaCBvbmx5IEVHRyB0b2tlbnMgd2l0aCB0aGUgZm9sbG93aW5nIGFzc2V0IGlkOiAJANgEAQkBDWdldEVnZ0Fzc2V0SWQAAwkBAiE9AgUGYW1vdW50BQVwcmljZQkAAgEJAKwCAgIoTFI6IFBsZWFzZSBhdHRhY2ggdGhlIGV4YWN0IGFzc2V0IGFtb3VudAkApAMBBQVwcmljZQkAzggCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFHGtleVVzZXJTa2lsbFJlc2V0VGltZXNGaWxsZWQJAGQCBQxyZXNldHNPZlVzZXIAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgUZa2V5VXNlclNwZW50T25SZXNldEZpbGxlZAkAZAIFFGFtb3VudE9mU3BlbmRPblJlc2V0BQZhbW91bnQFA25pbAgFGGNhbGN1bGF0ZVJlc2V0Q2FsY3VsYXRlZAJfMQkBFmNoZWNrQWRkaXRpb25hbFBheW1lbnQBCQCRAwIIBQFpCHBheW1lbnRzAAEAwU9mJQ==", "height": 3310662, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: none Next: BBRtwmHQQYD8ago7UMtxpMDxV9kLiFPRFx35jBmQgdTp Full:
OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 6 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let START_PRICE = 500000
5+
6+let QUOTIENT = 2
7+
8+let DECIMALS = 100000000
9+
10+func staticKey_oracleAddress () = "static_oracleAddress"
11+
12+
13+func staticKey_eggAssetId () = "static_eggAssetId"
14+
15+
16+func staticKey_extraFee () = "static_extraFee"
17+
18+
19+func staticKey_feeAggregator () = "static_feeAggregator"
20+
21+
22+func staticKey_couponsAddress () = "static_couponsAddress"
23+
24+
25+func staticKey_burnAddress () = "static_burnAddress"
26+
27+
28+func keyUserAddress (address) = (address + "_level")
29+
30+
31+func keyUserSpentOnLevel (address) = (address + "_spentOnLevel")
32+
33+
34+func keyUserSkillResetTimes (address) = (address + "_skillsResetTimes")
35+
36+
37+func keyUserSpentOnReset (address) = (address + "_spentOnReset")
38+
39+
40+func tryGetInteger (key) = match getInteger(this, key) {
41+ case b: Int =>
42+ b
43+ case _ =>
44+ 0
45+}
46+
47+
48+func tryGetStringExternal (address,key) = match getString(address, key) {
49+ case a: String =>
50+ a
51+ case _ =>
52+ ""
53+}
54+
55+
56+func tryGetString (key) = tryGetStringExternal(this, key)
57+
58+
59+func getOracle () = Address(fromBase58String(tryGetString(staticKey_oracleAddress())))
60+
61+
62+func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_eggAssetId()))
63+
64+
65+func getFeeAggregator () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_feeAggregator())))
66+
67+
68+func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_couponsAddress())))
69+
70+
71+func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_burnAddress())))
72+
73+
74+func calculateLevelUp (futureLevel) = {
75+ let p1 = pow(START_PRICE, 8, (10000 / futureLevel), 4, 8, CEILING)
76+ let p2 = pow(futureLevel, 0, (10000 / QUOTIENT), 4, 8, CEILING)
77+ let total = fraction(p1, p2, DECIMALS)
78+ let debug = makeString([("newLevel=" + toString(futureLevel)), ("p1=" + toString(p1)), ("p2=" + toString(p2)), ("total=" + toString(total))], ";")
79+ $Tuple2([StringEntry("DEBUG", debug)], total)
80+ }
81+
82+
83+func calculateReset (currentLevel,resetTimes) = {
84+ let DEVIDER = 4
85+ let resetTimesToUse = (resetTimes + 1)
86+ let result = fraction(resetTimesToUse, (currentLevel * DECIMALS), DEVIDER)
87+ let debug = makeString([("level=" + toString(currentLevel)), ("resetTimes=" + toString(resetTimes)), ("resetTimesToUse=" + toString(resetTimesToUse)), ("result=" + toString(result))], ";")
88+ $Tuple2([StringEntry("DEBUG", debug)], result)
89+ }
90+
91+
92+func checkAdditionalPayment (payment) = if (isDefined(payment.assetId))
93+ then throw("LSCAP: Please attach waves")
94+ else {
95+ let feeAmount = getIntegerValue(getOracle(), staticKey_extraFee())
96+ if ((payment.amount != feeAmount))
97+ then throw((("LSCAP: Please attach exactly " + toString(feeAmount)) + " amount of wavelets"))
98+ else [ScriptTransfer(getFeeAggregator(), feeAmount, unit)]
99+ }
100+
101+
102+@Callable(i)
103+func configureOracle (oracle) = if ((i.caller != this))
104+ then throw("RCO: admin only")
105+ else [StringEntry(staticKey_oracleAddress(), oracle)]
106+
107+
108+
109+@Callable(i)
110+func levelUpMath (futureLevel) = calculateLevelUp(futureLevel)
111+
112+
113+
114+@Callable(i)
115+func resetSkillsMath (currentLevel,resetTimes) = calculateReset(currentLevel, resetTimes)
116+
117+
118+
119+@Callable(i)
120+func levelUp () = {
121+ let keyUserAddressFilled = keyUserAddress(toString(i.caller))
122+ let keyUserSpentOnLevelFilled = keyUserSpentOnLevel(toString(i.caller))
123+ let levelOfUser = tryGetInteger(keyUserAddressFilled)
124+ let totalSpentUser = tryGetInteger(keyUserSpentOnLevelFilled)
125+ let priceCalc = calculateLevelUp((levelOfUser + 1))
126+ let price = priceCalc._2
127+ let firstPayment = value(i.payments[0])
128+ let amount = firstPayment.amount
129+ if ((firstPayment.assetId != getEggAssetId()))
130+ then throw(("LLU: You can attach only EGG tokens with the following asset id: " + toBase58String(getEggAssetId())))
131+ else if ((amount != price))
132+ then throw(("LLU: Please attach the exact asset amount" + toString(price)))
133+ else {
134+ let recordAction = invoke(getCouponsAddress(), "recordAction", ["LEVELUP"], nil)
135+ if ((recordAction == recordAction))
136+ then {
137+ let burnCall = invoke(getBurnAddress(), "burnAttachedPayments", nil, [AttachedPayment(getEggAssetId(), amount)])
138+ if ((burnCall == burnCall))
139+ then (([IntegerEntry(keyUserAddressFilled, (levelOfUser + 1)), IntegerEntry(keyUserSpentOnLevelFilled, (totalSpentUser + amount))] ++ priceCalc._1) ++ checkAdditionalPayment(i.payments[1]))
140+ else throw("Strict value is not equal to itself.")
141+ }
142+ else throw("Strict value is not equal to itself.")
143+ }
144+ }
145+
146+
147+
148+@Callable(i)
149+func reset () = {
150+ let keyUserAddressFilled = keyUserAddress(toString(i.caller))
151+ let levelOfUser = tryGetInteger(keyUserAddressFilled)
152+ let keyUserSkillResetTimesFilled = keyUserSkillResetTimes(toString(i.caller))
153+ let resetsOfUser = tryGetInteger(keyUserSkillResetTimesFilled)
154+ let keyUserSpentOnResetFilled = keyUserSpentOnReset(toString(i.caller))
155+ let amountOfSpendOnReset = tryGetInteger(keyUserSpentOnResetFilled)
156+ let calculateResetCalculated = calculateReset(levelOfUser, resetsOfUser)
157+ let price = calculateResetCalculated._2
158+ let firstPayment = value(i.payments[0])
159+ let amount = firstPayment.amount
160+ if ((firstPayment.assetId != getEggAssetId()))
161+ then throw(("LR: You can attach only EGG tokens with the following asset id: " + toBase58String(getEggAssetId())))
162+ else if ((amount != price))
163+ then throw(("LR: Please attach the exact asset amount" + toString(price)))
164+ else (([IntegerEntry(keyUserSkillResetTimesFilled, (resetsOfUser + 1)), IntegerEntry(keyUserSpentOnResetFilled, (amountOfSpendOnReset + amount))] ++ calculateResetCalculated._1) ++ checkAdditionalPayment(i.payments[1]))
165+ }
166+
167+

github/deemru/w8io/169f3d6 
26.23 ms