w8 · tx · 42W···Rac

tx · 42WjEFn5WQB1KhieLPk6QbpGCZkQwgyNvTG7wuHNHRac

3P7aVqHv6fXkYuS4sRW2K17ENZMsbXi3sPV:  -0.01000000 Waves

2023.09.11 20:48 [3816807] smart account 3P7aVqHv6fXkYuS4sRW2K17ENZMsbXi3sPV > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "42WjEFn5WQB1KhieLPk6QbpGCZkQwgyNvTG7wuHNHRac",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1694454492684,
    "version": 2,
    "chainId": 87,
    "sender": "3P7aVqHv6fXkYuS4sRW2K17ENZMsbXi3sPV",
    "senderPublicKey": "5SevHzYFiymbFWe1GPt6nNYccPnfTbMft1DqZWfRH8GN",
    "proofs": [
        "66pPoBtkcPTpxh3cukHu4Xe4fTvc3JpXzCxm4ZCD7B99kN9Et3MAivE1rvyBKbLVpNniLZSrr3p3GXroMuPsbJVb"
    ],
    "script": "base64:BgIdCAISAwoBCBIECgIIARIDCgEIEgQKAggBEgMKAQEUARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJ0IAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYQUHJG1hdGNoMAUBYQIAAQx0cnlHZXRTdHJpbmcBA2tleQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgUEdGhpcwUDa2V5AQ10cnlHZXRJbnRlZ2VyAQNrZXkEByRtYXRjaDAJAJoIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAAAQlnZXRPcmFjbGUACQEHQWRkcmVzcwEJANkEAQkBDHRyeUdldFN0cmluZwECFHN0YXRpY19vcmFjbGVBZGRyZXNzAR5zdGF0aWNLZXlfdHVydGxlU3Rha2luZ0FkZHJlc3MAAhtzdGF0aWNfdHVydGxlU3Rha2luZ0FkZHJlc3MBEWdldFJlYmlydGhBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhVzdGF0aWNfcmViaXJ0aEFkZHJlc3MBE2dldEluY3ViYXRvckFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACF3N0YXRpY19pbmN1YmF0b3JBZGRyZXNzARFnZXRGYXJtaW5nQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIVc3RhdGljX2Zhcm1pbmdBZGRyZXNzARJnZXRHYW1lRGFwcEFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFnN0YXRpY19nYW1lRGFwcEFkZHJlc3MBDmdldEJ1cm5BZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhJzdGF0aWNfYnVybkFkZHJlc3MBEmdldEJhYnlkdWNrQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIWc3RhdGljX2JhYnlEdWNrQWRkcmVzcwESZ2V0QnJlZWRpbmdBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhVzdGF0aWNfYnJlZWRlckFkZHJlc3MBEGdldE1hc3RlckFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFnN0YXRpY19jZk1hc3RlckFkZHJlc3MBF2dldFR1cnRsZVN0YWtpbmdBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUACQEec3RhdGljS2V5X3R1cnRsZVN0YWtpbmdBZGRyZXNzAAAId0FjY1BLZXkJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIJAQlnZXRPcmFjbGUAAg9zdGF0aWNfd2Fyc1BLZXkCG3N0YXRpY193YXJzUEtleSBub3QgZGVmaW5lZAAPc2NDYW5Vc2VDb3Vwb25zCQDMCAIJARFnZXRSZWJpcnRoQWRkcmVzcwAJAMwIAgkBE2dldEluY3ViYXRvckFkZHJlc3MACQDMCAIJARFnZXRGYXJtaW5nQWRkcmVzcwAJAMwIAgkBEmdldEdhbWVEYXBwQWRkcmVzcwAJAMwIAgkBEmdldEJhYnlkdWNrQWRkcmVzcwAJAMwIAgkBEmdldEJyZWVkaW5nQWRkcmVzcwAJAMwIAgkBF2dldFR1cnRsZVN0YWtpbmdBZGRyZXNzAAUDbmlsARBjb3Vwb25zVXNlclNwZW5kAQR1c2VyCQCsAgIFBHVzZXICBl9zcGVuZAERY291cG9uc1VzZXJBY3RpdmUBBHVzZXIJAKwCAgUEdXNlcgIHX2FjdGl2ZQEUY291cG9uc1VzZXJBY3RpdmVPbGQBBHVzZXIJAKwCAgkBEWNvdXBvbnNVc2VyQWN0aXZlAQUEdXNlcgIEX29sZAESYWRkQ291cG9uc0ludGVybmFsAgR1c2VyBmFtb3VudAQGa2V5T2xkCQEUY291cG9uc1VzZXJBY3RpdmVPbGQBBQR1c2VyBANrZXkJARFjb3Vwb25zVXNlckFjdGl2ZQEFBHVzZXIECmNvdXBvbnNPbGQJAQ10cnlHZXRJbnRlZ2VyAQUDa2V5BAdjb3Vwb25zCQBkAgUKY291cG9uc09sZAUGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQZrZXlPbGQFCmNvdXBvbnNPbGQJAMwIAgkBDEludGVnZXJFbnRyeQIFA2tleQUHY291cG9ucwUDbmlsBQFpAQ9jb25maWd1cmVPcmFjbGUBBm9yYWNsZQMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECD0NDTzogYWRtaW4gb25seQkAzAgCCQELU3RyaW5nRW50cnkCAhRzdGF0aWNfb3JhY2xlQWRkcmVzcwUGb3JhY2xlBQNuaWwBaQEKYWRkQ291cG9ucwIEdXNlcgZhbW91bnQDAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQECIT0CCAUBaQ9jYWxsZXJQdWJsaWNLZXkFCHdBY2NQS2V5BwkAAgECD0NBQzogYWRtaW4gb25seQkBEmFkZENvdXBvbnNJbnRlcm5hbAIFBHVzZXIFBmFtb3VudAFpAQ9hZGRDb3Vwb25zQmF0Y2gBBWJhdGNoAwMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkBAiE9AggFAWkPY2FsbGVyUHVibGljS2V5BQh3QWNjUEtleQcJAAIBAg9DQUM6IGFkbWluIG9ubHkEC2NvdXBvbnNMaXN0CQC1CQIFBWJhdGNoAgE7CgEMaGFuZGxlQ291cG9uAgNhY2MGY291cG9uBApzcGxpdEFycmF5CQC1CQIFBmNvdXBvbgIBOgQEdXNlcgkAkQMCBQpzcGxpdEFycmF5AAAEBmFtb3VudAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCnNwbGl0QXJyYXkAAQQIYnVybkNhbGwJAPwHBAkBDmdldEJ1cm5BZGRyZXNzAAIMYnVybkJ5SW52b2tlCQDMCAIFBmFtb3VudAUDbmlsBQNuaWwDCQAAAgUIYnVybkNhbGwFCGJ1cm5DYWxsCQDOCAIFA2FjYwkBEmFkZENvdXBvbnNJbnRlcm5hbAIFBHVzZXIFBmFtb3VudAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgoAAiRsBQtjb3Vwb25zTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMaGFuZGxlQ291cG9uAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQBaQEIQ0ZSZWZ1bmQCCXJlY2lwaWVudAZhbW91bnQECWNmQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNTMpAggFAWkGY2FsbGVyAgpDRl9BRERSRVNTBANrZXkJAKwCAgkArAICAgJmXwUJY2ZBZGRyZXNzAg5fc3Rha2VfYWRkcmVzcwQMc3Rha2VBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA1MykCCQEQZ2V0TWFzdGVyQWRkcmVzcwAFA2tleQMJAQIhPQIFDHN0YWtlQWRkcmVzcwkApQgBCAUBaQZjYWxsZXIJAAIBAiZDQ1I6IFRoaXMgaXMgc29tZXRoaW5nIGZpc2h5IGdvaW5nIG9uIQkBEmFkZENvdXBvbnNJbnRlcm5hbAIFCXJlY2lwaWVudAUGYW1vdW50AWkBCnVzZUNvdXBvbnMBEWFtb3VudFRyeWluZ1RvUGF5BAppbnZva2luZ1NjCAUBaQZjYWxsZXIDCQBmAgAABRFhbW91bnRUcnlpbmdUb1BheQkAAgECL0NVQzogT25seSBwb3NpdGl2ZSBhbW91bnQgb2YgbW9uZXkgY2FuIGJlIHBhaWQhAwkBASEBCQEPY29udGFpbnNFbGVtZW50AgUPc2NDYW5Vc2VDb3Vwb25zBQppbnZva2luZ1NjCQACAQI9Q1VDOiBPbmx5IGNlcnRhaW4gc21hcnQgY29udHJhY3RzIGNhbiB1c2UgdGhpcyBjb3Vwb24gbW9kdWxlIQQEdXNlcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIECWtleUFjdGl2ZQkBEWNvdXBvbnNVc2VyQWN0aXZlAQUEdXNlcgQQYXZhaWxhYmxlQ291cG9ucwkBDXRyeUdldEludGVnZXIBBQlrZXlBY3RpdmUDCQBmAgAABRBhdmFpbGFibGVDb3Vwb25zCQACAQIOQ1VDOiBHZXQgcmVrdCEECWxlZnRUb1BheQMJAGYCBRFhbW91bnRUcnlpbmdUb1BheQUQYXZhaWxhYmxlQ291cG9ucwkAZQIFEWFtb3VudFRyeWluZ1RvUGF5BRBhdmFpbGFibGVDb3Vwb25zAAAECmFtb3VudFBhaWQJAGUCBRFhbW91bnRUcnlpbmdUb1BheQUJbGVmdFRvUGF5BBRhdmFpbGFibGVDb3Vwb25zTGVmdAkAZQIFEGF2YWlsYWJsZUNvdXBvbnMFCmFtb3VudFBhaWQDCQBmAgAABRRhdmFpbGFibGVDb3Vwb25zTGVmdAkAAgECGkNVQzogWW91IHRyeSB0byBvdmVyc3BlbmQhBAhrZXlTcGVuZAkBEGNvdXBvbnNVc2VyU3BlbmQBBQR1c2VyBAZrZXlPbGQJARRjb3Vwb25zVXNlckFjdGl2ZU9sZAEFBHVzZXIECnRvdGFsU3BlbmQJAGQCCQENdHJ5R2V0SW50ZWdlcgEFCGtleVNwZW5kBQphbW91bnRQYWlkCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFCGtleVNwZW5kBQp0b3RhbFNwZW5kCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQZrZXlPbGQFEGF2YWlsYWJsZUNvdXBvbnMJAMwIAgkBDEludGVnZXJFbnRyeQIFCWtleUFjdGl2ZQUUYXZhaWxhYmxlQ291cG9uc0xlZnQFA25pbAUKYW1vdW50UGFpZAASI1nJ",
    "height": 3816807,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7i9HBD4VLQZ31CGA3GmNnsVvDVfM4wDrnBEMSQ4viHyB
