w8 · tx · D7j···xSW

tx · D7jnBhUFhJ2cbCEEHRXR6wcBdVX587wXSiaQ2B1URxSW

3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk:  -0.00500000 Waves

2022.07.31 02:04 [2163190] smart account 3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "D7jnBhUFhJ2cbCEEHRXR6wcBdVX587wXSiaQ2B1URxSW",
    "fee": 500000,
    "feeAssetId": null,
    "timestamp": 1659222292525,
    "version": 2,
    "chainId": 84,
    "sender": "3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk",
    "senderPublicKey": "AR4BeE6hYADMvKxgRQs4ADN3krEqb2j8WE3WfJxzL3zE",
    "proofs": [
        "5mVtme3d15k1YYcbEmrxaWzGyLkTCwraQYqUWDGTgYqqLH3poX3FQtDQWc9EZSdNzrpyx7QKMVvLPiaEkB5su1wE"
    ],
    "script": "base64:BgIcCAISAwoBCBIAEgQKAggBEgASBQoDCAgIEgASAA8ABXdhdmVzAIDC1y8ADnRpY2tldFByaWNlSW50AMCEPQALdGlja2V0UHJpY2UFDnRpY2tldFByaWNlSW50AAZpbnZGZWUAoMIeABJ3aXRoZHJhd0ZlZVBlcmNlbnQABQAWZmVlQ29sbGVjdG9yQWRkcmVzc0tleQITZmVlQ29sbGVjdG9yQWRkcmVzcwENdHJ5R2V0SW50ZWdlcgEDa2V5BAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAESZ2V0VGlja2V0c0NvdW50S2V5AQ1hZGRyZXNzU3RyaW5nCQCsAgIFDWFkZHJlc3NTdHJpbmcCDV90aWNrZXRzQ291bnQBDWdhbWVXaW5uZXJLZXkBBmdhbWVJZAkArAICBQZnYW1lSWQCB193aW5uZXIBGGFkZHJlc3NBdmFpbGFibGVGdW5kc0tleQEHYWRkcmVzcwkArAICBQdhZGRyZXNzAg9fYXZhaWxhYmxlRnVuZHMBGmFkZHJlc3NUb3RhbExvY2tlZEZ1bmRzS2V5AQdhZGRyZXNzCQCsAgIFB2FkZHJlc3MCEV90b3RhbExvY2tlZEZ1bmRzARlhZGRyZXNzTG9ja2VkRnVuZHNGb3JHYW1lAgdhZGRyZXNzBmdhbWVJZAkArAICCQCsAgIFB2FkZHJlc3MCDV9sb2NrZWRGdW5kc18FBmdhbWVJZAEaYWRkcmVzc0F2YWlsYWJsZVJld2FyZHNLZXkBB2FkZHJlc3MJAKwCAgUHYWRkcmVzcwIRX2F2YWlsYWJsZVJld2FyZHMBD2dldFRpY2tldHNDb3VudAENYWRkcmVzc1N0cmluZwkBDXRyeUdldEludGVnZXIBCQESZ2V0VGlja2V0c0NvdW50S2V5AQUNYWRkcmVzc1N0cmluZwENY29uc3VtZVRpY2tldAEKcGxheWVyQWRkcgQSY3VycmVudFRpY2tldENvdW50CQEPZ2V0VGlja2V0c0NvdW50AQUKcGxheWVyQWRkcgQVbmV3Q3VycmVudFRpY2tldENvdW50CQBlAgUSY3VycmVudFRpY2tldENvdW50AAEDCQBmAgAABRVuZXdDdXJyZW50VGlja2V0Q291bnQAAAUVbmV3Q3VycmVudFRpY2tldENvdW50BwFpARZzZXRGZWVDb2xsZWN0b3JBZGRyZXNzAQ1jb2xsZWN0b3JBZGRyAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIKQWRtaW4gT25seQkAzAgCCQELU3RyaW5nRW50cnkCBRZmZWVDb2xsZWN0b3JBZGRyZXNzS2V5BQ1jb2xsZWN0b3JBZGRyBQNuaWwBaQEMZGVwb3NpdEZ1bmRzAAQDcG10AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAkQMCCAUBaQhwYXltZW50cwAACQACAQIhUGxlYXNlIGF0dGFjaCBleGFjdGx5IG9uZSBwYXltZW50AwkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAkAAgECGVlvdSBjYW4gb25seSBkZXBvc2l0IFVTRE4EDWNhbGxlckFkZHJTdHIJANgEAQgIBQFpBmNhbGxlcgVieXRlcwkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEYYWRkcmVzc0F2YWlsYWJsZUZ1bmRzS2V5AQUNY2FsbGVyQWRkclN0cggFA3BtdAZhbW91bnQFA25pbAABAWkBEGxvY2tGdW5kc0ZvckdhbWUCBmdhbWVJZAxhbW91bnRUb0xvY2sEDWNhbGxlckFkZHJTdHIJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQVY3VycmVudEF2YWlsYWJsZUZ1bmRzCQENdHJ5R2V0SW50ZWdlcgEJARhhZGRyZXNzQXZhaWxhYmxlRnVuZHNLZXkBBQ1jYWxsZXJBZGRyU3RyBBdjdXJyZW50VG90YWxMb2NrZWRGdW5kcwkBDXRyeUdldEludGVnZXIBCQEaYWRkcmVzc1RvdGFsTG9ja2VkRnVuZHNLZXkBBQ1jYWxsZXJBZGRyU3RyAwkAZgIFDGFtb3VudFRvTG9jawUVY3VycmVudEF2YWlsYWJsZUZ1bmRzCQACAQIiTm90IGVub3VnaCBhdmFpbGFibGUgZnVuZHMgdG8gbG9jawkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEYYWRkcmVzc0F2YWlsYWJsZUZ1bmRzS2V5AQUNY2FsbGVyQWRkclN0cgkAZQIFFWN1cnJlbnRBdmFpbGFibGVGdW5kcwUMYW1vdW50VG9Mb2NrCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEaYWRkcmVzc1RvdGFsTG9ja2VkRnVuZHNLZXkBBQ1jYWxsZXJBZGRyU3RyCQBkAgUXY3VycmVudFRvdGFsTG9ja2VkRnVuZHMFDGFtb3VudFRvTG9jawkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGWFkZHJlc3NMb2NrZWRGdW5kc0ZvckdhbWUCBQ1jYWxsZXJBZGRyU3RyBQZnYW1lSWQFDGFtb3VudFRvTG9jawUDbmlsAAEBaQENd2l0aGRyYXdGdW5kcwAEDWNhbGxlckFkZHJTdHIJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQQZmVlQ29sbGVjdG9yQWRkcgkBEUBleHRyTmF0aXZlKDEwNjIpAQkBEUBleHRyTmF0aXZlKDEwNTgpAQUWZmVlQ29sbGVjdG9yQWRkcmVzc0tleQQVY3VycmVudEF2YWlsYWJsZUZ1bmRzCQENdHJ5R2V0SW50ZWdlcgEJARhhZGRyZXNzQXZhaWxhYmxlRnVuZHNLZXkBBQ1jYWxsZXJBZGRyU3RyBAt3aXRoZHJhd0ZlZQkAawMFFWN1cnJlbnRBdmFpbGFibGVGdW5kcwUSd2l0aGRyYXdGZWVQZXJjZW50AGQEFGFjdHVhbEF2YWlsYWJsZUZ1bmRzCQBlAgUVY3VycmVudEF2YWlsYWJsZUZ1bmRzBQt3aXRoZHJhd0ZlZQMJAGcCAAAFFGFjdHVhbEF2YWlsYWJsZUZ1bmRzCQACAQIeTm8gYXZhaWxhYmxlIGZ1bmRzIHRvIHdpdGhkcmF3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEYYWRkcmVzc0F2YWlsYWJsZUZ1bmRzS2V5AQUNY2FsbGVyQWRkclN0cgAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUUYWN0dWFsQXZhaWxhYmxlRnVuZHMFBHVuaXQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUQZmVlQ29sbGVjdG9yQWRkcgULd2l0aGRyYXdGZWUFBHVuaXQFA25pbAFpARBzZXRXaW5uZXJIZWFkc1VwAwZnYW1lSWQNd2lubmVyQWRkclN0cg9vdGhlclBsYXllckFkZHIDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAgpBZG1pbiBPbmx5BBNhdmFpbGFibGVSZXdhcmRzS2V5CQEaYWRkcmVzc0F2YWlsYWJsZVJld2FyZHNLZXkBBQ13aW5uZXJBZGRyU3RyBBdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwkBDXRyeUdldEludGVnZXIBBRNhdmFpbGFibGVSZXdhcmRzS2V5BBRuZXdUaWNrZXRDb3VudFdpbm5lcgkBDWNvbnN1bWVUaWNrZXQBBQ13aW5uZXJBZGRyU3RyBBluZXdUaWNrZXRDb3VudE90aGVyUGxheWVyCQENY29uc3VtZVRpY2tldAEFD290aGVyUGxheWVyQWRkcgkAzAgCCQELU3RyaW5nRW50cnkCCQENZ2FtZVdpbm5lcktleQEFBmdhbWVJZAUNd2lubmVyQWRkclN0cgkAzAgCCQEMSW50ZWdlckVudHJ5AgUTYXZhaWxhYmxlUmV3YXJkc0tleQkAZAIFF2N1cnJlbnRBdmFpbGFibGVSZXdhcmRzCQBoAgULdGlja2V0UHJpY2UAAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmdldFRpY2tldHNDb3VudEtleQEFDXdpbm5lckFkZHJTdHIFFG5ld1RpY2tldENvdW50V2lubmVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESZ2V0VGlja2V0c0NvdW50S2V5AQUPb3RoZXJQbGF5ZXJBZGRyBRluZXdUaWNrZXRDb3VudE90aGVyUGxheWVyBQNuaWwBaQEPd2l0aGRyYXdSZXdhcmRzAAQNY2FsbGVyQWRkclN0cgkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBBBmZWVDb2xsZWN0b3JBZGRyCQERQGV4dHJOYXRpdmUoMTA2MikBCQERQGV4dHJOYXRpdmUoMTA1OCkBBRZmZWVDb2xsZWN0b3JBZGRyZXNzS2V5BBdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwkBDXRyeUdldEludGVnZXIBCQEaYWRkcmVzc0F2YWlsYWJsZVJld2FyZHNLZXkBBQ1jYWxsZXJBZGRyU3RyBAt3aXRoZHJhd0ZlZQkAawMFF2N1cnJlbnRBdmFpbGFibGVSZXdhcmRzBRJ3aXRoZHJhd0ZlZVBlcmNlbnQAZAQWYWN0dWFsQXZhaWxhYmxlUmV3YXJkcwkAZQIJAGUCBRdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwUGaW52RmVlBQt3aXRoZHJhd0ZlZQMJAGcCAAAFF2N1cnJlbnRBdmFpbGFibGVSZXdhcmRzCQACAQIgTm8gYXZhaWxhYmxlIHJld2FyZHMgdG8gd2l0aGRyYXcJAMwIAgkBDEludGVnZXJFbnRyeQIJARphZGRyZXNzQXZhaWxhYmxlUmV3YXJkc0tleQEFDWNhbGxlckFkZHJTdHIAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFFmFjdHVhbEF2YWlsYWJsZVJld2FyZHMFBHVuaXQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUQZmVlQ29sbGVjdG9yQWRkcgULd2l0aGRyYXdGZWUFBHVuaXQFA25pbAFpAQpidXlUaWNrZXRzAAQDcG10AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAkQMCCAUBaQhwYXltZW50cwAACQACAQIhUGxlYXNlIGF0dGFjaCBleGFjdGx5IG9uZSBwYXltZW50AwkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAkAAgECJ1RpY2tldHMgY2FuIG9ubHkgaWJlIHB1cmNoYXNlZCBpbiBXYXZlcwMJAQIhPQIIBQNwbXQGYW1vdW50BQt0aWNrZXRQcmljZQkAAgEJAKwCAgkArAICAh9UaGUgcGF5bWVudCBtdXN0IGJlIG9mIGV4YWN0bHkgCQCkAwEFDnRpY2tldFByaWNlSW50AgYgd2F2ZXMEDWNhbGxlckFkZHJTdHIJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQTY3VycmVudFRpY2tldHNDb3VudAkBDXRyeUdldEludGVnZXIBCQESZ2V0VGlja2V0c0NvdW50S2V5AQUNY2FsbGVyQWRkclN0cgkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESZ2V0VGlja2V0c0NvdW50S2V5AQUNY2FsbGVyQWRkclN0cgkAZAIFE2N1cnJlbnRUaWNrZXRzQ291bnQAAQUDbmlsAAEBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5+7bZVA==",
    "height": 2163190,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 9JYKWaPS6XB8LUzaGmP2oLMuA42DSvexEXnczxrtBWmF
