Bejeweled (PuzzleScript Script)

readme.txt

Play this game by pasting the script in http://www.puzzlescript.net/editor.html

script.txt

title Bejeweled
author Adeon Writer
homepage www.twitter.com/adeon
again_interval 0.1
realtime_interval 0.5
norepeat_action
noundo
norestart

OBJECTS

Background
Black
00000
00000
00000
00000
00000

Player
White
00000
0...0
0...0
0...0
00000

BlueJewel
LightBlue Blue DarkBlue
.011.
01111
01112
11112
.122.

RedJewel
LightRed Red DarkRed
.011.
01111
01112
11112
.122.

GreenJewel
LightGreen Green DarkGreen
.011.
01111
01112
11112
.122.

OrangeJewel
LightBrown Orange Brown
.011.
01111
01112
11112
.122.

PinkJewel
White Pink Purple
.011.
01111
01112
11112
.122.

GreyJewel
White Grey DarkGrey
.011.
01111
01112
11112
.122.

JewelExplode
White
.0.0.
0...0
.....
0...0
.0.0.

JewelSpawn
Transparent
.....
.....
.....
.....
.....

Marker
Black
.0.0.
0...0
.....
0...0
.0.0.

LEGEND

Jewel = BlueJewel or RedJewel or GreenJewel or OrangeJewel or PinkJewel or GreyJewel

P = Player and JewelSpawn
J = JewelSpawn

SOUNDS

Player Move 24650907
Jewel Destroy 40608300
Jewel Create 63043300
Jewel Move 39633907
Marker Create 39633907

COLLISIONLAYERS

Background
JewelExplode
BlueJewel
RedJewel
GreenJewel
OrangeJewel
PinkJewel
GreyJewel
JewelSpawn
Player
Marker

RULES

(Dump in more Jewels)
[ JewelSpawn no Jewel ] -> [ JewelSpawn random Jewel ]

(3 Jewel Detection)
[ RedJewel    | RedJewel    | RedJewel    ] -> [ No Jewel | No Jewel | No Jewel ] again
[ BlueJewel   | BlueJewel   | BlueJewel   ] -> [ No Jewel | No Jewel | No Jewel ] again
[ GreenJewel  | GreenJewel  | GreenJewel  ] -> [ No Jewel | No Jewel | No Jewel ] again
[ OrangeJewel | OrangeJewel | OrangeJewel ] -> [ No Jewel | No Jewel | No Jewel ] again
[ PinkJewel   | PinkJewel   | PinkJewel   ] -> [ No Jewel | No Jewel | No Jewel ] again
[ GreyJewel   | GreyJewel   | GreyJewel   ] -> [ No Jewel | No Jewel | No Jewel ] again

(It's Gravity Time)
Down [ Jewel | No Jewel ] -> [ | Jewel] again

(Swap Jewel)
[Action Player Jewel | Marker Jewel] -> [Player > Jewel | < Jewel No Marker]

(Select Jewel)
[Action Player Jewel] -> [Player Marker Jewel]

WINCONDITIONS

Any Jewel
No Jewel

LEVELS

JJJJJJJJ
JJJJJJJJ
JJJJJJJJ
JJJPJJJJ
JJJJJJJJ
JJJJJJJJ
JJJJJJJJ
JJJJJJJJ