tx · 6xzbJ3ZYzLQigrprJyFZwgKwTCE39gZ87xq165jYZyQi

3N2Z6EjzrzaCpD8ypDYLWDKe2PPVU8y9dJs:  -0.01400000 Waves

2019.09.08 04:22 [666441] smart account 3N2Z6EjzrzaCpD8ypDYLWDKe2PPVU8y9dJs > SELF 0.00000000 Waves

{ "type": 13, "id": "6xzbJ3ZYzLQigrprJyFZwgKwTCE39gZ87xq165jYZyQi", "fee": 1400000, "feeAssetId": null, "timestamp": 1567905785943, "version": 1, "sender": "3N2Z6EjzrzaCpD8ypDYLWDKe2PPVU8y9dJs", "senderPublicKey": "HSTmdhPrJF81ozDBaqVn8QVtV76oD7gzDfcHPQRdxdwW", "proofs": [ "2ASmLtoe3FSXD6xvtk38yEgBhPuBGhWJSJSrSonfqC9EVsZcTcVzTjBHzfb3pyD52vwsYCT1LRp72NZ8CNQpCk6H" ], "script": "base64:AAIDAAAAAAAAAAAAAAANAAAAAAlXaW5TZXJ2ZXIJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQIAAAAjM045WG55UHBXeFlvaEtIN3o1ZEV1cThycG5vYnB5elByekUAAAAAB1dBVkVMRVQJAABoAAAAAgkAAGgAAAACAAAAAAAAAABkAAAAAAAAAAPoAAAAAAAAAAPoAAAAAApDT01NSVNTSU9OCQAAaQAAAAIJAABoAAAAAgAAAAAAAAAABQUAAAAHV0FWRUxFVAAAAAAAAAAD6AAAAAAOVGlja2V0c1BlcldhdmUAAAAAAAAAAGQAAAAAC0NVUlJFTlRHQU1FAgAAAA0kQ1VSUkVOVF9HQU1FAAAAAA9HQU1FU0NPVU5URVJLRVkCAAAACSRHQU1FX05VTQAAAAAKTEFTVFRJQ0tFVAIAAAAMJExBU1RfVElDS0VUAQAAAA5nZXRQbGF5ZXJzTGlzdAAAAAIAAAAGZ2FtZUlkAAAADWN1cnJlbnRQbGF5ZXIEAAAAEHBsYXllcnNQcmVzZW50ZWQJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAGZ2FtZUlkAgAAAAhfcGxheWVycwMJAQAAAAEhAAAAAQUAAAAQcGxheWVyc1ByZXNlbnRlZAUAAAANY3VycmVudFBsYXllcgMJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABmdhbWVJZAIAAAABXwUAAAANY3VycmVudFBsYXllcgIAAAAIX3RpY2tldHMJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAGZ2FtZUlkAgAAAAhfcGxheWVycwkAASwAAAACCQABLAAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAGZ2FtZUlkAgAAAAhfcGxheWVycwIAAAABXwUAAAANY3VycmVudFBsYXllcgEAAAATRm9ybWF0R2FtZURhdGFQYXJhbQAAAAEAAAABcAQAAAABcwkAATEAAAABBQAAAAFwAwkAAAAAAAACBQAAAAFzAAAAAAAAAAAACQAAAgAAAAECAAAAJVBhcmFtZXRlciBzaXplIG11c3QgYmUgZ3JlYXRlciB0aGVuIDADCQAAZgAAAAIFAAAAAXMAAAAAAAAAAGMJAAACAAAAAQIAAAAkUGFyYW1ldGVyIHNpemUgbXVzdCBiZSBsZXNzIHRoZW4gMTAwAwkAAGYAAAACAAAAAAAAAAAKBQAAAAFzCQABLAAAAAIJAAEsAAAAAgIAAAABMAkAAaQAAAABBQAAAAFzBQAAAAFwCQABLAAAAAIJAAGkAAAAAQUAAAABcwUAAAABcAEAAAAKZ2V0VGlja2V0cwAAAAMAAAAGZ2FtZUlkAAAAEHBsYXllckFkZHJlc3NTdHIAAAAKcGF5bWVudEFtdAQAAAAKbGFzdFRpY2tldAkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwUAAAAKTEFTVFRJQ0tFVAQAAAAMd2F2ZXNQYXltZW50CQAAaQAAAAIFAAAACnBheW1lbnRBbXQFAAAAB1dBVkVMRVQEAAAADmZpcnN0TmV3VGlja2V0CQAAZAAAAAIFAAAACmxhc3RUaWNrZXQAAAAAAAAAAAEEAAAADWxhc3ROZXdUaWNrZXQJAABkAAAAAgUAAAAOZmlyc3ROZXdUaWNrZXQJAABoAAAAAgUAAAAMd2F2ZXNQYXltZW50BQAAAA5UaWNrZXRzUGVyV2F2ZQQAAAAKbmV3VGlja2V0cwkAASwAAAACCQABLAAAAAIJAQAAABNGb3JtYXRHYW1lRGF0YVBhcmFtAAAAAQkAAaQAAAABBQAAAA5maXJzdE5ld1RpY2tldAIAAAABXwkBAAAAE0Zvcm1hdEdhbWVEYXRhUGFyYW0AAAABCQABpAAAAAEFAAAADWxhc3ROZXdUaWNrZXQEAAAACnRpY2tldHNTdHIJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABmdhbWVJZAIAAAABXwUAAAAQcGxheWVyQWRkcmVzc1N0cgIAAAAIX3RpY2tldHMDBQAAAAp0aWNrZXRzU3RyBAAAAA5jdXJyZW50VGlja2V0cwkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAGZ2FtZUlkAgAAAAFfBQAAABBwbGF5ZXJBZGRyZXNzU3RyAgAAAAhfdGlja2V0cwkAASwAAAACCQABLAAAAAIFAAAADmN1cnJlbnRUaWNrZXRzAgAAAAEgBQAAAApuZXdUaWNrZXRzBQAAAApuZXdUaWNrZXRzAQAAAA1nZXRMYXN0VGlja2V0AAAAAQAAAApwYXltZW50QW10BAAAAApsYXN0VGlja2V0CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAApMQVNUVElDS0VUBAAAAAx3YXZlc1BheW1lbnQJAABpAAAAAgUAAAAKcGF5bWVudEFtdAUAAAAHV0FWRUxFVAkAAGQAAAACBQAAAApsYXN0VGlja2V0CQAAaAAAAAIFAAAADHdhdmVzUGF5bWVudAUAAAAOVGlja2V0c1BlcldhdmUBAAAAEEluY3JlbWVudEdhbWVOdW0AAAACAAAABmdhbWVJZAAAAAR0eElkAwkAAAAAAAACBQAAAAZnYW1lSWQFAAAABHR4SWQEAAAAB2dhbWVOdW0EAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAPR0FNRVNDT1VOVEVSS0VZAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAA251bQUAAAAHJG1hdGNoMAUAAAADbnVtAAAAAAAAAAAACQABpAAAAAEJAABkAAAAAgUAAAAHZ2FtZU51bQAAAAAAAAAAAQkAAaQAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAA9HQU1FU0NPVU5URVJLRVkBAAAADmdldEN1cnJlbnRHYW1lAAAAAQAAAAR0eElkBAAAAAZnYW1lSWQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAAC0NVUlJFTlRHQU1FBAAAAA1nYW1lU3RpbGxPcGVuCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABmdhbWVJZAIAAAAHX3Jlc3VsdAMFAAAADWdhbWVTdGlsbE9wZW4FAAAABmdhbWVJZAUAAAAEdHhJZAAAAAEAAAABaQEAAAADYmV0AAAAAAQAAAAEdHhJZAkAAlgAAAABCAUAAAABaQAAAA10cmFuc2FjdGlvbklkBAAAAAZnYW1lSWQJAQAAAA5nZXRDdXJyZW50R2FtZQAAAAEFAAAABHR4SWQEAAAAB2dhbWVOdW0JAQAAABBJbmNyZW1lbnRHYW1lTnVtAAAAAgUAAAAGZ2FtZUlkBQAAAAR0eElkBAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAQAAAAKcGF5bWVudEFtdAgFAAAAA3BtdAAAAAZhbW91bnQEAAAADWJldE5vdEluV2F2ZXMHBAAAAA1mZWVOb3RJbldhdmVzBwQAAAAOcGxheWVyUHViS2V5NTgJAAJYAAAAAQgFAAAAAWkAAAAPY2FsbGVyUHVibGljS2V5BAAAAA1wbGF5ZXJBZGRyZXNzCQEAAAAUYWRkcmVzc0Zyb21QdWJsaWNLZXkAAAABCQACWQAAAAEFAAAADnBsYXllclB1YktleTU4AwUAAAANYmV0Tm90SW5XYXZlcwkAAAIAAAABAgAAABtCZXQgYW1vdW50IG11c3QgYmUgaW4gV2F2ZXMDBQAAAA1mZWVOb3RJbldhdmVzCQAAAgAAAAECAAAAIlRyYW5zYWN0aW9uJ3MgZmVlIG11c3QgYmUgaW4gV2F2ZXMEAAAAEHBsYXllckFkZHJlc3NTdHIJAAQlAAAAAQUAAAANcGxheWVyQWRkcmVzcwQAAAAHYmV0RGF0YQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAALQ1VSUkVOVEdBTUUFAAAABmdhbWVJZAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAPR0FNRVNDT1VOVEVSS0VZBQAAAAdnYW1lTnVtCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAZnYW1lSWQCAAAAAV8FAAAAEHBsYXllckFkZHJlc3NTdHICAAAACF90aWNrZXRzCQEAAAAKZ2V0VGlja2V0cwAAAAMFAAAABmdhbWVJZAUAAAAQcGxheWVyQWRkcmVzc1N0cgUAAAAKcGF5bWVudEFtdAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAZnYW1lSWQCAAAACF9wbGF5ZXJzCQEAAAAOZ2V0UGxheWVyc0xpc3QAAAACBQAAAAZnYW1lSWQFAAAAEHBsYXllckFkZHJlc3NTdHIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAACkxBU1RUSUNLRVQJAQAAAA1nZXRMYXN0VGlja2V0AAAAAQUAAAAKcGF5bWVudEFtdAUAAAADbmlsBAAAAAt0b1dpblNlcnZlcgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAlXaW5TZXJ2ZXIFAAAACnBheW1lbnRBbXQFAAAABHVuaXQFAAAAA25pbAkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEFAAAAB2JldERhdGEJAQAAAAtUcmFuc2ZlclNldAAAAAEFAAAAC3RvV2luU2VydmVyAAAAALptb6Y=", "chainId": 84, "height": 666441, "spentComplexity": 0 } View: original | compacted Prev: DH5ZbT4c2RjnKdMHMnZFXzN9J9diN4oJB5qDtdq7Ct8x Next: Sz8cJTniKoJULb3CiNbYHLhXxP46wyxqvXKxzRKwdjL Diff:
OldNewDifferences
8585 @Callable(i)
8686 func bet () = {
8787 let txId = toBase58String(i.transactionId)
88- let dbData = [DataEntry(CURRENTGAME, txId)]
89- WriteSet(dbData)
88+ let gameId = getCurrentGame(txId)
89+ let gameNum = IncrementGameNum(gameId, txId)
90+ let pmt = extract(i.payment)
91+ let paymentAmt = pmt.amount
92+ let betNotInWaves = false
93+ let feeNotInWaves = false
94+ let playerPubKey58 = toBase58String(i.callerPublicKey)
95+ let playerAddress = addressFromPublicKey(fromBase58String(playerPubKey58))
96+ if (betNotInWaves)
97+ then throw("Bet amount must be in Waves")
98+ else if (feeNotInWaves)
99+ then throw("Transaction's fee must be in Waves")
100+ else {
101+ let playerAddressStr = toString(playerAddress)
102+ let betData = [DataEntry(CURRENTGAME, gameId), DataEntry(GAMESCOUNTERKEY, gameNum), DataEntry((((gameId + "_") + playerAddressStr) + "_tickets"), getTickets(gameId, playerAddressStr, paymentAmt)), DataEntry((gameId + "_players"), getPlayersList(gameId, playerAddressStr)), DataEntry(LASTTICKET, getLastTicket(paymentAmt))]
103+ let toWinServer = [ScriptTransfer(WinServer, paymentAmt, unit)]
104+ ScriptResult(WriteSet(betData), TransferSet(toWinServer))
105+ }
90106 }
91107
92108
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 3 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let WinServer = addressFromStringValue("3N9XnyPpWxYohKH7z5dEuq8rpnobpyzPrzE")
55
66 let WAVELET = ((100 * 1000) * 1000)
77
88 let COMMISSION = ((5 * WAVELET) / 1000)
99
1010 let TicketsPerWave = 100
1111
1212 let CURRENTGAME = "$CURRENT_GAME"
1313
1414 let GAMESCOUNTERKEY = "$GAME_NUM"
1515
1616 let LASTTICKET = "$LAST_TICKET"
1717
1818 func getPlayersList (gameId,currentPlayer) = {
1919 let playersPresented = isDefined(getString(this, (gameId + "_players")))
2020 if (!(playersPresented))
2121 then currentPlayer
2222 else if (isDefined(getString(this, (((gameId + "_") + currentPlayer) + "_tickets"))))
2323 then getStringValue(this, (gameId + "_players"))
2424 else ((getStringValue(this, (gameId + "_players")) + "_") + currentPlayer)
2525 }
2626
2727
2828 func FormatGameDataParam (p) = {
2929 let s = size(p)
3030 if ((s == 0))
3131 then throw("Parameter size must be greater then 0")
3232 else if ((s > 99))
3333 then throw("Parameter size must be less then 100")
3434 else if ((10 > s))
3535 then (("0" + toString(s)) + p)
3636 else (toString(s) + p)
3737 }
3838
3939
4040 func getTickets (gameId,playerAddressStr,paymentAmt) = {
4141 let lastTicket = getIntegerValue(this, LASTTICKET)
4242 let wavesPayment = (paymentAmt / WAVELET)
4343 let firstNewTicket = (lastTicket + 1)
4444 let lastNewTicket = (firstNewTicket + (wavesPayment * TicketsPerWave))
4545 let newTickets = ((FormatGameDataParam(toString(firstNewTicket)) + "_") + FormatGameDataParam(toString(lastNewTicket)))
4646 let ticketsStr = isDefined(getString(this, (((gameId + "_") + playerAddressStr) + "_tickets")))
4747 if (ticketsStr)
4848 then {
4949 let currentTickets = getStringValue(this, (((gameId + "_") + playerAddressStr) + "_tickets"))
5050 ((currentTickets + " ") + newTickets)
5151 }
5252 else newTickets
5353 }
5454
5555
5656 func getLastTicket (paymentAmt) = {
5757 let lastTicket = getIntegerValue(this, LASTTICKET)
5858 let wavesPayment = (paymentAmt / WAVELET)
5959 (lastTicket + (wavesPayment * TicketsPerWave))
6060 }
6161
6262
6363 func IncrementGameNum (gameId,txId) = if ((gameId == txId))
6464 then {
6565 let gameNum = match getInteger(this, GAMESCOUNTERKEY) {
6666 case num: Int =>
6767 num
6868 case _ =>
6969 0
7070 }
7171 toString((gameNum + 1))
7272 }
7373 else toString(getIntegerValue(this, GAMESCOUNTERKEY))
7474
7575
7676 func getCurrentGame (txId) = {
7777 let gameId = getStringValue(this, CURRENTGAME)
7878 let gameStillOpen = isDefined(getString(this, (gameId + "_result")))
7979 if (gameStillOpen)
8080 then gameId
8181 else txId
8282 }
8383
8484
8585 @Callable(i)
8686 func bet () = {
8787 let txId = toBase58String(i.transactionId)
88- let dbData = [DataEntry(CURRENTGAME, txId)]
89- WriteSet(dbData)
88+ let gameId = getCurrentGame(txId)
89+ let gameNum = IncrementGameNum(gameId, txId)
90+ let pmt = extract(i.payment)
91+ let paymentAmt = pmt.amount
92+ let betNotInWaves = false
93+ let feeNotInWaves = false
94+ let playerPubKey58 = toBase58String(i.callerPublicKey)
95+ let playerAddress = addressFromPublicKey(fromBase58String(playerPubKey58))
96+ if (betNotInWaves)
97+ then throw("Bet amount must be in Waves")
98+ else if (feeNotInWaves)
99+ then throw("Transaction's fee must be in Waves")
100+ else {
101+ let playerAddressStr = toString(playerAddress)
102+ let betData = [DataEntry(CURRENTGAME, gameId), DataEntry(GAMESCOUNTERKEY, gameNum), DataEntry((((gameId + "_") + playerAddressStr) + "_tickets"), getTickets(gameId, playerAddressStr, paymentAmt)), DataEntry((gameId + "_players"), getPlayersList(gameId, playerAddressStr)), DataEntry(LASTTICKET, getLastTicket(paymentAmt))]
103+ let toWinServer = [ScriptTransfer(WinServer, paymentAmt, unit)]
104+ ScriptResult(WriteSet(betData), TransferSet(toWinServer))
105+ }
90106 }
91107
92108

github/deemru/w8io/026f985 
26.77 ms