w8 · tx · Dow···aib

tx · DowAto9WZzUmj56e69S7MGXkFK7jRvGmbrDTntQupaib

3PBmmxKhFcDhb8PrDdCdvw2iGMPnp7VuwPy:  -0.01000000 Waves

2022.11.09 07:15 [3374492] smart account 3PBmmxKhFcDhb8PrDdCdvw2iGMPnp7VuwPy > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DowAto9WZzUmj56e69S7MGXkFK7jRvGmbrDTntQupaib",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1667967312642,
    "version": 2,
    "chainId": 87,
    "sender": "3PBmmxKhFcDhb8PrDdCdvw2iGMPnp7VuwPy",
    "senderPublicKey": "61mmdp2FdTQGQT6Rc3y2uY4cC5LkkG4SUiXj7d4g52FT",
    "proofs": [
        "5fXxFur4kf3So5ejVf83nMzmjx1XhV3zaNC6gUX9s2G7pFwDBaA2Js7gEzJsQMAHYiBZRQFhtSB1Vi5EqFSzJEni"
    ],
    "script": "base64:AAIFAAAAAAAAABMIAhIDCgEIEgMKAQgSAwoBCBIAAAAACQAAAAAGQUlOVElECQACWQAAAAECAAAALEJ2dXpKTkI2cVVydkVtekd0MVBNQloxUUNuQk5uMkw3ZXpYSGhnUUtNeHI3AAAAAApXQVZFU0lEU1RSAgAAAAVXQVZFUwAAAAAHV0FWRVNJRAkAAlkAAAABBQAAAApXQVZFU0lEU1RSAAAAAAVNVUxUOAAAAAAABfXhAAAAAAAJUFJJQ0VTVEVQCQAAaQAAAAIFAAAABU1VTFQ4AAAAAAAAAABkAAAAAANTRVACAAAAAl9fAQAAABVrZXlCZW5lZmljaWFyeUFkZHJlc3MAAAAAAgAAABYlc19fYmVuZWZpY2lhcnlBZGRyZXNzAQAAAAhrZXlQcmljZQAAAAACAAAACSVzX19wcmljZQEAAAAHa2V5VGllcgAAAAACAAAACCVzX190aWVyAAAABAAAAAFpAQAAAAtjb25zdHJ1Y3RvcgAAAAEAAAAXYmVuZWZpY2lhcnlBZGRyZXNzU3RyNTgDCQEAAAACIT0AAAACBQAAAAR0aGlzCAUAAAABaQAAAAZjYWxsZXIJAAACAAAAAQIAAAAScGVybWlzc2lvbnMgZGVuaWVkBAAAABJiZW5lZmljaWFyeUFkZHJlc3MJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAF2JlbmVmaWNpYXJ5QWRkcmVzc1N0cjU4BAAAAAVwcmljZQUAAAAFTVVMVDgEAAAABHRpZXIJAABoAAAAAgUAAAAFTVVMVDgAAAAAAAAAAAoJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAFWtleUJlbmVmaWNpYXJ5QWRkcmVzcwAAAAAJAAQlAAAAAQUAAAASYmVuZWZpY2lhcnlBZGRyZXNzCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAAHa2V5VGllcgAAAAAFAAAABHRpZXIJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAAAhrZXlQcmljZQAAAAAFAAAABXByaWNlBQAAAANuaWwAAAABaQEAAAAHZGVwb3NpdAAAAAEAAAAEaGFzaAQAAAADcG10CQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAApwbXRBc3NldElkCQEAAAALdmFsdWVPckVsc2UAAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAAB1dBVkVTSUQEAAAABmFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQDCQEAAAACIT0AAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAABCQAAAgAAAAECAAAAIGV4YWN0IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkAwkBAAAAAiE9AAAAAgUAAAAKcG10QXNzZXRJZAUAAAAHV0FWRVNJRAkAAAIAAAABAgAAACFvbmx5IFdBVkVTIGNhbiBiZSB1c2VkIGluIHBheW1lbnQEAAAAA2tleQkAASwAAAACAgAAAAQlc19fCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAADdmFsCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAGJXMlc19fBQAAAARoYXNoBQAAAANTRVAJAAGkAAAAAQUAAAAGaGVpZ2h0BQAAAANTRVAJAAGkAAAAAQUAAAAGYW1vdW50CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAA2tleQUAAAADdmFsBQAAAANuaWwAAAABaQEAAAAGcmVmdW5kAAAAAQAAAAZzZWNyZXQEAAAAA2tleQkAASwAAAACAgAAAAQlc19fCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAADdmFsCQEAAAARQGV4dHJOYXRpdmUoMTA1OCkAAAABBQAAAANrZXkEAAAABGhhc2gJAAGRAAAAAgkABLUAAAACBQAAAAN2YWwFAAAAA1NFUAAAAAAAAAAAAQQAAAABaAkAAaAAAAABCQABpwAAAAEJAAGRAAAAAgkABLUAAAACBQAAAAN2YWwFAAAAA1NFUAAAAAAAAAAAAgQAAAAGYW1vdW50CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgkABLUAAAACBQAAAAN2YWwFAAAAA1NFUAAAAAAAAAAAAwMJAQAAAAIhPQAAAAIJAAJYAAAAAQkAAfUAAAABCQAB9gAAAAEJAAGbAAAAAQUAAAAGc2VjcmV0BQAAAARoYXNoCQAAAgAAAAECAAAAD3NlY3JldCBpcyB3cm9uZwMJAABmAAAAAgAAAAAAAAAAPAkAAGUAAAACBQAAAAZoZWlnaHQFAAAAAWgJAAACAAAAAQIAAAATdG9vIGVhcmx5IHRvIHJlZnVuZAkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABBQAAAANrZXkJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAZhbW91bnQFAAAAB1dBVkVTSUQFAAAAA25pbAAAAAFpAQAAAARtaW50AAAAAAQAAAADcG10CQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAApwbXRBc3NldElkCQEAAAALdmFsdWVPckVsc2UAAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAAB1dBVkVTSUQEAAAABmFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQDCQEAAAACIT0AAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAABCQAAAgAAAAECAAAAIGV4YWN0IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkAwkBAAAAAiE9AAAAAgUAAAAKcG10QXNzZXRJZAUAAAAHV0FWRVNJRAkAAAIAAAABAgAAACFvbmx5IFdBVkVTIGNhbiBiZSB1c2VkIGluIHBheW1lbnQEAAAABXByaWNlCQEAAAARQGV4dHJOYXRpdmUoMTA1NSkAAAABCQEAAAAIa2V5UHJpY2UAAAAABAAAAAR0aWVyCQEAAAARQGV4dHJOYXRpdmUoMTA1NSkAAAABCQEAAAAHa2V5VGllcgAAAAAEAAAAEmFkZHJlc3NCZW5lZmljaWFyeQkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTgpAAAAAQkBAAAAFWtleUJlbmVmaWNpYXJ5QWRkcmVzcwAAAAAEAAAACmFtb3VudEFpbnQJAQAAAAhmcmFjdGlvbgAAAAQFAAAABmFtb3VudAUAAAAFTVVMVDgFAAAABXByaWNlBQAAAAVGTE9PUgQAAAAPYW1vdW50QWludEZpbmFsAwkAAGYAAAACBQAAAAR0aWVyBQAAAAphbW91bnRBaW50BQAAAAphbW91bnRBaW50BQAAAAR0aWVyBAAAAAd0aWVyTmV3AwkAAGYAAAACBQAAAAR0aWVyBQAAAAphbW91bnRBaW50CQAAZQAAAAIFAAAABHRpZXIFAAAACmFtb3VudEFpbnQJAABoAAAAAgUAAAAFTVVMVDgAAAAAAAAAAAoEAAAACHByaWNlTmV3AwkAAGYAAAACBQAAAAR0aWVyBQAAAAphbW91bnRBaW50BQAAAAVwcmljZQkAAGQAAAACBQAAAAVwcmljZQUAAAAJUFJJQ0VTVEVQBAAAAAxyZXR1cm5BbW91bnQDCQAAZwAAAAIFAAAABHRpZXIFAAAACmFtb3VudEFpbnQAAAAAAAAAAAAJAABlAAAAAgUAAAAGYW1vdW50CQAAawAAAAMFAAAAD2Ftb3VudEFpbnRGaW5hbAUAAAAFcHJpY2UFAAAABU1VTFQ4BAAAABJhbW91bnRCZW5lZmljaXJhcnkDCQAAZgAAAAIFAAAABHRpZXIFAAAACmFtb3VudEFpbnQFAAAABmFtb3VudAkAAGUAAAACBQAAAAZhbW91bnQFAAAADHJldHVybkFtb3VudAQAAAACc3QJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAPYW1vdW50QWludEZpbmFsBQAAAAZBSU5USUQEAAAACnByZUV4ZWN1dGUJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAA9hbW91bnRBaW50RmluYWwFAAAABkFJTlRJRAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAABJhZGRyZXNzQmVuZWZpY2lhcnkFAAAAEmFtb3VudEJlbmVmaWNpcmFyeQUAAAAEdW5pdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAB2tleVRpZXIAAAAABQAAAAd0aWVyTmV3BQAAAANuaWwEAAAAB2V4ZWN1dGUDCQAAZgAAAAIFAAAABHRpZXIFAAAACmFtb3VudEFpbnQFAAAACnByZUV4ZWN1dGUJAAROAAAAAgUAAAAKcHJlRXhlY3V0ZQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAACGtleVByaWNlAAAAAAUAAAAIcHJpY2VOZXcJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAxyZXR1cm5BbW91bnQFAAAABHVuaXQFAAAAA25pbAUAAAAHZXhlY3V0ZQAAAAAGslZ1",
    "height": 3374492,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 55DQMx8Xr4f29hFRthvsedZhQEXVfiS7Aoj8xpaXMZA
