ROOM

ID 12441

NOPAINTING

NOCYBORGS

NAME "Jeux de M\E9moire"

PICT "download.gif"

PICTURE ID 1 NAME "MM32Casino.gif" ENDPICTURE

PICTURE ID 2 NAME "Mnone.gif" TRANSCOLOR 0 ENDPICTURE

PICTURE ID 3 NAME "MJackS.gif" ENDPICTURE

PICTURE ID 4 NAME "MQueenS.gif" ENDPICTURE

PICTURE ID 5 NAME "MKingS.gif" ENDPICTURE

PICTURE ID 6 NAME "MAceS.gif" ENDPICTURE

PICTURE ID 7 NAME "MJackP.gif" ENDPICTURE

PICTURE ID 8 NAME "MQueenP.gif" ENDPICTURE

PICTURE ID 9 NAME "MKingP.gif" ENDPICTURE

PICTURE ID 10 NAME "MAceP.gif" ENDPICTURE

PICTURE ID 11 NAME "MJackH.gif" ENDPICTURE

PICTURE ID 12 NAME "MQueenH.gif" ENDPICTURE

PICTURE ID 13 NAME "MKingH.gif" ENDPICTURE

PICTURE ID 14 NAME "MAceH.gif" ENDPICTURE

PICTURE ID 15 NAME "MJackG.gif" ENDPICTURE

PICTURE ID 16 NAME "MQueenG.gif" ENDPICTURE

PICTURE ID 17 NAME "MKingG.gif" ENDPICTURE

PICTURE ID 18 NAME "MAceG.gif" ENDPICTURE

PICTURE ID 200 NAME "MMHard.gif" ENDPICTURE

PICTURE ID 210 NAME "NZero.gif" ENDPICTURE

PICTURE ID 211 NAME "NOnes.gif" ENDPICTURE

PICTURE ID 212 NAME "NTwo.gif" ENDPICTURE

PICTURE ID 213 NAME "NThree.gif" ENDPICTURE

PICTURE ID 214 NAME "NFour.gif" ENDPICTURE

PICTURE ID 215 NAME "NFive.gif" ENDPICTURE

PICTURE ID 216 NAME "NSix.gif" ENDPICTURE

PICTURE ID 217 NAME "NSeven.gif" ENDPICTURE

PICTURE ID 218 NAME "NEight.gif" ENDPICTURE

PICTURE ID 219 NAME "NNine.gif" ENDPICTURE

PROP PROPID 976112829 LOC 373,226 ENDPROP

SPOT

ID 2000

OUTLINE 238,180 278,180 279,217 238,217

LOC 256,192

PICTS 1,0,0 ENDPICTS

ENDSPOT

SPOT

ID 400

DONTMOVEHERE

OUTLINE 110,25 399,25 400,225 110,225

LOC 253,130

ENDSPOT

DOOR

ID 1

DONTMOVEHERE

OUTLINE 112,30 144,30 144,73 112,73

LOC 128,52

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 2

DONTMOVEHERE

OUTLINE 149,30 180,30 180,73 149,73

LOC 164,52

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 3

DONTMOVEHERE

OUTLINE 185,30 216,30 216,73 185,73

LOC 200,52

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 4

DONTMOVEHERE

OUTLINE 221,30 252,30 252,73 221,73

LOC 236,52

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 5

DONTMOVEHERE

OUTLINE 257,30 288,30 288,73 257,73

LOC 272,52

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 6

DONTMOVEHERE

OUTLINE 293,30 324,30 324,73 293,73

LOC 308,52

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 7

DONTMOVEHERE

OUTLINE 329,30 360,30 360,73 329,73

LOC 344,52

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 8

DONTMOVEHERE

OUTLINE 365,30 396,30 396,73 365,73

LOC 380,52

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 9

DONTMOVEHERE

OUTLINE 112,78 144,78 144,121 112,121

LOC 128,100

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 10

DONTMOVEHERE

OUTLINE 149,78 180,78 180,121 149,121

LOC 164,100

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 11

