Types:
Water 0 ~ 0 1
Grass 1 + 1 0
Beach 2 - 1 0
Shore 3 , 0 1
MountainLow 4 \ 2 0
MountainMid 5 ^ 3 0
MountainTop 6 / 4 0
End

Var:
IslandNum 8 [I]
MountainNum 6 [M]
LoopNum 10 [L]
GrowRate 50 [G]
End

Method:
FILLMAP 0
PlaceRandom [I] 1

REPEAT [L]
PlaceAround 0 1 1 -1 [G]
Finish

PlaceAround 0 1 1 -1 100

PlaceAround 0 2 1 1
PlaceAround 0 3 2 1

PlaceRandom [M] 6 1
PlaceAround 1 5 6 -1
PlaceAround 1 4 5 -1
End