API tools faq
paste
View difference between Paste ID: PfTFgNxJ and qVYV3J5n
SHOW: | | - or go back to the newest paste.
1
-- Caesium
2
caes = elements.allocate("RAD", "CAES") --properties
3
elements.element(caes, elements.element(elements.DEFAULT_PT_COAL))
4
elements.property(caes, "Name", "CAES")
5
elements.property(caes, "Description", "Caesium. Highly reactive and will violently explode in water.")
6
elements.property(caes, "Colour", 0xD8D8D8)
7
elements.property(caes, "MenuSection", 10)
8
elements.property(caes, "Gravity", 0)
9
elements.property(caes, "Properties", elements.ST_SOLID + elements.TYPE_SOLID + elements.PROP_DEADLY)
10
elements.property(caes, "Flammable", 0)
11
elements.property(caes, "Explosive", 0)
12
function propc(i,x,y,s,n)
13
local ctemp = tpt.get_property("temp", i) -- melt into Liquid Caesium
14
	if ctemp > 301.59 then
15
	tpt.set_property("type", "lcas", i)
16
	end
17
	if math.random(1, 7500) == 1 then -- decay
18
	local ran = math.random(-20,20)
19
	local ran2 = math.random(-20,0)
20
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "nble")
21
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "hygn")
22
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "plsm")
23
	tpt.set_property("vx", math.random(-25,25), i)
24
	tpt.set_property("vy", math.random(-25,25), i)
25
	tpt.set_property("life", 10000, i)
26
		if math.abs(ran) + math.abs(ran2) > 10 then
27
		local ran3 = math.random(1,4)
28
			if ran3 == 1 then
29
			tpt.set_property("type", "elec", i)
30
			end
31
			if ran3 == 2 then
32
			tpt.set_property("type", "phot", i)
33
			end
34
			if ran3 == 3 then
35
			tpt.set_property("type", "prot", i)
36
			end
37
			if ran3 == 4 then
38
			tpt.set_property("type", "neut", i)
39
			end
40
		end
41
	end
42
43-
local colx = math.random(-1,1)
43+
local colx = math.random(-1,1) -- react with water
44
local coly = math.random(-1,1)
45
local coltype = tpt.get_property("type", x+colx, y+coly)
46
local temp = tpt.get_property("temp", i)
47
	if coltype == elements.DEFAULT_PT_WATR then
48
	if math.random(0,1) == 1 then
49
	local ran = x+math.random(-1,1)
50
	local ran2 = y+math.random(-1,1)
51
	tpt.create(ran, ran2, "mort")
52
	tpt.set_property("vx", math.random(-25,25) , ran)
53
	tpt.set_property("vy", math.random(-25,25) , ran2)
54
	end
55
	tpt.set_pressure(x,y,10,10,100)
56
	tpt.set_property("life", 10000, i)
57
	tpt.set_property("vx", math.random(-25,25), i)
58
	tpt.set_property("vy", math.random(-25,25), i)
59
	tpt.set_property("temp", temp + 1000 ,i)
60
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "nble")
61
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "hygn")
62
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "plsm")
63
	tpt.set_property("type", "hygn", coltype)
64
	local rand = math.random(1,4)
65
		if rand == 1 then
66
		tpt.set_property("type", "elec", i)
67
		end
68
		if rand == 2 then
69
		tpt.set_property("type", "phot", i)
70
		end
71
		if rand == 3 then
72
		tpt.set_property("type", "prot", i)
73
		end
74
		if rand == 4 then
75
		tpt.set_property("type", "neut", i)
76
		end
77
	end
78
	if coltype == elements.DEFAULT_PT_DSTW then
79
	if math.random(0,1) == 1 then
80
	local ran = x+math.random(-1,1)
81
	local ran2 = y+math.random(-1,1)
82
	tpt.create(ran, ran2, "mort")
83
	tpt.set_property("vx", math.random(-25,25) , ran)
84
	tpt.set_property("vy", math.random(-25,25) , ran2)
85
	end
86
	tpt.set_pressure(x,y,10,10,100)
87
	tpt.set_property("life", 10000, i)
88
	tpt.set_property("vx", math.random(-25,25), i)
89
	tpt.set_property("vy", math.random(-25,25), i)
