tx · 5f5eCzdCeHc4DmjmD5RQRoLpHBDZacEjwVzPABPiWxSe

3MvU8vDCk4NkA1Ag4vE3mETA4U9ioFh6VEM:  -0.02000000 Waves

2020.01.30 10:15 [876773] smart account 3MvU8vDCk4NkA1Ag4vE3mETA4U9ioFh6VEM > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5f5eCzdCeHc4DmjmD5RQRoLpHBDZacEjwVzPABPiWxSe",
    "fee": 2000000,
    "feeAssetId": null,
    "timestamp": 1580368395072,
    "version": 1,
    "sender": "3MvU8vDCk4NkA1Ag4vE3mETA4U9ioFh6VEM",
    "senderPublicKey": "LknnJnwRo6xRdriHmjgVbRDgpexijZFTYBU3Lw4HBS1",
    "proofs": [
        "37heJDYDZUrHNVK2M2gcPK5YUJrqPx2AMyCD3cLh2JjXsseCyy8Xb18U9s2uxHhi2YVD2xcMQiUoyUfSVyScqkKH"
    ],
    "script": "base64:AAIDAAAAAAAAACEIARIDCgEIEgQKAgEBEgMKAQgSAwoBCBIDCgEIEgMKAQgAAAABAAAAAA9hdWN0aW9uRHVyYXRpb24JAABoAAAAAgAAAAAAAAAFoAAAAAAAAAAAHgAAAAYAAAABaQEAAAAMcmVnaXN0cmF0aW9uAAAAAQAAAAh1c2VyTmFtZQkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBQAAAAh1c2VyTmFtZQUAAAADbmlsAAAAAWkBAAAADGJlZ2luQXVjdGlvbgAAAAIAAAAIbWluUHJpY2UAAAAIZHVyYXRpb24DCQAAZgAAAAIFAAAACGR1cmF0aW9uBQAAAA9hdWN0aW9uRHVyYXRpb24JAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAABNTcGVjaWZpZWQgZHVyYXRpb24oCQABpAAAAAEFAAAACGR1cmF0aW9uAgAAAB8pIGV4Y2VlZHMgdGhlIG1heGltdW0gZHVyYXRpb24oCQABpAAAAAEFAAAAD2F1Y3Rpb25EdXJhdGlvbgIAAAABKQQAAAAJYXVjdGlvbklkCQACWAAAAAEIBQAAAAFpAAAADXRyYW5zYWN0aW9uSWQEAAAAB2VuZFRpbWUJAABkAAAAAggFAAAACWxhc3RCbG9jawAAAAZoZWlnaHQFAAAACGR1cmF0aW9uBAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAJYXVjdGlvbklkBQAAAAlhdWN0aW9uSWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAJYXVjdGlvbklkAgAAAAhfZW5kVGltZQUAAAAHZW5kVGltZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAlhdWN0aW9uSWQCAAAABl9vd25lcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAACWF1Y3Rpb25JZAIAAAAHX2l0ZW1JZAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAJYAAAAAQkBAAAABXZhbHVlAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAEEl0ZW0gbm90IGF0YWNoZWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAJYXVjdGlvbklkAgAAAAlfbWluUHJpY2UFAAAACG1pblByaWNlBQAAAANuaWwAAAABaQEAAAADYmlkAAAAAQAAAAlhdWN0aW9uSWQEAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50BAAAAA1jYWxsZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAB2VuZFRpbWUJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAJYXVjdGlvbklkAgAAAAhfZW5kVGltZQQAAAAIbWluUHJpY2UJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAJYXVjdGlvbklkAgAAAAlfbWluUHJpY2UEAAAADWhpZ2hlc3RCaWRBbXQJAAQaAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAlhdWN0aW9uSWQCAAAADl9oaWdoZXN0QmlkQW10BAAAAA1oaWdoZXN0QmlkZGVyCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAJYXVjdGlvbklkAgAAAA5faGlnaGVzdEJpZGRlcgQAAAAYdGhpc0F1Y3Rpb25Gcm96ZW5CYWxhbmNlCQAEGgAAAAIFAAAABHRoaXMJAAEsAAAAAgkAASwAAAACBQAAAAlhdWN0aW9uSWQFAAAADWNhbGxlckFkZHJlc3MCAAAADl9mcm96ZW5CYWxhbmNlBAAAAA50b3RhbEJpZEFtb3VudAkAAGQAAAACCAUAAAADcG10AAAABmFtb3VudAMJAQAAAAlpc0RlZmluZWQAAAABBQAAABh0aGlzQXVjdGlvbkZyb3plbkJhbGFuY2UJAQAAAAV2YWx1ZQAAAAEFAAAAGHRoaXNBdWN0aW9uRnJvemVuQmFsYW5jZQAAAAAAAAAAAAMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAAEdGhpcwUAAAAJYXVjdGlvbklkCQAAAgAAAAECAAAAEkludmFsaWQgYXVjdGlvbiBJZAMJAABnAAAAAggFAAAACWxhc3RCbG9jawAAAAZoZWlnaHQFAAAAB2VuZFRpbWUJAAACAAAAAQIAAAARQXVjdGlvbiBDb21wbGV0ZWQDAwMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEFAAAADWhpZ2hlc3RCaWRBbXQJAABnAAAAAgUAAAAIbWluUHJpY2UFAAAADnRvdGFsQmlkQW1vdW50BwYDCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAANaGlnaGVzdEJpZEFtdAkAAGcAAAACCQEAAAAFdmFsdWUAAAABBQAAAA1oaWdoZXN0QmlkQW10BQAAAA50b3RhbEJpZEFtb3VudAcJAAACAAAAAQkAASwAAAACAgAAABZCaWQgbXVzdCBiZSBtb3JlIHRoZW4gAwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAANaGlnaGVzdEJpZEFtdAkAAaQAAAABBQAAAAhtaW5QcmljZQkAAaQAAAABCQEAAAAFdmFsdWUAAAABBQAAAA1oaWdoZXN0QmlkQW10CQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAACWF1Y3Rpb25JZAIAAAAOX2hpZ2hlc3RCaWRkZXIFAAAADWNhbGxlckFkZHJlc3MJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAJYXVjdGlvbklkAgAAAA5faGlnaGVzdEJpZEFtdAUAAAAOdG90YWxCaWRBbW91bnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAlhdWN0aW9uSWQFAAAADWNhbGxlckFkZHJlc3MCAAAADl9mcm96ZW5CYWxhbmNlBQAAAA50b3RhbEJpZEFtb3VudAUAAAADbmlsAAAAAWkBAAAADW93bmVyV2l0aGRyYXcAAAABAAAACWF1Y3Rpb25JZAQAAAANY2FsbGVyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAdlbmRUaW1lCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAACWF1Y3Rpb25JZAIAAAAIX2VuZFRpbWUEAAAABW93bmVyCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAJYXVjdGlvbklkAgAAAAZfb3duZXIEAAAADWhpZ2hlc3RCaWRkZXIJAAQdAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAlhdWN0aW9uSWQCAAAADl9oaWdoZXN0QmlkZGVyBAAAAAZpdGVtSWQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAJYXVjdGlvbklkAgAAAAdfaXRlbUlkBAAAAA1oaWdoZXN0QmlkQW10CQAEGgAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAJYXVjdGlvbklkAgAAAA5faGlnaGVzdEJpZEFtdAQAAAAJb3duZXJBZGRyCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAQAAAAV2YWx1ZQAAAAEFAAAABW93bmVyBAAAAAhpdGVtQWRkcgkAAlkAAAABBQAAAAZpdGVtSWQDAwkBAAAAAiE9AAAAAgUAAAANY2FsbGVyQWRkcmVzcwUAAAAFb3duZXIGCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCQAEHQAAAAIFAAAABHRoaXMFAAAACWF1Y3Rpb25JZAkAAAIAAAABAwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQkABB0AAAACBQAAAAR0aGlzBQAAAAlhdWN0aW9uSWQCAAAAEkludmFsaWQgYXVjdGlvbiBJZAIAAAANQWNjZXNzIERlbmllZAMJAABmAAAAAgUAAAAHZW5kVGltZQgFAAAACWxhc3RCbG9jawAAAAZoZWlnaHQJAAACAAAAAQIAAAAYQXVjdGlvbiBpcyBzdGlsbCBydW5uaW5nAwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAANaGlnaGVzdEJpZGRlcgMJAQAAAAlpc0RlZmluZWQAAAABCQAEGwAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAJYXVjdGlvbklkAgAAABRfb3duZXJXaXRoZHJhd1N0YXR1cwkAAAIAAAABAgAAABZJdGVtIGFscmVhZHkgd2l0aGRyYXduCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAlhdWN0aW9uSWQCAAAAFF9vd25lcldpdGhkcmF3U3RhdHVzBgUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAACW93bmVyQWRkcgAAAAAAAAAAAQUAAAAIaXRlbUFkZHIFAAAAA25pbAMJAQAAAAlpc0RlZmluZWQAAAABCQAEGwAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAJYXVjdGlvbklkAgAAABRfb3duZXJXaXRoZHJhd1N0YXR1cwkAAAIAAAABAgAAACRUaGUgYmlkIGFtb3VudCBpcyBhbHJlYWR5IHRyYW5zZmVyZWQJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAACWF1Y3Rpb25JZAIAAAAUX293bmVyV2l0aGRyYXdTdGF0dXMGBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAJb3duZXJBZGRyCQAAaAAAAAIJAABpAAAAAgkBAAAABXZhbHVlAAAAAQUAAAANaGlnaGVzdEJpZEFtdAAAAAAAAAAAZAAAAAAAAAAAXwUAAAAEdW5pdAUAAAADbmlsAAAAAWkBAAAADndpbm5lcldpdGhkcmF3AAAAAQAAAAlhdWN0aW9uSWQEAAAADWNhbGxlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAHZW5kVGltZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAlhdWN0aW9uSWQCAAAACF9lbmRUaW1lBAAAAA1oaWdoZXN0QmlkZGVyCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAJYXVjdGlvbklkAgAAAA5faGlnaGVzdEJpZGRlcgQAAAAGaXRlbUlkCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAACWF1Y3Rpb25JZAIAAAAHX2l0ZW1JZAQAAAANaGlnaGVzdEJpZEFtdAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAACWF1Y3Rpb25JZAIAAAAOX2hpZ2hlc3RCaWRBbXQEAAAAEWhpZ2hlc3RCaWRkZXJBZGRyCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAQAAAAV2YWx1ZQAAAAEFAAAADWhpZ2hlc3RCaWRkZXIEAAAACGl0ZW1BZGRyCQACWQAAAAEFAAAABml0ZW1JZAMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAAEdGhpcwUAAAAJYXVjdGlvbklkCQAAAgAAAAECAAAAEkludmFsaWQgYXVjdGlvbiBJZAMJAQAAAAIhPQAAAAIFAAAADWNhbGxlckFkZHJlc3MDCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAANaGlnaGVzdEJpZGRlcgkBAAAABXZhbHVlAAAAAQUAAAANaGlnaGVzdEJpZGRlcgkAAAIAAAABAgAAABROb2JvZHkgd29uIHRoaXMgaXRlbQkAAAIAAAABAgAAAA1BY2Nlc3MgRGVuaWVkAwkAAGYAAAACBQAAAAdlbmRUaW1lCAUAAAAJbGFzdEJsb2NrAAAABmhlaWdodAkAAAIAAAABAgAAABhBdWN0aW9uIGlzIHN0aWxsIHJ1bm5pbmcDCQEAAAAJaXNEZWZpbmVkAAAAAQkABBsAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAACWF1Y3Rpb25JZAIAAAAVX3dpbm5lcldpdGhkcmF3U3RhdHVzCQAAAgAAAAECAAAAG1RoZSBpdGVtIGFscmVhZHkgdHJhbnNmZXJlZAkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAJYXVjdGlvbklkAgAAABVfd2lubmVyV2l0aGRyYXdTdGF0dXMGBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAARaGlnaGVzdEJpZGRlckFkZHIAAAAAAAAAAAEFAAAACGl0ZW1BZGRyBQAAAANuaWwAAAABaQEAAAATcGFydGljaXBhbnRXaXRoZHJhdwAAAAEAAAAJYXVjdGlvbklkBAAAAA1jYWxsZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAB2VuZFRpbWUJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAJYXVjdGlvbklkAgAAAAhfZW5kVGltZQQAAAANaGlnaGVzdEJpZGRlcgkABB0AAAACBQAAAAR0aGlzCQABLAAAAAIFAAAACWF1Y3Rpb25JZAIAAAAOX2hpZ2hlc3RCaWRkZXIEAAAAGHRoaXNBdWN0aW9uRnJvemVuQmFsYW5jZQkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgUAAAAJYXVjdGlvbklkBQAAAA1jYWxsZXJBZGRyZXNzAgAAAA5fZnJvemVuQmFsYW5jZQMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEJAAQdAAAAAgUAAAAEdGhpcwUAAAAJYXVjdGlvbklkCQAAAgAAAAECAAAAEkludmFsaWQgYXVjdGlvbiBJZAMJAABmAAAAAgUAAAAHZW5kVGltZQgFAAAACWxhc3RCbG9jawAAAAZoZWlnaHQJAAACAAAAAQIAAAAYQXVjdGlvbiBpcyBzdGlsbCBydW5uaW5nAwkAAAAAAAACBQAAAA1jYWxsZXJBZGRyZXNzAwkBAAAACWlzRGVmaW5lZAAAAAEFAAAADWhpZ2hlc3RCaWRkZXIJAQAAAAV2YWx1ZQAAAAEFAAAADWhpZ2hlc3RCaWRkZXIAAAAAAAAAAAAJAAACAAAAAQIAAAAoV2lubmVyIGNhbid0IHdpdGhkcmF3IHRoZSBmcm96ZW4gYmFsYW5jZQMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABBQAAABh0aGlzQXVjdGlvbkZyb3plbkJhbGFuY2UGCQAAAAAAAAIFAAAAGHRoaXNBdWN0aW9uRnJvemVuQmFsYW5jZQAAAAAAAAAAAAkAAAIAAAABAgAAAApObyBCYWxhbmNlCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIFAAAACWF1Y3Rpb25JZAUAAAANY2FsbGVyQWRkcmVzcwIAAAAOX2Zyb3plbkJhbGFuY2UAAAAAAAAAAAAFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEFAAAADWNhbGxlckFkZHJlc3MJAQAAAAV2YWx1ZQAAAAEFAAAAGHRoaXNBdWN0aW9uRnJvemVuQmFsYW5jZQUAAAAEdW5pdAUAAAADbmlsAAAAAHdWW8w=",
    "chainId": 84,
    "height": 876773,
    "spentComplexity": 0
}

