w8 · tx · 2gs···yBC

tx · 2gs4udn8XMx9q9TLtyTa1uvCM21NwauZFZCRGrAMfyBC

3MteeMicpvRbmpGtb55Ym7qajPGJqju6DfD:  -0.01400000 Waves

2019.07.13 12:17 [583767] smart account 3MteeMicpvRbmpGtb55Ym7qajPGJqju6DfD > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2gs4udn8XMx9q9TLtyTa1uvCM21NwauZFZCRGrAMfyBC",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1563009434766,
    "version": 1,
    "sender": "3MteeMicpvRbmpGtb55Ym7qajPGJqju6DfD",
    "senderPublicKey": "Ag9VhLi94fq2sVuC1mHGQFUv1ioh2E2RqXkjYpTWakT5",
    "proofs": [
        "UH1V3uMrX8cUwmmEQjHFN8vZ43UYnZ8uJhM3vcLKQnzG8uF4iR1SjPhsXxCM5iV82wmJbsZj9fJbqbLymaLrpwv"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAAOAAAAAAROT05FAgAAAARub25lAAAAAAdCQUxBTkNFAgAAAAlfQkFMQU5DRV8BAAAADmdldE51bWJlckJ5S2V5AAAAAQAAAANrZXkEAAAAA251bQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAUAAAADbnVtAQAAAAtnZXRTdHJCeUtleQAAAAEAAAADa2V5BAAAAANzdHIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUFAAAAA3N0cgEAAAAPZ2V0S2V5SXRlbVByaWNlAAAAAQAAAARpdGVtCQABLAAAAAIFAAAABGl0ZW0CAAAABl9wcmljZQEAAAARZ2V0VmFsdWVJdGVtUHJpY2UAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAA9nZXRLZXlJdGVtUHJpY2UAAAABBQAAAARpdGVtAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACAAAABHVzZXIAAAAEaXRlbQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEaXRlbQIAAAABXwUAAAAEdXNlcgIAAAAEX2NudAEAAAAXZ2V0VmFsdWVVc2VySXRlbUNvdW50ZXIAAAACAAAABHVzZXIAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFWdldEtleVVzZXJJdGVtQ291bnRlcgAAAAIFAAAABHVzZXIFAAAABGl0ZW0BAAAACmdldEtleUl0ZW0AAAACAAAACHN1cHBsaWVyAAAABXRpdGxlCQABLAAAAAICAAAABWl0ZW1fCQACWAAAAAEJAAH3AAAAAQkAAZsAAAABCQABLAAAAAIFAAAACHN1cHBsaWVyBQAAAAV0aXRsZQEAAAAOZ2V0S2V5SXRlbURhdGEAAAABAAAABGl0ZW0JAAEsAAAAAgUAAAAEaXRlbQIAAAAFX2RhdGEBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEAAAAEaXRlbQkAASwAAAACBQAAAARpdGVtAgAAAAZfb3duZXIBAAAAFGdldFZhbHVlSXRlbVN1cHBsaWVyAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQAAAAdhY2NvdW50CQABLAAAAAIFAAAAB2FjY291bnQCAAAACF9iYWxhbmNlAQAAABdnZXRWYWx1ZUJhbGFuY2VTdXBwbGllcgAAAAEAAAAHYWNjb3VudAkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAAB2FjY291bnQAAAAEAAAAAWkBAAAAB2RlcG9zaXQAAAAABAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAhY2FuIGhvbGQgd2F2ZXMgb25seSBhdCB0aGUgbW9tZW50BAAAAApjdXJyZW50S2V5CQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAADWN1cnJlbnRBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAKY3VycmVudEtleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAAl3bFN0ckN1cnIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAAAd3bF9zdHNfBQAAAApjdXJyZW50S2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEJAAACAAAAAQIAAAAcdXNlciBoYXMgYmVlbiBub3Qgd2FpdGxpc3RlZAQAAAAJbmV3QW1vdW50CQAAZAAAAAIFAAAADWN1cnJlbnRBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50CQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAAB0JBTEFOQ0UFAAAACmN1cnJlbnRLZXkFAAAACW5ld0Ftb3VudAUAAAADbmlsAAAAAWkBAAAAB2FkZEl0ZW0AAAADAAAABXRpdGxlAAAABXByaWNlAAAABGRhdGEEAAAAD3N1cHBsaWVyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAARpdGVtCQEAAAAKZ2V0S2V5SXRlbQAAAAIFAAAAD3N1cHBsaWVyQWRkcmVzcwUAAAAFdGl0bGUDCQAAZwAAAAIAAAAAAAAAAAAFAAAABXByaWNlCQAAAgAAAAECAAAALnB1cmNoYXNlIGFtb3VudCBjYW5ub3QgYmUgbGVzcyB0aGVuIGl0ZW0gcHJpY2UDCQEAAAACIT0AAAACCQEAAAAUZ2V0VmFsdWVJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtBQAAAAROT05FCQAAAgAAAAECAAAAGGFuIGl0ZW0gaXMgYWxyZWFkeSBleGlzdAkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAABGl0ZW0FAAAAD3N1cHBsaWVyQWRkcmVzcwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAD2dldEtleUl0ZW1QcmljZQAAAAEFAAAABGl0ZW0FAAAABXByaWNlCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5SXRlbURhdGEAAAABBQAAAARpdGVtBQAAAARkYXRhBQAAAANuaWwAAAABaQEAAAAIcHVyY2hhc2UAAAABAAAABGl0ZW0EAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50AwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAkAAAIAAAABAgAAAB9XQVZFUyB0b2tlbnMgb25seSBhdCB0aGUgbW9tZW50BAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAVwcmljZQkBAAAAEWdldFZhbHVlSXRlbVByaWNlAAAAAQUAAAAEaXRlbQQAAAAPc3VwcGxpZXJBZGRyZXNzCQEAAAAUZ2V0VmFsdWVJdGVtU3VwcGxpZXIAAAABBQAAAARpdGVtAwkAAGYAAAACBQAAAAVwcmljZQgFAAAAA3BtdAAAAAZhbW91bnQJAAACAAAAAQIAAAAucHVyY2hhc2UgYW1vdW50IGNhbm5vdCBiZSBsZXNzIHRoZW4gaXRlbSBwcmljZQMJAABmAAAAAggFAAAAA3BtdAAAAAZhbW91bnQFAAAABXByaWNlCQAAAgAAAAECAAAAMHB1cmNoYXNlIGFtb3VudCBjYW5ub3QgYmUgaGlnaGVyIHRoZW4gaXRlbSBwcmljZQMJAAAAAAAAAgUAAAAPc3VwcGxpZXJBZGRyZXNzBQAAAAROT05FCQAAAgAAAAECAAAAF3N1cHBsaWVyIGRvZXMgbm90IGV4aXN0CQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAVZ2V0S2V5VXNlckl0ZW1Db3VudGVyAAAAAgUAAAALdXNlckFkZHJlc3MFAAAABGl0ZW0JAABkAAAAAgkBAAAAF2dldFZhbHVlVXNlckl0ZW1Db3VudGVyAAAAAgUAAAALdXNlckFkZHJlc3MFAAAABGl0ZW0AAAAAAAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAA9zdXBwbGllckFkZHJlc3MJAABkAAAAAgkBAAAAF2dldFZhbHVlQmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAPc3VwcGxpZXJBZGRyZXNzCAUAAAADcG10AAAABmFtb3VudAUAAAADbmlsAAAAAWkBAAAACHdpdGhkcmF3AAAAAAQAAAAPc3VwcGxpZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAB2JhbGFuY2UJAQAAABdnZXRWYWx1ZUJhbGFuY2VTdXBwbGllcgAAAAEFAAAAD3N1cHBsaWVyQWRkcmVzcwMJAABnAAAAAgAAAAAAAAAAAAUAAAAHYmFsYW5jZQkAAAIAAAABAgAAABRpbnN1ZmZpY2llbnQgYmFsYW5jZQkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAA9zdXBwbGllckFkZHJlc3MAAAAAAAAAAAAFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEFAAAAD3N1cHBsaWVyQWRkcmVzcwUAAAAHYmFsYW5jZQUAAAAEdW5pdAUAAAADbmlsAAAAAOnptYQ=",
    "chainId": 84,
    "height": 583767,
    "spentComplexity": 0
}

