tx · 3u4MqWFpo79MyPqXPF7Q9ofjw2BY9hm7SRauNoSRhnyx

3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk:  -0.01000000 Waves

2022.08.15 22:39 [2186012] smart account 3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3u4MqWFpo79MyPqXPF7Q9ofjw2BY9hm7SRauNoSRhnyx",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1660592366058,
    "version": 2,
    "chainId": 84,
    "sender": "3N3dmyiBdj7pmjnQrzTTvmfzKSqndSzCMmk",
    "senderPublicKey": "AR4BeE6hYADMvKxgRQs4ADN3krEqb2j8WE3WfJxzL3zE",
    "proofs": [
        "3d99AyYuTBW67iZLUvFWZqDjqAhAvh3Kp8jvJcGDcoi4JFTHz3urpz3s24KLAxc9M6LGyj8uvGDHdDRadWGGGz1Y"
    ],
    "script": "base64:BgIiCAISAwoBCBIAEgUKAwgIARIDCgEIEgASBQoDCAgIEgASABEABXdhdmVzAIDC1y8ADnRpY2tldFByaWNlSW50AMCEPQALdGlja2V0UHJpY2UFDnRpY2tldFByaWNlSW50AAZpbnZGZWUAoMIeABJ3aXRoZHJhd0ZlZVBlcmNlbnQABQAWZmVlQ29sbGVjdG9yQWRkcmVzc0tleQITZmVlQ29sbGVjdG9yQWRkcmVzcwAOZGVwb3NpdEFzc2V0SWQCLDV1ZTFmaXVWNmo2VUJyNlhmMjhRbXM2eTVGcXpLdHF2YXh4aHd1N2hUUTU4AQ10cnlHZXRJbnRlZ2VyAQNrZXkEByRtYXRjaDAJAJoIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAAARJnZXRUaWNrZXRzQ291bnRLZXkBDWFkZHJlc3NTdHJpbmcJAKwCAgUNYWRkcmVzc1N0cmluZwINX3RpY2tldHNDb3VudAENZ2FtZVdpbm5lcktleQEGZ2FtZUlkCQCsAgIFBmdhbWVJZAIHX3dpbm5lcgEYYWRkcmVzc0F2YWlsYWJsZUZ1bmRzS2V5AQdhZGRyZXNzCQCsAgIFB2FkZHJlc3MCD19hdmFpbGFibGVGdW5kcwEaYWRkcmVzc1RvdGFsTG9ja2VkRnVuZHNLZXkBB2FkZHJlc3MJAKwCAgUHYWRkcmVzcwIRX3RvdGFsTG9ja2VkRnVuZHMBIWFkZHJlc3NMb2NrZWRGdW5kc1RvdGFsSGlzdG9yeUtleQEHYWRkcmVzcwkArAICBQdhZGRyZXNzAhhfbG9ja2VkRnVuZHNUb3RhbEhpc3RvcnkBHGFkZHJlc3NMb2NrZWRGdW5kc0ZvckdhbWVLZXkCB2FkZHJlc3MGZ2FtZUlkCQCsAgIJAKwCAgUHYWRkcmVzcwINX2xvY2tlZEZ1bmRzXwUGZ2FtZUlkARphZGRyZXNzQXZhaWxhYmxlUmV3YXJkc0tleQEHYWRkcmVzcwkArAICBQdhZGRyZXNzAhFfYXZhaWxhYmxlUmV3YXJkcwEPZ2V0VGlja2V0c0NvdW50AQ1hZGRyZXNzU3RyaW5nCQENdHJ5R2V0SW50ZWdlcgEJARJnZXRUaWNrZXRzQ291bnRLZXkBBQ1hZGRyZXNzU3RyaW5nAQ1jb25zdW1lVGlja2V0AQpwbGF5ZXJBZGRyBBJjdXJyZW50VGlja2V0Q291bnQJAQ9nZXRUaWNrZXRzQ291bnQBBQpwbGF5ZXJBZGRyBBVuZXdDdXJyZW50VGlja2V0Q291bnQJAGUCBRJjdXJyZW50VGlja2V0Q291bnQAAQMJAGYCAAAFFW5ld0N1cnJlbnRUaWNrZXRDb3VudAAABRVuZXdDdXJyZW50VGlja2V0Q291bnQIAWkBFnNldEZlZUNvbGxlY3RvckFkZHJlc3MBDWNvbGxlY3RvckFkZHIDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAgpBZG1pbiBPbmx5CQDMCAIJAQtTdHJpbmdFbnRyeQIFFmZlZUNvbGxlY3RvckFkZHJlc3NLZXkFDWNvbGxlY3RvckFkZHIFA25pbAFpAQxkZXBvc2l0RnVuZHMABANwbXQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABCQCRAwIIBQFpCHBheW1lbnRzAAAJAAIBAiFQbGVhc2UgYXR0YWNoIGV4YWN0bHkgb25lIHBheW1lbnQDCQECIT0CCAUDcG10B2Fzc2V0SWQJANkEAQUOZGVwb3NpdEFzc2V0SWQJAAIBAhlZb3UgY2FuIG9ubHkgZGVwb3NpdCBVU0ROBA1jYWxsZXJBZGRyU3RyCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEFWN1cnJlbnRBdmFpbGFibGVGdW5kcwkBDXRyeUdldEludGVnZXIBCQEYYWRkcmVzc0F2YWlsYWJsZUZ1bmRzS2V5AQUNY2FsbGVyQWRkclN0cgkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEYYWRkcmVzc0F2YWlsYWJsZUZ1bmRzS2V5AQUNY2FsbGVyQWRkclN0cgkAZAIFFWN1cnJlbnRBdmFpbGFibGVGdW5kcwgFA3BtdAZhbW91bnQFA25pbAABAWkBDnBsYXllckV4aXRHYW1lAwZnYW1lSWQKcGxheWVyQWRkcg9leGl0U3RhY2tBbW91bnQDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAgpBZG1pbiBPbmx5BBdjdXJyZW50VG90YWxMb2NrZWRGdW5kcwkBDXRyeUdldEludGVnZXIBCQEaYWRkcmVzc1RvdGFsTG9ja2VkRnVuZHNLZXkBBQpwbGF5ZXJBZGRyBCBjdXJyZW50R2FtZUxvY2tlZEFtb3VudEZvclBsYXllcgkBDXRyeUdldEludGVnZXIBCQEcYWRkcmVzc0xvY2tlZEZ1bmRzRm9yR2FtZUtleQIFCnBsYXllckFkZHIFBmdhbWVJZAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEaYWRkcmVzc1RvdGFsTG9ja2VkRnVuZHNLZXkBBQpwbGF5ZXJBZGRyCQBlAgUXY3VycmVudFRvdGFsTG9ja2VkRnVuZHMFIGN1cnJlbnRHYW1lTG9ja2VkQW1vdW50Rm9yUGxheWVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEcYWRkcmVzc0xvY2tlZEZ1bmRzRm9yR2FtZUtleQIFCnBsYXllckFkZHIFBmdhbWVJZAAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFCnBsYXllckFkZHIFD2V4aXRTdGFja0Ftb3VudAkA2QQBBQ5kZXBvc2l0QXNzZXRJZAUDbmlsAAEBaQEQbG9ja0Z1bmRzRm9yR2FtZQEGZ2FtZUlkBANwbXQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABCQCRAwIIBQFpCHBheW1lbnRzAAAJAAIBAiFQbGVhc2UgYXR0YWNoIGV4YWN0bHkgb25lIHBheW1lbnQDCQECIT0CCAUDcG10B2Fzc2V0SWQJANkEAQUOZGVwb3NpdEFzc2V0SWQJAAIBAhlZb3UgY2FuIG9ubHkgZGVwb3NpdCBVU0ROBA1jYWxsZXJBZGRyU3RyCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEF2N1cnJlbnRUb3RhbExvY2tlZEZ1bmRzCQENdHJ5R2V0SW50ZWdlcgEJARphZGRyZXNzVG90YWxMb2NrZWRGdW5kc0tleQEFDWNhbGxlckFkZHJTdHIEHmN1cnJlbnRMb2NrZWRGdW5kc1RvdGFsSGlzdG9yeQkBDXRyeUdldEludGVnZXIBCQEhYWRkcmVzc0xvY2tlZEZ1bmRzVG90YWxIaXN0b3J5S2V5AQUNY2FsbGVyQWRkclN0cgkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEaYWRkcmVzc1RvdGFsTG9ja2VkRnVuZHNLZXkBBQ1jYWxsZXJBZGRyU3RyCQBkAgUXY3VycmVudFRvdGFsTG9ja2VkRnVuZHMIBQNwbXQGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEhYWRkcmVzc0xvY2tlZEZ1bmRzVG90YWxIaXN0b3J5S2V5AQUNY2FsbGVyQWRkclN0cgkAZAIFHmN1cnJlbnRMb2NrZWRGdW5kc1RvdGFsSGlzdG9yeQgFA3BtdAZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJARxhZGRyZXNzTG9ja2VkRnVuZHNGb3JHYW1lS2V5AgUNY2FsbGVyQWRkclN0cgUGZ2FtZUlkCAUDcG10BmFtb3VudAUDbmlsAAEBaQENd2l0aGRyYXdGdW5kcwAEDWNhbGxlckFkZHJTdHIJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQQZmVlQ29sbGVjdG9yQWRkcgkBEUBleHRyTmF0aXZlKDEwNjIpAQkBEUBleHRyTmF0aXZlKDEwNTgpAQUWZmVlQ29sbGVjdG9yQWRkcmVzc0tleQQVY3VycmVudEF2YWlsYWJsZUZ1bmRzCQENdHJ5R2V0SW50ZWdlcgEJARhhZGRyZXNzQXZhaWxhYmxlRnVuZHNLZXkBBQ1jYWxsZXJBZGRyU3RyBAt3aXRoZHJhd0ZlZQkAawMFFWN1cnJlbnRBdmFpbGFibGVGdW5kcwUSd2l0aGRyYXdGZWVQZXJjZW50AGQEFGFjdHVhbEF2YWlsYWJsZUZ1bmRzCQBlAgUVY3VycmVudEF2YWlsYWJsZUZ1bmRzBQt3aXRoZHJhd0ZlZQMJAGcCAAAFFGFjdHVhbEF2YWlsYWJsZUZ1bmRzCQACAQIeTm8gYXZhaWxhYmxlIGZ1bmRzIHRvIHdpdGhkcmF3CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEYYWRkcmVzc0F2YWlsYWJsZUZ1bmRzS2V5AQUNY2FsbGVyQWRkclN0cgAACQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUUYWN0dWFsQXZhaWxhYmxlRnVuZHMJANkEAQUOZGVwb3NpdEFzc2V0SWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUQZmVlQ29sbGVjdG9yQWRkcgULd2l0aGRyYXdGZWUJANkEAQUOZGVwb3NpdEFzc2V0SWQFA25pbAFpARBzZXRXaW5uZXJIZWFkc1VwAwZnYW1lSWQNd2lubmVyQWRkclN0cg9vdGhlclBsYXllckFkZHIDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAgpBZG1pbiBPbmx5BBNhdmFpbGFibGVSZXdhcmRzS2V5CQEaYWRkcmVzc0F2YWlsYWJsZVJld2FyZHNLZXkBBQ13aW5uZXJBZGRyU3RyBBdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwkBDXRyeUdldEludGVnZXIBBRNhdmFpbGFibGVSZXdhcmRzS2V5BBRuZXdUaWNrZXRDb3VudFdpbm5lcgkBDWNvbnN1bWVUaWNrZXQBBQ13aW5uZXJBZGRyU3RyBBluZXdUaWNrZXRDb3VudE90aGVyUGxheWVyCQENY29uc3VtZVRpY2tldAEFD290aGVyUGxheWVyQWRkcgkAzAgCCQELU3RyaW5nRW50cnkCCQENZ2FtZVdpbm5lcktleQEFBmdhbWVJZAUNd2lubmVyQWRkclN0cgkAzAgCCQEMSW50ZWdlckVudHJ5AgUTYXZhaWxhYmxlUmV3YXJkc0tleQkAZAIFF2N1cnJlbnRBdmFpbGFibGVSZXdhcmRzCQBoAgULdGlja2V0UHJpY2UAAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmdldFRpY2tldHNDb3VudEtleQEFDXdpbm5lckFkZHJTdHIFFG5ld1RpY2tldENvdW50V2lubmVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESZ2V0VGlja2V0c0NvdW50S2V5AQUPb3RoZXJQbGF5ZXJBZGRyBRluZXdUaWNrZXRDb3VudE90aGVyUGxheWVyBQNuaWwBaQEPd2l0aGRyYXdSZXdhcmRzAAQNY2FsbGVyQWRkclN0cgkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBBBmZWVDb2xsZWN0b3JBZGRyCQERQGV4dHJOYXRpdmUoMTA2MikBCQERQGV4dHJOYXRpdmUoMTA1OCkBBRZmZWVDb2xsZWN0b3JBZGRyZXNzS2V5BBdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwkBDXRyeUdldEludGVnZXIBCQEaYWRkcmVzc0F2YWlsYWJsZVJld2FyZHNLZXkBBQ1jYWxsZXJBZGRyU3RyBAt3aXRoZHJhd0ZlZQkAawMFF2N1cnJlbnRBdmFpbGFibGVSZXdhcmRzBRJ3aXRoZHJhd0ZlZVBlcmNlbnQAZAQWYWN0dWFsQXZhaWxhYmxlUmV3YXJkcwkAZQIJAGUCBRdjdXJyZW50QXZhaWxhYmxlUmV3YXJkcwUGaW52RmVlBQt3aXRoZHJhd0ZlZQMJAGcCAAAFF2N1cnJlbnRBdmFpbGFibGVSZXdhcmRzCQACAQIgTm8gYXZhaWxhYmxlIHJld2FyZHMgdG8gd2l0aGRyYXcJAMwIAgkBDEludGVnZXJFbnRyeQIJARphZGRyZXNzQXZhaWxhYmxlUmV3YXJkc0tleQEFDWNhbGxlckFkZHJTdHIAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFFmFjdHVhbEF2YWlsYWJsZVJld2FyZHMFBHVuaXQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUQZmVlQ29sbGVjdG9yQWRkcgULd2l0aGRyYXdGZWUFBHVuaXQFA25pbAFpAQpidXlUaWNrZXRzAAQDcG10AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAkQMCCAUBaQhwYXltZW50cwAACQACAQIhUGxlYXNlIGF0dGFjaCBleGFjdGx5IG9uZSBwYXltZW50AwkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAkAAgECJ1RpY2tldHMgY2FuIG9ubHkgaWJlIHB1cmNoYXNlZCBpbiBXYXZlcwMJAQIhPQIIBQNwbXQGYW1vdW50BQt0aWNrZXRQcmljZQkAAgEJAKwCAgkArAICAh9UaGUgcGF5bWVudCBtdXN0IGJlIG9mIGV4YWN0bHkgCQCkAwEFDnRpY2tldFByaWNlSW50AgYgd2F2ZXMEDWNhbGxlckFkZHJTdHIJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQTY3VycmVudFRpY2tldHNDb3VudAkBDXRyeUdldEludGVnZXIBCQESZ2V0VGlja2V0c0NvdW50S2V5AQUNY2FsbGVyQWRkclN0cgkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESZ2V0VGlja2V0c0NvdW50S2V5AQUNY2FsbGVyQWRkclN0cgkAZAIFE2N1cnJlbnRUaWNrZXRzQ291bnQAAQUDbmlsAAEBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5iVMufA==",
    "height": 2186012,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: F7DASibMaqREShmHN5RRKvJA9KxLtHHhas9U5AtHWq3q