Next: 7L3RzXCyu7oG7ZrrF4UL3Bgc9NCN7tmudpewEtPMJYyW

Diff: 
Old New Differences
21 21  
22 22  
23 23  func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
24 + 
25 + 
26 + func staticKey_turtleStakingAddress () = "static_turtleStakingAddress"
24 27  
25 28  
26 29  func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))
47 50  func getMasterAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_cfMasterAddress")))
48 51  
49 52  
53 + func getTurtleStakingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleStakingAddress())))
54 + 
55 + 
50 56  let wAccPKey = fromBase58String(valueOrErrorMessage(getString(getOracle(), "static_warsPKey"), "static_warsPKey not defined"))
51 57  
52 - let scCanUseCoupons = [getRebirthAddress(), getIncubatorAddress(), getFarmingAddress(), getGameDappAddress(), getBabyduckAddress(), getBreedingAddress()]
58 + let scCanUseCoupons = [getRebirthAddress(), getIncubatorAddress(), getFarmingAddress(), getGameDappAddress(), getBabyduckAddress(), getBreedingAddress(), getTurtleStakingAddress()]
53 59  
54 60  func couponsUserSpend (user) = (user + "_spend")
55 61  
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 + 
25 + 
26 + func staticKey_turtleStakingAddress () = "static_turtleStakingAddress"
24 27  
25 28  
26 29  func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))
27 30  
28 31  
29 32  func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_incubatorAddress")))
30 33  
31 34  
32 35  func getFarmingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_farmingAddress")))
33 36  
34 37  
35 38  func getGameDappAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_gameDappAddress")))
36 39  
37 40  
38 41  func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_burnAddress")))
39 42  
40 43  
41 44  func getBabyduckAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_babyDuckAddress")))
42 45  
43 46  
44 47  func getBreedingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_breederAddress")))
45 48  
46 49  
47 50  func getMasterAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_cfMasterAddress")))
48 51  
49 52  
53 + func getTurtleStakingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleStakingAddress())))
54 + 
55 + 
50 56  let wAccPKey = fromBase58String(valueOrErrorMessage(getString(getOracle(), "static_warsPKey"), "static_warsPKey not defined"))
51 57  
52 - let scCanUseCoupons = [getRebirthAddress(), getIncubatorAddress(), getFarmingAddress(), getGameDappAddress(), getBabyduckAddress(), getBreedingAddress()]
58 + let scCanUseCoupons = [getRebirthAddress(), getIncubatorAddress(), getFarmingAddress(), getGameDappAddress(), getBabyduckAddress(), getBreedingAddress(), getTurtleStakingAddress()]
53 59  
54 60  func couponsUserSpend (user) = (user + "_spend")
55 61  
56 62  
57 63  func couponsUserActive (user) = (user + "_active")
58 64  
59 65  
60 66  func couponsUserActiveOld (user) = (couponsUserActive(user) + "_old")
61 67  
62 68  
63 69  func addCouponsInternal (user,amount) = {
64 70      let keyOld = couponsUserActiveOld(user)
65 71      let key = couponsUserActive(user)
66 72      let couponsOld = tryGetInteger(key)
67 73      let coupons = (couponsOld + amount)
68 74  [IntegerEntry(keyOld, couponsOld), IntegerEntry(key, coupons)]
69 75      }
70 76  
71 77  
72 78  @Callable(i)
73 79  func configureOracle (oracle) = if ((i.caller != this))
74 80      then throw("CCO: admin only")
75 81      else [StringEntry("static_oracleAddress", oracle)]
76 82  
77 83  
78 84  
79 85  @Callable(i)
80 86  func addCoupons (user,amount) = if (if ((i.caller != this))
81 87      then (i.callerPublicKey != wAccPKey)
82 88      else false)
83 89      then throw("CAC: admin only")
84 90      else addCouponsInternal(user, amount)
85 91  
86 92  
87 93  
88 94  @Callable(i)
89 95  func addCouponsBatch (batch) = if (if ((i.caller != this))
90 96      then (i.callerPublicKey != wAccPKey)
91 97      else false)
92 98      then throw("CAC: admin only")
93 99      else {
94 100          let couponsList = split(batch, ";")
95 101          func handleCoupon (acc,coupon) =         {
96 102              let splitArray = split(coupon, ":")
97 103              let user = splitArray[0]
98 104              let amount = parseIntValue(splitArray[1])
99 105              let burnCall = invoke(getBurnAddress(), "burnByInvoke", [amount], nil)
100 106              if ((burnCall == burnCall))
101 107                  then (acc ++ addCouponsInternal(user, amount))
102 108                  else throw("Strict value is not equal to itself.")
103 109              }
104 110  
105 111          let $l = couponsList
106 112          let $s = size($l)
107 113          let $acc0 = nil
108 114          func $f0_1 ($a,$i) =         if (($i >= $s))
109 115              then $a
110 116              else handleCoupon($a, $l[$i])
111 117  
112 118          func $f0_2 ($a,$i) =         if (($i >= $s))
113 119              then $a
114 120              else throw("List size exceeds 20")
115 121  
116 122          $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)
117 123          }
118 124  
119 125  
120 126  
121 127  @Callable(i)
122 128  func CFRefund (recipient,amount) = {
123 129      let cfAddress = getStringValue(i.caller, "CF_ADDRESS")
124 130      let key = (("f_" + cfAddress) + "_stake_address")
125 131      let stakeAddress = getStringValue(getMasterAddress(), key)
126 132      if ((stakeAddress != toString(i.caller)))
127 133          then throw("CCR: This is something fishy going on!")
128 134          else addCouponsInternal(recipient, amount)
129 135      }
130 136  
131 137  
132 138  
133 139  @Callable(i)
134 140  func useCoupons (amountTryingToPay) = {
135 141      let invokingSc = i.caller
136 142      if ((0 > amountTryingToPay))
137 143          then throw("CUC: Only positive amount of money can be paid!")
138 144          else if (!(containsElement(scCanUseCoupons, invokingSc)))
139 145              then throw("CUC: Only certain smart contracts can use this coupon module!")
140 146              else {
141 147                  let user = toString(i.originCaller)
142 148                  let keyActive = couponsUserActive(user)
143 149                  let availableCoupons = tryGetInteger(keyActive)
144 150                  if ((0 > availableCoupons))
145 151                      then throw("CUC: Get rekt!")
146 152                      else {
147 153                          let leftToPay = if ((amountTryingToPay > availableCoupons))
148 154                              then (amountTryingToPay - availableCoupons)
149 155                              else 0
150 156                          let amountPaid = (amountTryingToPay - leftToPay)
151 157                          let availableCouponsLeft = (availableCoupons - amountPaid)
152 158                          if ((0 > availableCouponsLeft))
153 159                              then throw("CUC: You try to overspend!")
154 160                              else {
155 161                                  let keySpend = couponsUserSpend(user)
156 162                                  let keyOld = couponsUserActiveOld(user)
157 163                                  let totalSpend = (tryGetInteger(keySpend) + amountPaid)
158 164                                  $Tuple2([IntegerEntry(keySpend, totalSpend), IntegerEntry(keyOld, availableCoupons), IntegerEntry(keyActive, availableCouponsLeft)], amountPaid)
159 165                                  }
160 166                          }
161 167                  }
162 168      }
163 169  
164 170