View: original | compacted
Prev: 6uiJgxJmuB5HVf3uHM3nYeEspUg8iCPiTnFsYYQxS8gq
Next: 9u8RHf9SUrzxvvVgpZALNkfAWtWZCemFQ1Z7zhobtpBW

Diff: 
Old New Differences
84 84  
85 85  
86 86  @Callable(i)
87 - func withdraw (amount) = {
88 -     let currentKey = toBase58String(i.caller.bytes)
89 -     let currentAmount =     match getInteger(this, currentKey) {
90 -         case a: Int => 
91 -             a
92 -         case _ => 
93 -             0
94 -     }
95 -     let newAmount = (currentAmount - amount)
96 -     if ((0 > amount))
97 -         then throw("can't withdraw negative balance")
98 -         else if ((0 > newAmount))
99 -             then throw("not enough balance")
100 -             else ScriptResult(WriteSet([DataEntry((BALANCE + currentKey), newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, unit)]))
101 -     }
102 - 
103 - 
104 - 
105 - @Callable(i)
106 87  func addItem (title,price,data) = {
107 88      let supplierAddress = toBase58String(i.caller.bytes)
108 89      let item = getKeyItem(supplierAddress, title)
125 106              let price = getValueItemPrice(item)
126 107              let supplierAddress = getValueItemSupplier(item)
127 108              if ((price > pmt.amount))
128 -                 then throw(("purchase amount cannot be less then item price:" + toString(price)))
109 +                 then throw("purchase amount cannot be less then item price")
129 110                  else if ((pmt.amount > price))
130 -                     then throw(("purchase amount cannot be higher then item price:" + toString(price)))
111 +                     then throw("purchase amount cannot be higher then item price")
131 112                      else if ((supplierAddress == NONE))
132 113                          then throw("supplier does not exist")
133 114                          else WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyBalanceSupplier(supplierAddress), (getValueBalanceSupplier(supplierAddress) + pmt.amount))])
135 116      }
136 117  
137 118  
119 + 
120 + @Callable(i)
121 + func withdraw () = {
122 +     let supplierAddress = toBase58String(i.caller.bytes)
123 +     let balance = getValueBalanceSupplier(supplierAddress)
124 +     if ((0 >= balance))
125 +         then throw("insufficient balance")
126 +         else ScriptResult(WriteSet([DataEntry(getKeyBalanceSupplier(supplierAddress), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(supplierAddress), balance, unit)]))
127 +     }
128 + 
129 + 
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let NONE = "none"
5 5  
6 6  let BALANCE = "_BALANCE_"
7 7  
8 8  func getNumberByKey (key) = {
9 9      let num =     match getInteger(this, key) {
10 10          case a: Int => 
11 11              a
12 12          case _ => 
13 13              0
14 14      }
15 15      num
16 16      }
17 17  
18 18  
19 19  func getStrByKey (key) = {
20 20      let str =     match getString(this, key) {
21 21          case a: String => 
22 22              a
23 23          case _ => 
24 24              NONE
25 25      }
26 26      str
27 27      }
28 28  
29 29  
30 30  func getKeyItemPrice (item) = (item + "_price")
31 31  
32 32  
33 33  func getValueItemPrice (item) = getNumberByKey(getKeyItemPrice(item))
34 34  
35 35  
36 36  func getKeyUserItemCounter (user,item) = (((item + "_") + user) + "_cnt")
37 37  
38 38  
39 39  func getValueUserItemCounter (user,item) = getNumberByKey(getKeyUserItemCounter(user, item))
40 40  
41 41  
42 42  func getKeyItem (supplier,title) = ("item_" + toBase58String(sha256(toBytes((supplier + title)))))
43 43  
44 44  
45 45  func getKeyItemData (item) = (item + "_data")
46 46  
47 47  
48 48  func getKeyItemSupplier (item) = (item + "_owner")
49 49  
50 50  
51 51  func getValueItemSupplier (item) = getStrByKey(getKeyItemSupplier(item))
52 52  
53 53  
54 54  func getKeyBalanceSupplier (account) = (account + "_balance")
55 55  
56 56  
57 57  func getValueBalanceSupplier (account) = getNumberByKey(getKeyBalanceSupplier(account))
58 58  
59 59  
60 60  @Callable(i)
61 61  func deposit () = {
62 62      let pmt = extract(i.payment)
63 63      if (isDefined(pmt.assetId))
64 64          then throw("can hold waves only at the moment")
65 65          else {
66 66              let currentKey = toBase58String(i.caller.bytes)
67 67              let currentAmount =             match getInteger(this, currentKey) {
68 68                  case a: Int => 
69 69                      a
70 70                  case _ => 
71 71                      0
72 72              }
73 73              let wlStrCurr =             match getString(this, ("wl_sts_" + currentKey)) {
74 74                  case a: String => 
75 75                      a
76 76                  case _ => 
77 77                      throw("user has been not waitlisted")
78 78              }
79 79              let newAmount = (currentAmount + pmt.amount)
80 80              WriteSet([DataEntry((BALANCE + currentKey), newAmount)])
81 81              }
82 82      }
83 83  
84 84  
85 85  
86 86  @Callable(i)
87 - func withdraw (amount) = {
88 -     let currentKey = toBase58String(i.caller.bytes)
89 -     let currentAmount =     match getInteger(this, currentKey) {
90 -         case a: Int => 
91 -             a
92 -         case _ => 
93 -             0
94 -     }
95 -     let newAmount = (currentAmount - amount)
96 -     if ((0 > amount))
97 -         then throw("can't withdraw negative balance")
98 -         else if ((0 > newAmount))
99 -             then throw("not enough balance")
100 -             else ScriptResult(WriteSet([DataEntry((BALANCE + currentKey), newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, unit)]))
101 -     }
102 - 
103 - 
104 - 
105 - @Callable(i)
106 87  func addItem (title,price,data) = {
107 88      let supplierAddress = toBase58String(i.caller.bytes)
108 89      let item = getKeyItem(supplierAddress, title)
109 90      if ((0 >= price))
110 91          then throw("purchase amount cannot be less then item price")
111 92          else if ((getValueItemSupplier(item) != NONE))
112 93              then throw("an item is already exist")
113 94              else WriteSet([DataEntry(getKeyItemSupplier(item), supplierAddress), DataEntry(getKeyItemPrice(item), price), DataEntry(getKeyItemData(item), data)])
114 95      }
115 96  
116 97  
117 98  
118 99  @Callable(i)
119 100  func purchase (item) = {
120 101      let pmt = extract(i.payment)
121 102      if (isDefined(pmt.assetId))
122 103          then throw("WAVES tokens only at the moment")
123 104          else {
124 105              let userAddress = toBase58String(i.caller.bytes)
125 106              let price = getValueItemPrice(item)
126 107              let supplierAddress = getValueItemSupplier(item)
127 108              if ((price > pmt.amount))
128 -                 then throw(("purchase amount cannot be less then item price:" + toString(price)))
109 +                 then throw("purchase amount cannot be less then item price")
129 110                  else if ((pmt.amount > price))
130 -                     then throw(("purchase amount cannot be higher then item price:" + toString(price)))
111 +                     then throw("purchase amount cannot be higher then item price")
131 112                      else if ((supplierAddress == NONE))
132 113                          then throw("supplier does not exist")
133 114                          else WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyBalanceSupplier(supplierAddress), (getValueBalanceSupplier(supplierAddress) + pmt.amount))])
134 115              }
135 116      }
136 117  
137 118  
119 + 
120 + @Callable(i)
121 + func withdraw () = {
122 +     let supplierAddress = toBase58String(i.caller.bytes)
123 +     let balance = getValueBalanceSupplier(supplierAddress)
124 +     if ((0 >= balance))
125 +         then throw("insufficient balance")
126 +         else ScriptResult(WriteSet([DataEntry(getKeyBalanceSupplier(supplierAddress), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(supplierAddress), balance, unit)]))
127 +     }
128 + 
129 +