DONTMOVEHERE

OUTLINE 185,78 216,78 216,121 185,121

LOC 200,100

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 12

DONTMOVEHERE

OUTLINE 221,78 252,78 252,121 221,121

LOC 236,100

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 13

DONTMOVEHERE

OUTLINE 257,78 288,78 288,121 257,121

LOC 272,100

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 14

DONTMOVEHERE

OUTLINE 293,78 324,78 324,121 293,121

LOC 308,100

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 15

DONTMOVEHERE

OUTLINE 329,78 360,78 360,121 329,121

LOC 344,100

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 16

DONTMOVEHERE

OUTLINE 365,78 396,78 396,121 365,121

LOC 380,100

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 17

DONTMOVEHERE

OUTLINE 112,126 144,126 144,169 112,169

LOC 128,148

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 18

DONTMOVEHERE

OUTLINE 149,126 180,126 180,169 149,169

LOC 164,148

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 19

DONTMOVEHERE

OUTLINE 185,126 216,126 216,169 185,169

LOC 200,148

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 20

DONTMOVEHERE

OUTLINE 221,126 252,126 252,169 221,169

LOC 236,148

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 21

DONTMOVEHERE

OUTLINE 257,126 288,126 288,169 257,169

LOC 272,148

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 22

DONTMOVEHERE

OUTLINE 293,126 324,126 324,169 293,169

LOC 308,148

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 23

DONTMOVEHERE

OUTLINE 329,126 360,126 360,169 329,169

LOC 344,148

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 24

DONTMOVEHERE

OUTLINE 365,126 396,126 396,169 365,169

LOC 380,148

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 25

DONTMOVEHERE

OUTLINE 112,174 144,174 144,217 112,217

LOC 128,196

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 26

DONTMOVEHERE

OUTLINE 149,174 180,174 180,217 149,217

LOC 164,196

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 27

DONTMOVEHERE

OUTLINE 185,174 216,174 216,217 185,217

LOC 200,196

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 28

DONTMOVEHERE

OUTLINE 221,174 252,174 252,217 221,217

LOC 236,196

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 29

DONTMOVEHERE

OUTLINE 257,174 288,174 288,217 257,217

LOC 272,196

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 30

DONTMOVEHERE

OUTLINE 293,174 324,174 324,217 293,217

LOC 308,196

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 31

DONTMOVEHERE

OUTLINE 329,174 360,174 360,217 329,217

LOC 344,196

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 32

DONTMOVEHERE

OUTLINE 365,174 396,174 396,217 365,217

LOC 380,196

PICTS 2,0,0 3,0,0 4,0,0 5,0,0 6,0,0 7,0,0 8,0,0 9,0,0 10,0,0 11,0,0 12,0,0 13,0,0 14,0,0 15,0,0 16,0,0 17,0,0 18,0,0 ENDPICTS

SCRIPT

ON SELECT {{GLOBAL} [Click Pairs MTable] FOREACH Click EXEC}

ENDSCRIPT

ENDDOOR

SPOT

ID 60

OUTLINE 282,230 290,230 290,243 282,243

LOC 286,236

PICTS 206,0,0 210,0,0 211,0,0 212,0,0 213,0,0 214,0,0 215,0,0 216,0,0 217,0,0 218,0,0 219,0,0 ENDPICTS

ENDSPOT

SPOT

ID 61

OUTLINE 274,230 282,230 282,243 274,243

LOC 278,236

PICTS 206,0,0 210,0,0 211,0,0 212,0,0 213,0,0 214,0,0 215,0,0 216,0,0 217,0,0 218,0,0 219,0,0 ENDPICTS

ENDSPOT

SPOT

ID 62

OUTLINE 267,230 275,230 275,243 267,243

LOC 271,236

PICTS 206,0,0 210,0,0 211,0,0 212,0,0 213,0,0 214,0,0 215,0,0 216,0,0 217,0,0 218,0,0 219,0,0 ENDPICTS

ENDSPOT

SPOT

ID 63

OUTLINE 258,230 266,230 266,243 258,243

