w8 · tx · BR7···B1c

tx · BR7H4tawA3wqEhF7Ss23fMyxBV4ne7MJKT3wXM83wB1c

3N1ytAUyhtig9X6F2hHHs1jbzYxr47Yp8Fr:  -0.00500000 Waves

2024.10.08 11:15 [3317589] smart account 3N1ytAUyhtig9X6F2hHHs1jbzYxr47Yp8Fr > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BR7H4tawA3wqEhF7Ss23fMyxBV4ne7MJKT3wXM83wB1c",
    "fee": 500000,
    "feeAssetId": null,
    "timestamp": 1728375338016,
    "version": 2,
    "chainId": 84,
    "sender": "3N1ytAUyhtig9X6F2hHHs1jbzYxr47Yp8Fr",
    "senderPublicKey": "jXCTQV8PjX2uC9UHBFveupYy9cjhY7stHbzE9cptymw",
    "proofs": [
        "5m1tKdayt3bCHTZsRbMCYLWpRNXftsWTrnK8NLVCL6voFRn4B7AdRavuU3J68xETpaKTxczXYdVcVETi9WzxFhy"
    ],
    "script": "base64:BwITCAISAwoBCBIECgICGBIECgICGCAACXNlcGFyYXRvcgICX18AC3dhdmVzU3RyaW5nAgVXQVZFUwAQY29udHJhY3RGaWxlbmFtZQIXbWVtZV9pbV9jYWxjdWxhdG9yLnJpZGUABW11bHQ4AIDC1y8BB3dyYXBFcnIBAXMJAKwCAgkArAICBRBjb250cmFjdEZpbGVuYW1lAgI6IAUBcwEIdGhyb3dFcnIBAXMJAAIBCQEHd3JhcEVycgEFAXMBD3ZhbGlkYXRlQWRkcmVzcwEHYWRkcmVzcwkBCWlzRGVmaW5lZAEJAKYIAQUHYWRkcmVzcwAMU1RBVFVTX0VNUFRZAAAADFNUQVRVU19SRUFEWQABAAlrU2h1dGRvd24CDnNodXRkb3duX19mbGFnAAtrUHJpY2VBc3NldAIMcHJpY2VfX2Fzc2V0AA5rTGlzdGluZ1ZvbHVtZQIPbGlzdGluZ19fdm9sdW1lABFrUG9vbENvbnRyYWN0SGFzaAIUcG9vbF9fY29udHJhY3RfX2hhc2gAE2tMYXN0RW1wdHlQb29sSW5kZXgCF2xhc3RfX2VtcHR5X3Bvb2xfX2luZGV4ABRrRmlyc3RFbXB0eVBvb2xJbmRleAIZZmlyc3RfX2VtcHR5X19wb29sX19pbmRleAEVa1Bvb2xBZGRyZXNzRnJvbUluZGV4AQVpbmRleAkAuQkCCQDMCAICBHBvb2wJAMwIAgkApAMBBQVpbmRleAUDbmlsBQlzZXBhcmF0b3IBFWtQb29sSW5kZXhGcm9tQWRkcmVzcwEHYWRkcmVzcwkAuQkCCQDMCAICBHBvb2wJAMwIAgkApQgBBQdhZGRyZXNzBQNuaWwFCXNlcGFyYXRvcgEKa1Bvb2xBc3NldAEHYWRkcmVzcwkAuQkCCQDMCAICBWFzc2V0CQDMCAIJAKUIAQUHYWRkcmVzcwUDbmlsBQlzZXBhcmF0b3IBC2tQb29sU3RhdHVzAQVpbmRleAkAuQkCCQDMCAICBHBvb2wJAMwIAgIGc3RhdHVzCQDMCAIJAKQDAQUFaW5kZXgFA25pbAUJc2VwYXJhdG9yAA9rRmFjdG9yeUFkZHJlc3MCEGZhY3RvcnlfX2FkZHJlc3MAFGZhY3RvcnlBZGRyZXNzT3B0aW9uBAckbWF0Y2gwCQCdCAIFBHRoaXMFD2tGYWN0b3J5QWRkcmVzcwMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJAKYIAQUBcwMJAAECBQckbWF0Y2gwAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IADmZhY3RvcnlBZGRyZXNzCQETdmFsdWVPckVycm9yTWVzc2FnZQIFFGZhY3RvcnlBZGRyZXNzT3B0aW9uCQEHd3JhcEVycgECF2ludmFsaWQgZmFjdG9yeSBhZGRyZXNzAAhzaHV0ZG93bgkBC3ZhbHVlT3JFbHNlAgkAmwgCBQ5mYWN0b3J5QWRkcmVzcwUJa1NodXRkb3duBwAObGFzdEVtcHR5SW5kZXgJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOZmFjdG9yeUFkZHJlc3MFE2tMYXN0RW1wdHlQb29sSW5kZXgAAAAPZmlyc3RFbXB0eUluZGV4CQELdmFsdWVPckVsc2UCCQCaCAIFDmZhY3RvcnlBZGRyZXNzBRRrRmlyc3RFbXB0eVBvb2xJbmRleAAAAA1saXN0aW5nVm9sdW1lCQELdmFsdWVPckVsc2UCCQCaCAIFDmZhY3RvcnlBZGRyZXNzBQ5rTGlzdGluZ1ZvbHVtZQAAAQxwYXJzZUFzc2V0SWQBBWlucHV0AwkAAAIFBWlucHV0BQt3YXZlc1N0cmluZwUEdW5pdAkA2QQBBQVpbnB1dAEPYXNzZXRJZFRvU3RyaW5nAQVpbnB1dAMJAAACBQVpbnB1dAUEdW5pdAULd2F2ZXNTdHJpbmcJANgEAQkBBXZhbHVlAQUFaW5wdXQBC211c3RBZGRyZXNzAgZjYWxsZXIHYWRkcmVzcwMJAAACBQZjYWxsZXIFB2FkZHJlc3MGCQEIdGhyb3dFcnIBAhFwZXJtaXNzaW9uIGRlbmllZAEIbXVzdFRoaXMBBmNhbGxlcgkBC211c3RBZGRyZXNzAgUGY2FsbGVyBQR0aGlzAQttdXN0RmFjdG9yeQEGY2FsbGVyCQELbXVzdEFkZHJlc3MCBQZjYWxsZXIFDmZhY3RvcnlBZGRyZXNzARBwb29sQ29udHJhY3RIYXNoAAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCcCAIFDmZhY3RvcnlBZGRyZXNzBRFrUG9vbENvbnRyYWN0SGFzaAkBB3dyYXBFcnIBAiRwb29sIGNvbnRyYWN0IHNjcmlwdCBoYXNoIGlzIG5vdCBzZXQDAWkBBGluaXQBEWZhY3RvcnlBZGRyZXNzU3RyBAtjaGVja0NhbGxlcgkBCG11c3RUaGlzAQgFAWkGY2FsbGVyAwkAAAIFC2NoZWNrQ2FsbGVyBQtjaGVja0NhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCBQ9rRmFjdG9yeUFkZHJlc3MFEWZhY3RvcnlBZGRyZXNzU3RyBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEMYWRkRW1wdHlQb29sAg9jYWxsZXJQdWJsaWNLZXkEYXJncwQObmV3UG9vbEFkZHJlc3MJAKcIAQUPY2FsbGVyUHVibGljS2V5BAxuZXdQb29sSW5kZXgJAGQCBQ5sYXN0RW1wdHlJbmRleAABBAZjaGVja3MJAMwIAgMJAQEhAQUIc2h1dGRvd24GCQEIdGhyb3dFcnIBAhZub3QgYWxsb3dlZCAoc2h1dGRvd24pCQDMCAIDCQEBIQEJAQlpc0RlZmluZWQBCQCaCAIFDmZhY3RvcnlBZGRyZXNzCQEVa1Bvb2xJbmRleEZyb21BZGRyZXNzAQUObmV3UG9vbEFkZHJlc3MGCQEIdGhyb3dFcnIBAiJwb29sIGFkZHJlc3MgaXMgYWxyZWFkeSByZWdpc3RlcmVkBQNuaWwDCQAAAgUGY2hlY2tzBQZjaGVja3MEDmZhY3RvcnlBY3Rpb25zCQDMCAIJAPwHBAUOZmFjdG9yeUFkZHJlc3MCDGludGVnZXJFbnRyeQkAzAgCBRNrTGFzdEVtcHR5UG9vbEluZGV4CQDMCAIFDG5ld1Bvb2xJbmRleAUDbmlsBQNuaWwJAMwIAgkA/AcEBQ5mYWN0b3J5QWRkcmVzcwILc3RyaW5nRW50cnkJAMwIAgkBFWtQb29sQWRkcmVzc0Zyb21JbmRleAEFDG5ld1Bvb2xJbmRleAkAzAgCCQClCAEFDm5ld1Bvb2xBZGRyZXNzBQNuaWwFA25pbAkAzAgCCQD8BwQFDmZhY3RvcnlBZGRyZXNzAgxpbnRlZ2VyRW50cnkJAMwIAgkBFWtQb29sSW5kZXhGcm9tQWRkcmVzcwEFDm5ld1Bvb2xBZGRyZXNzCQDMCAIFDG5ld1Bvb2xJbmRleAUDbmlsBQNuaWwJAMwIAgkA/AcEBQ5mYWN0b3J5QWRkcmVzcwIMaW50ZWdlckVudHJ5CQDMCAIJAQtrUG9vbFN0YXR1cwEFDG5ld1Bvb2xJbmRleAkAzAgCBQxTVEFUVVNfRU1QVFkFA25pbAUDbmlsBQNuaWwJAJQKAgUDbmlsBQ5mYWN0b3J5QWN0aW9ucwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQpjcmVhdGVQb29sAg9jYWxsZXJQdWJsaWNLZXkEYXJncwQGY2hlY2tzCQDMCAIDCQEBIQEFCHNodXRkb3duBgkBCHRocm93RXJyAQIWbm90IGFsbG93ZWQgKHNodXRkb3duKQkAzAgCCQELbXVzdEZhY3RvcnkBCAUBaQZjYWxsZXIJAMwIAgMJAGYCCQBlAgUObGFzdEVtcHR5SW5kZXgFD2ZpcnN0RW1wdHlJbmRleAAABgkBCHRocm93RXJyAQIYbm8gZW1wdHkgcG9vbHMgYXZhaWxhYmxlCQDMCAIDCQAAAggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQR1bml0BgkBCHRocm93RXJyAQIacGF5bWVudCBzaG91bGQgYmUgaW4gV0FWRVMJAMwIAgMJAGYCCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAUNbGlzdGluZ1ZvbHVtZQYJAQh0aHJvd0VycgECNHBheW1lbnQgYW1vdW50IHNob3VsZCBiZSBncmVhdGVyIHRoYW4gbGlzdGluZyB2b2x1bWUJAMwIAgMJAQlpc0RlZmluZWQBCQCRAwIFBGFyZ3MAAAYJAQh0aHJvd0VycgECGXRva2VuTmFtZSBpcyBub3QgcHJvdmlkZWQJAMwIAgMJAQlpc0RlZmluZWQBCQCRAwIFBGFyZ3MAAQYJAQh0aHJvd0VycgECIHRva2VuRGVzY3JpcHRpb24gaXMgbm90IHByb3ZpZGVkCQDMCAIDCQEJaXNEZWZpbmVkAQkAkQMCBQRhcmdzAAIGCQEIdGhyb3dFcnIBAh10b2tlblF1YW50aXR5IGlzIG5vdCBwcm92aWRlZAUDbmlsAwkAAAIFBmNoZWNrcwUGY2hlY2tzBAlwb29sSW5kZXgJAGQCBQ9maXJzdEVtcHR5SW5kZXgAAQQRcG9vbEFkZHJlc3NTdHJpbmcJARFAZXh0ck5hdGl2ZSgxMDUzKQIFDmZhY3RvcnlBZGRyZXNzCQEVa1Bvb2xBZGRyZXNzRnJvbUluZGV4AQUJcG9vbEluZGV4BAtwb29sQWRkcmVzcwkBEUBleHRyTmF0aXZlKDEwNjIpAQURcG9vbEFkZHJlc3NTdHJpbmcEDWNhbGxlckFkZHJlc3MJAKcIAQUPY2FsbGVyUHVibGljS2V5BApwb29sRG9tYWluCQDYBAEJAMkBAggFC3Bvb2xBZGRyZXNzBWJ5dGVzAAgECXBvb2xPd25lcgkApQgBBQ1jYWxsZXJBZGRyZXNzBAl0b2tlbk5hbWUJAJEDAgUEYXJncwAABAl0b2tlbkRlc2MJAJEDAgUEYXJncwABBA10b2tlblF1YW50aXR5CQCRAwIFBGFyZ3MAAgQOaW5pdFBvb2xJbnZva2UJAPwHBAUOZmFjdG9yeUFkZHJlc3MCDmluaXRQb29sSW52b2tlCQDMCAIFCnBvb2xEb21haW4JAMwIAgUJcG9vbE93bmVyCQDMCAIFCXRva2VuTmFtZQkAzAgCBQl0b2tlbkRlc2MJAMwIAgUNdG9rZW5RdWFudGl0eQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BQNuaWwDCQAAAgUOaW5pdFBvb2xJbnZva2UFDmluaXRQb29sSW52b2tlBA5mYWN0b3J5QWN0aW9ucwkAzAgCCQD8BwQFDmZhY3RvcnlBZGRyZXNzAgxpbnRlZ2VyRW50cnkJAMwIAgUUa0ZpcnN0RW1wdHlQb29sSW5kZXgJAMwIAgUJcG9vbEluZGV4BQNuaWwFA25pbAkAzAgCCQD8BwQFDmZhY3RvcnlBZGRyZXNzAgxpbnRlZ2VyRW50cnkJAMwIAgkBC2tQb29sU3RhdHVzAQUJcG9vbEluZGV4CQDMCAIFDFNUQVRVU19SRUFEWQUDbmlsBQNuaWwFA25pbAkAlAoCBQNuaWwFDmZhY3RvcnlBY3Rpb25zCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuADsGI8Y=",
    "height": 3317589,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: E8AVXQNunfnBHj24amNVEnmtdjpynQ1j6TCyahMzCVjm