Next: 7hhhdBvWtzv2sqPH73XXbCDchLUHBw8Lqi5f8Bsj7tPS

Diff: 
Old
New
Differences
84
84
 
    then throw("Admin Only")
85
85
 
    else {
86
86
 
        let currentTotalLockedFunds = tryGetInteger(addressTotalLockedFundsKey(playerAddr))
87
-
        let currentAvailableFunds = tryGetInteger(addressAvailableFundsKey(playerAddr))
88
87
 
        let currentGameLockedAmountForPlayer = tryGetInteger(addressLockedFundsForGameKey(playerAddr, gameId))
89
-
        $Tuple2([IntegerEntry(addressAvailableFundsKey(playerAddr), (currentAvailableFunds + exitStackAmount)), IntegerEntry(addressTotalLockedFundsKey(playerAddr), (currentTotalLockedFunds - currentGameLockedAmountForPlayer)), IntegerEntry(addressLockedFundsForGameKey(playerAddr, gameId), 0)], 1)
88
+
        $Tuple2([IntegerEntry(addressTotalLockedFundsKey(playerAddr), (currentTotalLockedFunds - currentGameLockedAmountForPlayer)), IntegerEntry(addressLockedFundsForGameKey(playerAddr, gameId), 0), ScriptTransfer(addressFromStringValue(playerAddr), exitStackAmount, fromBase58String(depositAssetId))], 1)
90
89
 
        }