LOC 262,236

PICTS 206,0,0 210,0,0 211,0,0 212,0,0 213,0,0 214,0,0 215,0,0 216,0,0 217,0,0 218,0,0 219,0,0 ENDPICTS

ENDSPOT

DOOR

ID 100

OUTLINE 35,37 66,37 66,65 35,65

LOC 44,53

SCRIPT

;~MediaList~;Silent.wav,MMShuffle.wav,Click,MMEasy.wav,MMHard.wav,Silent.mid,CocaCola

ON ENTER { {SOUND} ["Silent.wav" "MMShuffle.wav" "Click" "MMEasy.wav" "MMHard.wav" "Silent.mid" "CocaCola"] FOREACH

{GLOBAL} [Click Pairs Scramble MTable MSolve MMClue NPack Gcard Solve UPcf Scf] FOREACH

"Il y a deux niveaux de jeu, faciles et dur! cliquez dessus facile/hard pour changer de niveau." LOGMSG

{"Vous employez un vieux client! Ce jeu ne fonctionnera pas très bien pour vous" ROOMMSG} IPTVERSION 1 < IF

"Script et graphique par Canonboy" STATUSMSG

{0 SWAP =} [lastspot MEstate ix sc px] FOREACH

; Defs

{32 ARRAY pcards = pcards LENGTH pl = 0 ic = {ic 1 + pcards ic PUT ic ++} {ic pl <} WHILE

} NPack DEF

{pcards LENGTH pl = pcards tp = pl RANDOM cp =

pcards cp GET Card = {Card 16 - Card =} Card 16 > IF

pl -- pl ARRAY tp =

0 ic = 0 xc = {{pcards xc GET tp ic PUT ic ++} xc cp <> IF xc ++} {xc pl <=} WHILE

tp pcards = pcards LENGTH pl =

{NPack EXEC} tp LENGTH 0 == IF

} GCard DEF

{{GLOBAL} [MTable MSolve MMClue ix sc px lastspot MEstate Gcard NPack UPcf Scf] FOREACH

"MMShuffle.wav" SOUND NPack EXEC 32 ARRAY MTable = {0 SWAP =} [lastspot MEstate ix sc px] FOREACH

0 x = {Gcard EXEC Card MTable x PUT x++} {x 32 <} WHILE

1 x = {0 x SETSPOTSTATELOCAL x++} {x 32 <=} WHILE

32 ARRAY MSolve = 0 x = {MTable x GET MSolve x PUT x++} {x 32 <} WHILE

Scf EXEC {"Hard" lev =} {"Facile" lev = MMClue EXEC} 500 GETSPOTSTATE IFELSE

"@0,0 Nouveau Jeu Commencé! Level=" lev & SAY

} Scramble DEF

;

{MSolve GLOBAL 1 x = {x SETSPOTSTATELOCAL x++} MSolve FOREACH

{1 x = {0 x SETSPOTSTATELOCAL x++} {x 32 <=} WHILE} 240 ALARMEXEC

} MMClue DEF

{

; Generic Counter Field Update Routine (i.e SPOT 60 to 63, SPOT 64(Signal Field not Available Here))

; i.e: {{GLOBAL} [UPcf sc] FOREACH sc Vn = 60 Spt = 4 Ns = 0 Sign = UPcf EXEC} Ucf DEF

; s Vn = ; Variable With The Numeric Value for Update

; 60 Spt = ; SpotID Of The First Spot

; 4 Ns = ; Number Of Spots In The Chain (Ignore the eventual spot of the signal)

; 0 Sign = ; Signal Field Available? (0=No, 1=Yes)

Vn ITOA "-" STRINDEX fl =

{Vn -1 * Vn =} fl -1 > IF

"000" Vn ITOA & "@" & Va =

Va "@" STRINDEX 1 - Vl =

Vn ITOA "@" & "@" STRINDEX 1 - Vbl =

0 Vi = Va Vl 1 SUBSTRING ATOI 1 + Spt SETSPOTSTATELOCAL Vi++

{{Va Vl Vi - 1 SUBSTRING ATOI 1 +} {0} Vbl Vi 1 - > IFELSE Spt Vi + SETSPOTSTATELOCAL Vi++} {Vi Ns <} WHILE

{fl -1 > Spt Vi + SETSPOTSTATELOCAL} Sign IF

} UPcf DEF

{{GLOBAL} [UPcf sc] FOREACH sc Vn = 60 Spt = 4 Ns = 0 Sign = UPcf EXEC

} Scf DEF

{{GLOBAL} [lastspot MEstate sc px] FOREACH

{{"th"} {["st" "nd"] px GET} px 1 > IFELSE sf = px ++

"@0,0 )Pop "px ITOA & sf & " Pairs Matched! " & ix ITOA & " clicks" & SAY

-3 sc += 0 MTable ME 1 - PUT 0 MTable lastspot 1 - PUT 0 lastspot =}

{"Click" SOUND 0 lastspot SETSPOTSTATELOCAL} lastspot GETSPOTSTATE MEstate == IFELSE

} Pairs DEF

{{GLOBAL} [MTable ix sc lastspot MEstate Pairs UPcf Scf] FOREACH

MTable ME 1 - GET MEstate = {EXIT} MEstate 0 == IF ix++ sc++

{MEstate ME SETSPOTSTATELOCAL Pairs EXEC} ME GETSPOTSTATE 0 == IF

{ME lastspot =} MTable ME 1 - GET 0 <> IF

0 x = {x += {BREAK} x 0 > IF} MTable FOREACH ; Jeu Terminé?

{"!Jeu Terminé! Score: " sc ITOA & ". Solved in " & ix ITOA & " clicks - Level=" & {"Hard"} {"Facile"} 500 GETSPOTSTATE IFELSE & msg =

{124 sm = 25 sd =} {149 sm = 30 sd =} 500 GETSPOTSTATE IFELSE CLEARLOOSEPROPS

{"@0,0 )CocaCola " msg & SAY [976114078 976113371 976112743 976112829 976103021] sc sd / GET}

{"@0,0 " msg & SAY 976113094} sc sm < IFELSE 373 226 ADDLOOSEPROP

} x NOT IF

Scf EXEC

} Click DEF

{{GLOBAL} [lastspot MEstate MTable MSolve ix sc UPcf] FOREACH

{0 SWAP =} [lastspot MEstate ix sc px] FOREACH

1 x = {x SETSPOTSTATELOCAL x++} MSolve FOREACH

0 x = {0 MTable x PUT x++} {x 32 <} WHILE

Scf EXEC

} Solve DEF

; End Defs

Scramble EXEC

}