Next: 7JUWuphM5h4ZdpxN3hyfaKugfCUf64xuKNgXxqwoWQP2

Diff: 
Old New Differences
147 147              let poolOwner = toString(callerAddress)
148 148              let tokenName = args[0]
149 149              let tokenDesc = args[1]
150 -             let tokenQuantity = parseInt(args[2])
151 -             let initPoolInvoke = invoke(poolAddress, "init", [poolDomain, poolOwner, tokenName, tokenDesc, tokenQuantity], [AttachedPayment(i.payments[0].assetId, i.payments[0].amount)])
150 +             let tokenQuantity = args[2]
151 +             let initPoolInvoke = invoke(factoryAddress, "initPoolInvoke", [poolDomain, poolOwner, tokenName, tokenDesc, tokenQuantity], [AttachedPayment(i.payments[0].assetId, i.payments[0].amount)])
152 152              if ((initPoolInvoke == initPoolInvoke))
153 153                  then {
154 154                      let factoryActions = [invoke(factoryAddress, "integerEntry", [kFirstEmptyPoolIndex, poolIndex], nil), invoke(factoryAddress, "integerEntry", [kPoolStatus(poolIndex), STATUS_READY], nil)]
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 7 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let separator = "__"
5 5  
6 6  let wavesString = "WAVES"
7 7  
8 8  let contractFilename = "meme_im_calculator.ride"
9 9  
10 10  let mult8 = 100000000
11 11  
12 12  func wrapErr (s) = ((contractFilename + ": ") + s)
13 13  
14 14  
15 15  func throwErr (s) = throw(wrapErr(s))
16 16  
17 17  
18 18  func validateAddress (address) = isDefined(addressFromString(address))
19 19  
20 20  
21 21  let STATUS_EMPTY = 0
22 22  
23 23  let STATUS_READY = 1
24 24  
25 25  let kShutdown = "shutdown__flag"
26 26  
27 27  let kPriceAsset = "price__asset"
28 28  
29 29  let kListingVolume = "listing__volume"
30 30  
31 31  let kPoolContractHash = "pool__contract__hash"
32 32  
33 33  let kLastEmptyPoolIndex = "last__empty_pool__index"
34 34  
35 35  let kFirstEmptyPoolIndex = "first__empty__pool__index"
36 36  
37 37  func kPoolAddressFromIndex (index) = makeString(["pool", toString(index)], separator)
38 38  
39 39  
40 40  func kPoolIndexFromAddress (address) = makeString(["pool", toString(address)], separator)
41 41  
42 42  
43 43  func kPoolAsset (address) = makeString(["asset", toString(address)], separator)
44 44  
45 45  
46 46  func kPoolStatus (index) = makeString(["pool", "status", toString(index)], separator)
47 47  
48 48  
49 49  let kFactoryAddress = "factory__address"
50 50  
51 51  let factoryAddressOption = match getString(this, kFactoryAddress) {
52 52      case s: String => 
53 53          addressFromString(s)
54 54      case _: Unit => 
55 55          unit
56 56      case _ => 
57 57          throw("Match error")
58 58  }
59 59  
60 60  let factoryAddress = valueOrErrorMessage(factoryAddressOption, wrapErr("invalid factory address"))
61 61  
62 62  let shutdown = valueOrElse(getBoolean(factoryAddress, kShutdown), false)
63 63  
64 64  let lastEmptyIndex = valueOrElse(getInteger(factoryAddress, kLastEmptyPoolIndex), 0)
65 65  
66 66  let firstEmptyIndex = valueOrElse(getInteger(factoryAddress, kFirstEmptyPoolIndex), 0)
67 67  
68 68  let listingVolume = valueOrElse(getInteger(factoryAddress, kListingVolume), 0)
69 69  
70 70  func parseAssetId (input) = if ((input == wavesString))
71 71      then unit
72 72      else fromBase58String(input)
73 73  
74 74  
75 75  func assetIdToString (input) = if ((input == unit))
76 76      then wavesString
77 77      else toBase58String(value(input))
78 78  
79 79  
80 80  func mustAddress (caller,address) = if ((caller == address))
81 81      then true
82 82      else throwErr("permission denied")
83 83  
84 84  
85 85  func mustThis (caller) = mustAddress(caller, this)
86 86  
87 87  
88 88  func mustFactory (caller) = mustAddress(caller, factoryAddress)
89 89  
90 90  
91 91  func poolContractHash () = valueOrErrorMessage(getBinary(factoryAddress, kPoolContractHash), wrapErr("pool contract script hash is not set"))
92 92  
93 93  
94 94  @Callable(i)
95 95  func init (factoryAddressStr) = {
96 96      let checkCaller = mustThis(i.caller)
97 97      if ((checkCaller == checkCaller))
98 98          then [StringEntry(kFactoryAddress, factoryAddressStr)]
99 99          else throw("Strict value is not equal to itself.")
100 100      }
101 101  
102 102  
103 103  
104 104  @Callable(i)
105 105  func addEmptyPool (callerPublicKey,args) = {
106 106      let newPoolAddress = addressFromPublicKey(callerPublicKey)
107 107      let newPoolIndex = (lastEmptyIndex + 1)
108 108      let checks = [if (!(shutdown))
109 109          then true
110 110          else throwErr("not allowed (shutdown)"), if (!(isDefined(getInteger(factoryAddress, kPoolIndexFromAddress(newPoolAddress)))))
111 111          then true
112 112          else throwErr("pool address is already registered")]
113 113      if ((checks == checks))
114 114          then {
115 115              let factoryActions = [invoke(factoryAddress, "integerEntry", [kLastEmptyPoolIndex, newPoolIndex], nil), invoke(factoryAddress, "stringEntry", [kPoolAddressFromIndex(newPoolIndex), toString(newPoolAddress)], nil), invoke(factoryAddress, "integerEntry", [kPoolIndexFromAddress(newPoolAddress), newPoolIndex], nil), invoke(factoryAddress, "integerEntry", [kPoolStatus(newPoolIndex), STATUS_EMPTY], nil)]
116 116              $Tuple2(nil, factoryActions)
117 117              }
118 118          else throw("Strict value is not equal to itself.")
119 119      }
120 120  
121 121  
122 122  
123 123  @Callable(i)
124 124  func createPool (callerPublicKey,args) = {
125 125      let checks = [if (!(shutdown))
126 126          then true
127 127          else throwErr("not allowed (shutdown)"), mustFactory(i.caller), if (((lastEmptyIndex - firstEmptyIndex) > 0))
128 128          then true
129 129          else throwErr("no empty pools available"), if ((i.payments[0].assetId == unit))
130 130          then true
131 131          else throwErr("payment should be in WAVES"), if ((i.payments[0].amount > listingVolume))
132 132          then true
133 133          else throwErr("payment amount should be greater than listing volume"), if (isDefined(args[0]))
134 134          then true
135 135          else throwErr("tokenName is not provided"), if (isDefined(args[1]))
136 136          then true
137 137          else throwErr("tokenDescription is not provided"), if (isDefined(args[2]))
138 138          then true
139 139          else throwErr("tokenQuantity is not provided")]
140 140      if ((checks == checks))
141 141          then {
142 142              let poolIndex = (firstEmptyIndex + 1)
143 143              let poolAddressString = getStringValue(factoryAddress, kPoolAddressFromIndex(poolIndex))
144 144              let poolAddress = addressFromStringValue(poolAddressString)
145 145              let callerAddress = addressFromPublicKey(callerPublicKey)
146 146              let poolDomain = toBase58String(take(poolAddress.bytes, 8))
147 147              let poolOwner = toString(callerAddress)
148 148              let tokenName = args[0]
149 149              let tokenDesc = args[1]
150 -             let tokenQuantity = parseInt(args[2])
151 -             let initPoolInvoke = invoke(poolAddress, "init", [poolDomain, poolOwner, tokenName, tokenDesc, tokenQuantity], [AttachedPayment(i.payments[0].assetId, i.payments[0].amount)])
150 +             let tokenQuantity = args[2]
151 +             let initPoolInvoke = invoke(factoryAddress, "initPoolInvoke", [poolDomain, poolOwner, tokenName, tokenDesc, tokenQuantity], [AttachedPayment(i.payments[0].assetId, i.payments[0].amount)])
152 152              if ((initPoolInvoke == initPoolInvoke))
153 153                  then {
154 154                      let factoryActions = [invoke(factoryAddress, "integerEntry", [kFirstEmptyPoolIndex, poolIndex], nil), invoke(factoryAddress, "integerEntry", [kPoolStatus(poolIndex), STATUS_READY], nil)]
155 155                      $Tuple2(nil, factoryActions)
156 156                      }
157 157                  else throw("Strict value is not equal to itself.")
158 158              }
159 159          else throw("Strict value is not equal to itself.")
160 160      }
161 161  
162 162

Old	New		Differences
147	147		let poolOwner = toString(callerAddress)
148	148		let tokenName = args[0]
149	149		let tokenDesc = args[1]
150		-	let tokenQuantity = ~~parseInt(~~args[2])
151		-	let initPoolInvoke = invoke(~~poolAddress~~, "~~init~~", [poolDomain, poolOwner, tokenName, tokenDesc, tokenQuantity], [AttachedPayment(i.payments[0].assetId, i.payments[0].amount)])
	150	+	let tokenQuantity = args[2]
	151	+	let initPoolInvoke = invoke(factoryAddress, "initPoolInvoke", [poolDomain, poolOwner, tokenName, tokenDesc, tokenQuantity], [AttachedPayment(i.payments[0].assetId, i.payments[0].amount)])
152	152		if ((initPoolInvoke == initPoolInvoke))
153	153		then {
154	154		let factoryActions = [invoke(factoryAddress, "integerEntry", [kFirstEmptyPoolIndex, poolIndex], nil), invoke(factoryAddress, "integerEntry", [kPoolStatus(poolIndex), STATUS_READY], nil)]

Old	New		Differences
1	1		{-# STDLIB_VERSION 7 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let separator = "__"
5	5
6	6		let wavesString = "WAVES"
7	7
8	8		let contractFilename = "meme_im_calculator.ride"
9	9
10	10		let mult8 = 100000000
11	11
12	12		func wrapErr (s) = ((contractFilename + ": ") + s)
13	13
14	14
15	15		func throwErr (s) = throw(wrapErr(s))
16	16
17	17
18	18		func validateAddress (address) = isDefined(addressFromString(address))
19	19
20	20
21	21		let STATUS_EMPTY = 0
22	22
23	23		let STATUS_READY = 1
24	24
25	25		let kShutdown = "shutdown__flag"
26	26
27	27		let kPriceAsset = "price__asset"
28	28
29	29		let kListingVolume = "listing__volume"
30	30
31	31		let kPoolContractHash = "pool__contract__hash"
32	32
33	33		let kLastEmptyPoolIndex = "last__empty_pool__index"
34	34
35	35		let kFirstEmptyPoolIndex = "first__empty__pool__index"
36	36
37	37		func kPoolAddressFromIndex (index) = makeString(["pool", toString(index)], separator)
38	38
39	39
40	40		func kPoolIndexFromAddress (address) = makeString(["pool", toString(address)], separator)
41	41
42	42
43	43		func kPoolAsset (address) = makeString(["asset", toString(address)], separator)
44	44
45	45
46	46		func kPoolStatus (index) = makeString(["pool", "status", toString(index)], separator)
47	47
48	48
49	49		let kFactoryAddress = "factory__address"
50	50
51	51		let factoryAddressOption = match getString(this, kFactoryAddress) {
52	52		case s: String =>
53	53		addressFromString(s)
54	54		case _: Unit =>
55	55		unit
56	56		case _ =>
57	57		throw("Match error")
58	58		}
59	59
60	60		let factoryAddress = valueOrErrorMessage(factoryAddressOption, wrapErr("invalid factory address"))
61	61
62	62		let shutdown = valueOrElse(getBoolean(factoryAddress, kShutdown), false)
63	63
64	64		let lastEmptyIndex = valueOrElse(getInteger(factoryAddress, kLastEmptyPoolIndex), 0)
65	65
66	66		let firstEmptyIndex = valueOrElse(getInteger(factoryAddress, kFirstEmptyPoolIndex), 0)
67	67
68	68		let listingVolume = valueOrElse(getInteger(factoryAddress, kListingVolume), 0)
69	69
70	70		func parseAssetId (input) = if ((input == wavesString))
71	71		then unit
72	72		else fromBase58String(input)
73	73
74	74
75	75		func assetIdToString (input) = if ((input == unit))
76	76		then wavesString
77	77		else toBase58String(value(input))
78	78
79	79
80	80		func mustAddress (caller,address) = if ((caller == address))
81	81		then true
82	82		else throwErr("permission denied")
83	83
84	84
85	85		func mustThis (caller) = mustAddress(caller, this)
86	86
87	87
88	88		func mustFactory (caller) = mustAddress(caller, factoryAddress)
89	89
90	90
91	91		func poolContractHash () = valueOrErrorMessage(getBinary(factoryAddress, kPoolContractHash), wrapErr("pool contract script hash is not set"))
92	92
93	93
94	94		@Callable(i)
95	95		func init (factoryAddressStr) = {
96	96		let checkCaller = mustThis(i.caller)
97	97		if ((checkCaller == checkCaller))
98	98		then [StringEntry(kFactoryAddress, factoryAddressStr)]
99	99		else throw("Strict value is not equal to itself.")
100	100		}
101	101
102	102
103	103
104	104		@Callable(i)
105	105		func addEmptyPool (callerPublicKey,args) = {
106	106		let newPoolAddress = addressFromPublicKey(callerPublicKey)
107	107		let newPoolIndex = (lastEmptyIndex + 1)
108	108		let checks = [if (!(shutdown))
109	109		then true
110	110		else throwErr("not allowed (shutdown)"), if (!(isDefined(getInteger(factoryAddress, kPoolIndexFromAddress(newPoolAddress)))))
111	111		then true
112	112		else throwErr("pool address is already registered")]
113	113		if ((checks == checks))
114	114		then {
115	115		let factoryActions = [invoke(factoryAddress, "integerEntry", [kLastEmptyPoolIndex, newPoolIndex], nil), invoke(factoryAddress, "stringEntry", [kPoolAddressFromIndex(newPoolIndex), toString(newPoolAddress)], nil), invoke(factoryAddress, "integerEntry", [kPoolIndexFromAddress(newPoolAddress), newPoolIndex], nil), invoke(factoryAddress, "integerEntry", [kPoolStatus(newPoolIndex), STATUS_EMPTY], nil)]
116	116		$Tuple2(nil, factoryActions)
117	117		}
118	118		else throw("Strict value is not equal to itself.")
119	119		}
120	120
121	121
122	122
123	123		@Callable(i)
124	124		func createPool (callerPublicKey,args) = {
125	125		let checks = [if (!(shutdown))
126	126		then true
127	127		else throwErr("not allowed (shutdown)"), mustFactory(i.caller), if (((lastEmptyIndex - firstEmptyIndex) > 0))
128	128		then true
129	129		else throwErr("no empty pools available"), if ((i.payments[0].assetId == unit))
130	130		then true
131	131		else throwErr("payment should be in WAVES"), if ((i.payments[0].amount > listingVolume))
132	132		then true
133	133		else throwErr("payment amount should be greater than listing volume"), if (isDefined(args[0]))
134	134		then true
135	135		else throwErr("tokenName is not provided"), if (isDefined(args[1]))
136	136		then true
137	137		else throwErr("tokenDescription is not provided"), if (isDefined(args[2]))
138	138		then true
139	139		else throwErr("tokenQuantity is not provided")]
140	140		if ((checks == checks))
141	141		then {
142	142		let poolIndex = (firstEmptyIndex + 1)
143	143		let poolAddressString = getStringValue(factoryAddress, kPoolAddressFromIndex(poolIndex))
144	144		let poolAddress = addressFromStringValue(poolAddressString)
145	145		let callerAddress = addressFromPublicKey(callerPublicKey)
146	146		let poolDomain = toBase58String(take(poolAddress.bytes, 8))
147	147		let poolOwner = toString(callerAddress)
148	148		let tokenName = args[0]
149	149		let tokenDesc = args[1]
150		-	let tokenQuantity = ~~parseInt(~~args[2])
151		-	let initPoolInvoke = invoke(~~poolAddress~~, "~~init~~", [poolDomain, poolOwner, tokenName, tokenDesc, tokenQuantity], [AttachedPayment(i.payments[0].assetId, i.payments[0].amount)])
	150	+	let tokenQuantity = args[2]
	151	+	let initPoolInvoke = invoke(factoryAddress, "initPoolInvoke", [poolDomain, poolOwner, tokenName, tokenDesc, tokenQuantity], [AttachedPayment(i.payments[0].assetId, i.payments[0].amount)])
152	152		if ((initPoolInvoke == initPoolInvoke))
153	153		then {
154	154		let factoryActions = [invoke(factoryAddress, "integerEntry", [kFirstEmptyPoolIndex, poolIndex], nil), invoke(factoryAddress, "integerEntry", [kPoolStatus(poolIndex), STATUS_READY], nil)]
155	155		$Tuple2(nil, factoryActions)
156	156		}
157	157		else throw("Strict value is not equal to itself.")
158	158		}
159	159		else throw("Strict value is not equal to itself.")
160	160		}
161	161
162	162

github/deemru/w8io/c3f4982 
23.42 ms ◑