w8 · tx · 4Ep···HMo

tx · 4Epa9AYhpPMabzj5ykacNmtWg7kEAPRgS1XgfRA5kHMo

3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk:  -0.00400000 Waves

2022.07.31 01:05 [2163131] smart account 3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "4Epa9AYhpPMabzj5ykacNmtWg7kEAPRgS1XgfRA5kHMo",
    "fee": 400000,
    "feeAssetId": null,
    "timestamp": 1659218728402,
    "version": 2,
    "chainId": 84,
    "sender": "3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk",
    "senderPublicKey": "AR4BeE6hYADMvKxgRQs4ADN3krEqb2j8WE3WfJxzL3zE",
    "proofs": [
        "26bK1BeNaXovPbYZojj9FaSHrCYNV9SE36UJjs84beDwbyMib8e19unDgYNEC5eKBpVxpHSRh4GQ8TNuefqELevF"
    ],
    "script": "base64:BgIWCAISAwoBCBIAEgASBQoDCAgIEgASAA0ABXdhdmVzAIDC1y8ADnRpY2tldFByaWNlSW50AMCEPQALdGlja2V0UHJpY2UFDnRpY2tldFByaWNlSW50AAZpbnZGZWUAoMIeABJ3aXRoZHJhd0ZlZVBlcmNlbnQABQAWZmVlQ29sbGVjdG9yQWRkcmVzc0tleQITZmVlQ29sbGVjdG9yQWRkcmVzcwENdHJ5R2V0SW50ZWdlcgEDa2V5BAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAESZ2V0VGlja2V0c0NvdW50S2V5AQ1hZGRyZXNzU3RyaW5nCQCsAgIFDWFkZHJlc3NTdHJpbmcCDV90aWNrZXRzQ291bnQBDWdhbWVXaW5uZXJLZXkBBmdhbWVJZAkArAICBQZnYW1lSWQCB193aW5uZXIBGGFkZHJlc3NBdmFpbGFibGVGdW5kc0tleQEHYWRkcmVzcwkArAICBQdhZGRyZXNzAg9fYXZhaWxhYmxlRnVuZHMBGmFkZHJlc3NBdmFpbGFibGVSZXdhcmRzS2V5AQdhZGRyZXNzCQCsAgIFB2FkZHJlc3MCEV9hdmFpbGFibGVSZXdhcmRzAQ9nZXRUaWNrZXRzQ291bnQBDWFkZHJlc3NTdHJpbmcJAQ10cnlHZXRJbnRlZ2VyAQkBEmdldFRpY2tldHNDb3VudEtleQEFDWFkZHJlc3NTdHJpbmcBDWNvbnN1bWVUaWNrZXQBCnBsYXllckFkZHIEEmN1cnJlbnRUaWNrZXRDb3VudAkBD2dldFRpY2tldHNDb3VudAEFCnBsYXllckFkZHIEFW5ld0N1cnJlbnRUaWNrZXRDb3VudAkAZQIFEmN1cnJlbnRUaWNrZXRDb3VudAABAwkAZgIAAAUVbmV3Q3VycmVudFRpY2tldENvdW50AAAFFW5ld0N1cnJlbnRUaWNrZXRDb3VudAYBaQEWc2V0RmVlQ29sbGVjdG9yQWRkcmVzcwENY29sbGVjdG9yQWRkcgMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECCkFkbWluIE9ubHkJAMwIAgkBC1N0cmluZ0VudHJ5AgUWZmVlQ29sbGVjdG9yQWRkcmVzc0tleQUNY29sbGVjdG9yQWRkcgUDbmlsAWkBDGRlcG9zaXRGdW5kcwAEA3BtdAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAJEDAggFAWkIcGF5bWVudHMAAAkAAgECIVBsZWFzZSBhdHRhY2ggZXhhY3RseSBvbmUgcGF5bWVudAMJAQlpc0RlZmluZWQBCAUDcG10B2Fzc2V0SWQJAAIBAhlZb3UgY2FuIG9ubHkgZGVwb3NpdCBVU0ROBA1jYWxsZXJBZGRyU3RyCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGGFkZHJlc3NBdmFpbGFibGVGdW5kc0tleQEFDWNhbGxlckFkZHJTdHIIBQNwbXQGYW1vdW50BQNuaWwAAQFpAQ13aXRoZHJhd0Z1bmRzAAQNY2FsbGVyQWRkclN0cgkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBBBmZWVDb2xsZWN0b3JBZGRyCQERQGV4dHJOYXRpdmUoMTA2MikBCQERQGV4dHJOYXRpdmUoMTA1OCkBBRZmZWVDb2xsZWN0b3JBZGRyZXNzS2V5BBVjdXJyZW50QXZhaWxhYmxlRnVuZHMJAQ10cnlHZXRJbnRlZ2VyAQkBGGFkZHJlc3NBdmFpbGFibGVGdW5kc0tleQEFDWNhbGxlckFkZHJTdHIEC3dpdGhkcmF3RmVlCQBrAwUVY3VycmVudEF2YWlsYWJsZUZ1bmRzBRJ3aXRoZHJhd0ZlZVBlcmNlbnQAZAQUYWN0dWFsQXZhaWxhYmxlRnVuZHMJAGUCCQBlAgUVY3VycmVudEF2YWlsYWJsZUZ1bmRzBQZpbnZGZWUFC3dpdGhkcmF3RmVlAwkAZwIAAAUUYWN0dWFsQXZhaWxhYmxlRnVuZHMJAAIBAh5ObyBhdmFpbGFibGUgZnVuZHMgdG8gd2l0aGRyYXcJAMwIAgkBDEludGVnZXJFbnRyeQIJARhhZGRyZXNzQXZhaWxhYmxlRnVuZHNLZXkBBQ1jYWxsZXJBZGRyU3RyAAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBRVjdXJyZW50QXZhaWxhYmxlRnVuZHMFBHVuaXQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUQZmVlQ29sbGVjdG9yQWRkcgULd2l0aGRyYXdGZWUFBHVuaXQFA25pbAFpARBzZXRXaW5uZXJIZWFkc1VwAwZnYW1lSWQNd2lubmVyQWRkclN0cg9vdGhlclBsYXllckFkZHIDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAgpBZG1pbiBPbmx5BBNhdmFpbGFibGVSZXdhcmRzS2V5CQEaYWRkcmVzc0F2YWlsYWJsZVJld2FyZHNLZXkBBQ13aW5uZXJBZGRyU3RyBBdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwkBDXRyeUdldEludGVnZXIBBRNhdmFpbGFibGVSZXdhcmRzS2V5BBRuZXdUaWNrZXRDb3VudFdpbm5lcgkBDWNvbnN1bWVUaWNrZXQBBQ13aW5uZXJBZGRyU3RyBBluZXdUaWNrZXRDb3VudE90aGVyUGxheWVyCQENY29uc3VtZVRpY2tldAEFD290aGVyUGxheWVyQWRkcgkAzAgCCQELU3RyaW5nRW50cnkCCQENZ2FtZVdpbm5lcktleQEFBmdhbWVJZAUNd2lubmVyQWRkclN0cgkAzAgCCQEMSW50ZWdlckVudHJ5AgUTYXZhaWxhYmxlUmV3YXJkc0tleQkAZAIFF2N1cnJlbnRBdmFpbGFibGVSZXdhcmRzCQBoAgULdGlja2V0UHJpY2UAAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmdldFRpY2tldHNDb3VudEtleQEFDXdpbm5lckFkZHJTdHIFFG5ld1RpY2tldENvdW50V2lubmVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESZ2V0VGlja2V0c0NvdW50S2V5AQUPb3RoZXJQbGF5ZXJBZGRyBRluZXdUaWNrZXRDb3VudE90aGVyUGxheWVyBQNuaWwBaQEPd2l0aGRyYXdSZXdhcmRzAAQNY2FsbGVyQWRkclN0cgkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBBBmZWVDb2xsZWN0b3JBZGRyCQERQGV4dHJOYXRpdmUoMTA2MikBCQERQGV4dHJOYXRpdmUoMTA1OCkBBRZmZWVDb2xsZWN0b3JBZGRyZXNzS2V5BBdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwkBDXRyeUdldEludGVnZXIBCQEaYWRkcmVzc0F2YWlsYWJsZVJld2FyZHNLZXkBBQ1jYWxsZXJBZGRyU3RyBAt3aXRoZHJhd0ZlZQkAawMFF2N1cnJlbnRBdmFpbGFibGVSZXdhcmRzBRJ3aXRoZHJhd0ZlZVBlcmNlbnQAZAQWYWN0dWFsQXZhaWxhYmxlUmV3YXJkcwkAZQIJAGUCBRdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwUGaW52RmVlBQt3aXRoZHJhd0ZlZQMJAGcCAAAFF2N1cnJlbnRBdmFpbGFibGVSZXdhcmRzCQACAQIgTm8gYXZhaWxhYmxlIHJld2FyZHMgdG8gd2l0aGRyYXcJAMwIAgkBDEludGVnZXJFbnRyeQIJARphZGRyZXNzQXZhaWxhYmxlUmV3YXJkc0tleQEFDWNhbGxlckFkZHJTdHIAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFFmFjdHVhbEF2YWlsYWJsZVJld2FyZHMFBHVuaXQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUQZmVlQ29sbGVjdG9yQWRkcgULd2l0aGRyYXdGZWUFBHVuaXQFA25pbAFpAQpidXlUaWNrZXRzAAQDcG10AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAkQMCCAUBaQhwYXltZW50cwAACQACAQIhUGxlYXNlIGF0dGFjaCBleGFjdGx5IG9uZSBwYXltZW50AwkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAkAAgECJ1RpY2tldHMgY2FuIG9ubHkgaWJlIHB1cmNoYXNlZCBpbiBXYXZlcwMJAQIhPQIIBQNwbXQGYW1vdW50BQt0aWNrZXRQcmljZQkAAgEJAKwCAgkArAICAh9UaGUgcGF5bWVudCBtdXN0IGJlIG9mIGV4YWN0bHkgCQCkAwEFDnRpY2tldFByaWNlSW50AgYgd2F2ZXMEDWNhbGxlckFkZHJTdHIJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQTY3VycmVudFRpY2tldHNDb3VudAkBDXRyeUdldEludGVnZXIBCQESZ2V0VGlja2V0c0NvdW50S2V5AQUNY2FsbGVyQWRkclN0cgkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESZ2V0VGlja2V0c0NvdW50S2V5AQUNY2FsbGVyQWRkclN0cgkAZAIFE2N1cnJlbnRUaWNrZXRzQ291bnQAAQUDbmlsAAEBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5OWkqsw==",
    "height": 2163131,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 91VKoXSyhqh5QXKt1y3yKbjXZQhM2XM1t8S5onyAdTRE