Old	New		Differences
21	21
22	22
23	23		func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
	24	+
	25	+
	26	+	func staticKey_turtleStakingAddress () = "static_turtleStakingAddress"
24	27
25	28
26	29		func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))

47	50		func getMasterAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_cfMasterAddress")))
48	51
49	52
	53	+	func getTurtleStakingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleStakingAddress())))
	54	+
	55	+
50	56		let wAccPKey = fromBase58String(valueOrErrorMessage(getString(getOracle(), "static_warsPKey"), "static_warsPKey not defined"))
51	57
52		-	let scCanUseCoupons = [getRebirthAddress(), getIncubatorAddress(), getFarmingAddress(), getGameDappAddress(), getBabyduckAddress(), getBreedingAddress()]
	58	+	let scCanUseCoupons = [getRebirthAddress(), getIncubatorAddress(), getFarmingAddress(), getGameDappAddress(), getBabyduckAddress(), getBreedingAddress(), getTurtleStakingAddress()]
53	59
54	60		func couponsUserSpend (user) = (user + "_spend")
55	61

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	+
	25	+
	26	+	func staticKey_turtleStakingAddress () = "static_turtleStakingAddress"
24	27
25	28
26	29		func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))
27	30
28	31
29	32		func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_incubatorAddress")))
30	33
31	34
32	35		func getFarmingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_farmingAddress")))
33	36
34	37
35	38		func getGameDappAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_gameDappAddress")))
36	39
37	40
38	41		func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_burnAddress")))
39	42
40	43
41	44		func getBabyduckAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_babyDuckAddress")))
42	45
43	46
44	47		func getBreedingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_breederAddress")))
45	48
46	49
47	50		func getMasterAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_cfMasterAddress")))
48	51
49	52
	53	+	func getTurtleStakingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleStakingAddress())))
	54	+
	55	+