View: original | compacted
Prev: 5X52GTmaLN6mJyxK7KqepaWvoNLAmP5zmgkhHf7HQn2J
Next: none

Diff: 

OldNewDifferences
11 {-# STDLIB_VERSION 3 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let auctionDuration = (1440 * 1)
4+let auctionDuration = (1440 * 30)
5+
6+@Callable(i)
7+func registration (userName) = WriteSet([DataEntry(toBase58String(i.caller.bytes), userName)])
8+
9+
510 
611 @Callable(i)
712 func beginAuction (minPrice,duration) = if ((duration > auctionDuration))
2530     let minPrice = getIntegerValue(this, (auctionId + "_minPrice"))
2631     let highestBidAmt = getInteger(this, (auctionId + "_highestBidAmt"))
2732     let highestBidder = getString(this, (auctionId + "_highestBidder"))
28-    let bidFromTheSameUser = if (isDefined(highestBidder))
29-        then (value(highestBidder) == callerAddress)
30-        else false
31-    let totalBidAmount = (pmt.amount + (if (bidFromTheSameUser)
32-        then value(highestBidAmt)
33+    let thisAuctionFrozenBalance = getInteger(this, ((auctionId + callerAddress) + "_frozenBalance"))
34+    let totalBidAmount = (pmt.amount + (if (isDefined(thisAuctionFrozenBalance))
35+        then value(thisAuctionFrozenBalance)
3336         else 0))
3437     if (!(isDefined(getString(this, auctionId))))
35-        then throw("Auction Id not found")
38+        then throw("Invalid auction Id")
3639         else if ((lastBlock.height >= endTime))
3740             then throw("Auction Completed")
3841             else if (if (if (!(isDefined(highestBidAmt)))
4548                 then throw(("Bid must be more then " + (if (!(isDefined(highestBidAmt)))
4649                     then toString(minPrice)
4750                     else toString(value(highestBidAmt)))))
48-                else if (!(isDefined(highestBidder)))
49-                    then WriteSet([DataEntry((auctionId + "_highestBidder"), callerAddress), DataEntry((auctionId + "_highestBidAmt"), totalBidAmount)])
50-                    else if (bidFromTheSameUser)
51-                        then WriteSet([DataEntry((auctionId + "_highestBidAmt"), totalBidAmount)])
52-                        else {
53-                            let previousBidder = addressFromStringValue(value(highestBidder))
54-                            ScriptResult(WriteSet([DataEntry((auctionId + "_highestBidder"), callerAddress), DataEntry((auctionId + "_highestBidAmt"), totalBidAmount)]), TransferSet([ScriptTransfer(previousBidder, value(highestBidAmt), unit)]))
55-                            }
51+                else WriteSet([DataEntry((auctionId + "_highestBidder"), callerAddress), DataEntry((auctionId + "_highestBidAmt"), totalBidAmount), DataEntry(((auctionId + callerAddress) + "_frozenBalance"), totalBidAmount)])
5652     }
5753 
5854 
5955 
6056 @Callable(i)
61-func withdraw (auctionId) = {
62-    let pmt = extract(i.payment)
57+func ownerWithdraw (auctionId) = {
6358     let callerAddress = toBase58String(i.caller.bytes)
6459     let endTime = getIntegerValue(this, (auctionId + "_endTime"))
65-    let owner = getStringValue(this, (auctionId + "_owner"))
60+    let owner = getString(this, (auctionId + "_owner"))
6661     let highestBidder = getString(this, (auctionId + "_highestBidder"))
6762     let itemId = getStringValue(this, (auctionId + "_itemId"))
68-    let highestBidAmt = getIntegerValue(this, (auctionId + "_highestBidAmt"))
63+    let highestBidAmt = getInteger(this, (auctionId + "_highestBidAmt"))
64+    let ownerAddr = addressFromStringValue(value(owner))
65+    let itemAddr = fromBase58String(itemId)
66+    if (if ((callerAddress != owner))
67+        then true
68+        else !(isDefined(getString(this, auctionId))))
69+        then throw(if (!(isDefined(getString(this, auctionId))))
70+            then "Invalid auction Id"
71+            else "Access Denied")
72+        else if ((endTime > lastBlock.height))
73+            then throw("Auction is still running")
74+            else if (!(isDefined(highestBidder)))
75+                then if (isDefined(getBoolean(this, (auctionId + "_ownerWithdrawStatus"))))
76+                    then throw("Item already withdrawn")
77+                    else ScriptResult(WriteSet([DataEntry((auctionId + "_ownerWithdrawStatus"), true)]), TransferSet([ScriptTransfer(ownerAddr, 1, itemAddr)]))
78+                else if (isDefined(getBoolean(this, (auctionId + "_ownerWithdrawStatus"))))
79+                    then throw("The bid amount is already transfered")
80+                    else ScriptResult(WriteSet([DataEntry((auctionId + "_ownerWithdrawStatus"), true)]), TransferSet([ScriptTransfer(ownerAddr, ((value(highestBidAmt) / 100) * 95), unit)]))
81+    }
82+
83+
84+
85+@Callable(i)
86+func winnerWithdraw (auctionId) = {
87+    let callerAddress = toBase58String(i.caller.bytes)
88+    let endTime = getIntegerValue(this, (auctionId + "_endTime"))
89+    let highestBidder = getString(this, (auctionId + "_highestBidder"))
90+    let itemId = getStringValue(this, (auctionId + "_itemId"))
91+    let highestBidAmt = getInteger(this, (auctionId + "_highestBidAmt"))
6992     let highestBidderAddr = addressFromStringValue(value(highestBidder))
70-    let ownerAddr = addressFromStringValue(value(owner))
71-    let itemAddr = addressFromStringValue(value(itemId))
72-    if ((endTime > lastBlock.height))
73-        then throw("Auction is not finished yet")
74-        else if (!(isDefined(highestBidder)))
75-            then if (!(isDefined(getBoolean(this, (auctionId + "_status")))))
76-                then throw("Owner already withdrawn the item")
77-                else ScriptResult(WriteSet([DataEntry((auctionId + "_status"), true)]), TransferSet([ScriptTransfer(ownerAddr, 1, base58'itemAddr')]))
78-            else if (isDefined(getBoolean(this, (auctionId + "_status"))))
79-                then throw("The item is transfered to the highest bidder and the bid amount is transfered to the owner")
80-                else ScriptResult(WriteSet([DataEntry((auctionId + "_status"), true)]), TransferSet([ScriptTransfer(highestBidderAddr, 1, base58'itemAddr'), ScriptTransfer(ownerAddr, highestBidAmt, unit)]))
93+    let itemAddr = fromBase58String(itemId)
94+    if (!(isDefined(getString(this, auctionId))))
95+        then throw("Invalid auction Id")
96+        else if ((callerAddress != if (isDefined(highestBidder))
97+            then value(highestBidder)
98+            else throw("Nobody won this item")))
99+            then throw("Access Denied")
100+            else if ((endTime > lastBlock.height))
101+                then throw("Auction is still running")
102+                else if (isDefined(getBoolean(this, (auctionId + "_winnerWithdrawStatus"))))
103+                    then throw("The item already transfered")
104+                    else ScriptResult(WriteSet([DataEntry((auctionId + "_winnerWithdrawStatus"), true)]), TransferSet([ScriptTransfer(highestBidderAddr, 1, itemAddr)]))
105+    }
106+
107+
108+
109+@Callable(i)
110+func participantWithdraw (auctionId) = {
111+    let callerAddress = toBase58String(i.caller.bytes)
112+    let endTime = getIntegerValue(this, (auctionId + "_endTime"))
113+    let highestBidder = getString(this, (auctionId + "_highestBidder"))
114+    let thisAuctionFrozenBalance = getInteger(this, ((auctionId + callerAddress) + "_frozenBalance"))
115+    if (!(isDefined(getString(this, auctionId))))
116+        then throw("Invalid auction Id")
117+        else if ((endTime > lastBlock.height))
118+            then throw("Auction is still running")
119+            else if ((callerAddress == (if (isDefined(highestBidder))
120+                then value(highestBidder)
121+                else 0)))
122+                then throw("Winner can't withdraw the frozen balance")
123+                else if (if (!(isDefined(thisAuctionFrozenBalance)))
124+                    then true
125+                    else (thisAuctionFrozenBalance == 0))
126+                    then throw("No Balance")
127+                    else ScriptResult(WriteSet([DataEntry(((auctionId + callerAddress) + "_frozenBalance"), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(callerAddress), value(thisAuctionFrozenBalance), unit)]))
81128     }
82129 
83130 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 3 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let auctionDuration = (1440 * 1)
4+let auctionDuration = (1440 * 30)
5+
6+@Callable(i)
7+func registration (userName) = WriteSet([DataEntry(toBase58String(i.caller.bytes), userName)])
8+
9+
510 
611 @Callable(i)
712 func beginAuction (minPrice,duration) = if ((duration > auctionDuration))
813     then throw((((("Specified duration(" + toString(duration)) + ") exceeds the maximum duration(") + toString(auctionDuration)) + ")"))
914     else {
1015         let auctionId = toBase58String(i.transactionId)
1116         let endTime = (lastBlock.height + duration)
1217         let pmt = extract(i.payment)
1318         WriteSet([DataEntry(auctionId, auctionId), DataEntry((auctionId + "_endTime"), endTime), DataEntry((auctionId + "_owner"), toBase58String(i.caller.bytes)), DataEntry((auctionId + "_itemId"), if (isDefined(pmt.assetId))
1419             then toBase58String(value(pmt.assetId))
1520             else throw("Item not atached")), DataEntry((auctionId + "_minPrice"), minPrice)])
1621         }
1722 
1823 
1924 
2025 @Callable(i)
2126 func bid (auctionId) = {
2227     let pmt = extract(i.payment)
2328     let callerAddress = toBase58String(i.caller.bytes)
2429     let endTime = getIntegerValue(this, (auctionId + "_endTime"))
2530     let minPrice = getIntegerValue(this, (auctionId + "_minPrice"))
2631     let highestBidAmt = getInteger(this, (auctionId + "_highestBidAmt"))
2732     let highestBidder = getString(this, (auctionId + "_highestBidder"))
28-    let bidFromTheSameUser = if (isDefined(highestBidder))
29-        then (value(highestBidder) == callerAddress)
30-        else false
31-    let totalBidAmount = (pmt.amount + (if (bidFromTheSameUser)
32-        then value(highestBidAmt)
33+    let thisAuctionFrozenBalance = getInteger(this, ((auctionId + callerAddress) + "_frozenBalance"))
34+    let totalBidAmount = (pmt.amount + (if (isDefined(thisAuctionFrozenBalance))
35+        then value(thisAuctionFrozenBalance)
3336         else 0))
3437     if (!(isDefined(getString(this, auctionId))))
35-        then throw("Auction Id not found")
38+        then throw("Invalid auction Id")
3639         else if ((lastBlock.height >= endTime))
3740             then throw("Auction Completed")
3841             else if (if (if (!(isDefined(highestBidAmt)))
3942                 then (minPrice >= totalBidAmount)
4043                 else false)
4144                 then true
4245                 else if (isDefined(highestBidAmt))
4346                     then (value(highestBidAmt) >= totalBidAmount)
4447                     else false)
4548                 then throw(("Bid must be more then " + (if (!(isDefined(highestBidAmt)))
4649                     then toString(minPrice)
4750                     else toString(value(highestBidAmt)))))
48-                else if (!(isDefined(highestBidder)))
49-                    then WriteSet([DataEntry((auctionId + "_highestBidder"), callerAddress), DataEntry((auctionId + "_highestBidAmt"), totalBidAmount)])
50-                    else if (bidFromTheSameUser)
51-                        then WriteSet([DataEntry((auctionId + "_highestBidAmt"), totalBidAmount)])
52-                        else {
53-                            let previousBidder = addressFromStringValue(value(highestBidder))
54-                            ScriptResult(WriteSet([DataEntry((auctionId + "_highestBidder"), callerAddress), DataEntry((auctionId + "_highestBidAmt"), totalBidAmount)]), TransferSet([ScriptTransfer(previousBidder, value(highestBidAmt), unit)]))
55-                            }
51+                else WriteSet([DataEntry((auctionId + "_highestBidder"), callerAddress), DataEntry((auctionId + "_highestBidAmt"), totalBidAmount), DataEntry(((auctionId + callerAddress) + "_frozenBalance"), totalBidAmount)])
5652     }
5753 
5854 
5955 
6056 @Callable(i)
61-func withdraw (auctionId) = {
62-    let pmt = extract(i.payment)
57+func ownerWithdraw (auctionId) = {
6358     let callerAddress = toBase58String(i.caller.bytes)
6459     let endTime = getIntegerValue(this, (auctionId + "_endTime"))
65-    let owner = getStringValue(this, (auctionId + "_owner"))
60+    let owner = getString(this, (auctionId + "_owner"))
6661     let highestBidder = getString(this, (auctionId + "_highestBidder"))
6762     let itemId = getStringValue(this, (auctionId + "_itemId"))
68-    let highestBidAmt = getIntegerValue(this, (auctionId + "_highestBidAmt"))
63+    let highestBidAmt = getInteger(this, (auctionId + "_highestBidAmt"))
64+    let ownerAddr = addressFromStringValue(value(owner))
65+    let itemAddr = fromBase58String(itemId)
66+    if (if ((callerAddress != owner))
67+        then true
68+        else !(isDefined(getString(this, auctionId))))
69+        then throw(if (!(isDefined(getString(this, auctionId))))
70+            then "Invalid auction Id"
71+            else "Access Denied")
72+        else if ((endTime > lastBlock.height))
73+            then throw("Auction is still running")
74+            else if (!(isDefined(highestBidder)))
75+                then if (isDefined(getBoolean(this, (auctionId + "_ownerWithdrawStatus"))))
76+                    then throw("Item already withdrawn")
77+                    else ScriptResult(WriteSet([DataEntry((auctionId + "_ownerWithdrawStatus"), true)]), TransferSet([ScriptTransfer(ownerAddr, 1, itemAddr)]))
78+                else if (isDefined(getBoolean(this, (auctionId + "_ownerWithdrawStatus"))))
79+                    then throw("The bid amount is already transfered")
80+                    else ScriptResult(WriteSet([DataEntry((auctionId + "_ownerWithdrawStatus"), true)]), TransferSet([ScriptTransfer(ownerAddr, ((value(highestBidAmt) / 100) * 95), unit)]))
81+    }
82+
83+
84+
85+@Callable(i)
86+func winnerWithdraw (auctionId) = {
87+    let callerAddress = toBase58String(i.caller.bytes)
88+    let endTime = getIntegerValue(this, (auctionId + "_endTime"))
89+    let highestBidder = getString(this, (auctionId + "_highestBidder"))
90+    let itemId = getStringValue(this, (auctionId + "_itemId"))
91+    let highestBidAmt = getInteger(this, (auctionId + "_highestBidAmt"))
6992     let highestBidderAddr = addressFromStringValue(value(highestBidder))
70-    let ownerAddr = addressFromStringValue(value(owner))
71-    let itemAddr = addressFromStringValue(value(itemId))
72-    if ((endTime > lastBlock.height))
73-        then throw("Auction is not finished yet")
74-        else if (!(isDefined(highestBidder)))
75-            then if (!(isDefined(getBoolean(this, (auctionId + "_status")))))
76-                then throw("Owner already withdrawn the item")
77-                else ScriptResult(WriteSet([DataEntry((auctionId + "_status"), true)]), TransferSet([ScriptTransfer(ownerAddr, 1, base58'itemAddr')]))
78-            else if (isDefined(getBoolean(this, (auctionId + "_status"))))
79-                then throw("The item is transfered to the highest bidder and the bid amount is transfered to the owner")
80-                else ScriptResult(WriteSet([DataEntry((auctionId + "_status"), true)]), TransferSet([ScriptTransfer(highestBidderAddr, 1, base58'itemAddr'), ScriptTransfer(ownerAddr, highestBidAmt, unit)]))
93+    let itemAddr = fromBase58String(itemId)
94+    if (!(isDefined(getString(this, auctionId))))
95+        then throw("Invalid auction Id")
96+        else if ((callerAddress != if (isDefined(highestBidder))
97+            then value(highestBidder)
98+            else throw("Nobody won this item")))
99+            then throw("Access Denied")
100+            else if ((endTime > lastBlock.height))
101+                then throw("Auction is still running")
102+                else if (isDefined(getBoolean(this, (auctionId + "_winnerWithdrawStatus"))))
103+                    then throw("The item already transfered")
104+                    else ScriptResult(WriteSet([DataEntry((auctionId + "_winnerWithdrawStatus"), true)]), TransferSet([ScriptTransfer(highestBidderAddr, 1, itemAddr)]))
105+    }
106+
107+
108+
109+@Callable(i)
110+func participantWithdraw (auctionId) = {
111+    let callerAddress = toBase58String(i.caller.bytes)
112+    let endTime = getIntegerValue(this, (auctionId + "_endTime"))
113+    let highestBidder = getString(this, (auctionId + "_highestBidder"))
114+    let thisAuctionFrozenBalance = getInteger(this, ((auctionId + callerAddress) + "_frozenBalance"))
115+    if (!(isDefined(getString(this, auctionId))))
116+        then throw("Invalid auction Id")
117+        else if ((endTime > lastBlock.height))
118+            then throw("Auction is still running")
119+            else if ((callerAddress == (if (isDefined(highestBidder))
120+                then value(highestBidder)
121+                else 0)))
122+                then throw("Winner can't withdraw the frozen balance")
123+                else if (if (!(isDefined(thisAuctionFrozenBalance)))
124+                    then true
125+                    else (thisAuctionFrozenBalance == 0))
126+                    then throw("No Balance")
127+                    else ScriptResult(WriteSet([DataEntry(((auctionId + callerAddress) + "_frozenBalance"), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(callerAddress), value(thisAuctionFrozenBalance), unit)]))
81128     }
82129 
83130 
github/deemru/w8io/3ef1775 
48.23 ms ◑