Next: AAmTN5xueLrTJjg2SimCEibNohR1izAXPjbBxJ9R38uX

Diff: 
Old New Differences
33 33  func addressTotalLockedFundsKey (address) = (address + "_totalLockedFunds")
34 34  
35 35  
36 - func addressLockedFundsForGame (address,gameId) = ((address + "_LockedFunds_") + gameId)
36 + func addressLockedFundsForGame (address,gameId) = ((address + "_lockedFunds_") + gameId)
37 37  
38 38  
39 39  func addressAvailableRewardsKey (address) = (address + "_availableRewards")
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let waves = 100000000
5 5  
6 6  let ticketPriceInt = 1000000
7 7  
8 8  let ticketPrice = ticketPriceInt
9 9  
10 10  let invFee = 500000
11 11  
12 12  let withdrawFeePercent = 5
13 13  
14 14  let feeCollectorAddressKey = "feeCollectorAddress"
15 15  
16 16  func tryGetInteger (key) = match getInteger(this, key) {
17 17      case b: Int => 
18 18          b
19 19      case _ => 
20 20          0
21 21  }
22 22  
23 23  
24 24  func getTicketsCountKey (addressString) = (addressString + "_ticketsCount")
25 25  
26 26  
27 27  func gameWinnerKey (gameId) = (gameId + "_winner")
28 28  
29 29  
30 30  func addressAvailableFundsKey (address) = (address + "_availableFunds")
31 31  
32 32  
33 33  func addressTotalLockedFundsKey (address) = (address + "_totalLockedFunds")
34 34  
35 35  
36 - func addressLockedFundsForGame (address,gameId) = ((address + "_LockedFunds_") + gameId)
36 + func addressLockedFundsForGame (address,gameId) = ((address + "_lockedFunds_") + gameId)
37 37  
38 38  
39 39  func addressAvailableRewardsKey (address) = (address + "_availableRewards")
40 40  
41 41  
42 42  func getTicketsCount (addressString) = tryGetInteger(getTicketsCountKey(addressString))
43 43  
44 44  
45 45  func consumeTicket (playerAddr) = {
46 46      let currentTicketCount = getTicketsCount(playerAddr)
47 47      let newCurrentTicketCount = (currentTicketCount - 1)
48 48      if ((0 > newCurrentTicketCount))
49 49          then 0
50 50          else newCurrentTicketCount
51 51      }
52 52  
53 53  
54 54  @Callable(i)
55 55  func setFeeCollectorAddress (collectorAddr) = if ((i.caller != this))
56 56      then throw("Admin Only")
57 57      else [StringEntry(feeCollectorAddressKey, collectorAddr)]
58 58  
59 59  
60 60  
61 61  @Callable(i)
62 62  func depositFunds () = {
63 63      let pmt = if ((size(i.payments) == 1))
64 64          then i.payments[0]
65 65          else throw("Please attach exactly one payment")
66 66      if (isDefined(pmt.assetId))
67 67          then throw("You can only deposit USDN")
68 68          else {
69 69              let callerAddrStr = toBase58String(i.caller.bytes)
70 70              $Tuple2([IntegerEntry(addressAvailableFundsKey(callerAddrStr), pmt.amount)], 1)
71 71              }
72 72      }
73 73  
74 74  
75 75  
76 76  @Callable(i)
77 77  func lockFundsForGame (gameId,amountToLock) = {
78 78      let callerAddrStr = toBase58String(i.caller.bytes)
79 79      let currentAvailableFunds = tryGetInteger(addressAvailableFundsKey(callerAddrStr))
80 80      let currentTotalLockedFunds = tryGetInteger(addressTotalLockedFundsKey(callerAddrStr))
81 81      if ((amountToLock > currentAvailableFunds))
82 82          then throw("Not enough available funds to lock")
83 83          else $Tuple2([IntegerEntry(addressAvailableFundsKey(callerAddrStr), (currentAvailableFunds - amountToLock)), IntegerEntry(addressTotalLockedFundsKey(callerAddrStr), (currentTotalLockedFunds + amountToLock)), IntegerEntry(addressLockedFundsForGame(callerAddrStr, gameId), amountToLock)], 1)
84 84      }
85 85  
86 86  
87 87  
88 88  @Callable(i)
89 89  func withdrawFunds () = {
90 90      let callerAddrStr = toBase58String(i.caller.bytes)
91 91      let feeCollectorAddr = addressFromStringValue(getStringValue(feeCollectorAddressKey))
92 92      let currentAvailableFunds = tryGetInteger(addressAvailableFundsKey(callerAddrStr))
93 93      let withdrawFee = fraction(currentAvailableFunds, withdrawFeePercent, 100)
94 94      let actualAvailableFunds = (currentAvailableFunds - withdrawFee)
95 95      if ((0 >= actualAvailableFunds))
96 96          then throw("No available funds to withdraw")
97 97          else [IntegerEntry(addressAvailableFundsKey(callerAddrStr), 0), ScriptTransfer(i.caller, actualAvailableFunds, unit), ScriptTransfer(feeCollectorAddr, withdrawFee, unit)]
98 98      }
99 99  
100 100  
101 101  
102 102  @Callable(i)
103 103  func setWinnerHeadsUp (gameId,winnerAddrStr,otherPlayerAddr) = if ((i.caller != this))
104 104      then throw("Admin Only")
105 105      else {
106 106          let availableRewardsKey = addressAvailableRewardsKey(winnerAddrStr)
107 107          let currentAvailableRewards = tryGetInteger(availableRewardsKey)
108 108          let newTicketCountWinner = consumeTicket(winnerAddrStr)
109 109          let newTicketCountOtherPlayer = consumeTicket(otherPlayerAddr)
110 110  [StringEntry(gameWinnerKey(gameId), winnerAddrStr), IntegerEntry(availableRewardsKey, (currentAvailableRewards + (ticketPrice * 2))), IntegerEntry(getTicketsCountKey(winnerAddrStr), newTicketCountWinner), IntegerEntry(getTicketsCountKey(otherPlayerAddr), newTicketCountOtherPlayer)]
111 111          }
112 112  
113 113  
114 114  
115 115  @Callable(i)
116 116  func withdrawRewards () = {
117 117      let callerAddrStr = toBase58String(i.caller.bytes)
118 118      let feeCollectorAddr = addressFromStringValue(getStringValue(feeCollectorAddressKey))
119 119      let currentAvailableRewards = tryGetInteger(addressAvailableRewardsKey(callerAddrStr))
120 120      let withdrawFee = fraction(currentAvailableRewards, withdrawFeePercent, 100)
121 121      let actualAvailableRewards = ((currentAvailableRewards - invFee) - withdrawFee)
122 122      if ((0 >= currentAvailableRewards))
123 123          then throw("No available rewards to withdraw")
124 124          else [IntegerEntry(addressAvailableRewardsKey(callerAddrStr), 0), ScriptTransfer(i.caller, actualAvailableRewards, unit), ScriptTransfer(feeCollectorAddr, withdrawFee, unit)]
125 125      }
126 126  
127 127  
128 128  
129 129  @Callable(i)
130 130  func buyTickets () = {
131 131      let pmt = if ((size(i.payments) == 1))
132 132          then i.payments[0]
133 133          else throw("Please attach exactly one payment")
134 134      if (isDefined(pmt.assetId))
135 135          then throw("Tickets can only ibe purchased in Waves")
136 136          else if ((pmt.amount != ticketPrice))
137 137              then throw((("The payment must be of exactly " + toString(ticketPriceInt)) + " waves"))
138 138              else {
139 139                  let callerAddrStr = toBase58String(i.caller.bytes)
140 140                  let currentTicketsCount = tryGetInteger(getTicketsCountKey(callerAddrStr))
141 141                  $Tuple2([IntegerEntry(getTicketsCountKey(callerAddrStr), (currentTicketsCount + 1))], 1)
142 142                  }
143 143      }
144 144  
145 145  
146 146  @Verifier(tx)
147 147  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
148 148