90
	local rand = math.random(1,4)
91
		if rand == 1 then
92
				tpt.set_property("type", "elec", i)
93
		end
94
		if rand == 2 then
95
		tpt.set_property("type", "phot", i)
96
		end
97
		if rand == 3 then
98
		tpt.set_property("type", "prot", i)
99
		end
100
				if rand == 4 then
101
		tpt.set_property("type", "neut", i)
102
		end
103
	tpt.set_property("temp", temp + 1000 ,i)
104
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "nble")
105
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "hygn")
106
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "plsm")
107
	tpt.set_property("type", "hygn", coltype)
108
	end
109
	if coltype == elements.DEFAULT_PT_SLTW then
110
	if math.random(0,1) == 1 then
111
	local ran = x+math.random(-1,1)
112
	local ran2 = y+math.random(-1,1)
113
	tpt.create(ran, ran2, "mort")
114
	tpt.set_property("vx", math.random(-25,25) , ran)
115
	tpt.set_property("vy", math.random(-25,25) , ran2)
116
	end
117
	tpt.set_pressure(x,y,10,10,100)
118
	tpt.set_property("life", 10000, i)
119
	tpt.set_property("vx", math.random(-25,25), i)
120
	tpt.set_property("vy", math.random(-25,25), i)
121
	local rand = math.random(1,4)
122
		if rand == 1 then
123
		tpt.set_property("type", "elec", i)
124
		end
125
		if rand == 2 then
126
		tpt.set_property("type", "phot", i)
127
		end
128
		if rand == 3 then
129
		tpt.set_property("type", "prot", i)
130
		end
131
		if rand == 4 then
132
		tpt.set_property("type", "neut", i)
133
		end
134
	tpt.set_property("temp", temp + 1000 ,i)
135
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "nble")
136
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "hygn")
137
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "plsm")
138
	tpt.set_property("type", "hygn", coltype)
139
	end
140
end
141
tpt.element_func(propc, tpt.element("caes"))
142
elements.property(caes, "HighTemperature", 1938)
143
-- Liquid Caesium
144
Lcas = elements.allocate("RAD", "LCAS") -- properties
145
elements.element(Lcas, elements.element(elements.DEFAULT_PT_EXOT))
146
elements.property(Lcas, "Name", "LCAS")
147
elements.property(Lcas, "Description", "Liquid Caesium. Highly reactive and will violently explode in water.")
148
elements.property(Lcas, "Colour", 0xD9D9D9)
149
elements.property(Lcas, "MenuSection", 10)
150
elements.property(Lcas, "Gravity", 1)
151
elements.property(Lcas, "Weight", 10)
152
elements.property(Lcas, "Flammable", 0)
153
elements.property(Lcas, "Explosive", 0)
154
elements.property(caes, "Properties", elements.ST_LIQUID + elements.TYPE_LIQUID + elements.PROP_DEADLY)
155
function proplcas(i,x,y,s,n)
156
local ctemp = tpt.get_property("temp", i) -- decay
157
	if math.random(1, 7500) == 1 then
158
	local ran = math.random(-20,20)
159
	local ran2 = math.random(-20,0)
160
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "nble")
161
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "hygn")
162
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "plsm")
163
	tpt.set_property("life", 10000, i)
164
	tpt.set_property("vx", math.random(-25,25), i)
165
	tpt.set_property("vy", math.random(-25,25), i)
166
		if math.abs(ran) + math.abs(ran2) > 10 then
167
		local ran3 = math.random(1,4)
168
			if ran3 == 1 then
169
			tpt.set_property("type", "elec", i)
170
			end
171
			if ran3 == 2 then
172
			tpt.set_property("type", "phot", i)
173
			end
174
			if ran3 == 3 then
175
			tpt.set_property("type", "prot", i)
176
			end
177
			if ran3 == 4 then
178
			tpt.set_property("type", "neut", i)
179
			end
180
		end
181
	end
182
local colx = math.random(-1,1) -- react w/ water
183
local coly = math.random(-1,1)
184
local coltype = tpt.get_property("type", x+colx, y+coly)
185
local temp = tpt.get_property("temp", i)
186
	if coltype == elements.DEFAULT_PT_WATR then
187
	if math.random(0,1) == 1 then
188
	local ran = x+math.random(-1,1)
