w8 · tx · 9QB···pMX

tx · 9QB2iRUPMPudweMpGTuxbXZioc1yToLHxZVJt3r3BpMX

3P7aVqHv6fXkYuS4sRW2K17ENZMsbXi3sPV:  -0.00900000 Waves

2023.09.19 11:04 [3827782] smart account 3P7aVqHv6fXkYuS4sRW2K17ENZMsbXi3sPV > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9QB2iRUPMPudweMpGTuxbXZioc1yToLHxZVJt3r3BpMX",
    "fee": 900000,
    "feeAssetId": null,
    "timestamp": 1695110714779,
    "version": 2,
    "chainId": 87,
    "sender": "3P7aVqHv6fXkYuS4sRW2K17ENZMsbXi3sPV",
    "senderPublicKey": "5SevHzYFiymbFWe1GPt6nNYccPnfTbMft1DqZWfRH8GN",
    "proofs": [
        "4RRoYLyq3hHDtjPbWuWU9ydwoYtv4gHFC2cPR3K3SyyqWQN8Ypjcwn4oJXKQcy3NQWitoPEo86PqCnuA5BABsdVJ"
    ],
    "script": "base64:BgIdCAISAwoBCBIECgIIARIDCgEIEgQKAggBEgMKAQEZARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJ0IAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYQUHJG1hdGNoMAUBYQIAAQx0cnlHZXRTdHJpbmcBA2tleQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgUEdGhpcwUDa2V5AQ10cnlHZXRJbnRlZ2VyAQNrZXkEByRtYXRjaDAJAJoIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAAAQlnZXRPcmFjbGUACQEHQWRkcmVzcwEJANkEAQkBDHRyeUdldFN0cmluZwECFHN0YXRpY19vcmFjbGVBZGRyZXNzAR5zdGF0aWNLZXlfdHVydGxlU3Rha2luZ0FkZHJlc3MAAhtzdGF0aWNfdHVydGxlU3Rha2luZ0FkZHJlc3MBHnN0YXRpY0tleV90dXJ0bGVSZWJpcnRoQWRkcmVzcwACG3N0YXRpY190dXJ0bGVSZWJpcnRoQWRkcmVzcwEVc3RhdGljS2V5X3JvcGVBZGRyZXNzAAISc3RhdGljX3JvcGVBZGRyZXNzARFnZXRSZWJpcnRoQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIVc3RhdGljX3JlYmlydGhBZGRyZXNzARNnZXRJbmN1YmF0b3JBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhdzdGF0aWNfaW5jdWJhdG9yQWRkcmVzcwERZ2V0RmFybWluZ0FkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFXN0YXRpY19mYXJtaW5nQWRkcmVzcwESZ2V0R2FtZURhcHBBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhZzdGF0aWNfZ2FtZURhcHBBZGRyZXNzAQ5nZXRCdXJuQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAISc3RhdGljX2J1cm5BZGRyZXNzARJnZXRCYWJ5ZHVja0FkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFnN0YXRpY19iYWJ5RHVja0FkZHJlc3MBEmdldEJyZWVkaW5nQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIVc3RhdGljX2JyZWVkZXJBZGRyZXNzARBnZXRNYXN0ZXJBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhZzdGF0aWNfY2ZNYXN0ZXJBZGRyZXNzARdnZXRUdXJ0bGVTdGFraW5nQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAkBHnN0YXRpY0tleV90dXJ0bGVTdGFraW5nQWRkcmVzcwABF2dldFR1cnRsZVJlYmlydGhBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUACQEec3RhdGljS2V5X3R1cnRsZVJlYmlydGhBZGRyZXNzAAEOZ2V0Um9wZUFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQAJARVzdGF0aWNLZXlfcm9wZUFkZHJlc3MAAAh3QWNjUEtleQkA2QQBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgkBCWdldE9yYWNsZQACD3N0YXRpY193YXJzUEtleQIbc3RhdGljX3dhcnNQS2V5IG5vdCBkZWZpbmVkAA9zY0NhblVzZUNvdXBvbnMJAMwIAgkBEWdldFJlYmlydGhBZGRyZXNzAAkAzAgCCQETZ2V0SW5jdWJhdG9yQWRkcmVzcwAJAMwIAgkBEWdldEZhcm1pbmdBZGRyZXNzAAkAzAgCCQESZ2V0R2FtZURhcHBBZGRyZXNzAAkAzAgCCQESZ2V0QmFieWR1Y2tBZGRyZXNzAAkAzAgCCQESZ2V0QnJlZWRpbmdBZGRyZXNzAAkAzAgCCQEXZ2V0VHVydGxlU3Rha2luZ0FkZHJlc3MACQDMCAIJARdnZXRUdXJ0bGVSZWJpcnRoQWRkcmVzcwAJAMwIAgkBDmdldFJvcGVBZGRyZXNzAAUDbmlsARBjb3Vwb25zVXNlclNwZW5kAQR1c2VyCQCsAgIFBHVzZXICBl9zcGVuZAERY291cG9uc1VzZXJBY3RpdmUBBHVzZXIJAKwCAgUEdXNlcgIHX2FjdGl2ZQEUY291cG9uc1VzZXJBY3RpdmVPbGQBBHVzZXIJAKwCAgkBEWNvdXBvbnNVc2VyQWN0aXZlAQUEdXNlcgIEX29sZAEQY291cG9uc1NwZW5kT25TYwECc2MJAKwCAgUCc2MCD19zcGVuZF9ieV91c2luZwESYWRkQ291cG9uc0ludGVybmFsAgR1c2VyBmFtb3VudAQGa2V5T2xkCQEUY291cG9uc1VzZXJBY3RpdmVPbGQBBQR1c2VyBANrZXkJARFjb3Vwb25zVXNlckFjdGl2ZQEFBHVzZXIECmNvdXBvbnNPbGQJAQ10cnlHZXRJbnRlZ2VyAQUDa2V5BAdjb3Vwb25zCQBkAgUKY291cG9uc09sZAUGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQZrZXlPbGQFCmNvdXBvbnNPbGQJAMwIAgkBDEludGVnZXJFbnRyeQIFA2tleQUHY291cG9ucwUDbmlsBQFpAQ9jb25maWd1cmVPcmFjbGUBBm9yYWNsZQMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECD0NDTzogYWRtaW4gb25seQkAzAgCCQELU3RyaW5nRW50cnkCAhRzdGF0aWNfb3JhY2xlQWRkcmVzcwUGb3JhY2xlBQNuaWwBaQEKYWRkQ291cG9ucwIEdXNlcgZhbW91bnQDAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQECIT0CCAUBaQ9jYWxsZXJQdWJsaWNLZXkFCHdBY2NQS2V5BwkAAgECD0NBQzogYWRtaW4gb25seQkBEmFkZENvdXBvbnNJbnRlcm5hbAIFBHVzZXIFBmFtb3VudAFpAQ9hZGRDb3Vwb25zQmF0Y2gBBWJhdGNoAwMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkBAiE9AggFAWkPY2FsbGVyUHVibGljS2V5BQh3QWNjUEtleQcJAAIBAg9DQUM6IGFkbWluIG9ubHkEC2NvdXBvbnNMaXN0CQC1CQIFBWJhdGNoAgE7CgEMaGFuZGxlQ291cG9uAgNhY2MGY291cG9uBApzcGxpdEFycmF5CQC1CQIFBmNvdXBvbgIBOgQEdXNlcgkAkQMCBQpzcGxpdEFycmF5AAAEBmFtb3VudAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCnNwbGl0QXJyYXkAAQQIYnVybkNhbGwJAPwHBAkBDmdldEJ1cm5BZGRyZXNzAAIMYnVybkJ5SW52b2tlCQDMCAIFBmFtb3VudAUDbmlsBQNuaWwDCQAAAgUIYnVybkNhbGwFCGJ1cm5DYWxsCQDOCAIFA2FjYwkBEmFkZENvdXBvbnNJbnRlcm5hbAIFBHVzZXIFBmFtb3VudAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgoAAiRsBQtjb3Vwb25zTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMaGFuZGxlQ291cG9uAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQBaQEIQ0ZSZWZ1bmQCCXJlY2lwaWVudAZhbW91bnQECWNmQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNTMpAggFAWkGY2FsbGVyAgpDRl9BRERSRVNTBANrZXkJAKwCAgkArAICAgJmXwUJY2ZBZGRyZXNzAg5fc3Rha2VfYWRkcmVzcwQMc3Rha2VBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA1MykCCQEQZ2V0TWFzdGVyQWRkcmVzcwAFA2tleQMJAQIhPQIFDHN0YWtlQWRkcmVzcwkApQgBCAUBaQZjYWxsZXIJAAIBAiZDQ1I6IFRoaXMgaXMgc29tZXRoaW5nIGZpc2h5IGdvaW5nIG9uIQkBEmFkZENvdXBvbnNJbnRlcm5hbAIFCXJlY2lwaWVudAUGYW1vdW50AWkBCnVzZUNvdXBvbnMBEWFtb3VudFRyeWluZ1RvUGF5BAppbnZva2luZ1NjCAUBaQZjYWxsZXIDCQBmAgAABRFhbW91bnRUcnlpbmdUb1BheQkAAgECL0NVQzogT25seSBwb3NpdGl2ZSBhbW91bnQgb2YgbW9uZXkgY2FuIGJlIHBhaWQhAwkBASEBCQEPY29udGFpbnNFbGVtZW50AgUPc2NDYW5Vc2VDb3Vwb25zBQppbnZva2luZ1NjCQACAQI9Q1VDOiBPbmx5IGNlcnRhaW4gc21hcnQgY29udHJhY3RzIGNhbiB1c2UgdGhpcyBjb3Vwb24gbW9kdWxlIQQEdXNlcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIECWtleUFjdGl2ZQkBEWNvdXBvbnNVc2VyQWN0aXZlAQUEdXNlcgQQYXZhaWxhYmxlQ291cG9ucwkBDXRyeUdldEludGVnZXIBBQlrZXlBY3RpdmUDCQBmAgAABRBhdmFpbGFibGVDb3Vwb25zCQACAQIOQ1VDOiBHZXQgcmVrdCEECWxlZnRUb1BheQMJAGYCBRFhbW91bnRUcnlpbmdUb1BheQUQYXZhaWxhYmxlQ291cG9ucwkAZQIFEWFtb3VudFRyeWluZ1RvUGF5BRBhdmFpbGFibGVDb3Vwb25zAAAECmFtb3VudFBhaWQJAGUCBRFhbW91bnRUcnlpbmdUb1BheQUJbGVmdFRvUGF5BBRhdmFpbGFibGVDb3Vwb25zTGVmdAkAZQIFEGF2YWlsYWJsZUNvdXBvbnMFCmFtb3VudFBhaWQDCQBmAgAABRRhdmFpbGFibGVDb3Vwb25zTGVmdAkAAgECGkNVQzogWW91IHRyeSB0byBvdmVyc3BlbmQhBAhrZXlTcGVuZAkBEGNvdXBvbnNVc2VyU3BlbmQBBQR1c2VyBAZrZXlPbGQJARRjb3Vwb25zVXNlckFjdGl2ZU9sZAEFBHVzZXIECmtleVNwZW5kU2MJARBjb3Vwb25zU3BlbmRPblNjAQkApQgBCAUBaQZjYWxsZXIECnRvdGFsU3BlbmQJAGQCCQENdHJ5R2V0SW50ZWdlcgEFCGtleVNwZW5kBQphbW91bnRQYWlkBAx0b3RhbFNwZW5kU2MJAGQCCQENdHJ5R2V0SW50ZWdlcgEFCmtleVNwZW5kU2MFCmFtb3VudFBhaWQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUIa2V5U3BlbmQFCnRvdGFsU3BlbmQJAMwIAgkBDEludGVnZXJFbnRyeQIFBmtleU9sZAUQYXZhaWxhYmxlQ291cG9ucwkAzAgCCQEMSW50ZWdlckVudHJ5AgUJa2V5QWN0aXZlBRRhdmFpbGFibGVDb3Vwb25zTGVmdAkAzAgCCQEMSW50ZWdlckVudHJ5AgUKa2V5U3BlbmRTYwUMdG90YWxTcGVuZFNjBQNuaWwFCmFtb3VudFBhaWQAWMVzcg==",
    "height": 3827782,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: D3UmK9TR6FXZkNJwPHevMih5rAtW51kCyFWDyxkDS7uY