Old	New		Differences
33	33		func addressTotalLockedFundsKey (address) = (address + "_totalLockedFunds")
34	34
35	35
36		-	func addressLockedFundsForGame (address,gameId) = ((address + "_~~LockedFunds~~_") + gameId)
	36	+	func addressLockedFundsForGame (address,gameId) = ((address + "_lockedFunds_") + gameId)
37	37
38	38
39	39		func addressAvailableRewardsKey (address) = (address + "_availableRewards")

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let waves = 100000000
5	5
6	6		let ticketPriceInt = 1000000
7	7
8	8		let ticketPrice = ticketPriceInt
9	9
10	10		let invFee = 500000
11	11
12	12		let withdrawFeePercent = 5
13	13
14	14		let feeCollectorAddressKey = "feeCollectorAddress"
15	15
16	16		func tryGetInteger (key) = match getInteger(this, key) {
17	17		case b: Int =>
18	18		b
19	19		case _ =>
20	20		0
21	21		}
22	22
23	23
24	24		func getTicketsCountKey (addressString) = (addressString + "_ticketsCount")
25	25
26	26
27	27		func gameWinnerKey (gameId) = (gameId + "_winner")
28	28
29	29
30	30		func addressAvailableFundsKey (address) = (address + "_availableFunds")
31	31
32	32
33	33		func addressTotalLockedFundsKey (address) = (address + "_totalLockedFunds")
34	34
35	35
36		-	func addressLockedFundsForGame (address,gameId) = ((address + "_~~LockedFunds~~_") + gameId)
	36	+	func addressLockedFundsForGame (address,gameId) = ((address + "_lockedFunds_") + gameId)