189
	local ran2 = y+math.random(-1,1)
190
	tpt.create(ran, ran2, "mort")
191
	tpt.set_property("vx", math.random(-25,25) , ran)
192
	tpt.set_property("vy", math.random(-25,25) , ran2)
193
	end
194
	tpt.set_pressure(x,y,10,10,100)
195
	tpt.set_property("life", 10000, i)
196
	tpt.set_property("vx", math.random(-25,25), i)
197
	tpt.set_property("vy", math.random(-25,25), i)
198
	local rand = math.random(1,4)
199
		if rand == 1 then
200
		tpt.set_property("type", "elec", i)
201
		end
202
		if rand == 2 then
203
		tpt.set_property("type", "phot", i)
204
		end
205
		if rand == 3 then
206
		tpt.set_property("type", "prot", i)
207
		end
208
		if rand == 4 then
209
		tpt.set_property("type", "neut", i)
210
		end
211
	tpt.set_property("temp", temp + 1000 ,i)
212
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "nble")
213
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "hygn")
214
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "plsm")
215
	tpt.set_property("type", "hygn", coltype)
216
	end
217
	if coltype == elements.DEFAULT_PT_DSTW then
218
	if math.random(0,1) == 1 then
219
	local ran = x+math.random(-1,1)
220
	local ran2 = y+math.random(-1,1)
221
	tpt.create(ran, ran2, "mort")
222
	tpt.set_property("vx", math.random(-25,25) , ran)
223
	tpt.set_property("vy", math.random(-25,25) , ran2)
224
	end
225
	tpt.set_pressure(x,y,10,10,100)
226
	tpt.set_property("life", 10000, i)
227
	tpt.set_property("vx", math.random(-25,25), i)
228
	tpt.set_property("vy", math.random(-25,25), i)
229
	local rand = math.random(1,4)
230
		if rand == 1 then
231
		tpt.set_property("type", "elec", i)
232
		end
233
		if rand == 2 then
234
		tpt.set_property("type", "phot", i)
235
		end
236
		if rand == 3 then
237
		tpt.set_property("type", "prot", i)
238
		end
239
		if rand == 4 then
240
		tpt.set_property("type", "neut", i)
241
		end
242
	tpt.set_property("temp", temp + 1000 ,i)
243
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "nble")
244
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "hygn")
245
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "plsm")
246
	tpt.set_property("type", "hygn", coltype)
247
	end
248
	if coltype == elements.DEFAULT_PT_SLTW then
249
	if math.random(0,1) == 1 then
250
	local ran = x+math.random(-1,1)
251
	local ran2 = y+math.random(-1,1)
252
	tpt.create(ran, ran2, "mort")
253
	tpt.set_property("vx", math.random(-25,25) , ran)
254
	tpt.set_property("vy", math.random(-25,25) , ran2)
255
	end
256
	tpt.set_pressure(x,y,10,10,100)
257
	tpt.set_property("life", 10000, i)
258
	tpt.set_property("vx", math.random(-25,25), i)
259
	tpt.set_property("vy", math.random(-25,25), i)
260
	local rand = math.random(1,4)
261
		if rand == 1 then
262
		tpt.set_property("type", "elec", i)
263
		end
264
		if rand == 2 then
265
		tpt.set_property("type", "phot", i)
266
		end
267
		if rand == 3 then
268
		tpt.set_property("type", "prot", i)
269
		end
270
		if rand == 4 then
271
		tpt.set_property("type", "neut", i)
272
		end
273
	tpt.set_property("temp", temp + 1000 ,i)
274
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "nble")
275
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "hygn")
276
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "plsm")
277
	tpt.set_property("type", "hygn", coltype)
278
	end
