w8 · tx · 42g···Gy9

tx · 42gY3RtuQJvDHNQwaPDAQkqS5MWd9yBnxHFZMNXSNGy9

3N1ytAUyhtig9X6F2hHHs1jbzYxr47Yp8Fr:  -0.00500000 Waves

2024.09.24 20:51 [3298003] smart account 3N1ytAUyhtig9X6F2hHHs1jbzYxr47Yp8Fr > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "42gY3RtuQJvDHNQwaPDAQkqS5MWd9yBnxHFZMNXSNGy9",
    "fee": 500000,
    "feeAssetId": null,
    "timestamp": 1727200287768,
    "version": 2,
    "chainId": 84,
    "sender": "3N1ytAUyhtig9X6F2hHHs1jbzYxr47Yp8Fr",
    "senderPublicKey": "jXCTQV8PjX2uC9UHBFveupYy9cjhY7stHbzE9cptymw",
    "proofs": [
        "5xLQ46dNEuyVCk1VsEoTkGHbbGhhrtuJnXVSuBoAa6U5r5MZmQkSGoxoXWDzpwb7LzekPWNJju16aqtGvGfxAHNi"
    ],
    "script": "base64:BwITCAISAwoBCBIECgICGBIECgICGCAACXNlcGFyYXRvcgICX18AC3dhdmVzU3RyaW5nAgVXQVZFUwAQY29udHJhY3RGaWxlbmFtZQIXbWVtZV9pbV9jYWxjdWxhdG9yLnJpZGUABW11bHQ4AIDC1y8BB3dyYXBFcnIBAXMJAKwCAgkArAICBRBjb250cmFjdEZpbGVuYW1lAgI6IAUBcwEIdGhyb3dFcnIBAXMJAAIBCQEHd3JhcEVycgEFAXMBD3ZhbGlkYXRlQWRkcmVzcwEHYWRkcmVzcwkBCWlzRGVmaW5lZAEJAKYIAQUHYWRkcmVzcwAMU1RBVFVTX0VNUFRZAAAADFNUQVRVU19SRUFEWQABAAlrU2h1dGRvd24CDCVzX19zaHV0ZG93bgALa1ByaWNlQXNzZXQCDHByaWNlX19hc3NldAAOa0xpc3RpbmdWb2x1bWUCDmxpc3Rpbmdfdm9sdW1lABFrUG9vbENvbnRyYWN0SGFzaAIScG9vbF9jb250cmFjdF9oYXNoABNrTGFzdEVtcHR5UG9vbEluZGV4AhdsYXN0X19lbXB0eV9wb29sX19pbmRleAAUa0ZpcnN0RW1wdHlQb29sSW5kZXgCGWZpcnN0X19lbXB0eV9fcG9vbF9faW5kZXgBFWtQb29sQWRkcmVzc0Zyb21JbmRleAEFaW5kZXgJALkJAgkAzAgCAgRwb29sCQDMCAIJAKQDAQUFaW5kZXgFA25pbAUJc2VwYXJhdG9yARVrUG9vbEluZGV4RnJvbUFkZHJlc3MBB2FkZHJlc3MJALkJAgkAzAgCAgRwb29sCQDMCAIJAKUIAQUHYWRkcmVzcwUDbmlsBQlzZXBhcmF0b3IBCmtQb29sQXNzZXQBB2FkZHJlc3MJALkJAgkAzAgCAgVhc3NldAkAzAgCCQClCAEFB2FkZHJlc3MFA25pbAUJc2VwYXJhdG9yAQtrUG9vbFN0YXR1cwEFaW5kZXgJALkJAgkAzAgCAgRwb29sCQDMCAICBnN0YXR1cwkAzAgCCQCkAwEFBWluZGV4BQNuaWwFCXNlcGFyYXRvcgAPa0ZhY3RvcnlBZGRyZXNzAhIlc19fZmFjdG9yeUFkZHJlc3MAFGZhY3RvcnlBZGRyZXNzT3B0aW9uBAckbWF0Y2gwCQCdCAIFBHRoaXMFD2tGYWN0b3J5QWRkcmVzcwMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJAKYIAQUBcwMJAAECBQckbWF0Y2gwAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IADmZhY3RvcnlBZGRyZXNzCQETdmFsdWVPckVycm9yTWVzc2FnZQIFFGZhY3RvcnlBZGRyZXNzT3B0aW9uCQEHd3JhcEVycgECF2ludmFsaWQgZmFjdG9yeSBhZGRyZXNzAAhzaHV0ZG93bgkBC3ZhbHVlT3JFbHNlAgkAmwgCBQ5mYWN0b3J5QWRkcmVzcwUJa1NodXRkb3duBwAObGFzdEVtcHR5SW5kZXgJAQt2YWx1ZU9yRWxzZQIJAJoIAgUOZmFjdG9yeUFkZHJlc3MFE2tMYXN0RW1wdHlQb29sSW5kZXgAAAAPZmlyc3RFbXB0eUluZGV4CQELdmFsdWVPckVsc2UCCQCaCAIFDmZhY3RvcnlBZGRyZXNzBRRrRmlyc3RFbXB0eVBvb2xJbmRleAAAAA1saXN0aW5nVm9sdW1lCQELdmFsdWVPckVsc2UCCQCaCAIFDmZhY3RvcnlBZGRyZXNzBQ5rTGlzdGluZ1ZvbHVtZQAAAQxwYXJzZUFzc2V0SWQBBWlucHV0AwkAAAIFBWlucHV0BQt3YXZlc1N0cmluZwUEdW5pdAkA2QQBBQVpbnB1dAEPYXNzZXRJZFRvU3RyaW5nAQVpbnB1dAMJAAACBQVpbnB1dAUEdW5pdAULd2F2ZXNTdHJpbmcJANgEAQkBBXZhbHVlAQUFaW5wdXQBC211c3RBZGRyZXNzAgZjYWxsZXIHYWRkcmVzcwMJAAACBQZjYWxsZXIFB2FkZHJlc3MGCQEIdGhyb3dFcnIBAhFwZXJtaXNzaW9uIGRlbmllZAEIbXVzdFRoaXMBBmNhbGxlcgkBC211c3RBZGRyZXNzAgUGY2FsbGVyBQR0aGlzAQttdXN0RmFjdG9yeQEGY2FsbGVyCQELbXVzdEFkZHJlc3MCBQZjYWxsZXIFDmZhY3RvcnlBZGRyZXNzARBwb29sQ29udHJhY3RIYXNoAAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCcCAIFDmZhY3RvcnlBZGRyZXNzBRFrUG9vbENvbnRyYWN0SGFzaAkBB3dyYXBFcnIBAiRwb29sIGNvbnRyYWN0IHNjcmlwdCBoYXNoIGlzIG5vdCBzZXQDAWkBBGluaXQBDmZhY3RvcnlBZGRyZXNzBAtjaGVja0NhbGxlcgkBCG11c3RUaGlzAQgFAWkGY2FsbGVyAwkAAAIFC2NoZWNrQ2FsbGVyBQtjaGVja0NhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCBQ9rRmFjdG9yeUFkZHJlc3MFDmZhY3RvcnlBZGRyZXNzBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEMYWRkRW1wdHlQb29sAg9jYWxsZXJQdWJsaWNLZXkEYXJncwQObmV3UG9vbEFkZHJlc3MJAKcIAQUPY2FsbGVyUHVibGljS2V5BAxuZXdQb29sSW5kZXgJAGQCBQ5sYXN0RW1wdHlJbmRleAABBA5mYWN0b3J5QWN0aW9ucwkAzAgCCQD8BwQFDmZhY3RvcnlBZGRyZXNzAgxpbnRlZ2VyRW50cnkJAMwIAgUTa0xhc3RFbXB0eVBvb2xJbmRleAkAzAgCBQxuZXdQb29sSW5kZXgFA25pbAUDbmlsCQDMCAIJAPwHBAUOZmFjdG9yeUFkZHJlc3MCC3N0cmluZ0VudHJ5CQDMCAIJARVrUG9vbEFkZHJlc3NGcm9tSW5kZXgBBQxuZXdQb29sSW5kZXgJAMwIAgkApQgBBQ5uZXdQb29sQWRkcmVzcwUDbmlsBQNuaWwJAMwIAgkA/AcEBQ5mYWN0b3J5QWRkcmVzcwIMaW50ZWdlckVudHJ5CQDMCAIJARVrUG9vbEluZGV4RnJvbUFkZHJlc3MBBQ5uZXdQb29sQWRkcmVzcwkAzAgCBQxuZXdQb29sSW5kZXgFA25pbAUDbmlsCQDMCAIJAPwHBAUOZmFjdG9yeUFkZHJlc3MCDGludGVnZXJFbnRyeQkAzAgCCQELa1Bvb2xTdGF0dXMBBQxuZXdQb29sSW5kZXgJAMwIAgUMU1RBVFVTX0VNUFRZBQNuaWwFA25pbAUDbmlsCQCUCgIFA25pbAUOZmFjdG9yeUFjdGlvbnMBaQEKY3JlYXRlUG9vbAIPY2FsbGVyUHVibGljS2V5BGFyZ3MEBmNoZWNrcwkAzAgCAwkBASEBBQhzaHV0ZG93bgYJAQh0aHJvd0VycgECFm5vdCBhbGxvd2VkIChzaHV0ZG93bikJAMwIAgkBC211c3RGYWN0b3J5AQgFAWkGY2FsbGVyCQDMCAIDCQBmAgkAZQIFDmxhc3RFbXB0eUluZGV4BQ9maXJzdEVtcHR5SW5kZXgAAAYJAQh0aHJvd0VycgECGG5vIGVtcHR5IHBvb2xzIGF2YWlsYWJsZQkAzAgCAwkAAAIICQCRAwIIBQFpCHBheW1lbnRzAAEHYXNzZXRJZAUEdW5pdAYJAQh0aHJvd0VycgECG3ByaWNlIGFzc2V0IHNob3VsZCBiZSBXQVZFUwkAzAgCAwkAZgIICQCRAwIIBQFpCHBheW1lbnRzAAEGYW1vdW50BQ1saXN0aW5nVm9sdW1lBgkBCHRocm93RXJyAQI3cGF5bWVudFsxXSBhbW91bnQgc2hvdWxkIGJlIGdyZWF0ZXIgdGhhbiBsaXN0aW5nIHZvbHVtZQkAzAgCAwkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQR1bml0BgkBCHRocm93RXJyAQIcYW1vdW50IGFzc2V0IGNhbm5vdCBiZSBXQVZFUwkAzAgCAwkAZgIICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AAAGCQEIdGhyb3dFcnIBAipwYXltZW50WzBdIGFtb3VudCBzaG91bGQgYmUgZ3JlYXRlciB0aGFuIDAFA25pbAMJAAACBQZjaGVja3MFBmNoZWNrcwQNYW1vdW50QXNzZXRJZAgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBBNhbW91bnRBc3NldElkU3RyaW5nCQEPYXNzZXRJZFRvU3RyaW5nAQUNYW1vdW50QXNzZXRJZAQJcG9vbEluZGV4CQBkAgUPZmlyc3RFbXB0eUluZGV4AAEEEXBvb2xBZGRyZXNzU3RyaW5nCQERQGV4dHJOYXRpdmUoMTA1MykCBQ5mYWN0b3J5QWRkcmVzcwkBFWtQb29sQWRkcmVzc0Zyb21JbmRleAEFCXBvb2xJbmRleAQLcG9vbEFkZHJlc3MJARFAZXh0ck5hdGl2ZSgxMDYyKQEFEXBvb2xBZGRyZXNzU3RyaW5nBAdhY3Rpb25zCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3Bvb2xBZGRyZXNzCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3Bvb2xBZGRyZXNzCAkAkQMCCAUBaQhwYXltZW50cwABBmFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAQdhc3NldElkBQNuaWwEDmZhY3RvcnlBY3Rpb25zCQDMCAIJAPwHBAUOZmFjdG9yeUFkZHJlc3MCC3N0cmluZ0VudHJ5CQDMCAIJAQprUG9vbEFzc2V0AQULcG9vbEFkZHJlc3MJAMwIAgUTYW1vdW50QXNzZXRJZFN0cmluZwUDbmlsBQNuaWwJAMwIAgkA/AcEBQ5mYWN0b3J5QWRkcmVzcwIMaW50ZWdlckVudHJ5CQDMCAIFFGtGaXJzdEVtcHR5UG9vbEluZGV4CQDMCAIFCXBvb2xJbmRleAUDbmlsBQNuaWwJAMwIAgkA/AcEBQ5mYWN0b3J5QWRkcmVzcwIMaW50ZWdlckVudHJ5CQDMCAIJAQtrUG9vbFN0YXR1cwEFCXBvb2xJbmRleAkAzAgCBQxTVEFUVVNfUkVBRFkFA25pbAUDbmlsBQNuaWwJAJQKAgUHYWN0aW9ucwUOZmFjdG9yeUFjdGlvbnMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AZyUPRA==",
    "height": 3298003,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: sTiEhi8Rsjez3i71cow48R9VLVG5112NopvMH38XLeh