37	37
38	38
39	39		func addressAvailableRewardsKey (address) = (address + "_availableRewards")
40	40
41	41
42	42		func getTicketsCount (addressString) = tryGetInteger(getTicketsCountKey(addressString))
43	43
44	44
45	45		func consumeTicket (playerAddr) = {
46	46		let currentTicketCount = getTicketsCount(playerAddr)
47	47		let newCurrentTicketCount = (currentTicketCount - 1)
48	48		if ((0 > newCurrentTicketCount))
49	49		then 0
50	50		else newCurrentTicketCount
51	51		}
52	52
53	53
54	54		@Callable(i)
55	55		func setFeeCollectorAddress (collectorAddr) = if ((i.caller != this))
56	56		then throw("Admin Only")
57	57		else [StringEntry(feeCollectorAddressKey, collectorAddr)]
58	58
59	59
60	60
61	61		@Callable(i)
62	62		func depositFunds () = {
63	63		let pmt = if ((size(i.payments) == 1))
64	64		then i.payments[0]
65	65		else throw("Please attach exactly one payment")
66	66		if (isDefined(pmt.assetId))
67	67		then throw("You can only deposit USDN")
68	68		else {
69	69		let callerAddrStr = toBase58String(i.caller.bytes)
70	70		$Tuple2([IntegerEntry(addressAvailableFundsKey(callerAddrStr), pmt.amount)], 1)
71	71		}
72	72		}
73	73
74	74
75	75
76	76		@Callable(i)
77	77		func lockFundsForGame (gameId,amountToLock) = {
78	78		let callerAddrStr = toBase58String(i.caller.bytes)
79	79		let currentAvailableFunds = tryGetInteger(addressAvailableFundsKey(callerAddrStr))
80	80		let currentTotalLockedFunds = tryGetInteger(addressTotalLockedFundsKey(callerAddrStr))
81	81		if ((amountToLock > currentAvailableFunds))
82	82		then throw("Not enough available funds to lock")
83	83		else $Tuple2([IntegerEntry(addressAvailableFundsKey(callerAddrStr), (currentAvailableFunds - amountToLock)), IntegerEntry(addressTotalLockedFundsKey(callerAddrStr), (currentTotalLockedFunds + amountToLock)), IntegerEntry(addressLockedFundsForGame(callerAddrStr, gameId), amountToLock)], 1)
84	84		}
85	85
86	86
87	87
88	88		@Callable(i)
89	89		func withdrawFunds () = {
90	90		let callerAddrStr = toBase58String(i.caller.bytes)
91	91		let feeCollectorAddr = addressFromStringValue(getStringValue(feeCollectorAddressKey))
92	92		let currentAvailableFunds = tryGetInteger(addressAvailableFundsKey(callerAddrStr))
93	93		let withdrawFee = fraction(currentAvailableFunds, withdrawFeePercent, 100)
94	94		let actualAvailableFunds = (currentAvailableFunds - withdrawFee)
95	95		if ((0 >= actualAvailableFunds))
96	96		then throw("No available funds to withdraw")
97	97		else [IntegerEntry(addressAvailableFundsKey(callerAddrStr), 0), ScriptTransfer(i.caller, actualAvailableFunds, unit), ScriptTransfer(feeCollectorAddr, withdrawFee, unit)]
98	98		}
99	99
100	100
101	101
102	102		@Callable(i)
103	103		func setWinnerHeadsUp (gameId,winnerAddrStr,otherPlayerAddr) = if ((i.caller != this))
104	104		then throw("Admin Only")
105	105		else {
106	106		let availableRewardsKey = addressAvailableRewardsKey(winnerAddrStr)
107	107		let currentAvailableRewards = tryGetInteger(availableRewardsKey)
108	108		let newTicketCountWinner = consumeTicket(winnerAddrStr)
109	109		let newTicketCountOtherPlayer = consumeTicket(otherPlayerAddr)
110	110		[StringEntry(gameWinnerKey(gameId), winnerAddrStr), IntegerEntry(availableRewardsKey, (currentAvailableRewards + (ticketPrice * 2))), IntegerEntry(getTicketsCountKey(winnerAddrStr), newTicketCountWinner), IntegerEntry(getTicketsCountKey(otherPlayerAddr), newTicketCountOtherPlayer)]
111	111		}
112	112
113	113
114	114
115	115		@Callable(i)
116	116		func withdrawRewards () = {
117	117		let callerAddrStr = toBase58String(i.caller.bytes)
118	118		let feeCollectorAddr = addressFromStringValue(getStringValue(feeCollectorAddressKey))
119	119		let currentAvailableRewards = tryGetInteger(addressAvailableRewardsKey(callerAddrStr))
120	120		let withdrawFee = fraction(currentAvailableRewards, withdrawFeePercent, 100)
121	121		let actualAvailableRewards = ((currentAvailableRewards - invFee) - withdrawFee)
122	122		if ((0 >= currentAvailableRewards))
123	123		then throw("No available rewards to withdraw")
124	124		else [IntegerEntry(addressAvailableRewardsKey(callerAddrStr), 0), ScriptTransfer(i.caller, actualAvailableRewards, unit), ScriptTransfer(feeCollectorAddr, withdrawFee, unit)]
125	125		}
126	126
127	127
128	128
129	129		@Callable(i)
130	130		func buyTickets () = {
131	131		let pmt = if ((size(i.payments) == 1))
132	132		then i.payments[0]
133	133		else throw("Please attach exactly one payment")
134	134		if (isDefined(pmt.assetId))
135	135		then throw("Tickets can only ibe purchased in Waves")
136	136		else if ((pmt.amount != ticketPrice))
137	137		then throw((("The payment must be of exactly " + toString(ticketPriceInt)) + " waves"))
138	138		else {
139	139		let callerAddrStr = toBase58String(i.caller.bytes)
140	140		let currentTicketsCount = tryGetInteger(getTicketsCountKey(callerAddrStr))
141	141		$Tuple2([IntegerEntry(getTicketsCountKey(callerAddrStr), (currentTicketsCount + 1))], 1)
142	142		}
143	143		}
144	144
145	145
146	146		@Verifier(tx)
147	147		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
148	148

github/deemru/w8io/873ac7e 
35.94 ms ◑