Old	New		Differences
84	84
85	85
86	86		@Callable(i)
87		-	func withdraw (amount) = {
88		-	let currentKey = toBase58String(i.caller.bytes)
89		-	let currentAmount = match getInteger(this, currentKey) {
90		-	case a: Int =>
91		-	a
92		-	case _ =>
93		-	0
94		-	}
95		-	let newAmount = (currentAmount - amount)
96		-	if ((0 > amount))
97		-	then throw("can't withdraw negative balance")
98		-	else if ((0 > newAmount))
99		-	then throw("not enough balance")
100		-	else ScriptResult(WriteSet([DataEntry((BALANCE + currentKey), newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, unit)]))
101		-	}
102		-
103		-
104		-
105		-	@Callable(i)
106	87		func addItem (title,price,data) = {
107	88		let supplierAddress = toBase58String(i.caller.bytes)
108	89		let item = getKeyItem(supplierAddress, title)

125	106		let price = getValueItemPrice(item)
126	107		let supplierAddress = getValueItemSupplier(item)
127	108		if ((price > pmt.amount))
128		-	then throw(("purchase amount cannot be less then item price:" ~~+ toString(price~~)))
	109	+	then throw("purchase amount cannot be less then item price")
129	110		else if ((pmt.amount > price))
130		-	then throw(("purchase amount cannot be higher then item price:" ~~+ toString(price~~)))
	111	+	then throw("purchase amount cannot be higher then item price")
131	112		else if ((supplierAddress == NONE))
132	113		then throw("supplier does not exist")
133	114		else WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyBalanceSupplier(supplierAddress), (getValueBalanceSupplier(supplierAddress) + pmt.amount))])