Next: AMgCQBh6n5pc6hT6CyhVmnPm2C3N9QuB4382oqYwt365

Diff: 
Old New Differences
92 92  
93 93  
94 94  @Callable(i)
95 + func init (factoryAddress) = {
96 +     let checkCaller = mustThis(i.caller)
97 +     if ((checkCaller == checkCaller))
98 +         then [StringEntry(kFactoryAddress, factoryAddress)]
99 +         else throw("Strict value is not equal to itself.")
100 +     }
101 + 
102 + 
103 + 
104 + @Callable(i)
95 105  func addEmptyPool (callerPublicKey,args) = {
96 106      let newPoolAddress = addressFromPublicKey(callerPublicKey)
97 107      let newPoolIndex = (lastEmptyIndex + 1)
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 = "%s__shutdown"
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 = "%s__factoryAddress"
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 + func init (factoryAddress) = {
96 +     let checkCaller = mustThis(i.caller)
97 +     if ((checkCaller == checkCaller))
98 +         then [StringEntry(kFactoryAddress, factoryAddress)]
99 +         else throw("Strict value is not equal to itself.")
100 +     }
101 + 
102 + 
103 + 
104 + @Callable(i)
95 105  func addEmptyPool (callerPublicKey,args) = {
96 106      let newPoolAddress = addressFromPublicKey(callerPublicKey)
97 107      let newPoolIndex = (lastEmptyIndex + 1)
98 108      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)]
99 109      $Tuple2(nil, factoryActions)
100 110      }
101 111  
102 112  
103 113  
104 114  @Callable(i)
105 115  func createPool (callerPublicKey,args) = {
106 116      let checks = [if (!(shutdown))
107 117          then true
108 118          else throwErr("not allowed (shutdown)"), mustFactory(i.caller), if (((lastEmptyIndex - firstEmptyIndex) > 0))
109 119          then true
110 120          else throwErr("no empty pools available"), if ((i.payments[1].assetId == unit))
111 121          then true
112 122          else throwErr("price asset should be WAVES"), if ((i.payments[1].amount > listingVolume))
113 123          then true
114 124          else throwErr("payment[1] amount should be greater than listing volume"), if ((i.payments[0].assetId != unit))
115 125          then true
116 126          else throwErr("amount asset cannot be WAVES"), if ((i.payments[0].amount > 0))
117 127          then true
118 128          else throwErr("payment[0] amount should be greater than 0")]
119 129      if ((checks == checks))
120 130          then {
121 131              let amountAssetId = i.payments[0].assetId
122 132              let amountAssetIdString = assetIdToString(amountAssetId)
123 133              let poolIndex = (firstEmptyIndex + 1)
124 134              let poolAddressString = getStringValue(factoryAddress, kPoolAddressFromIndex(poolIndex))
125 135              let poolAddress = addressFromStringValue(poolAddressString)
126 136              let actions = [ScriptTransfer(poolAddress, i.payments[0].amount, i.payments[0].assetId), ScriptTransfer(poolAddress, i.payments[1].amount, i.payments[1].assetId)]
127 137              let factoryActions = [invoke(factoryAddress, "stringEntry", [kPoolAsset(poolAddress), amountAssetIdString], nil), invoke(factoryAddress, "integerEntry", [kFirstEmptyPoolIndex, poolIndex], nil), invoke(factoryAddress, "integerEntry", [kPoolStatus(poolIndex), STATUS_READY], nil)]
128 138              $Tuple2(actions, factoryActions)
129 139              }
130 140          else throw("Strict value is not equal to itself.")
131 141      }
132 142  
133 143

