author | Wuzzy <Wuzzy2@mail.ru> |
Mon, 12 Feb 2018 17:22:29 +0100 | |
changeset 12987 | ba577e0b8c27 |
parent 11487 | b053f1fb631d |
child 13283 | 7476c1a50738 |
permissions | -rw-r--r-- |
10969
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
1 |
HedgewarsScriptLoad("/Scripts/Params.lua") |
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
2 |
|
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
3 |
local ObjectList = {} |
10604 | 4 |
|
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
5 |
-- Overall padding for roping freedom |
10969
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
6 |
local Padding = 430 |
11487 | 7 |
local TeamRope = false |
10969
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
8 |
|
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
9 |
function onParameters() |
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
10 |
parseParams() |
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
11 |
if params["pad"] ~= nil then |
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
12 |
Padding = params["pad"] |
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
13 |
end |
11487 | 14 |
if params["teamrope"] ~= nil then |
15 |
TeamRope = true |
|
16 |
end |
|
10969
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
17 |
end |
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
18 |
|
11487 | 19 |
function onGearAdd(gear) |
20 |
if GetGearType(gear) == gtRope and TeamRope then |
|
21 |
SetTag(gear,1) |
|
22 |
SetGearValues(gear,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,GetClanColor(GetHogClan(CurrentHedgehog))) |
|
23 |
end |
|
24 |
end |
|
25 |
||
26 |
||
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
27 |
-- This could probably use less points and more precision |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
28 |
-- 700x700 for object space |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
29 |
function DrawStar(x, y, d, f) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
30 |
-- default scale is 700x700 or so |
9257 | 31 |
local s = 700 |
32 |
local i = 0 |
|
33 |
local j = 0 |
|
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
34 |
if not(d == 1) then s = div(s,d) end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
35 |
if NoOverlap(x,y,s,s) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
36 |
AddCollision(x,y,s,s) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
37 |
if not(d == 1) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
38 |
i = 6-d |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
39 |
j = math.min(div(5,d),1) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
40 |
-- centre |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
41 |
AddPoint(x,y,div(20,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
42 |
-- arms |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
43 |
AddPoint(x-div(325,d),y-f*div(108,d),2) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
44 |
AddPoint(x+div(325,d),y-f*div(108,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
45 |
AddPoint(x-div(205,d),y+f*div(270,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
46 |
AddPoint(x,y-f*div(345,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
47 |
AddPoint(x+div(205,d),y+f*div(270,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
48 |
AddPoint(x-div(325,d),y-f*div(108,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
49 |
if d < 4 then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
50 |
-- fill in arm 1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
51 |
AddPoint(x-div(275,d),y-f*div(92,d),i) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
52 |
AddPoint(x-div(50,d),y-f*div(92,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
53 |
AddPoint(x-div(105,d),y+f*div(25,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
54 |
AddPoint(x-div(250,d),y-f*div(80,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
55 |
AddPoint(x-div(115,d),y-f*div(70,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
56 |
AddPoint(x-div(130,d),y-f*div(25,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
57 |
AddPoint(x-div(175,d),y-f*div(60,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
58 |
-- fill in arm 2 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
59 |
AddPoint(x+div(275,d),y-f*div(92,d),i) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
60 |
AddPoint(x+div(50,d),y-f*div(92,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
61 |
AddPoint(x+div(105,d),y+f*div(25,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
62 |
AddPoint(x+div(250,d),y-f*div(80,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
63 |
AddPoint(x+div(115,d),y-f*div(70,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
64 |
AddPoint(x+div(130,d),y-f*div(25,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
65 |
AddPoint(x+div(175,d),y-f*div(60,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
66 |
-- fill in arm 3 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
67 |
AddPoint(x-div(175,d),y+f*div(230,d),i) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
68 |
AddPoint(x-div(110,d),y+f*div(60,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
69 |
AddPoint(x,y+f*div(120,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
70 |
AddPoint(x-div(155,d),y+f*div(215,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
71 |
AddPoint(x-div(105,d),y+f*div(95,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
72 |
AddPoint(x-div(60,d),y+f*div(130,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
73 |
AddPoint(x-div(85,d),y+f*div(155,d),j) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
74 |
-- fill in arm 4 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
75 |
AddPoint(x,y-f*div(300,d),3) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
76 |
AddPoint(x+div(50,d),y-f*div(125,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
77 |
AddPoint(x-div(50,d),y-f*div(125,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
78 |
AddPoint(x,y-f*div(270,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
79 |
AddPoint(x-div(40,d),y-f*div(160,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
80 |
AddPoint(x+div(40,d),y-f*div(160,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
81 |
AddPoint(x,y-f*div(195,d),j) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
82 |
-- fill in arm 5 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
83 |
AddPoint(x+div(175,d),y+f*div(230,d),i) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
84 |
AddPoint(x+div(110,d),y+f*div(60,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
85 |
AddPoint(x,y+f*div(120,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
86 |
AddPoint(x+div(155,d),y+f*div(215,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
87 |
AddPoint(x+div(105,d),y+f*div(95,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
88 |
AddPoint(x+div(60,d),y+f*div(130,d)) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
89 |
AddPoint(x+div(85,d),y+f*div(155,d),j) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
90 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
91 |
else |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
92 |
-- centre |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
93 |
AddPoint(x,y,20) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
94 |
-- arms |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
95 |
AddPoint(x-325,y-f*108,1) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
96 |
AddPoint(x+325,y-f*108) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
97 |
AddPoint(x-205,y+f*270) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
98 |
AddPoint(x,y-f*345) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
99 |
AddPoint(x+205,y+f*270) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
100 |
AddPoint(x-325,y-f*108) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
101 |
-- fill in arm 1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
102 |
AddPoint(x-275,y-f*92,4) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
103 |
AddPoint(x-50,y-f*92) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
104 |
AddPoint(x-105,y+f*25) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
105 |
AddPoint(x-250,y-f*80) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
106 |
AddPoint(x-115,y-f*70) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
107 |
AddPoint(x-130,y-f*25) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
108 |
AddPoint(x-175,y-f*60) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
109 |
-- fill in arm 2 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
110 |
AddPoint(x+275,y-f*92,4) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
111 |
AddPoint(x+50,y-f*92) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
112 |
AddPoint(x+105,y+f*25) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
113 |
AddPoint(x+250,y-f*80) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
114 |
AddPoint(x+115,y-f*70) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
115 |
AddPoint(x+130,y-f*25) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
116 |
AddPoint(x+175,y-f*60) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
117 |
-- fill in arm 3 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
118 |
AddPoint(x-175,y+f*230,4) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
119 |
AddPoint(x-110,y+f*60) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
120 |
AddPoint(x-10,y+f*120) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
121 |
AddPoint(x-155,y+f*215) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
122 |
AddPoint(x-105,y+f*95) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
123 |
AddPoint(x-60,y+f*130) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
124 |
AddPoint(x-85,y+f*155,5) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
125 |
-- fill in arm 4 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
126 |
AddPoint(x,y-f*300,3) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
127 |
AddPoint(x+50,y-f*125) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
128 |
AddPoint(x-50,y-f*125) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
129 |
AddPoint(x,y-f*270) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
130 |
AddPoint(x-40,y-f*160) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
131 |
AddPoint(x+40,y-f*160) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
132 |
AddPoint(x,y-f*195,5) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
133 |
-- fill in arm 5 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
134 |
AddPoint(x+175,y+f*230,4) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
135 |
AddPoint(x+110,y+f*60) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
136 |
AddPoint(x+10,y+f*120) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
137 |
AddPoint(x+155,y+f*215) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
138 |
AddPoint(x+105,y+f*95) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
139 |
AddPoint(x+60,y+f*130) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
140 |
AddPoint(x+85,y+f*155,5) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
141 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
142 |
return true |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
143 |
else |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
144 |
return false |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
145 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
146 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
147 |
|
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
148 |
-- well. this was easy |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
149 |
function DrawCircle(x, y, w) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
150 |
if NoOverlap(x,y,w*10+6,w*10+6) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
151 |
AddCollision(x,y,w*10+6,w*10+6) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
152 |
AddPoint(x,y,w) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
153 |
return true |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
154 |
else |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
155 |
return false |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
156 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
157 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
158 |
|
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
159 |
function DrawCrescent(x, y, w, s) |
9257 | 160 |
local b = div(w*(GetRandom(4)+1)*10+6,6) |
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
161 |
|
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
162 |
if NoOverlap(x,y,w*10+6,w*10+6) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
163 |
AddCollision(x,y,w*10+6,w*10+6) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
164 |
AddPoint(x,y,w) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
165 |
if s then -- side |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
166 |
if GetRandom(1) == 0 then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
167 |
b = b*-1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
168 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
169 |
AddPoint(x-b,y,w,true) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
170 |
else -- top |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
171 |
AddPoint(x,y-b,w,true) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
172 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
173 |
return true |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
174 |
else |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
175 |
return false |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
176 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
177 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
178 |
|
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
179 |
function DrawCones(x,w,h,c) |
9257 | 180 |
local i = 0 |
181 |
local y = 2048-h |
|
182 |
local hw = div(w,2) |
|
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
183 |
if NoOverlap(x+div(w*c,2),y+div(h,2),w*c,h) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
184 |
AddCollision(x+div(w*c,2),y+div(h,2),w*c,h) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
185 |
x = x + hw |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
186 |
for i = 1,c do -- I'm guessing outlining is slightly more efficient than fanning at 16px brush |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
187 |
AddPoint(x,y,1) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
188 |
AddPoint(x-hw+8,2048) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
189 |
AddPoint(x+hw-8,2048) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
190 |
AddPoint(x,y) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
191 |
for j = x-hw+25,x+hw,34 do |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
192 |
AddPoint(x,y+30,3) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
193 |
AddPoint(j,2048) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
194 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
195 |
if GetRandom(2)==0 then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
196 |
AddPoint(x,y-20,8) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
197 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
198 |
x = x + w |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
199 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
200 |
else |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
201 |
return false |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
202 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
203 |
|
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
204 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
205 |
|
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
206 |
function DrawPlateau(x,y,l,t,b) |
9257 | 207 |
local bo = 0 |
208 |
local to = 0 |
|
209 |
local bSucc = false |
|
210 |
local tSucc = false |
|
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
211 |
if NoOverlapXY(x-28,y-28,x+l+28,y+l+28) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
212 |
AddPoint(x,y,5) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
213 |
AddPoint(x+l,y) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
214 |
|
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
215 |
to = GetRandom(6) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
216 |
if not(to==0) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
217 |
if GetRandom(2)==0 then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
218 |
to = div(l,to) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
219 |
else |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
220 |
to = l-div(l,to) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
221 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
222 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
223 |
if t>0 and NoOverlapXY(x+to-28,y-t-28,x+to+28,y+28) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
224 |
AddPoint(x+to,y-t,5) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
225 |
AddPoint(x+to,y) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
226 |
if GetRandom(2)==0 then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
227 |
AddPoint(x+to,y-t+75,20) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
228 |
else -- square off |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
229 |
AddPoint(x+to-20,y-t,1) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
230 |
AddPoint(x+to-20,y-t-20) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
231 |
AddPoint(x+to+20,y-t-20) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
232 |
AddPoint(x+to+20,y-t) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
233 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
234 |
tSucc = true |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
235 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
236 |
|
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
237 |
if to > 120 and GetRandom(2)==0 then -- left bumper |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
238 |
AddPoint(x+15,y-20,9) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
239 |
else -- square off |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
240 |
--AddPoint(x-50,y,2) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
241 |
AddPoint(x,y+20,1) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
242 |
AddPoint(x-20,y+20) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
243 |
AddPoint(x-20,y-20) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
244 |
AddPoint(x,y-20) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
245 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
246 |
if to < (l-120) and GetRandom(2)==0 then -- right bumper |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
247 |
AddPoint(x+l-15,y-20,9) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
248 |
else -- square off |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
249 |
--AddPoint(x+l+50,y,2) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
250 |
AddPoint(x+l,y+20,1) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
251 |
AddPoint(x+l+20,y+20) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
252 |
AddPoint(x+l+20,y-20) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
253 |
AddPoint(x+l,y-20) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
254 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
255 |
bo = GetRandom(6) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
256 |
if not(bo == 0) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
257 |
if GetRandom(2)==0 then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
258 |
bo = div(l,bo) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
259 |
else |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
260 |
bo = l-div(l,bo) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
261 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
262 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
263 |
-- still consider a success even if we can't place this one. Might need to return more than true/false |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
264 |
if b>0 and NoOverlapXY(x+bo-28,y-28,x+bo+28,y+b+28) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
265 |
AddPoint(x+bo,y,5) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
266 |
AddPoint(x+bo,y+b) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
267 |
if GetRandom(2)==0 then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
268 |
AddPoint(x+bo,y+b-75,20) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
269 |
else -- square off |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
270 |
AddPoint(x+bo-20,y+b,1) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
271 |
AddPoint(x+bo-20,y+b+20) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
272 |
AddPoint(x+bo+20,y+b+20) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
273 |
AddPoint(x+bo+20,y+b) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
274 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
275 |
bSucc = true |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
276 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
277 |
if bSucc then AddCollisionXY(x+bo-28,y-28,x+bo+28,y+b+28) end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
278 |
if tSucc then AddCollisionXY(x+to-28,y-t-28,x+to+28,y+28) end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
279 |
AddCollisionXY(x-28,y-28,x+l+28,y+28) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
280 |
return true |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
281 |
else |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
282 |
return false |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
283 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
284 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
285 |
|
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
286 |
function AddCollision(x,y,w,h) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
287 |
table.insert(ObjectList,{x-div(w+Padding,2), |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
288 |
y-div(h+Padding,2), |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
289 |
x+div(w+Padding,2), |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
290 |
y+div(h+Padding,2)}) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
291 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
292 |
|
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
293 |
function AddCollisionXY(x,y,x2,y2) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
294 |
table.insert(ObjectList,{x-div(Padding,2), |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
295 |
y-div(Padding,2), |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
296 |
x2+div(Padding,2), |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
297 |
y2+div(Padding,2)}) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
298 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
299 |
|
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
300 |
-- bounding box check |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
301 |
function NoOverlap(x,y,w,h) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
302 |
w = w |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
303 |
h = h |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
304 |
x = x-div(w,2) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
305 |
y = y-div(h,2) |
9257 | 306 |
return NoOverlapXY(x,y,x+w,y+h) |
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
307 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
308 |
function NoOverlapXY(x,y,x2,y2) |
9257 | 309 |
local i = 1 |
310 |
local l = table.getn(ObjectList) |
|
311 |
local ox = 0 |
|
312 |
local oy = 0 |
|
313 |
local ox2 = 0 |
|
314 |
local oy2 = 0 |
|
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
315 |
while i<=l do |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
316 |
ox = ObjectList[i][1] |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
317 |
oy = ObjectList[i][2] |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
318 |
ox2 = ObjectList[i][3] |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
319 |
oy2 = ObjectList[i][4] |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
320 |
-- WriteLnToConsole(ox..' '..oy..' '..ox2..' '..oy2..' - '..x..' '..y..' '..x2..' '..y2) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
321 |
--if (math.abs(ox + ox2 -x - x2) <= (ox2 - ox + x2 - x)) and (math.abs(oy + oy2 - y - y2) <= (oy - oy2 + y - y2)) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
322 |
if x < ox2 and ox < x2 and y < oy2 and oy < y2 then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
323 |
return false |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
324 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
325 |
i=i+1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
326 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
327 |
return true |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
328 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
329 |
|
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
330 |
function dbg() |
9257 | 331 |
local i = 1 |
332 |
local l = table.getn(ObjectList) |
|
333 |
local ox = 0 |
|
334 |
local oy = 0 |
|
335 |
local ox2 = 0 |
|
336 |
local oy2 = 0 |
|
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
337 |
while i<=l do |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
338 |
ox = ObjectList[i][1] |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
339 |
oy = ObjectList[i][2] |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
340 |
ox2 = ObjectList[i][3] |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
341 |
oy2 = ObjectList[i][4] |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
342 |
AddPoint(ox,oy,1) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
343 |
AddPoint(ox2,oy) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
344 |
AddPoint(ox2,oy2) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
345 |
AddPoint(ox,oy2) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
346 |
AddPoint(ox,oy) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
347 |
AddPoint(ox2,oy2) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
348 |
i=i+1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
349 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
350 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
351 |
|
10150
fa5c83fd0ad9
Allow lua drawn maps (shoppamap, tunnels, diagonal maze etc) to generate previews.
nemo
parents:
10036
diff
changeset
|
352 |
function onPreviewInit() |
fa5c83fd0ad9
Allow lua drawn maps (shoppamap, tunnels, diagonal maze etc) to generate previews.
nemo
parents:
10036
diff
changeset
|
353 |
onGameInit() |
fa5c83fd0ad9
Allow lua drawn maps (shoppamap, tunnels, diagonal maze etc) to generate previews.
nemo
parents:
10036
diff
changeset
|
354 |
end |
fa5c83fd0ad9
Allow lua drawn maps (shoppamap, tunnels, diagonal maze etc) to generate previews.
nemo
parents:
10036
diff
changeset
|
355 |
|
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
356 |
function onGameInit() |
10423 | 357 |
MapGen = mgDrawn |
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
358 |
TemplateFilter = 0 |
9257 | 359 |
local TotGen = 0 |
360 |
local Tries = 0 |
|
361 |
local i = 0 |
|
362 |
local l = 0 |
|
363 |
local x = 0 |
|
364 |
local y = 0 |
|
365 |
local w = 0 |
|
366 |
local h = 0 |
|
10172 | 367 |
if GetGameFlag(gfSolidLand) then EnableGameFlags(gfShoppaBorder) end |
10036 | 368 |
if not GetGameFlag(gfBottomBorder) and GetRandom(2) == 0 then |
8980
37f4cdd9cd2c
don't draw a border if there's already a bottom border, avoid placing objects over gaps in the floor
nemo
parents:
8975
diff
changeset
|
369 |
AddPoint(-50,2010,7) |
37f4cdd9cd2c
don't draw a border if there's already a bottom border, avoid placing objects over gaps in the floor
nemo
parents:
8975
diff
changeset
|
370 |
AddPoint(4150,2010) |
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
371 |
for i = 0,GetRandom(3) do |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
372 |
x = GetRandom(4096) |
8980
37f4cdd9cd2c
don't draw a border if there's already a bottom border, avoid placing objects over gaps in the floor
nemo
parents:
8975
diff
changeset
|
373 |
w = GetRandom(40)+10 |
37f4cdd9cd2c
don't draw a border if there's already a bottom border, avoid placing objects over gaps in the floor
nemo
parents:
8975
diff
changeset
|
374 |
AddPoint(x,2200,w,true) |
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
375 |
AddPoint(x,1900) |
8981 | 376 |
table.insert(ObjectList,{x-div(w*9,2), |
377 |
2010-div(100,2), |
|
378 |
x+div(w*9,2), |
|
379 |
2010+div(100,2)}) |
|
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
380 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
381 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
382 |
|
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
383 |
if GetRandom(2) == 0 then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
384 |
l = GetRandom(3)+1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
385 |
w = GetRandom(200)+200 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
386 |
h = GetRandom(350)+200 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
387 |
x = GetRandom(4096-w*l) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
388 |
DrawCones(x,w,h,l) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
389 |
--if DrawCones(x,w,h,l) then TotGen = TotGen+1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
390 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
391 |
if GetRandom(2) == 0 then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
392 |
for i = 1,GetRandom(5)+1 do |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
393 |
w = GetRandom(35)+15 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
394 |
x = GetRandom(4096-w*12)+w |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
395 |
if GetRandom(2)==0 then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
396 |
y = 2048-GetRandom(w*10+6) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
397 |
else |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
398 |
y = 2048 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
399 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
400 |
-- if AddPoint(x,y,w) then TotGetn = TotGen+1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
401 |
DrawCircle(x,y,w) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
402 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
403 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
404 |
if GetRandom(2)==0 then |
10969
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
405 |
x = GetRandom(3300)+382 |
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
406 |
y = GetRandom(1300)+382 |
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
407 |
if DrawStar(x,y, 1, 1+GetRandom(2)*-2) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
408 |
TotGen = TotGen+1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
409 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
410 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
411 |
|
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
412 |
while (TotGen < 6) and (Tries < 100) do |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
413 |
l = GetRandom(1000-Tries*10)+300 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
414 |
x = GetRandom(3900-l)+100 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
415 |
y = GetRandom(1900)+100 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
416 |
if GetRandom(2)==0 then b = GetRandom(800)+300 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
417 |
else b = 0 end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
418 |
if GetRandom(2)==0 then t = GetRandom(800)+300 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
419 |
else t = 0 end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
420 |
if y-t < 50 then t = y - 50 end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
421 |
if t < 200 then t = 0 end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
422 |
if DrawPlateau(x,y,l,t,b) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
423 |
TotGen = TotGen+1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
424 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
425 |
Tries = Tries + 1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
426 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
427 |
Tries = 0 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
428 |
while (TotGen < 17) and (Tries < 1000) do |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
429 |
if Tries < 500 and GetRandom(2)==0 then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
430 |
x = GetRandom(3300)+350 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
431 |
y = GetRandom(1300)+350 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
432 |
if DrawStar(x,y, 1, 1+GetRandom(2)*-2) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
433 |
TotGen = TotGen+1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
434 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
435 |
else |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
436 |
if Tries > 500 then d = GetRandom(2)+3 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
437 |
else d = GetRandom(3)+2 end |
10969
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
438 |
x = GetRandom(4000-div(764,d))+div(764,d*2) |
98cab7f366c3
add a bit more spacing around stars, add pad parameter to increase spacing between objects
nemo
parents:
10611
diff
changeset
|
439 |
y = GetRandom(1300-div(764,d))+div(764,d*2) |
8975
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
440 |
if DrawStar(x,y, d, 1+GetRandom(2)*-2) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
441 |
TotGen = TotGen+1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
442 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
443 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
444 |
w = GetRandom(35-div(Tries,29))+15 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
445 |
x = GetRandom(4050-w*20)+w*10 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
446 |
y = GetRandom(2000-w*20)+w*10 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
447 |
if DrawCircle(x,y,w) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
448 |
TotGen = TotGen+1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
449 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
450 |
w = GetRandom(35-div(Tries,29))+5 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
451 |
x = GetRandom(4050-w*20)+w*10 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
452 |
y = GetRandom(2000-w*20)+w*10 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
453 |
if DrawCrescent(x,y,w,GetRandom(2)==0) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
454 |
TotGen = TotGen+1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
455 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
456 |
Tries = Tries + 1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
457 |
end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
458 |
-- Padding = div(Padding,2) |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
459 |
-- Tries = 0 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
460 |
-- while (TotGen < 21) and (Tries < 10000) do |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
461 |
-- r = GetRandom(20-div(Tries,223))+5 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
462 |
-- x = GetRandom(4050-r*20)+r*10 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
463 |
-- y = GetRandom(2000-r*20)+r*10 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
464 |
-- if DrawCircle(x,y,r) then |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
465 |
-- TotGen = TotGen+1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
466 |
-- end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
467 |
-- Tries = Tries + 1 |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
468 |
-- end |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
469 |
--dbg() |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
470 |
FlushPoints() |
188a71ceda72
Add shoppamap lua as mikade requested. also add 50% chance of bottom border w/ holes as he requested. Also disable land objects in shoppa scheme, since that's more common way to play it.
nemo
parents:
diff
changeset
|
471 |
end |