50	56		let wAccPKey = fromBase58String(valueOrErrorMessage(getString(getOracle(), "static_warsPKey"), "static_warsPKey not defined"))
51	57
52		-	let scCanUseCoupons = [getRebirthAddress(), getIncubatorAddress(), getFarmingAddress(), getGameDappAddress(), getBabyduckAddress(), getBreedingAddress()]
	58	+	let scCanUseCoupons = [getRebirthAddress(), getIncubatorAddress(), getFarmingAddress(), getGameDappAddress(), getBabyduckAddress(), getBreedingAddress(), getTurtleStakingAddress()]
53	59
54	60		func couponsUserSpend (user) = (user + "_spend")
55	61
56	62
57	63		func couponsUserActive (user) = (user + "_active")
58	64
59	65
60	66		func couponsUserActiveOld (user) = (couponsUserActive(user) + "_old")
61	67
62	68
63	69		func addCouponsInternal (user,amount) = {
64	70		let keyOld = couponsUserActiveOld(user)
65	71		let key = couponsUserActive(user)
66	72		let couponsOld = tryGetInteger(key)
67	73		let coupons = (couponsOld + amount)
68	74		[IntegerEntry(keyOld, couponsOld), IntegerEntry(key, coupons)]
69	75		}
70	76
71	77
72	78		@Callable(i)
73	79		func configureOracle (oracle) = if ((i.caller != this))
74	80		then throw("CCO: admin only")
75	81		else [StringEntry("static_oracleAddress", oracle)]
76	82
77	83
78	84
79	85		@Callable(i)
80	86		func addCoupons (user,amount) = if (if ((i.caller != this))
81	87		then (i.callerPublicKey != wAccPKey)
82	88		else false)
83	89		then throw("CAC: admin only")
84	90		else addCouponsInternal(user, amount)
85	91
86	92
87	93
88	94		@Callable(i)
89	95		func addCouponsBatch (batch) = if (if ((i.caller != this))
90	96		then (i.callerPublicKey != wAccPKey)
91	97		else false)
92	98		then throw("CAC: admin only")
93	99		else {
94	100		let couponsList = split(batch, ";")
95	101		func handleCoupon (acc,coupon) = {
96	102		let splitArray = split(coupon, ":")
97	103		let user = splitArray[0]
98	104		let amount = parseIntValue(splitArray[1])
99	105		let burnCall = invoke(getBurnAddress(), "burnByInvoke", [amount], nil)
100	106		if ((burnCall == burnCall))
101	107		then (acc ++ addCouponsInternal(user, amount))
102	108		else throw("Strict value is not equal to itself.")
103	109		}
104	110
105	111		let $l = couponsList
106	112		let $s = size($l)
107	113		let $acc0 = nil
108	114		func $f0_1 ($a,$i) = if (($i >= $s))
109	115		then $a
110	116		else handleCoupon($a, $l[$i])
111	117
112	118		func $f0_2 ($a,$i) = if (($i >= $s))
113	119		then $a
114	120		else throw("List size exceeds 20")
115	121
116	122		$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)
117	123		}
118	124
119	125
120	126
121	127		@Callable(i)
122	128		func CFRefund (recipient,amount) = {
123	129		let cfAddress = getStringValue(i.caller, "CF_ADDRESS")
124	130		let key = (("f_" + cfAddress) + "_stake_address")
125	131		let stakeAddress = getStringValue(getMasterAddress(), key)
126	132		if ((stakeAddress != toString(i.caller)))
127	133		then throw("CCR: This is something fishy going on!")
128	134		else addCouponsInternal(recipient, amount)
129	135		}
130	136
131	137
132	138
133	139		@Callable(i)
134	140		func useCoupons (amountTryingToPay) = {
135	141		let invokingSc = i.caller
136	142		if ((0 > amountTryingToPay))
137	143		then throw("CUC: Only positive amount of money can be paid!")
138	144		else if (!(containsElement(scCanUseCoupons, invokingSc)))
139	145		then throw("CUC: Only certain smart contracts can use this coupon module!")
140	146		else {
141	147		let user = toString(i.originCaller)
142	148		let keyActive = couponsUserActive(user)
143	149		let availableCoupons = tryGetInteger(keyActive)
144	150		if ((0 > availableCoupons))
145	151		then throw("CUC: Get rekt!")
146	152		else {
147	153		let leftToPay = if ((amountTryingToPay > availableCoupons))
148	154		then (amountTryingToPay - availableCoupons)
149	155		else 0
150	156		let amountPaid = (amountTryingToPay - leftToPay)
151	157		let availableCouponsLeft = (availableCoupons - amountPaid)
152	158		if ((0 > availableCouponsLeft))
153	159		then throw("CUC: You try to overspend!")
154	160		else {
155	161		let keySpend = couponsUserSpend(user)
156	162		let keyOld = couponsUserActiveOld(user)
157	163		let totalSpend = (tryGetInteger(keySpend) + amountPaid)
158	164		$Tuple2([IntegerEntry(keySpend, totalSpend), IntegerEntry(keyOld, availableCoupons), IntegerEntry(keyActive, availableCouponsLeft)], amountPaid)
159	165		}
160	166		}
161	167		}
162	168		}
163	169
164	170

github/deemru/w8io/3ef1775 
28.04 ms ◑