tx · CtUcoCUrmegun4Tnr6vYP9uvZi2PTzCVVPK1rDFPhAZN 3P7aVqHv6fXkYuS4sRW2K17ENZMsbXi3sPV: -0.00900000 Waves 2023.09.19 15:31 [3828047] smart account 3P7aVqHv6fXkYuS4sRW2K17ENZMsbXi3sPV > SELF 0.00000000 Waves
{ "type": 13, "id": "CtUcoCUrmegun4Tnr6vYP9uvZi2PTzCVVPK1rDFPhAZN", "fee": 900000, "feeAssetId": null, "timestamp": 1695126680487, "version": 2, "chainId": 87, "sender": "3P7aVqHv6fXkYuS4sRW2K17ENZMsbXi3sPV", "senderPublicKey": "5SevHzYFiymbFWe1GPt6nNYccPnfTbMft1DqZWfRH8GN", "proofs": [ "3dQUDTLjHbVEsRvVxkDk68z5qEVSqgqrFZctQET2fYpKxaJFMspL6SJsQpZNWNnhdUDiqyRovQbwob4kkEEKBExm" ], "script": "base64:BgIdCAISAwoBCBIECgIIARIDCgEIEgQKAggBEgMKAQEZARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJ0IAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYQUHJG1hdGNoMAUBYQIAAQx0cnlHZXRTdHJpbmcBA2tleQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgUEdGhpcwUDa2V5AQ10cnlHZXRJbnRlZ2VyAQNrZXkEByRtYXRjaDAJAJoIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAAAQlnZXRPcmFjbGUACQEHQWRkcmVzcwEJANkEAQkBDHRyeUdldFN0cmluZwECFHN0YXRpY19vcmFjbGVBZGRyZXNzAR5zdGF0aWNLZXlfdHVydGxlU3Rha2luZ0FkZHJlc3MAAhtzdGF0aWNfdHVydGxlU3Rha2luZ0FkZHJlc3MBHnN0YXRpY0tleV90dXJ0bGVSZWJpcnRoQWRkcmVzcwACG3N0YXRpY190dXJ0bGVSZWJpcnRoQWRkcmVzcwEVc3RhdGljS2V5X3JvcGVBZGRyZXNzAAISc3RhdGljX3JvcGVBZGRyZXNzARFnZXRSZWJpcnRoQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIVc3RhdGljX3JlYmlydGhBZGRyZXNzARNnZXRJbmN1YmF0b3JBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhdzdGF0aWNfaW5jdWJhdG9yQWRkcmVzcwERZ2V0RmFybWluZ0FkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFXN0YXRpY19mYXJtaW5nQWRkcmVzcwESZ2V0R2FtZURhcHBBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhZzdGF0aWNfZ2FtZURhcHBBZGRyZXNzAQ5nZXRCdXJuQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAISc3RhdGljX2J1cm5BZGRyZXNzARJnZXRCYWJ5ZHVja0FkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFnN0YXRpY19iYWJ5RHVja0FkZHJlc3MBEmdldEJyZWVkaW5nQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIVc3RhdGljX2JyZWVkZXJBZGRyZXNzARBnZXRNYXN0ZXJBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhZzdGF0aWNfY2ZNYXN0ZXJBZGRyZXNzARdnZXRUdXJ0bGVTdGFraW5nQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAkBHnN0YXRpY0tleV90dXJ0bGVTdGFraW5nQWRkcmVzcwABF2dldFR1cnRsZVJlYmlydGhBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUACQEec3RhdGljS2V5X3R1cnRsZVJlYmlydGhBZGRyZXNzAAEOZ2V0Um9wZUFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQAJARVzdGF0aWNLZXlfcm9wZUFkZHJlc3MAAAh3QWNjUEtleQkA2QQBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgkBCWdldE9yYWNsZQACD3N0YXRpY193YXJzUEtleQIbc3RhdGljX3dhcnNQS2V5IG5vdCBkZWZpbmVkAA9zY0NhblVzZUNvdXBvbnMJAMwIAgkBEWdldFJlYmlydGhBZGRyZXNzAAkAzAgCCQETZ2V0SW5jdWJhdG9yQWRkcmVzcwAJAMwIAgkBEWdldEZhcm1pbmdBZGRyZXNzAAkAzAgCCQESZ2V0R2FtZURhcHBBZGRyZXNzAAkAzAgCCQESZ2V0QmFieWR1Y2tBZGRyZXNzAAkAzAgCCQESZ2V0QnJlZWRpbmdBZGRyZXNzAAkAzAgCCQEXZ2V0VHVydGxlU3Rha2luZ0FkZHJlc3MACQDMCAIJARdnZXRUdXJ0bGVSZWJpcnRoQWRkcmVzcwAJAMwIAgkBDmdldFJvcGVBZGRyZXNzAAUDbmlsARBjb3Vwb25zVXNlclNwZW5kAQR1c2VyCQCsAgIFBHVzZXICBl9zcGVuZAERY291cG9uc1VzZXJBY3RpdmUBBHVzZXIJAKwCAgUEdXNlcgIHX2FjdGl2ZQEUY291cG9uc1VzZXJBY3RpdmVPbGQBBHVzZXIJAKwCAgkBEWNvdXBvbnNVc2VyQWN0aXZlAQUEdXNlcgIEX29sZAEQY291cG9uc1NwZW5kT25TYwECc2MJAKwCAgUCc2MCD19zcGVuZF9ieV91c2luZwESYWRkQ291cG9uc0ludGVybmFsAgR1c2VyBmFtb3VudAQGa2V5T2xkCQEUY291cG9uc1VzZXJBY3RpdmVPbGQBBQR1c2VyBANrZXkJARFjb3Vwb25zVXNlckFjdGl2ZQEFBHVzZXIECmNvdXBvbnNPbGQJAQ10cnlHZXRJbnRlZ2VyAQUDa2V5BAdjb3Vwb25zCQBkAgUKY291cG9uc09sZAUGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQZrZXlPbGQFCmNvdXBvbnNPbGQJAMwIAgkBDEludGVnZXJFbnRyeQIFA2tleQUHY291cG9ucwUDbmlsBQFpAQ9jb25maWd1cmVPcmFjbGUBBm9yYWNsZQMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECD0NDTzogYWRtaW4gb25seQkAzAgCCQELU3RyaW5nRW50cnkCAhRzdGF0aWNfb3JhY2xlQWRkcmVzcwUGb3JhY2xlBQNuaWwBaQEKYWRkQ291cG9ucwIEdXNlcgZhbW91bnQDAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQECIT0CCAUBaQ9jYWxsZXJQdWJsaWNLZXkFCHdBY2NQS2V5BwkAAgECD0NBQzogYWRtaW4gb25seQkBEmFkZENvdXBvbnNJbnRlcm5hbAIFBHVzZXIFBmFtb3VudAFpAQ9hZGRDb3Vwb25zQmF0Y2gBBWJhdGNoAwMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkBAiE9AggFAWkPY2FsbGVyUHVibGljS2V5BQh3QWNjUEtleQcJAAIBAg9DQUM6IGFkbWluIG9ubHkEC2NvdXBvbnNMaXN0CQC1CQIFBWJhdGNoAgE7CgEMaGFuZGxlQ291cG9uAgNhY2MGY291cG9uBApzcGxpdEFycmF5CQC1CQIFBmNvdXBvbgIBOgQEdXNlcgkAkQMCBQpzcGxpdEFycmF5AAAEBmFtb3VudAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCnNwbGl0QXJyYXkAAQQIYnVybkNhbGwJAPwHBAkBDmdldEJ1cm5BZGRyZXNzAAIMYnVybkJ5SW52b2tlCQDMCAIFBmFtb3VudAUDbmlsBQNuaWwDCQAAAgUIYnVybkNhbGwFCGJ1cm5DYWxsCQDOCAIFA2FjYwkBEmFkZENvdXBvbnNJbnRlcm5hbAIFBHVzZXIFBmFtb3VudAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgoAAiRsBQtjb3Vwb25zTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMaGFuZGxlQ291cG9uAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQBaQEIQ0ZSZWZ1bmQCCXJlY2lwaWVudAZhbW91bnQECWNmQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNTMpAggFAWkGY2FsbGVyAgpDRl9BRERSRVNTBANrZXkJAKwCAgkArAICAgJmXwUJY2ZBZGRyZXNzAg5fc3Rha2VfYWRkcmVzcwQMc3Rha2VBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA1MykCCQEQZ2V0TWFzdGVyQWRkcmVzcwAFA2tleQMJAQIhPQIFDHN0YWtlQWRkcmVzcwkApQgBCAUBaQZjYWxsZXIJAAIBAiZDQ1I6IFRoaXMgaXMgc29tZXRoaW5nIGZpc2h5IGdvaW5nIG9uIQkBEmFkZENvdXBvbnNJbnRlcm5hbAIFCXJlY2lwaWVudAUGYW1vdW50AWkBCnVzZUNvdXBvbnMBEWFtb3VudFRyeWluZ1RvUGF5BAppbnZva2luZ1NjCAUBaQZjYWxsZXIDCQBmAgAABRFhbW91bnRUcnlpbmdUb1BheQkAAgECL0NVQzogT25seSBwb3NpdGl2ZSBhbW91bnQgb2YgbW9uZXkgY2FuIGJlIHBhaWQhAwkBASEBCQEPY29udGFpbnNFbGVtZW50AgUPc2NDYW5Vc2VDb3Vwb25zBQppbnZva2luZ1NjCQACAQI9Q1VDOiBPbmx5IGNlcnRhaW4gc21hcnQgY29udHJhY3RzIGNhbiB1c2UgdGhpcyBjb3Vwb24gbW9kdWxlIQQEdXNlcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIECWtleUFjdGl2ZQkBEWNvdXBvbnNVc2VyQWN0aXZlAQUEdXNlcgQQYXZhaWxhYmxlQ291cG9ucwkBDXRyeUdldEludGVnZXIBBQlrZXlBY3RpdmUDCQBmAgAABRBhdmFpbGFibGVDb3Vwb25zCQACAQIOQ1VDOiBHZXQgcmVrdCEECWxlZnRUb1BheQMJAGYCBRFhbW91bnRUcnlpbmdUb1BheQUQYXZhaWxhYmxlQ291cG9ucwkAZQIFEWFtb3VudFRyeWluZ1RvUGF5BRBhdmFpbGFibGVDb3Vwb25zAAAECmFtb3VudFBhaWQJAGUCBRFhbW91bnRUcnlpbmdUb1BheQUJbGVmdFRvUGF5BBRhdmFpbGFibGVDb3Vwb25zTGVmdAkAZQIFEGF2YWlsYWJsZUNvdXBvbnMFCmFtb3VudFBhaWQDCQBmAgAABRRhdmFpbGFibGVDb3Vwb25zTGVmdAkAAgECGkNVQzogWW91IHRyeSB0byBvdmVyc3BlbmQhBAhrZXlTcGVuZAkBEGNvdXBvbnNVc2VyU3BlbmQBBQR1c2VyBAZrZXlPbGQJARRjb3Vwb25zVXNlckFjdGl2ZU9sZAEFBHVzZXIECmtleVNwZW5kU2MJARBjb3Vwb25zU3BlbmRPblNjAQkApQgBCAUBaQZjYWxsZXIECnRvdGFsU3BlbmQJAGQCCQENdHJ5R2V0SW50ZWdlcgEFCGtleVNwZW5kBQphbW91bnRQYWlkBAx0b3RhbFNwZW5kU2MJAGQCCQENdHJ5R2V0SW50ZWdlcgEFCmtleVNwZW5kU2MFCmFtb3VudFBhaWQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUIa2V5U3BlbmQFCnRvdGFsU3BlbmQJAMwIAgkBDEludGVnZXJFbnRyeQIFBmtleU9sZAUQYXZhaWxhYmxlQ291cG9ucwkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5QWN0aXZlBRRhdmFpbGFibGVDb3Vwb25zTGVmdAkAzAgCCQEMSW50ZWdlckVudHJ5AgUKa2V5U3BlbmRTYwUMdG90YWxTcGVuZFNjBQNuaWwFCmFtb3VudFBhaWQAWMVzcg==", "height": 3828047, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 61K8EJMb7QZuiRvbfMnn3JxonErjhrkh61cg5XtGXasf Next: 8eWYLo1prRCKReb3pkMVsuSy2uMN45doG5VrzuBWraZT Full:
Old | New | Differences | |
---|---|---|---|
1 | 1 | {-# STDLIB_VERSION 6 #-} | |
2 | 2 | {-# SCRIPT_TYPE ACCOUNT #-} | |
3 | 3 | {-# CONTENT_TYPE DAPP #-} | |
4 | 4 | func tryGetStringExternal (address,key) = match getString(address, key) { | |
5 | 5 | case a: String => | |
6 | 6 | a | |
7 | 7 | case _ => | |
8 | 8 | "" | |
9 | 9 | } | |
10 | 10 | ||
11 | 11 | ||
12 | 12 | func tryGetString (key) = tryGetStringExternal(this, key) | |
13 | 13 | ||
14 | 14 | ||
15 | 15 | func tryGetInteger (key) = match getInteger(this, key) { | |
16 | 16 | case b: Int => | |
17 | 17 | b | |
18 | 18 | case _ => | |
19 | 19 | 0 | |
20 | 20 | } | |
21 | 21 | ||
22 | 22 | ||
23 | 23 | func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress"))) | |
24 | 24 | ||
25 | 25 | ||
26 | 26 | func staticKey_turtleStakingAddress () = "static_turtleStakingAddress" | |
27 | 27 | ||
28 | 28 | ||
29 | 29 | func staticKey_turtleRebirthAddress () = "static_turtleRebirthAddress" | |
30 | 30 | ||
31 | 31 | ||
32 | 32 | func staticKey_ropeAddress () = "static_ropeAddress" | |
33 | 33 | ||
34 | 34 | ||
35 | 35 | func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress"))) | |
36 | 36 | ||
37 | 37 | ||
38 | 38 | func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_incubatorAddress"))) | |
39 | 39 | ||
40 | 40 | ||
41 | 41 | func getFarmingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_farmingAddress"))) | |
42 | 42 | ||
43 | 43 | ||
44 | 44 | func getGameDappAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_gameDappAddress"))) | |
45 | 45 | ||
46 | 46 | ||
47 | 47 | func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_burnAddress"))) | |
48 | 48 | ||
49 | 49 | ||
50 | 50 | func getBabyduckAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_babyDuckAddress"))) | |
51 | 51 | ||
52 | 52 | ||
53 | 53 | func getBreedingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_breederAddress"))) | |
54 | 54 | ||
55 | 55 | ||
56 | 56 | func getMasterAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_cfMasterAddress"))) | |
57 | 57 | ||
58 | 58 | ||
59 | 59 | func getTurtleStakingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleStakingAddress()))) | |
60 | 60 | ||
61 | 61 | ||
62 | 62 | func getTurtleRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleRebirthAddress()))) | |
63 | 63 | ||
64 | 64 | ||
65 | 65 | func getRopeAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_ropeAddress()))) | |
66 | 66 | ||
67 | 67 | ||
68 | 68 | let wAccPKey = fromBase58String(valueOrErrorMessage(getString(getOracle(), "static_warsPKey"), "static_warsPKey not defined")) | |
69 | 69 | ||
70 | 70 | let scCanUseCoupons = [getRebirthAddress(), getIncubatorAddress(), getFarmingAddress(), getGameDappAddress(), getBabyduckAddress(), getBreedingAddress(), getTurtleStakingAddress(), getTurtleRebirthAddress(), getRopeAddress()] | |
71 | 71 | ||
72 | 72 | func couponsUserSpend (user) = (user + "_spend") | |
73 | 73 | ||
74 | 74 | ||
75 | 75 | func couponsUserActive (user) = (user + "_active") | |
76 | 76 | ||
77 | 77 | ||
78 | 78 | func couponsUserActiveOld (user) = (couponsUserActive(user) + "_old") | |
79 | 79 | ||
80 | 80 | ||
81 | 81 | func couponsSpendOnSc (sc) = (sc + "_spend_by_using") | |
82 | 82 | ||
83 | 83 | ||
84 | 84 | func addCouponsInternal (user,amount) = { | |
85 | 85 | let keyOld = couponsUserActiveOld(user) | |
86 | 86 | let key = couponsUserActive(user) | |
87 | 87 | let couponsOld = tryGetInteger(key) | |
88 | 88 | let coupons = (couponsOld + amount) | |
89 | 89 | [IntegerEntry(keyOld, couponsOld), IntegerEntry(key, coupons)] | |
90 | 90 | } | |
91 | 91 | ||
92 | 92 | ||
93 | 93 | @Callable(i) | |
94 | 94 | func configureOracle (oracle) = if ((i.caller != this)) | |
95 | 95 | then throw("CCO: admin only") | |
96 | 96 | else [StringEntry("static_oracleAddress", oracle)] | |
97 | 97 | ||
98 | 98 | ||
99 | 99 | ||
100 | 100 | @Callable(i) | |
101 | 101 | func addCoupons (user,amount) = if (if ((i.caller != this)) | |
102 | 102 | then (i.callerPublicKey != wAccPKey) | |
103 | 103 | else false) | |
104 | 104 | then throw("CAC: admin only") | |
105 | 105 | else addCouponsInternal(user, amount) | |
106 | 106 | ||
107 | 107 | ||
108 | 108 | ||
109 | 109 | @Callable(i) | |
110 | 110 | func addCouponsBatch (batch) = if (if ((i.caller != this)) | |
111 | 111 | then (i.callerPublicKey != wAccPKey) | |
112 | 112 | else false) | |
113 | 113 | then throw("CAC: admin only") | |
114 | 114 | else { | |
115 | 115 | let couponsList = split(batch, ";") | |
116 | 116 | func handleCoupon (acc,coupon) = { | |
117 | 117 | let splitArray = split(coupon, ":") | |
118 | 118 | let user = splitArray[0] | |
119 | 119 | let amount = parseIntValue(splitArray[1]) | |
120 | 120 | let burnCall = invoke(getBurnAddress(), "burnByInvoke", [amount], nil) | |
121 | 121 | if ((burnCall == burnCall)) | |
122 | 122 | then (acc ++ addCouponsInternal(user, amount)) | |
123 | 123 | else throw("Strict value is not equal to itself.") | |
124 | 124 | } | |
125 | 125 | ||
126 | 126 | let $l = couponsList | |
127 | 127 | let $s = size($l) | |
128 | 128 | let $acc0 = nil | |
129 | 129 | func $f0_1 ($a,$i) = if (($i >= $s)) | |
130 | 130 | then $a | |
131 | 131 | else handleCoupon($a, $l[$i]) | |
132 | 132 | ||
133 | 133 | func $f0_2 ($a,$i) = if (($i >= $s)) | |
134 | 134 | then $a | |
135 | 135 | else throw("List size exceeds 20") | |
136 | 136 | ||
137 | 137 | $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20) | |
138 | 138 | } | |
139 | 139 | ||
140 | 140 | ||
141 | 141 | ||
142 | 142 | @Callable(i) | |
143 | 143 | func CFRefund (recipient,amount) = { | |
144 | 144 | let cfAddress = getStringValue(i.caller, "CF_ADDRESS") | |
145 | 145 | let key = (("f_" + cfAddress) + "_stake_address") | |
146 | 146 | let stakeAddress = getStringValue(getMasterAddress(), key) | |
147 | 147 | if ((stakeAddress != toString(i.caller))) | |
148 | 148 | then throw("CCR: This is something fishy going on!") | |
149 | 149 | else addCouponsInternal(recipient, amount) | |
150 | 150 | } | |
151 | 151 | ||
152 | 152 | ||
153 | 153 | ||
154 | 154 | @Callable(i) | |
155 | 155 | func useCoupons (amountTryingToPay) = { | |
156 | 156 | let invokingSc = i.caller | |
157 | 157 | if ((0 > amountTryingToPay)) | |
158 | 158 | then throw("CUC: Only positive amount of money can be paid!") | |
159 | 159 | else if (!(containsElement(scCanUseCoupons, invokingSc))) | |
160 | 160 | then throw("CUC: Only certain smart contracts can use this coupon module!") | |
161 | 161 | else { | |
162 | 162 | let user = toString(i.originCaller) | |
163 | 163 | let keyActive = couponsUserActive(user) | |
164 | 164 | let availableCoupons = tryGetInteger(keyActive) | |
165 | 165 | if ((0 > availableCoupons)) | |
166 | 166 | then throw("CUC: Get rekt!") | |
167 | 167 | else { | |
168 | 168 | let leftToPay = if ((amountTryingToPay > availableCoupons)) | |
169 | 169 | then (amountTryingToPay - availableCoupons) | |
170 | 170 | else 0 | |
171 | 171 | let amountPaid = (amountTryingToPay - leftToPay) | |
172 | 172 | let availableCouponsLeft = (availableCoupons - amountPaid) | |
173 | 173 | if ((0 > availableCouponsLeft)) | |
174 | 174 | then throw("CUC: You try to overspend!") | |
175 | 175 | else { | |
176 | 176 | let keySpend = couponsUserSpend(user) | |
177 | 177 | let keyOld = couponsUserActiveOld(user) | |
178 | 178 | let keySpendSc = couponsSpendOnSc(toString(i.caller)) | |
179 | 179 | let totalSpend = (tryGetInteger(keySpend) + amountPaid) | |
180 | 180 | let totalSpendSc = (tryGetInteger(keySpendSc) + amountPaid) | |
181 | 181 | $Tuple2([IntegerEntry(keySpend, totalSpend), IntegerEntry(keyOld, availableCoupons), IntegerEntry(keyActive, availableCouponsLeft), IntegerEntry(keySpendSc, totalSpendSc)], amountPaid) | |
182 | 182 | } | |
183 | 183 | } | |
184 | 184 | } | |
185 | 185 | } | |
186 | 186 | ||
187 | 187 |
github/deemru/w8io/3ef1775 35.43 ms ◑