Next: 4Pa5Cm5WckqArLEmss17ooJEMMn5m94vmo61KzKHWwig

Diff: 
Old New Differences
81 81                  let price = getIntegerValue(keyPrice())
82 82                  let tier = getIntegerValue(keyTier())
83 83                  let addressBeneficiary = addressFromStringValue(getStringValue(keyBeneficiaryAddress()))
84 -                 let amountAint = fraction(amount, MULT8, price)
84 +                 let amountAint = fraction(amount, MULT8, price, FLOOR)
85 85                  let amountAintFinal = if ((tier > amountAint))
86 86                      then amountAint
87 87                      else tier
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let AINTID = fromBase58String("BvuzJNB6qUrvEmzGt1PMBZ1QCnBNn2L7ezXHhgQKMxr7")
5 5  
6 6  let WAVESIDSTR = "WAVES"
7 7  
8 8  let WAVESID = fromBase58String(WAVESIDSTR)
9 9  
10 10  let MULT8 = 100000000
11 11  
12 12  let PRICESTEP = (MULT8 / 100)
13 13  
14 14  let SEP = "__"
15 15  
16 16  func keyBeneficiaryAddress () = "%s__beneficiaryAddress"
17 17  
18 18  
19 19  func keyPrice () = "%s__price"
20 20  
21 21  
22 22  func keyTier () = "%s__tier"
23 23  
24 24  
25 25  @Callable(i)
26 26  func constructor (beneficiaryAddressStr58) = if ((this != i.caller))
27 27      then throw("permissions denied")
28 28      else {
29 29          let beneficiaryAddress = addressFromStringValue(beneficiaryAddressStr58)
30 30          let price = MULT8
31 31          let tier = (MULT8 * 10)
32 32  [StringEntry(keyBeneficiaryAddress(), toString(beneficiaryAddress)), IntegerEntry(keyTier(), tier), IntegerEntry(keyPrice(), price)]
33 33          }
34 34  
35 35  
36 36  
37 37  @Callable(i)
38 38  func deposit (hash) = {
39 39      let pmt = i.payments[0]
40 40      let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
41 41      let amount = pmt.amount
42 42      if ((size(i.payments) != 1))
43 43          then throw("exact 1 payment must be attached")
44 44          else if ((pmtAssetId != WAVESID))
45 45              then throw("only WAVES can be used in payment")
46 46              else {
47 47                  let key = ("%s__" + toString(i.caller))
48 48                  let val = ((((("%s%s__" + hash) + SEP) + toString(height)) + SEP) + toString(amount))
49 49  [StringEntry(key, val)]
50 50                  }
51 51      }
52 52  
53 53  
54 54  
55 55  @Callable(i)
56 56  func refund (secret) = {
57 57      let key = ("%s__" + toString(i.caller))
58 58      let val = getStringValue(key)
59 59      let hash = split(val, SEP)[1]
60 60      let h = toInt(parseBigIntValue(split(val, SEP)[2]))
61 61      let amount = parseIntValue(split(val, SEP)[3])
62 62      if ((toBase58String(keccak256(blake2b256(toBytes(secret)))) != hash))
63 63          then throw("secret is wrong")
64 64          else if ((60 > (height - h)))
65 65              then throw("too early to refund")
66 66              else [DeleteEntry(key), ScriptTransfer(i.caller, amount, WAVESID)]
67 67      }
68 68  
69 69  
70 70  
71 71  @Callable(i)
72 72  func mint () = {
73 73      let pmt = i.payments[0]
74 74      let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
75 75      let amount = pmt.amount
76 76      if ((size(i.payments) != 1))
77 77          then throw("exact 1 payment must be attached")
78 78          else if ((pmtAssetId != WAVESID))
79 79              then throw("only WAVES can be used in payment")
80 80              else {
81 81                  let price = getIntegerValue(keyPrice())
82 82                  let tier = getIntegerValue(keyTier())
83 83                  let addressBeneficiary = addressFromStringValue(getStringValue(keyBeneficiaryAddress()))
84 -                 let amountAint = fraction(amount, MULT8, price)
84 +                 let amountAint = fraction(amount, MULT8, price, FLOOR)
85 85                  let amountAintFinal = if ((tier > amountAint))
86 86                      then amountAint
87 87                      else tier
88 88                  let tierNew = if ((tier > amountAint))
89 89                      then (tier - amountAint)
90 90                      else (MULT8 * 10)
91 91                  let priceNew = if ((tier > amountAint))
92 92                      then price
93 93                      else (price + PRICESTEP)
94 94                  let returnAmount = if ((tier >= amountAint))
95 95                      then 0
96 96                      else (amount - fraction(amountAintFinal, price, MULT8))
97 97                  let amountBeneficirary = if ((tier > amountAint))
98 98                      then amount
99 99                      else (amount - returnAmount)
100 100                  let st = ScriptTransfer(i.caller, amountAintFinal, AINTID)
101 101                  let preExecute = [ScriptTransfer(i.caller, amountAintFinal, AINTID), ScriptTransfer(addressBeneficiary, amountBeneficirary, unit), IntegerEntry(keyTier(), tierNew)]
102 102                  let execute = if ((tier > amountAint))
103 103                      then preExecute
104 104                      else (preExecute ++ [IntegerEntry(keyPrice(), priceNew), ScriptTransfer(i.caller, returnAmount, unit)])
105 105                  execute
106 106                  }
107 107      }
108 108  
109 109