279
end
280
elements.property(Lcas, "LowTemperature", 200) -- turn into Solid Caesium
281
tpt.element_func(proplcas, tpt.element("lcas"))
282
elements.property(Lcas, "LowTemperatureTransition", caes)
283
-- Palladium
284
-- notes: Asorbs hydrogen, acid resistant, melts at 1833.15, solidifies at about 1700
285
Pald = elements.allocate("STB", "PALD") --properties
286
elements.element(Pald, elements.element(elements.DEFAULT_PT_GLAS))
287
elements.property(Pald, "Name", "PALD")
288
elements.property(Pald, "Description", "Palladium. Adsorbs Hydrogen and doesn't corrode.")
289
elements.property(Pald, "Colour", 0xFFABBBBF)
290
elements.property(Pald, "MenuSection", 9)
291
elements.property(Pald, "Gravity", 0)
292
elements.property(Pald, "Properties", elements.ST_SOLID + elements.TYPE_SOLID + elements.PROP_CONDUCTS)
293
elements.property(Pald, "Flammable", 0)
294
elements.property(Pald, "Explosive", 0)
295
elements.property(Pald, "HighTemperature", 1833.15)
296
function propp(i,x,y,s,nt)
297
local life = tpt.get_property("life", i)
298
	if life >= 1 then
299
	tpt.set_property("life", 0 , i)
300
	end
301
-- adsorbs hydrogen
302
local collx = math.random(-1,1)
303
local colly = math.random(-1,1)
304
hygn = tpt.get_property("type", x+collx, y+colly)
305
	if hygn == elements.DEFAULT_PT_HYGN then
306
	tpt.delete(x+collx, y+colly)
307
	end
308
end
309
tpt.element_func(propp, tpt.element("pald"))
310
-- Radium
311
-- notes: Emits light and decays, soft and a white to black colour. Radium corrodes in water. Dangerous to humans. Melts at 973.15 boils at 1413.15.
312
Radi = elements.allocate("RAD", "RADI") --properties
313
elements.element(Radi, elements.element(elements.DEFAULT_PT_TTAN))
314
elements.property(Radi, "Name", "RADI")
315
elements.property(Radi, "Description", "Radium. Emits light and slowly corrodes in water.")
316
elements.property(Radi, "Colour", 0xFFFFFFFF)
317
elements.property(Radi, "MenuSection", 10)
318
elements.property(Radi, "Gravity", 0)
319
elements.property(Radi, "Properties", elements.ST_SOLID + elements.TYPE_SOLID + elements.PROP_DEADLY)
320
elements.property(Radi, "Flammable", 0)
321
elements.property(Radi, "Explosive", 0)
322
elements.property(Radi, "HighTemperature", 1413.15)
323
function propr(i,x,y,s,n)
324
local ratemp = tpt.get_property("temp",i)
325
	if ratemp > 973.15 then
326
	tpt.set_property("type","lrad",i)
327
	end
328
	if math.random(0,100) == 1 then -- create photons and decay
329
	local mathx = math.random(-1,1)
330
	local mathy = math.random(-1,1)
331
	tpt.create(x+mathx, y+mathy, "PHOT")
332
	tpt.set_property("life",680,mathx,mathy)
333
		if(math.random(0,7500) == 1) then
334
		tpt.set_property("life", 10000, i)
335
		tpt.set_property("vx", math.random(-25,25), i)
336
		tpt.set_property("vy", math.random(-25,25), i)
337
		tpt.set_property("type", "neut", i)
338
		end
339
	end
340
local nx = math.random(-1,1) -- react w/ water
341
local nx2 = math.random(-1,1)
342
watr = tpt.get_property("type", x+nx, y+nx2)
343
	if watr == elements.DEFAULT_PT_WATR then
344
		if math.random(0,7500) == 1 then
345
		tpt.set_property("type","exot",i)
346
		end
347
	end
348
	if watr == elements.DEFAULT_PT_DSTW then
349
		if math.random(0,7500) == 1 then
350
		tpt.set_property("type","exot",i)
351
		end
352
	end
353
	if watr == elements.DEFAULT_PT_SLTW then
354
		if math.random(0,7500) == 1 then
355
		tpt.set_property("type","exot",i)
356
		end
357
	end
