w8 · tx · E5f···Y4h

tx · E5fNY1mmzo1zZKA7WbqAGyFSfvL4hKEBR5mEMH6t9Y4h

3N72X4SpkNvXqi3ruDJgYdDmVJe8nRqj7zU:  -0.01400000 Waves

2020.09.23 07:27 [1189475] smart account 3N72X4SpkNvXqi3ruDJgYdDmVJe8nRqj7zU > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "E5fNY1mmzo1zZKA7WbqAGyFSfvL4hKEBR5mEMH6t9Y4h",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1600835279480,
    "version": 2,
    "chainId": 84,
    "sender": "3N72X4SpkNvXqi3ruDJgYdDmVJe8nRqj7zU",
    "senderPublicKey": "Ej9UfgzgHeDPtoinwmZaL71Jv5CgK2QzWZZYyQUbpByz",
    "proofs": [
        "2BkxKZ2ZjQRhuEmpFdDbwLyc8KinKabEQMhfGmQWnzzSrxLDPnrTKCERDFFjpLwpE5qjCnuRXSmVHbGsRmLdC63F"
    ],
    "script": "base64:AAIEAAAAAAAAACIIAhIECgIIARIECgIBCBIDCgEIEgQKAggIEgUKAwgICBIAAAAABwAAAAAGTEVTU09OAQAAACDo50h8OI7Nb62zoWsqagYFDIe8iqPg4/7715QkgwDg6QAAAAAEUEFSNwEAAAAgzlhA/ZjitMWTd+McxVJoK0GcLLGrEdV8aco355LpR4wAAAAAFGxlc3Nvbk93bmVyUHVibGljS2V5AQAAACDL8+i1dh5Vr1e4XeTXQeu2gcnq6/18vsaB8jf4EQnUaQAAAAAHcGVuZGluZwAAAAAAAAAAAAAAAAAFc3RhcnQAAAAAAAAAAAEAAAAAA2VuZAAAAAAAAAAAAgAAAAAMcGF5bWVudFRva2VuBQAAAARQQVI3AAAABgAAAAFpAQAAABFpc3N1ZUxlc3NvblRpY2tldAAAAAIAAAAEanNvbgAAAAVwcmljZQQAAAADcG10CQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkBQAAAAZMRVNTT04JAAACAAAAAQIAAAAWd29ya3Mgd2l0aCBMRVNTT04gb25seQQAAAAPaXNzdWVDdXJyZW50S2V5AgAAAAtpc3N1ZU51bWJlcgQAAAASaXNzdWVDdXJyZW50TnVtYmVyBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAD2lzc3VlQ3VycmVudEtleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAA5uZXdJc3N1ZU51bWJlcgkAAGQAAAACBQAAABJpc3N1ZUN1cnJlbnROdW1iZXIAAAAAAAAAAAEEAAAAFG5ld0lzc3VlTnVtYmVyU3RyaW5nCQABpAAAAAEFAAAADm5ld0lzc3VlTnVtYmVyBAAAABd0aWNrZXREZXRhaWxzQ3VycmVudEtleQkAASwAAAACCQABLAAAAAICAAAAB1RJQ0tFVF8FAAAAFG5ld0lzc3VlTnVtYmVyU3RyaW5nAgAAAAhfZGV0YWlscwQAAAAVdGlja2V0UHJpY2VDdXJyZW50S2V5CQABLAAAAAIJAAEsAAAAAgIAAAAHVElDS0VUXwUAAAAUbmV3SXNzdWVOdW1iZXJTdHJpbmcCAAAABl9wcmljZQQAAAAXdGlja2V0QmFsYW5jZUN1cnJlbnRLZXkJAAEsAAAAAgkAASwAAAACAgAAAAdUSUNLRVRfBQAAABRuZXdJc3N1ZU51bWJlclN0cmluZwIAAAAIX2JhbGFuY2UEAAAAGnRpY2tldEJhbGFuY2VDdXJyZW50QW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAF3RpY2tldEJhbGFuY2VDdXJyZW50S2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAAFm5ld1RpY2tldEJhbGFuY2VBbW91bnQJAABkAAAAAgUAAAAadGlja2V0QmFsYW5jZUN1cnJlbnRBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABV0aWNrZXRQcmljZUN1cnJlbnRLZXkFAAAABXByaWNlCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAA9pc3N1ZUN1cnJlbnRLZXkFAAAADm5ld0lzc3VlTnVtYmVyCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAF3RpY2tldERldGFpbHNDdXJyZW50S2V5BQAAAARqc29uCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABd0aWNrZXRCYWxhbmNlQ3VycmVudEtleQUAAAAWbmV3VGlja2V0QmFsYW5jZUFtb3VudAUAAAADbmlsAAAAAWkBAAAACWJ1eVRpY2tldAAAAAIAAAALdGlja2V0UHJpY2UAAAAMdGlja2V0TnVtYmVyBAAAAANwbXQJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAACnJhdGVBbW91bnQJAABpAAAAAggFAAAAA3BtdAAAAAZhbW91bnQFAAAAC3RpY2tldFByaWNlAwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkBQAAAAxwYXltZW50VG9rZW4JAAACAAAAAQIAAAAUd29ya3Mgd2l0aCBQQVI3IG9ubHkEAAAADWJ1eUN1cnJlbnRLZXkJAAEsAAAAAgIAAAAEYnV5XwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAABBidXlDdXJyZW50QW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAADWJ1eUN1cnJlbnRLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAMYnV5TmV3QW1vdW50CQAAZAAAAAIFAAAAEGJ1eUN1cnJlbnRBbW91bnQFAAAACnJhdGVBbW91bnQEAAAAF3RpY2tldEJhbGFuY2VDdXJyZW50S2V5CQABLAAAAAIJAAEsAAAAAgIAAAAHVElDS0VUXwUAAAAMdGlja2V0TnVtYmVyAgAAAAhfYmFsYW5jZQQAAAAadGlja2V0QmFsYW5jZUN1cnJlbnRBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAXdGlja2V0QmFsYW5jZUN1cnJlbnRLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAWbmV3VGlja2V0QmFsYW5jZUFtb3VudAkAAGUAAAACBQAAABp0aWNrZXRCYWxhbmNlQ3VycmVudEFtb3VudAUAAAAKcmF0ZUFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAANYnV5Q3VycmVudEtleQUAAAAMYnV5TmV3QW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABd0aWNrZXRCYWxhbmNlQ3VycmVudEtleQUAAAAWbmV3VGlja2V0QmFsYW5jZUFtb3VudAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAACnJhdGVBbW91bnQFAAAABkxFU1NPTgUAAAADbmlsAAAAAWkBAAAAEmxlc3NvblN1YnNjcmlwdGlvbgAAAAEAAAAIbGVzc29uSWQEAAAAA3BtdAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAQAAAAFcG10SWQIBQAAAANwbXQAAAAHYXNzZXRJZAQAAAAOc3R1ZGVudEFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAWbGVzc29uU3RhdHVzQ3VycmVudEtleQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAHc3RhdHVzXwUAAAAIbGVzc29uSWQCAAAAAV8FAAAADnN0dWRlbnRBZGRyZXNzBAAAABNsZXNzb25GZWVDdXJyZW50S2V5CQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhwYXltZW50XwUAAAAIbGVzc29uSWQCAAAAAV8FAAAADnN0dWRlbnRBZGRyZXNzBAAAABZsZXNzb25GZWVDdXJyZW50QW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAE2xlc3NvbkZlZUN1cnJlbnRLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAPdGlja2V0TmV3QW1vdW50CQAAZAAAAAIFAAAAFmxlc3NvbkZlZUN1cnJlbnRBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABZsZXNzb25TdGF0dXNDdXJyZW50S2V5BQAAAAdwZW5kaW5nCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABNsZXNzb25GZWVDdXJyZW50S2V5BQAAAA90aWNrZXROZXdBbW91bnQFAAAAA25pbAAAAAFpAQAAAAtsZXNzb25TdGFydAAAAAIAAAAIbGVzc29uSWQAAAAOc3R1ZGVudEFkZHJlc3MEAAAAFmxlc3NvblN0YXR1c0N1cnJlbnRLZXkJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAB3N0YXR1c18FAAAACGxlc3NvbklkAgAAAAFfBQAAAA5zdHVkZW50QWRkcmVzcwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAWbGVzc29uU3RhdHVzQ3VycmVudEtleQUAAAAFc3RhcnQFAAAAA25pbAAAAAFpAQAAAAxsZXNzb25GaW5pc2gAAAADAAAACGxlc3NvbklkAAAADnN0dWRlbnRBZGRyZXNzAAAADHRpY2tldE51bWJlcgQAAAAIdGlja2V0SWQJAAJYAAAAAQkBAAAABXZhbHVlAAAAAQUAAAAGTEVTU09OBAAAABNsZXNzb25GZWVDdXJyZW50S2V5CQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhwYXltZW50XwUAAAAIbGVzc29uSWQCAAAAAV8FAAAADnN0dWRlbnRBZGRyZXNzBAAAABZsZXNzb25GZWVDdXJyZW50QW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAE2xlc3NvbkZlZUN1cnJlbnRLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAVdGlja2V0UHJpY2VDdXJyZW50S2V5CQABLAAAAAIFAAAADHRpY2tldE51bWJlcgIAAAAGX3ByaWNlBAAAABd0aWNrZXRQcmljZUN1cnJlbnRQcmljZQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAABV0aWNrZXRQcmljZUN1cnJlbnRLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAATbGVzc29uUGF5bWVudEFtb3VudAkAAGkAAAACBQAAABZsZXNzb25GZWVDdXJyZW50QW1vdW50BQAAABd0aWNrZXRQcmljZUN1cnJlbnRQcmljZQQAAAAIb3duZXJLZXkJAAEsAAAAAgIAAAAOb3duZXJfYmFsYW5jZV8JAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAALb3duZXJBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAIb3duZXJLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAObmV3T3duZXJBbW91bnQJAABkAAAAAgUAAAALb3duZXJBbW91bnQFAAAAE2xlc3NvblBheW1lbnRBbW91bnQEAAAAFmxlc3NvblN0YXR1c0N1cnJlbnRLZXkJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAB3N0YXR1c18FAAAACGxlc3NvbklkAgAAAAFfBQAAAA5zdHVkZW50QWRkcmVzcwQAAAAQdGlja2V0Q3VycmVudEtleQkAASwAAAACCQABLAAAAAIFAAAACHRpY2tldElkAgAAAAFfBQAAAA5zdHVkZW50QWRkcmVzcwQAAAATdGlja2V0Q3VycmVudEFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAABB0aWNrZXRDdXJyZW50S2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAABnRpY2tldAkAAlkAAAABBQAAAAh0aWNrZXRJZAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAIb3duZXJLZXkFAAAADm5ld093bmVyQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABZsZXNzb25TdGF0dXNDdXJyZW50S2V5BQAAAANlbmQJAARMAAAAAgkBAAAABEJ1cm4AAAACBQAAAAZMRVNTT04FAAAAFmxlc3NvbkZlZUN1cnJlbnRBbW91bnQFAAAAA25pbAAAAAFpAQAAAA1vd25lcldpdGhkcmF3AAAAAAQAAAAIb3duZXJLZXkJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAANY3VycmVudEFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAAhvd25lcktleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAAAwkAAGYAAAACAAAAAAAAAAAABQAAAA1jdXJyZW50QW1vdW50CQAAAgAAAAECAAAAHkNhbid0IHdpdGhkcmF3IG5lZ2F0aXZlIGFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAIb3duZXJLZXkAAAAAAAAAAAAJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAA1jdXJyZW50QW1vdW50BQAAAARQQVI3BQAAAANuaWwAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAACQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAUAAAAUbGVzc29uT3duZXJQdWJsaWNLZXkC4v6q",
    "height": 1189475,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: FQPEEDaiWPyVykCD9HxepXSqBxhX51ComXSDmGPX2Ymj