Next: jhh7zQh2EbHbgn3RE3jkgfUTWQX1H3hSARgNm4T3iSL

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

Old	New		Differences
27	27
28	28
29	29		func staticKey_turtleRebirthAddress () = "static_turtleRebirthAddress"
	30	+
	31	+
	32	+	func staticKey_ropeAddress () = "static_ropeAddress"
30	33
31	34
32	35		func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))

59	62		func getTurtleRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleRebirthAddress())))
60	63
61	64
	65	+	func getRopeAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_ropeAddress())))
	66	+
	67	+
62	68		let wAccPKey = fromBase58String(valueOrErrorMessage(getString(getOracle(), "static_warsPKey"), "static_warsPKey not defined"))
63	69
64		-	let scCanUseCoupons = [getRebirthAddress(), getIncubatorAddress(), getFarmingAddress(), getGameDappAddress(), getBabyduckAddress(), getBreedingAddress(), getTurtleStakingAddress(), getTurtleRebirthAddress()]
	70	+	let scCanUseCoupons = [getRebirthAddress(), getIncubatorAddress(), getFarmingAddress(), getGameDappAddress(), getBabyduckAddress(), getBreedingAddress(), getTurtleStakingAddress(), getTurtleRebirthAddress(), getRopeAddress()]
65	71
66	72		func couponsUserSpend (user) = (user + "_spend")
67	73

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

github/deemru/w8io/3ef1775 
56.33 ms ◑