358
end
359
tpt.element_func(propr, tpt.element("radi"))
360
-- Liquid Radium
361
-- notes:
362
Lrad = elements.allocate("RAD", "Lrad") --properties
363
elements.element(Lrad, elements.element(elements.DEFAULT_PT_MERC))
364
elements.property(Lrad, "Name", "LRAD")
365
elements.property(Lrad, "Description", "Liquid Radium. Emits light and slowly corrodes in water.")
366
elements.property(Lrad, "Colour", 0xFFFFFFFF)
367
elements.property(Lrad, "MenuSection", 10)
368
elements.property(Lrad, "Gravity", 1)
369
elements.property(Lrad, "Properties", elements.ST_LIQUID + elements.TYPE_LIQUID + elements.PROP_DEADLY)
370
elements.property(Lrad, "Flammable", 0)
371
elements.property(Lrad, "Explosive", 0)
372
elements.property(Lrad, "HighTemperature", 1413.15)
373
elements.property(Lrad, "LowTemperature", 1300)
374
elements.property(Lrad, "LowTemperatureTransition", Radi)
375
function proplr(i,x,y,s,n)
376
local lrtemp = tpt.get_property("temp",i)
377
tpt.set_property("temp", lrtemp + 973.15, i)
378
	if math.random(0,100) == 1 then -- decay and create photons
379
	local mathx = math.random(-1,1)
380
	local mathy = math.random(-1,1)
381
	tpt.create(x+mathx, y+mathy, "PHOT")
382
	tpt.set_property("life",680,x+mathx, y+mathy)
383-
	if tempm > 1380.15 then
383+
384
		tpt.set_property("life", 10000, i)

385
		tpt.set_property("vx", math.random(-25,25), i)

386
		tpt.set_property("vy", math.random(-25,25), i) 

387
		tpt.set_property("type", "neut", i)

388
		end

389
	end 

390
local nx = math.random(-1,1) -- react w/ water

391-
		tpt.set_property("type", "FIRE", i)

391+
392
watr = tpt.get_property("type", x+nx, y+nx2)

393
	if watr == elements.DEFAULT_PT_WATR then

394
		if math.random(0,7500) == 1 then

395
		tpt.set_property("type","exot",i)

396
		end

397
	end

398
	if watr == elements.DEFAULT_PT_DSTW then

399
		if math.random(0,7500) == 1 then

400
		tpt.set_property("type","exot",i)

401
		end

402
	end

403
	if watr == elements.DEFAULT_PT_SLTW then

404
		if math.random(0,7500) == 1 then

405
		tpt.set_property("type","exot",i)

406
		end

407
	end		

408
end

409
tpt.element_func(proplr, tpt.element("lrad"))

410
-- Magnesium 

411
-- notes: Burns with fire or plasma, flame is very hot. Melts (or burns) at 923.15. Boils at 1380.15. Burns with white flame. Creates hydrogen with acid.

412
Magn = elements.allocate("STB", "MAGN") --properties

413
elements.element(Magn, elements.element(elements.DEFAULT_PT_GLAS))

414
elements.property(Magn, "Name", "MAGN")

415
elements.property(Magn, "Description", "Magnesium. Burns with an intense flame.")

416
elements.property(Magn, "Colour", 0x586165)

417
elements.property(Magn, "MenuSection", 9)

418
elements.property(Magn, "Gravity", 0)

419
elements.property(Magn, "Properties", elements.ST_SOLID + elements.TYPE_SOLID)

420
elements.property(Magn, "Flammable", 0)

421
elements.property(Magn, "Explosive", 0)

422
elements.property(Magn, "HighTemperature", 100000)

423
function propmag(i,x,y,s,n)

424
local tempm = tpt.get_property("temp", i) -- burn with temperature.

425
	if tempm > 1380.15 and math.random(0,10) == 1 then

426
	tpt.set_property("life", 500, i)

427
	tpt.set_property("temp", 6500, i)

428
	local magran = math.random(1,3)

429
		if magran == 1 then

430
		tpt.set_property("type", "PLSM", i)

431
		end

432
		if magran == 2 then

433
		if math.random(0,10) == 1 then

434
			tpt.set_property("vx", math.random(-5,5), i)

435
			tpt.set_property("vy", math.random(-5,5), i)

436
			tpt.set_property("life", 250, i)

437
			tpt.set_property("type", "MORT", i)

438
		else

439
		tpt.set_property("type", "PLSM", i)

440
		end

441
		end

442
		if magran == 3 then

443
		tpt.set_property("life", 1000, i)

444
		tpt.set_property("type", "PLSM", i)

445
		end

446
	end

447
local magx = math.random(-1,1)

448
local magy = math.random(-1,1)

449
local acid = tpt.get_property("type", x+magx, y+magy) -- react with acid

450
	if acid == elements.DEFAULT_PT_ACID then