Next: none

Diff: 
Old New Differences
50 50  func buyTicket (ticketPrice,ticketNumber) = {
51 51      let pmt = i.payments[0]
52 52      let rateAmount = (pmt.amount / ticketPrice)
53 -     if ((pmt.assetId != PAR7))
53 +     if ((pmt.assetId != paymentToken))
54 54          then throw("works with PAR7 only")
55 55          else {
56 56              let buyCurrentKey = ("buy_" + toBase58String(i.caller.bytes))
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 4 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let LESSON = base58'GgA8mL3SEYvuhYoZFd418Li4bqXAasGbYCKJshTt2MGU'
5 5  
6 6  let PAR7 = base58'EtV3CXQ4wqm28WPB1KaBv5B9ke2bpXRZMutYNEJUQcXm'
7 7  
8 8  let lessonOwnerPublicKey = base58'Ej9UfgzgHeDPtoinwmZaL71Jv5CgK2QzWZZYyQUbpByz'
9 9  
10 10  let pending = 0
11 11  
12 12  let start = 1
13 13  
14 14  let end = 2
15 15  
16 16  let paymentToken = PAR7
17 17  
18 18  @Callable(i)
19 19  func issueLessonTicket (json,price) = {
20 20      let pmt = i.payments[0]
21 21      if ((pmt.assetId != LESSON))
22 22          then throw("works with LESSON only")
23 23          else {
24 24              let issueCurrentKey = "issueNumber"
25 25              let issueCurrentNumber =             match getInteger(this, issueCurrentKey) {
26 26                  case a: Int => 
27 27                      a
28 28                  case _ => 
29 29                      0
30 30              }
31 31              let newIssueNumber = (issueCurrentNumber + 1)
32 32              let newIssueNumberString = toString(newIssueNumber)
33 33              let ticketDetailsCurrentKey = (("TICKET_" + newIssueNumberString) + "_details")
34 34              let ticketPriceCurrentKey = (("TICKET_" + newIssueNumberString) + "_price")
35 35              let ticketBalanceCurrentKey = (("TICKET_" + newIssueNumberString) + "_balance")
36 36              let ticketBalanceCurrentAmount =             match getInteger(this, ticketBalanceCurrentKey) {
37 37                  case a: Int => 
38 38                      a
39 39                  case _ => 
40 40                      0
41 41              }
42 42              let newTicketBalanceAmount = (ticketBalanceCurrentAmount + pmt.amount)
43 43  [IntegerEntry(ticketPriceCurrentKey, price), IntegerEntry(issueCurrentKey, newIssueNumber), StringEntry(ticketDetailsCurrentKey, json), IntegerEntry(ticketBalanceCurrentKey, newTicketBalanceAmount)]
44 44              }
45 45      }
46 46  
47 47  
48 48  
49 49  @Callable(i)
50 50  func buyTicket (ticketPrice,ticketNumber) = {
51 51      let pmt = i.payments[0]
52 52      let rateAmount = (pmt.amount / ticketPrice)
53 -     if ((pmt.assetId != PAR7))
53 +     if ((pmt.assetId != paymentToken))
54 54          then throw("works with PAR7 only")
55 55          else {
56 56              let buyCurrentKey = ("buy_" + toBase58String(i.caller.bytes))
57 57              let buyCurrentAmount =             match getInteger(this, buyCurrentKey) {
58 58                  case a: Int => 
59 59                      a
60 60                  case _ => 
61 61                      0
62 62              }
63 63              let buyNewAmount = (buyCurrentAmount + rateAmount)
64 64              let ticketBalanceCurrentKey = (("TICKET_" + ticketNumber) + "_balance")
65 65              let ticketBalanceCurrentAmount =             match getInteger(this, ticketBalanceCurrentKey) {
66 66                  case a: Int => 
67 67                      a
68 68                  case _ => 
69 69                      0
70 70              }
71 71              let newTicketBalanceAmount = (ticketBalanceCurrentAmount - rateAmount)
72 72  [IntegerEntry(buyCurrentKey, buyNewAmount), IntegerEntry(ticketBalanceCurrentKey, newTicketBalanceAmount), ScriptTransfer(i.caller, rateAmount, LESSON)]
73 73              }
74 74      }
75 75  
76 76  
77 77  
78 78  @Callable(i)
79 79  func lessonSubscription (lessonId) = {
80 80      let pmt = i.payments[0]
81 81      let pmtId = pmt.assetId
82 82      let studentAddress = toBase58String(i.caller.bytes)
83 83      let lessonStatusCurrentKey = ((("status_" + lessonId) + "_") + studentAddress)
84 84      let lessonFeeCurrentKey = ((("payment_" + lessonId) + "_") + studentAddress)
85 85      let lessonFeeCurrentAmount =     match getInteger(this, lessonFeeCurrentKey) {
86 86          case a: Int => 
87 87              a
88 88          case _ => 
89 89              0
90 90      }
91 91      let ticketNewAmount = (lessonFeeCurrentAmount + pmt.amount)
92 92  [IntegerEntry(lessonStatusCurrentKey, pending), IntegerEntry(lessonFeeCurrentKey, ticketNewAmount)]
93 93      }
94 94  
95 95  
96 96  
97 97  @Callable(i)
98 98  func lessonStart (lessonId,studentAddress) = {
99 99      let lessonStatusCurrentKey = ((("status_" + lessonId) + "_") + studentAddress)
100 100  [IntegerEntry(lessonStatusCurrentKey, start)]
101 101      }
102 102  
103 103  
104 104  
105 105  @Callable(i)
106 106  func lessonFinish (lessonId,studentAddress,ticketNumber) = {
107 107      let ticketId = toBase58String(value(LESSON))
108 108      let lessonFeeCurrentKey = ((("payment_" + lessonId) + "_") + studentAddress)
109 109      let lessonFeeCurrentAmount =     match getInteger(this, lessonFeeCurrentKey) {
110 110          case a: Int => 
111 111              a
112 112          case _ => 
113 113              0
114 114      }
115 115      let ticketPriceCurrentKey = (ticketNumber + "_price")
116 116      let ticketPriceCurrentPrice =     match getInteger(this, ticketPriceCurrentKey) {
117 117          case a: Int => 
118 118              a
119 119          case _ => 
120 120              0
121 121      }
122 122      let lessonPaymentAmount = (lessonFeeCurrentAmount / ticketPriceCurrentPrice)
123 123      let ownerKey = ("owner_balance_" + toBase58String(i.caller.bytes))
124 124      let ownerAmount =     match getInteger(this, ownerKey) {
125 125          case a: Int => 
126 126              a
127 127          case _ => 
128 128              0
129 129      }
130 130      let newOwnerAmount = (ownerAmount + lessonPaymentAmount)
131 131      let lessonStatusCurrentKey = ((("status_" + lessonId) + "_") + studentAddress)
132 132      let ticketCurrentKey = ((ticketId + "_") + studentAddress)
133 133      let ticketCurrentAmount =     match getInteger(this, ticketCurrentKey) {
134 134          case a: Int => 
135 135              a
136 136          case _ => 
137 137              0
138 138      }
139 139      let ticket = fromBase58String(ticketId)
140 140  [IntegerEntry(ownerKey, newOwnerAmount), IntegerEntry(lessonStatusCurrentKey, end), Burn(LESSON, lessonFeeCurrentAmount)]
141 141      }
142 142  
143 143  
144 144  
145 145  @Callable(i)
146 146  func ownerWithdraw () = {
147 147      let ownerKey = toBase58String(i.caller.bytes)
148 148      let currentAmount =     match getInteger(this, ownerKey) {
149 149          case a: Int => 
150 150              a
151 151          case _ => 
152 152              0
153 153      }
154 154      if ((0 > currentAmount))
155 155          then throw("Can't withdraw negative amount")
156 156          else [IntegerEntry(ownerKey, 0), ScriptTransfer(i.caller, currentAmount, PAR7)]
157 157      }
158 158  
159 159  
160 160  @Verifier(tx)
161 161  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], lessonOwnerPublicKey)
162 162