Old	New		Differences
81	81		let price = getIntegerValue(keyPrice())
82	82		let tier = getIntegerValue(keyTier())
83	83		let addressBeneficiary = addressFromStringValue(getStringValue(keyBeneficiaryAddress()))
84		-	let amountAint = fraction(amount, MULT8, price)
	84	+	let amountAint = fraction(amount, MULT8, price, FLOOR)
85	85		let amountAintFinal = if ((tier > amountAint))
86	86		then amountAint
87	87		else tier

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let AINTID = fromBase58String("BvuzJNB6qUrvEmzGt1PMBZ1QCnBNn2L7ezXHhgQKMxr7")
5	5
6	6		let WAVESIDSTR = "WAVES"
7	7
8	8		let WAVESID = fromBase58String(WAVESIDSTR)
9	9
10	10		let MULT8 = 100000000
11	11
12	12		let PRICESTEP = (MULT8 / 100)
13	13
14	14		let SEP = "__"
15	15
16	16		func keyBeneficiaryAddress () = "%s__beneficiaryAddress"
17	17
18	18
19	19		func keyPrice () = "%s__price"
20	20
21	21
22	22		func keyTier () = "%s__tier"
23	23
24	24
25	25		@Callable(i)
26	26		func constructor (beneficiaryAddressStr58) = if ((this != i.caller))
27	27		then throw("permissions denied")
28	28		else {
29	29		let beneficiaryAddress = addressFromStringValue(beneficiaryAddressStr58)
30	30		let price = MULT8
31	31		let tier = (MULT8 * 10)
32	32		[StringEntry(keyBeneficiaryAddress(), toString(beneficiaryAddress)), IntegerEntry(keyTier(), tier), IntegerEntry(keyPrice(), price)]
33	33		}
34	34
35	35
36	36
37	37		@Callable(i)
38	38		func deposit (hash) = {
39	39		let pmt = i.payments[0]
40	40		let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
41	41		let amount = pmt.amount
42	42		if ((size(i.payments) != 1))
43	43		then throw("exact 1 payment must be attached")
44	44		else if ((pmtAssetId != WAVESID))
45	45		then throw("only WAVES can be used in payment")
46	46		else {
47	47		let key = ("%s__" + toString(i.caller))
48	48		let val = ((((("%s%s__" + hash) + SEP) + toString(height)) + SEP) + toString(amount))
49	49		[StringEntry(key, val)]
50	50		}
51	51		}
52	52
53	53
54	54
55	55		@Callable(i)
56	56		func refund (secret) = {
57	57		let key = ("%s__" + toString(i.caller))
58	58		let val = getStringValue(key)
59	59		let hash = split(val, SEP)[1]
60	60		let h = toInt(parseBigIntValue(split(val, SEP)[2]))
61	61		let amount = parseIntValue(split(val, SEP)[3])
62	62		if ((toBase58String(keccak256(blake2b256(toBytes(secret)))) != hash))
63	63		then throw("secret is wrong")
64	64		else if ((60 > (height - h)))
65	65		then throw("too early to refund")
66	66		else [DeleteEntry(key), ScriptTransfer(i.caller, amount, WAVESID)]
67	67		}
68	68
69	69
70	70
71	71		@Callable(i)
72	72		func mint () = {
73	73		let pmt = i.payments[0]
74	74		let pmtAssetId = valueOrElse(pmt.assetId, WAVESID)
75	75		let amount = pmt.amount
76	76		if ((size(i.payments) != 1))
77	77		then throw("exact 1 payment must be attached")
78	78		else if ((pmtAssetId != WAVESID))
79	79		then throw("only WAVES can be used in payment")
80	80		else {
81	81		let price = getIntegerValue(keyPrice())
82	82		let tier = getIntegerValue(keyTier())
83	83		let addressBeneficiary = addressFromStringValue(getStringValue(keyBeneficiaryAddress()))
84		-	let amountAint = fraction(amount, MULT8, price)
	84	+	let amountAint = fraction(amount, MULT8, price, FLOOR)
85	85		let amountAintFinal = if ((tier > amountAint))
86	86		then amountAint
87	87		else tier
88	88		let tierNew = if ((tier > amountAint))
89	89		then (tier - amountAint)
90	90		else (MULT8 * 10)
91	91		let priceNew = if ((tier > amountAint))
92	92		then price
93	93		else (price + PRICESTEP)
94	94		let returnAmount = if ((tier >= amountAint))
95	95		then 0
96	96		else (amount - fraction(amountAintFinal, price, MULT8))
97	97		let amountBeneficirary = if ((tier > amountAint))
98	98		then amount
99	99		else (amount - returnAmount)
100	100		let st = ScriptTransfer(i.caller, amountAintFinal, AINTID)
101	101		let preExecute = [ScriptTransfer(i.caller, amountAintFinal, AINTID), ScriptTransfer(addressBeneficiary, amountBeneficirary, unit), IntegerEntry(keyTier(), tierNew)]
102	102		let execute = if ((tier > amountAint))
103	103		then preExecute
104	104		else (preExecute ++ [IntegerEntry(keyPrice(), priceNew), ScriptTransfer(i.caller, returnAmount, unit)])
105	105		execute
106	106		}
107	107		}
108	108
109	109

github/deemru/w8io/3ef1775 
36.72 ms ◑