91
90
 
92
91
 
93
92
 
94
93
 
@Callable(i)
95
-
func lockFundsForGame (gameId,amountToLock) = {
96
-
    let callerAddrStr = toBase58String(i.caller.bytes)
97
-
    let currentAvailableFunds = tryGetInteger(addressAvailableFundsKey(callerAddrStr))
98
-
    let currentTotalLockedFunds = tryGetInteger(addressTotalLockedFundsKey(callerAddrStr))
99
-
    let currentLockedFundsTotalHistory = tryGetInteger(addressLockedFundsTotalHistoryKey(callerAddrStr))
100
-
    if ((amountToLock > currentAvailableFunds))
101
-
        then throw("Not enough available funds to lock")
102
-
        else $Tuple2([IntegerEntry(addressAvailableFundsKey(callerAddrStr), (currentAvailableFunds - amountToLock)), IntegerEntry(addressTotalLockedFundsKey(callerAddrStr), (currentTotalLockedFunds + amountToLock)), IntegerEntry(addressLockedFundsTotalHistoryKey(callerAddrStr), (currentLockedFundsTotalHistory + amountToLock)), IntegerEntry(addressLockedFundsForGameKey(callerAddrStr, gameId), amountToLock)], 1)
94
+
func lockFundsForGame (gameId) = {
95
+
    let pmt = if ((size(i.payments) == 1))
96
+
        then i.payments[0]
97
+
        else throw("Please attach exactly one payment")
98
+
    if ((pmt.assetId != fromBase58String(depositAssetId)))
99
+
        then throw("You can only deposit USDN")
100
+
        else {
101
+
            let callerAddrStr = toBase58String(i.caller.bytes)
102
+
            let currentTotalLockedFunds = tryGetInteger(addressTotalLockedFundsKey(callerAddrStr))
103
+
            let currentLockedFundsTotalHistory = tryGetInteger(addressLockedFundsTotalHistoryKey(callerAddrStr))
104
+
            $Tuple2([IntegerEntry(addressTotalLockedFundsKey(callerAddrStr), (currentTotalLockedFunds + pmt.amount)), IntegerEntry(addressLockedFundsTotalHistoryKey(callerAddrStr), (currentLockedFundsTotalHistory + pmt.amount)), IntegerEntry(addressLockedFundsForGameKey(callerAddrStr, gameId), pmt.amount)], 1)
105
+
            }
103
106
 
    }
104
107
 
105
108
 

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

github/deemru/w8io/3ef1775 
64.64 ms ◑