Old	New		Differences
50	50		func buyTicket (ticketPrice,ticketNumber) = {
51	51		let pmt = i.payments[0]
52	52		let rateAmount = (pmt.amount / ticketPrice)
53		-	if ((pmt.assetId != ~~PAR7~~))
	53	+	if ((pmt.assetId != paymentToken))
54	54		then throw("works with PAR7 only")
55	55		else {
56	56		let buyCurrentKey = ("buy_" + toBase58String(i.caller.bytes))

Old	New		Differences
1	1		{-# STDLIB_VERSION 4 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let LESSON = base58'GgA8mL3SEYvuhYoZFd418Li4bqXAasGbYCKJshTt2MGU'
5	5
6	6		let PAR7 = base58'EtV3CXQ4wqm28WPB1KaBv5B9ke2bpXRZMutYNEJUQcXm'
7	7
8	8		let lessonOwnerPublicKey = base58'Ej9UfgzgHeDPtoinwmZaL71Jv5CgK2QzWZZYyQUbpByz'
9	9
10	10		let pending = 0
11	11
12	12		let start = 1
13	13
14	14		let end = 2
15	15
16	16		let paymentToken = PAR7
17	17
18	18		@Callable(i)
19	19		func issueLessonTicket (json,price) = {
20	20		let pmt = i.payments[0]
21	21		if ((pmt.assetId != LESSON))
22	22		then throw("works with LESSON only")
23	23		else {
24	24		let issueCurrentKey = "issueNumber"
25	25		let issueCurrentNumber = match getInteger(this, issueCurrentKey) {
26	26		case a: Int =>
27	27		a
28	28		case _ =>
29	29		0
30	30		}
31	31		let newIssueNumber = (issueCurrentNumber + 1)
32	32		let newIssueNumberString = toString(newIssueNumber)
33	33		let ticketDetailsCurrentKey = (("TICKET_" + newIssueNumberString) + "_details")
34	34		let ticketPriceCurrentKey = (("TICKET_" + newIssueNumberString) + "_price")
35	35		let ticketBalanceCurrentKey = (("TICKET_" + newIssueNumberString) + "_balance")
36	36		let ticketBalanceCurrentAmount = match getInteger(this, ticketBalanceCurrentKey) {
37	37		case a: Int =>
38	38		a
39	39		case _ =>
40	40		0
41	41		}
42	42		let newTicketBalanceAmount = (ticketBalanceCurrentAmount + pmt.amount)
43	43		[IntegerEntry(ticketPriceCurrentKey, price), IntegerEntry(issueCurrentKey, newIssueNumber), StringEntry(ticketDetailsCurrentKey, json), IntegerEntry(ticketBalanceCurrentKey, newTicketBalanceAmount)]
44	44		}
45	45		}
46	46
47	47
48	48
49	49		@Callable(i)
50	50		func buyTicket (ticketPrice,ticketNumber) = {
51	51		let pmt = i.payments[0]
52	52		let rateAmount = (pmt.amount / ticketPrice)
53		-	if ((pmt.assetId != ~~PAR7~~))
	53	+	if ((pmt.assetId != paymentToken))
54	54		then throw("works with PAR7 only")
55	55		else {
56	56		let buyCurrentKey = ("buy_" + toBase58String(i.caller.bytes))
57	57		let buyCurrentAmount = match getInteger(this, buyCurrentKey) {
58	58		case a: Int =>
59	59		a
60	60		case _ =>
61	61		0
62	62		}
63	63		let buyNewAmount = (buyCurrentAmount + rateAmount)
64	64		let ticketBalanceCurrentKey = (("TICKET_" + ticketNumber) + "_balance")
65	65		let ticketBalanceCurrentAmount = match getInteger(this, ticketBalanceCurrentKey) {
66	66		case a: Int =>
67	67		a
68	68		case _ =>
69	69		0
70	70		}
71	71		let newTicketBalanceAmount = (ticketBalanceCurrentAmount - rateAmount)
72	72		[IntegerEntry(buyCurrentKey, buyNewAmount), IntegerEntry(ticketBalanceCurrentKey, newTicketBalanceAmount), ScriptTransfer(i.caller, rateAmount, LESSON)]
73	73		}
74	74		}
75	75
76	76
77	77
78	78		@Callable(i)
79	79		func lessonSubscription (lessonId) = {
80	80		let pmt = i.payments[0]
81	81		let pmtId = pmt.assetId
82	82		let studentAddress = toBase58String(i.caller.bytes)
83	83		let lessonStatusCurrentKey = ((("status_" + lessonId) + "_") + studentAddress)
84	84		let lessonFeeCurrentKey = ((("payment_" + lessonId) + "_") + studentAddress)
85	85		let lessonFeeCurrentAmount = match getInteger(this, lessonFeeCurrentKey) {
86	86		case a: Int =>
87	87		a
88	88		case _ =>
89	89		0
90	90		}
91	91		let ticketNewAmount = (lessonFeeCurrentAmount + pmt.amount)
92	92		[IntegerEntry(lessonStatusCurrentKey, pending), IntegerEntry(lessonFeeCurrentKey, ticketNewAmount)]
93	93		}
94	94
95	95
96	96
97	97		@Callable(i)
98	98		func lessonStart (lessonId,studentAddress) = {
99	99		let lessonStatusCurrentKey = ((("status_" + lessonId) + "_") + studentAddress)
100	100		[IntegerEntry(lessonStatusCurrentKey, start)]
101	101		}
102	102
103	103
104	104
105	105		@Callable(i)
106	106		func lessonFinish (lessonId,studentAddress,ticketNumber) = {
107	107		let ticketId = toBase58String(value(LESSON))
108	108		let lessonFeeCurrentKey = ((("payment_" + lessonId) + "_") + studentAddress)
109	109		let lessonFeeCurrentAmount = match getInteger(this, lessonFeeCurrentKey) {
110	110		case a: Int =>
111	111		a
112	112		case _ =>
113	113		0
114	114		}
115	115		let ticketPriceCurrentKey = (ticketNumber + "_price")
116	116		let ticketPriceCurrentPrice = match getInteger(this, ticketPriceCurrentKey) {
117	117		case a: Int =>
118	118		a
119	119		case _ =>
120	120		0
121	121		}
122	122		let lessonPaymentAmount = (lessonFeeCurrentAmount / ticketPriceCurrentPrice)
123	123		let ownerKey = ("owner_balance_" + toBase58String(i.caller.bytes))
124	124		let ownerAmount = match getInteger(this, ownerKey) {
125	125		case a: Int =>
126	126		a
127	127		case _ =>
128	128		0
129	129		}
130	130		let newOwnerAmount = (ownerAmount + lessonPaymentAmount)
131	131		let lessonStatusCurrentKey = ((("status_" + lessonId) + "_") + studentAddress)
132	132		let ticketCurrentKey = ((ticketId + "_") + studentAddress)
133	133		let ticketCurrentAmount = match getInteger(this, ticketCurrentKey) {
134	134		case a: Int =>
135	135		a
136	136		case _ =>
137	137		0
138	138		}
139	139		let ticket = fromBase58String(ticketId)
140	140		[IntegerEntry(ownerKey, newOwnerAmount), IntegerEntry(lessonStatusCurrentKey, end), Burn(LESSON, lessonFeeCurrentAmount)]
141	141		}
142	142
143	143
144	144
145	145		@Callable(i)
146	146		func ownerWithdraw () = {
147	147		let ownerKey = toBase58String(i.caller.bytes)
148	148		let currentAmount = match getInteger(this, ownerKey) {
149	149		case a: Int =>
150	150		a
151	151		case _ =>
152	152		0
153	153		}
154	154		if ((0 > currentAmount))
155	155		then throw("Can't withdraw negative amount")
156	156		else [IntegerEntry(ownerKey, 0), ScriptTransfer(i.caller, currentAmount, PAR7)]
157	157		}
158	158
159	159
160	160		@Verifier(tx)
161	161		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], lessonOwnerPublicKey)
162	162

github/deemru/w8io/3ef1775 
45.73 ms ◑