451
	tpt.set_property("type", "HYGN", i)

452
	tpt.set_property("type", "HYGN", acid)

453
	end

454
end

455
tpt.element_func(propmag, tpt.element("magn"))

456
-- Francium

457
-- notes: Violently explodes in water. 

458
Fran = elements.allocate("RAD", "Fran") --properties

459
elements.element(Fran, elements.element(elements.DEFAULT_PT_BCOL))

460
elements.property(Fran, "Name", "FRAN")

461
elements.property(Fran, "Description", "Francium. Highly unstable and will decay within seconds. Do not place in water.")

462
elements.property(Fran, "Colour", 0xC0C0C0)

463
elements.property(Fran, "MenuSection", 10)

464
elements.property(Fran, "Weight", 100)

465
elements.property(Fran, "Gravity", 1)

466
elements.property(Fran, "Properties", elements.ST_SOLID + elements.TYPE_SOLID + elements.PROP_DEADLY)

467
elements.property(Fran, "Flammable", 0)

468
elements.property(Fran, "Explosive", 0)

469
elements.property(Fran, "HighTemperature", 100000)

470
function propfr(i,x,y,s,n)

471
	if math.random(0,25) == 1 then

472
		local frdecay = math.random(1,7) -- decay

473
		local frtemp = tpt.get_property("temp", i)

474
		tpt.set_property("life", math.random(500,1000),i)

475
		tpt.set_property("vx", math.random(-25,25), i)

476
		tpt.set_property("vy", math.random(-25,25), i) 

477
		tpt.create(x+math.random(-1,1), y+math.random(-1,1), "nble")

478
		tpt.create(x+math.random(-1,1), y+math.random(-1,1), "hygn")

479
		tpt.create(x+math.random(-1,1), y+math.random(-1,1), "plsm")

480
			if frdecay == 1 then 

481
			tpt.set_property("temp", frtemp + 50000 , i)

482
			tpt.set_property("type", "PHOT", i)

483
			end

484
			if frdecay == 2 then

485
			tpt.set_property("type", "PHOT", i)

486
			end

487
			if frdecay == 3 then 

488
			tpt.set_property("type", "PROT", i)

489
			end

490
			if frdecay == 4 then 

491
			tpt.set_property("type", "NEUT", i)

492
			end

493
			if frdecay == 5 then 

494
			tpt.set_property("type", "NEUT", i)

495
			end

496
			if frdecay == 5 then 

497
			tpt.set_property("type", "NBLE", i)

498
			end

499
			if frdecay == 5 then 

500
			tpt.set_property("type", "PROT", i)

501
			end

502
	end

503
local col = math.random(-1,1) -- react with water

504
local col2 = math.random(-1,1)

505
colltype = tpt.get_property("type", x+col, y+col2)

506
	if colltype == elements.DEFAULT_PT_WATR then

507
	if math.random(0,1) == 1 then

508
	local ran = x+math.random(-1,1)

509
	local ran2 = y+math.random(-1,1)

510
	tpt.create(ran, ran2, "mort")

511
	tpt.set_property("vx", math.random(-25,25) , ran)

512
	tpt.set_property("vy", math.random(-25,25) , ran2)

513
	end

514
	local frdecay = math.random(1,7)

515
	local frtemp = tpt.get_property("temp", i)

516
	tpt.set_property("type", "PHOT", colltype)

517
	tpt.set_property("life", math.random(500,1000),i)

518
	tpt.set_property("vx", math.random(-25,25), i)

519
	tpt.set_property("vy", math.random(-25,25), i) 

520
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "nble")

521
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "hygn")

522
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "plsm")

523
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "thdr")

524
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "caes")

525
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "magn")

526
	tpt.set_pressure(x,y,1,1,200)

527
	    if frdecay == 1 then 

528
		tpt.set_property("temp", frtemp + 50000 , i)

529
		tpt.set_property("type", "PHOT", i)

530
		end

531
		if frdecay == 2 then

532
		tpt.set_property("type", "PHOT", i)

533
		end

534
		if frdecay == 3 then 

535
		tpt.set_property("type", "PROT", i)

536
		end

537
		if frdecay == 4 then 

538
		tpt.set_property("type", "NEUT", i)

539
		end