Next: 5aJhDv3xBTxh4RYRLJuyfvTziwYjTy46thC5ty5F2EMG

Diff: 
Old New Differences
68 68  
69 69  
70 70  @Callable(i)
71 + func withdrawFunds () = {
72 +     let callerAddrStr = toBase58String(i.caller.bytes)
73 +     let feeCollectorAddr = addressFromStringValue(getStringValue(feeCollectorAddressKey))
74 +     let currentAvailableFunds = tryGetInteger(addressAvailableFundsKey(callerAddrStr))
75 +     let withdrawFee = fraction(currentAvailableFunds, withdrawFeePercent, 100)
76 +     let actualAvailableFunds = ((currentAvailableFunds - invFee) - withdrawFee)
77 +     if ((0 >= actualAvailableFunds))
78 +         then throw("No available funds to withdraw")
79 +         else [IntegerEntry(addressAvailableFundsKey(callerAddrStr), 0), ScriptTransfer(i.caller, currentAvailableFunds, unit), ScriptTransfer(feeCollectorAddr, withdrawFee, unit)]
80 +     }
81 + 
82 + 
83 + 
84 + @Callable(i)
71 85  func setWinnerHeadsUp (gameId,winnerAddrStr,otherPlayerAddr) = if ((i.caller != this))
72 86      then throw("Admin Only")
73 87      else {
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 addressAvailableRewardsKey (address) = (address + "_availableRewards")
34 34  
35 35  
36 36  func getTicketsCount (addressString) = tryGetInteger(getTicketsCountKey(addressString))
37 37  
38 38  
39 39  func consumeTicket (playerAddr) = {
40 40      let currentTicketCount = getTicketsCount(playerAddr)
41 41      let newCurrentTicketCount = (currentTicketCount - 1)
42 42      if ((0 > newCurrentTicketCount))
43 43          then 0
44 44          else newCurrentTicketCount
45 45      }
46 46  
47 47  
48 48  @Callable(i)
49 49  func setFeeCollectorAddress (collectorAddr) = if ((i.caller != this))
50 50      then throw("Admin Only")
51 51      else [StringEntry(feeCollectorAddressKey, collectorAddr)]
52 52  
53 53  
54 54  
55 55  @Callable(i)
56 56  func depositFunds () = {
57 57      let pmt = if ((size(i.payments) == 1))
58 58          then i.payments[0]
59 59          else throw("Please attach exactly one payment")
60 60      if (isDefined(pmt.assetId))
61 61          then throw("You can only deposit USDN")
62 62          else {
63 63              let callerAddrStr = toBase58String(i.caller.bytes)
64 64              $Tuple2([IntegerEntry(addressAvailableFundsKey(callerAddrStr), pmt.amount)], 1)
65 65              }
66 66      }
67 67  
68 68  
69 69  
70 70  @Callable(i)
71 + func withdrawFunds () = {
72 +     let callerAddrStr = toBase58String(i.caller.bytes)
73 +     let feeCollectorAddr = addressFromStringValue(getStringValue(feeCollectorAddressKey))
74 +     let currentAvailableFunds = tryGetInteger(addressAvailableFundsKey(callerAddrStr))
75 +     let withdrawFee = fraction(currentAvailableFunds, withdrawFeePercent, 100)
76 +     let actualAvailableFunds = ((currentAvailableFunds - invFee) - withdrawFee)
77 +     if ((0 >= actualAvailableFunds))
78 +         then throw("No available funds to withdraw")
79 +         else [IntegerEntry(addressAvailableFundsKey(callerAddrStr), 0), ScriptTransfer(i.caller, currentAvailableFunds, unit), ScriptTransfer(feeCollectorAddr, withdrawFee, unit)]
80 +     }
81 + 
82 + 
83 + 
84 + @Callable(i)
71 85  func setWinnerHeadsUp (gameId,winnerAddrStr,otherPlayerAddr) = if ((i.caller != this))
72 86      then throw("Admin Only")
73 87      else {
74 88          let availableRewardsKey = addressAvailableRewardsKey(winnerAddrStr)
75 89          let currentAvailableRewards = tryGetInteger(availableRewardsKey)
76 90          let newTicketCountWinner = consumeTicket(winnerAddrStr)
77 91          let newTicketCountOtherPlayer = consumeTicket(otherPlayerAddr)
78 92  [StringEntry(gameWinnerKey(gameId), winnerAddrStr), IntegerEntry(availableRewardsKey, (currentAvailableRewards + (ticketPrice * 2))), IntegerEntry(getTicketsCountKey(winnerAddrStr), newTicketCountWinner), IntegerEntry(getTicketsCountKey(otherPlayerAddr), newTicketCountOtherPlayer)]
79 93          }
80 94  
81 95  
82 96  
83 97  @Callable(i)
84 98  func withdrawRewards () = {
85 99      let callerAddrStr = toBase58String(i.caller.bytes)
86 100      let feeCollectorAddr = addressFromStringValue(getStringValue(feeCollectorAddressKey))
87 101      let currentAvailableRewards = tryGetInteger(addressAvailableRewardsKey(callerAddrStr))
88 102      let withdrawFee = fraction(currentAvailableRewards, withdrawFeePercent, 100)
89 103      let actualAvailableRewards = ((currentAvailableRewards - invFee) - withdrawFee)
90 104      if ((0 >= currentAvailableRewards))
91 105          then throw("No available rewards to withdraw")
92 106          else [IntegerEntry(addressAvailableRewardsKey(callerAddrStr), 0), ScriptTransfer(i.caller, actualAvailableRewards, unit), ScriptTransfer(feeCollectorAddr, withdrawFee, unit)]
93 107      }
94 108  
95 109  
96 110  
97 111  @Callable(i)
98 112  func buyTickets () = {
99 113      let pmt = if ((size(i.payments) == 1))
100 114          then i.payments[0]
101 115          else throw("Please attach exactly one payment")
102 116      if (isDefined(pmt.assetId))
103 117          then throw("Tickets can only ibe purchased in Waves")
104 118          else if ((pmt.amount != ticketPrice))
105 119              then throw((("The payment must be of exactly " + toString(ticketPriceInt)) + " waves"))
106 120              else {
107 121                  let callerAddrStr = toBase58String(i.caller.bytes)
108 122                  let currentTicketsCount = tryGetInteger(getTicketsCountKey(callerAddrStr))
109 123                  $Tuple2([IntegerEntry(getTicketsCountKey(callerAddrStr), (currentTicketsCount + 1))], 1)
110 124                  }
111 125      }
112 126  
113 127  
114 128  @Verifier(tx)
115 129  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
116 130

Old	New		Differences
68	68
69	69
70	70		@Callable(i)
	71	+	func withdrawFunds () = {
	72	+	let callerAddrStr = toBase58String(i.caller.bytes)
	73	+	let feeCollectorAddr = addressFromStringValue(getStringValue(feeCollectorAddressKey))
	74	+	let currentAvailableFunds = tryGetInteger(addressAvailableFundsKey(callerAddrStr))
	75	+	let withdrawFee = fraction(currentAvailableFunds, withdrawFeePercent, 100)
	76	+	let actualAvailableFunds = ((currentAvailableFunds - invFee) - withdrawFee)
	77	+	if ((0 >= actualAvailableFunds))
	78	+	then throw("No available funds to withdraw")
	79	+	else [IntegerEntry(addressAvailableFundsKey(callerAddrStr), 0), ScriptTransfer(i.caller, currentAvailableFunds, unit), ScriptTransfer(feeCollectorAddr, withdrawFee, unit)]
	80	+	}
	81	+
	82	+
	83	+
	84	+	@Callable(i)
71	85		func setWinnerHeadsUp (gameId,winnerAddrStr,otherPlayerAddr) = if ((i.caller != this))
72	86		then throw("Admin Only")
73	87		else {

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 addressAvailableRewardsKey (address) = (address + "_availableRewards")
34	34
35	35
36	36		func getTicketsCount (addressString) = tryGetInteger(getTicketsCountKey(addressString))
37	37
38	38
39	39		func consumeTicket (playerAddr) = {
40	40		let currentTicketCount = getTicketsCount(playerAddr)
41	41		let newCurrentTicketCount = (currentTicketCount - 1)
42	42		if ((0 > newCurrentTicketCount))
43	43		then 0
44	44		else newCurrentTicketCount
45	45		}
46	46
47	47
48	48		@Callable(i)
49	49		func setFeeCollectorAddress (collectorAddr) = if ((i.caller != this))
50	50		then throw("Admin Only")
51	51		else [StringEntry(feeCollectorAddressKey, collectorAddr)]
52	52
53	53
54	54
55	55		@Callable(i)
56	56		func depositFunds () = {
57	57		let pmt = if ((size(i.payments) == 1))
58	58		then i.payments[0]
59	59		else throw("Please attach exactly one payment")
60	60		if (isDefined(pmt.assetId))
61	61		then throw("You can only deposit USDN")
62	62		else {
63	63		let callerAddrStr = toBase58String(i.caller.bytes)
64	64		$Tuple2([IntegerEntry(addressAvailableFundsKey(callerAddrStr), pmt.amount)], 1)
65	65		}
66	66		}
67	67
68	68
69	69
70	70		@Callable(i)
	71	+	func withdrawFunds () = {
	72	+	let callerAddrStr = toBase58String(i.caller.bytes)
	73	+	let feeCollectorAddr = addressFromStringValue(getStringValue(feeCollectorAddressKey))
	74	+	let currentAvailableFunds = tryGetInteger(addressAvailableFundsKey(callerAddrStr))
	75	+	let withdrawFee = fraction(currentAvailableFunds, withdrawFeePercent, 100)
	76	+	let actualAvailableFunds = ((currentAvailableFunds - invFee) - withdrawFee)
	77	+	if ((0 >= actualAvailableFunds))
	78	+	then throw("No available funds to withdraw")
	79	+	else [IntegerEntry(addressAvailableFundsKey(callerAddrStr), 0), ScriptTransfer(i.caller, currentAvailableFunds, unit), ScriptTransfer(feeCollectorAddr, withdrawFee, unit)]
	80	+	}
	81	+
	82	+
	83	+
	84	+	@Callable(i)
71	85		func setWinnerHeadsUp (gameId,winnerAddrStr,otherPlayerAddr) = if ((i.caller != this))
72	86		then throw("Admin Only")
73	87		else {
74	88		let availableRewardsKey = addressAvailableRewardsKey(winnerAddrStr)
75	89		let currentAvailableRewards = tryGetInteger(availableRewardsKey)
76	90		let newTicketCountWinner = consumeTicket(winnerAddrStr)
77	91		let newTicketCountOtherPlayer = consumeTicket(otherPlayerAddr)
78	92		[StringEntry(gameWinnerKey(gameId), winnerAddrStr), IntegerEntry(availableRewardsKey, (currentAvailableRewards + (ticketPrice * 2))), IntegerEntry(getTicketsCountKey(winnerAddrStr), newTicketCountWinner), IntegerEntry(getTicketsCountKey(otherPlayerAddr), newTicketCountOtherPlayer)]
79	93		}
80	94
81	95
82	96
83	97		@Callable(i)
84	98		func withdrawRewards () = {
85	99		let callerAddrStr = toBase58String(i.caller.bytes)
86	100		let feeCollectorAddr = addressFromStringValue(getStringValue(feeCollectorAddressKey))
87	101		let currentAvailableRewards = tryGetInteger(addressAvailableRewardsKey(callerAddrStr))
88	102		let withdrawFee = fraction(currentAvailableRewards, withdrawFeePercent, 100)
89	103		let actualAvailableRewards = ((currentAvailableRewards - invFee) - withdrawFee)
90	104		if ((0 >= currentAvailableRewards))
91	105		then throw("No available rewards to withdraw")
92	106		else [IntegerEntry(addressAvailableRewardsKey(callerAddrStr), 0), ScriptTransfer(i.caller, actualAvailableRewards, unit), ScriptTransfer(feeCollectorAddr, withdrawFee, unit)]
93	107		}
94	108
95	109
96	110
97	111		@Callable(i)
98	112		func buyTickets () = {
99	113		let pmt = if ((size(i.payments) == 1))
100	114		then i.payments[0]
101	115		else throw("Please attach exactly one payment")
102	116		if (isDefined(pmt.assetId))
103	117		then throw("Tickets can only ibe purchased in Waves")
104	118		else if ((pmt.amount != ticketPrice))
105	119		then throw((("The payment must be of exactly " + toString(ticketPriceInt)) + " waves"))
106	120		else {
107	121		let callerAddrStr = toBase58String(i.caller.bytes)
108	122		let currentTicketsCount = tryGetInteger(getTicketsCountKey(callerAddrStr))
109	123		$Tuple2([IntegerEntry(getTicketsCountKey(callerAddrStr), (currentTicketsCount + 1))], 1)
110	124		}
111	125		}
112	126
113	127
114	128		@Verifier(tx)
115	129		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
116	130

github/deemru/w8io/6500d08 
34.28 ms ◑