135	116		}
136	117
137	118
	119	+
	120	+	@Callable(i)
	121	+	func withdraw () = {
	122	+	let supplierAddress = toBase58String(i.caller.bytes)
	123	+	let balance = getValueBalanceSupplier(supplierAddress)
	124	+	if ((0 >= balance))
	125	+	then throw("insufficient balance")
	126	+	else ScriptResult(WriteSet([DataEntry(getKeyBalanceSupplier(supplierAddress), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(supplierAddress), balance, unit)]))
	127	+	}
	128	+
	129	+

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let NONE = "none"
5	5
6	6		let BALANCE = "_BALANCE_"
7	7
8	8		func getNumberByKey (key) = {
9	9		let num = match getInteger(this, key) {
10	10		case a: Int =>
11	11		a
12	12		case _ =>
13	13		0
14	14		}
15	15		num
16	16		}
17	17
18	18
19	19		func getStrByKey (key) = {
20	20		let str = match getString(this, key) {
21	21		case a: String =>
22	22		a
23	23		case _ =>
24	24		NONE
25	25		}
26	26		str
27	27		}
28	28
29	29
30	30		func getKeyItemPrice (item) = (item + "_price")
31	31
32	32
33	33		func getValueItemPrice (item) = getNumberByKey(getKeyItemPrice(item))
34	34
35	35
36	36		func getKeyUserItemCounter (user,item) = (((item + "_") + user) + "_cnt")
37	37
38	38
39	39		func getValueUserItemCounter (user,item) = getNumberByKey(getKeyUserItemCounter(user, item))
40	40
41	41
42	42		func getKeyItem (supplier,title) = ("item_" + toBase58String(sha256(toBytes((supplier + title)))))
43	43
44	44
45	45		func getKeyItemData (item) = (item + "_data")
46	46
47	47
48	48		func getKeyItemSupplier (item) = (item + "_owner")
49	49
50	50
51	51		func getValueItemSupplier (item) = getStrByKey(getKeyItemSupplier(item))
52	52
53	53
54	54		func getKeyBalanceSupplier (account) = (account + "_balance")
55	55
56	56
57	57		func getValueBalanceSupplier (account) = getNumberByKey(getKeyBalanceSupplier(account))
58	58
59	59
60	60		@Callable(i)
61	61		func deposit () = {
62	62		let pmt = extract(i.payment)
63	63		if (isDefined(pmt.assetId))
64	64		then throw("can hold waves only at the moment")
65	65		else {
66	66		let currentKey = toBase58String(i.caller.bytes)
67	67		let currentAmount = match getInteger(this, currentKey) {
68	68		case a: Int =>
69	69		a
70	70		case _ =>
71	71		0
72	72		}
73	73		let wlStrCurr = match getString(this, ("wl_sts_" + currentKey)) {
74	74		case a: String =>
75	75		a
76	76		case _ =>
77	77		throw("user has been not waitlisted")
78	78		}
79	79		let newAmount = (currentAmount + pmt.amount)
80	80		WriteSet([DataEntry((BALANCE + currentKey), newAmount)])
81	81		}
82	82		}
83	83
84	84
85	85
86	86		@Callable(i)
87		-	func withdraw (amount) = {
88		-	let currentKey = toBase58String(i.caller.bytes)
89		-	let currentAmount = match getInteger(this, currentKey) {
90		-	case a: Int =>
91		-	a
92		-	case _ =>
93		-	0
94		-	}
95		-	let newAmount = (currentAmount - amount)
96		-	if ((0 > amount))
97		-	then throw("can't withdraw negative balance")
98		-	else if ((0 > newAmount))
99		-	then throw("not enough balance")
100		-	else ScriptResult(WriteSet([DataEntry((BALANCE + currentKey), newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, unit)]))
101		-	}
102		-
103		-
104		-
105		-	@Callable(i)
106	87		func addItem (title,price,data) = {
107	88		let supplierAddress = toBase58String(i.caller.bytes)
108	89		let item = getKeyItem(supplierAddress, title)
109	90		if ((0 >= price))
110	91		then throw("purchase amount cannot be less then item price")
111	92		else if ((getValueItemSupplier(item) != NONE))
112	93		then throw("an item is already exist")
113	94		else WriteSet([DataEntry(getKeyItemSupplier(item), supplierAddress), DataEntry(getKeyItemPrice(item), price), DataEntry(getKeyItemData(item), data)])
114	95		}
115	96
116	97
117	98
118	99		@Callable(i)
119	100		func purchase (item) = {
120	101		let pmt = extract(i.payment)
121	102		if (isDefined(pmt.assetId))
122	103		then throw("WAVES tokens only at the moment")
123	104		else {
124	105		let userAddress = toBase58String(i.caller.bytes)
125	106		let price = getValueItemPrice(item)
126	107		let supplierAddress = getValueItemSupplier(item)
127	108		if ((price > pmt.amount))
128		-	then throw(("purchase amount cannot be less then item price:" ~~+ toString(price~~)))
	109	+	then throw("purchase amount cannot be less then item price")
129	110		else if ((pmt.amount > price))
130		-	then throw(("purchase amount cannot be higher then item price:" ~~+ toString(price~~)))
	111	+	then throw("purchase amount cannot be higher then item price")
131	112		else if ((supplierAddress == NONE))
132	113		then throw("supplier does not exist")
133	114		else WriteSet([DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyBalanceSupplier(supplierAddress), (getValueBalanceSupplier(supplierAddress) + pmt.amount))])
134	115		}
135	116		}
136	117
137	118
	119	+
	120	+	@Callable(i)
	121	+	func withdraw () = {
	122	+	let supplierAddress = toBase58String(i.caller.bytes)
	123	+	let balance = getValueBalanceSupplier(supplierAddress)
	124	+	if ((0 >= balance))
	125	+	then throw("insufficient balance")
	126	+	else ScriptResult(WriteSet([DataEntry(getKeyBalanceSupplier(supplierAddress), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(supplierAddress), balance, unit)]))
	127	+	}
	128	+
	129	+

github/deemru/w8io/169f3d6 
37.87 ms ◑