540
		if frdecay == 5 then 

541
		tpt.set_property("type", "NEUT", i)

542
		end

543
		if frdecay == 5 then 

544
		tpt.set_property("type", "NBLE", i)

545
		end

546
		if frdecay == 5 then 

547
		tpt.set_property("type", "PROT", i)

548
		end

549
	end

550
	if colltype == elements.DEFAULT_PT_DSTW then

551
	if math.random(0,1) == 1 then

552
	local ran = x+math.random(-1,1)

553
	local ran2 = y+math.random(-1,1)

554
	tpt.create(ran, ran2, "mort")

555
	tpt.set_property("vx", math.random(-25,25) , ran)

556
	tpt.set_property("vy", math.random(-25,25) , ran2)

557
	end

558
	local frdecay = math.random(1,7)

559
	local frtemp = tpt.get_property("temp", i)

560
	tpt.set_property("life", math.random(500,1000),i)

561
	tpt.set_property("vx", math.random(-25,25), i)

562
	tpt.set_property("vy", math.random(-25,25), i) 

563
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "nble")

564
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "hygn")

565
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "plsm")

566
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "thdr")

567
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "caes")

568
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "magn")

569
	tpt.set_pressure(x,y,10,10,200)

570
	    if frdecay == 1 then 

571
		tpt.set_property("temp", frtemp + 50000 , i)

572
		tpt.set_property("type", "PHOT", i)

573
		end

574
		if frdecay == 2 then

575
		tpt.set_property("type", "PHOT", i)

576
		end

577
		if frdecay == 3 then 

578
		tpt.set_property("type", "PROT", i)

579
		end

580
		if frdecay == 4 then 

581
		tpt.set_property("type", "NEUT", i)

582
		end

583
		if frdecay == 5 then 

584
		tpt.set_property("type", "NEUT", i)

585
		end

586
		if frdecay == 5 then 

587
		tpt.set_property("type", "NBLE", i)

588
		end

589
		if frdecay == 5 then 

590
		tpt.set_property("type", "PROT", i)

591
		end

592
	end

593
	if colltype == elements.DEFAULT_PT_SLTW then

594
	if math.random(0,1) == 1 then

595
	local ran = x+math.random(-1,1)

596
	local ran2 = y+math.random(-1,1)

597
	tpt.create(ran, ran2, "mort")

598
	tpt.set_property("vx", math.random(-25,25) , ran)

599
	tpt.set_property("vy", math.random(-25,25) , ran2)

600
	end

601
	local frdecay = math.random(1,7)

602
	local frtemp = tpt.get_property("temp", i)

603
	tpt.set_property("life", math.random(500,1000),i)

604
	tpt.set_property("vx", math.random(-25,25), i)

605
	tpt.set_property("vy", math.random(-25,25), i) 

606
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "nble")

607
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "hygn")

608
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "plsm")

609
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "thdr")

610
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "caes")

611
	tpt.create(x+math.random(-1,1), y+math.random(-1,1), "magn")

612
	tpt.set_pressure(x,y,10,10,200)

613
	    if frdecay == 1 then 

614
		tpt.set_property("temp", frtemp + 50000 , i)

615
		tpt.set_property("type", "PHOT", i)

616
		end

617
		if frdecay == 2 then

618
		tpt.set_property("type", "PHOT", i)

619
		end

620
		if frdecay == 3 then 

621
		tpt.set_property("type", "PROT", i)

622
		end

623
		if frdecay == 4 then 

624
		tpt.set_property("type", "NEUT", i)

625
		end

626
		if frdecay == 5 then 

627
		tpt.set_property("type", "NEUT", i)

628
		end

629
		if frdecay == 5 then 

630
		tpt.set_property("type", "NBLE", i)

631
		end

632
		if frdecay == 5 then 

633
		tpt.set_property("type", "PROT", i)

634
		end

635
	end

636
end

637
tpt.element_func(propfr, tpt.element("Fran"))
        

    


            


                                


        

            



                
    

        Public Pastes
    

    
            

    

                    

        

    





    


    
    
    
    
    
    
    
    




    


    



                

            We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.             OK, I Understand
        

    
                

            

                
                    
                
            

            

                Not a member of Pastebin yet?

                Sign Up, it unlocks many cool features!