ON OUTCHAT {

{0 500 SETSPOTSTATE} CHATSTR LOWERCASE "Facile" == IF

{1 500 SETSPOTSTATE} CHATSTR LOWERCASE "hard" == IF

}

ENDSCRIPT

ENDDOOR

DOOR

ID 200

NAME "Scramble"

DONTMOVEHERE

OUTLINE 117,231 181,231 181,243 117,243

LOC 151,230

SCRIPT

ON SELECT {{GLOBAL} [Scramble NPack Gcard MTable MSolve] FOREACH Scramble EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 300

NAME "Solve"

DONTMOVEHERE

OUTLINE 345,231 394,231 394,243 345,243

LOC 371,231

SCRIPT

ON SELECT {{GLOBAL} [Solve MSolve] FOREACH Solve EXEC}

ON INCHAT {nDoIt GLOBAL nDoIt EXEC}

ENDSCRIPT

ENDDOOR

DOOR

ID 500

DONTMOVEHERE

OUTLINE 297,229 333,229 333,245 297,245

LOC 315,237

PICTS 2,0,0 200,0,0 ENDPICTS

SCRIPT

ON SELECT {ME GETSPOTSTATE NOT DUP ME SETSPOTSTATE ["MMEasy.wav" "MMHard.wav"] SWAP GET SOUND}

ENDSCRIPT

ENDDOOR

ENDROOM