Old	New		Differences
92	92
93	93
94	94		@Callable(i)
	95	+	func init (factoryAddress) = {
	96	+	let checkCaller = mustThis(i.caller)
	97	+	if ((checkCaller == checkCaller))
	98	+	then [StringEntry(kFactoryAddress, factoryAddress)]
	99	+	else throw("Strict value is not equal to itself.")
	100	+	}
	101	+
	102	+
	103	+
	104	+	@Callable(i)
95	105		func addEmptyPool (callerPublicKey,args) = {
96	106		let newPoolAddress = addressFromPublicKey(callerPublicKey)
97	107		let newPoolIndex = (lastEmptyIndex + 1)

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 = "%s__shutdown"
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 = "%s__factoryAddress"
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	+	func init (factoryAddress) = {
	96	+	let checkCaller = mustThis(i.caller)
	97	+	if ((checkCaller == checkCaller))
	98	+	then [StringEntry(kFactoryAddress, factoryAddress)]
	99	+	else throw("Strict value is not equal to itself.")
	100	+	}
	101	+
	102	+
	103	+
	104	+	@Callable(i)
95	105		func addEmptyPool (callerPublicKey,args) = {
96	106		let newPoolAddress = addressFromPublicKey(callerPublicKey)
97	107		let newPoolIndex = (lastEmptyIndex + 1)
98	108		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)]
99	109		$Tuple2(nil, factoryActions)
100	110		}
101	111
102	112
103	113
104	114		@Callable(i)
105	115		func createPool (callerPublicKey,args) = {
106	116		let checks = [if (!(shutdown))
107	117		then true
108	118		else throwErr("not allowed (shutdown)"), mustFactory(i.caller), if (((lastEmptyIndex - firstEmptyIndex) > 0))
109	119		then true
110	120		else throwErr("no empty pools available"), if ((i.payments[1].assetId == unit))
111	121		then true
112	122		else throwErr("price asset should be WAVES"), if ((i.payments[1].amount > listingVolume))
113	123		then true
114	124		else throwErr("payment[1] amount should be greater than listing volume"), if ((i.payments[0].assetId != unit))
115	125		then true
116	126		else throwErr("amount asset cannot be WAVES"), if ((i.payments[0].amount > 0))
117	127		then true
118	128		else throwErr("payment[0] amount should be greater than 0")]
119	129		if ((checks == checks))
120	130		then {
121	131		let amountAssetId = i.payments[0].assetId
122	132		let amountAssetIdString = assetIdToString(amountAssetId)
123	133		let poolIndex = (firstEmptyIndex + 1)
124	134		let poolAddressString = getStringValue(factoryAddress, kPoolAddressFromIndex(poolIndex))
125	135		let poolAddress = addressFromStringValue(poolAddressString)
126	136		let actions = [ScriptTransfer(poolAddress, i.payments[0].amount, i.payments[0].assetId), ScriptTransfer(poolAddress, i.payments[1].amount, i.payments[1].assetId)]
127	137		let factoryActions = [invoke(factoryAddress, "stringEntry", [kPoolAsset(poolAddress), amountAssetIdString], nil), invoke(factoryAddress, "integerEntry", [kFirstEmptyPoolIndex, poolIndex], nil), invoke(factoryAddress, "integerEntry", [kPoolStatus(poolIndex), STATUS_READY], nil)]
128	138		$Tuple2(actions, factoryActions)
129	139		}
130	140		else throw("Strict value is not equal to itself.")
131	141		}
132	142
133	143

github/deemru/w8io/c3f4982 
27.85 ms ◑