Installez ce script dans votre Pserver.pat et télécharger les images de ce jeu dans la case du menu jeu

Notez : lorsque vous allez télécharger les images nous avons mis 2 petites images man1.gif et man2.gif ,

Il vous servirons afin de créé les props pour ce jeu .

ROOM

ID 1233

PRIVATE

NOCYBORGS

NAME "bataille de neige"

PICT "Snowballbat.gif"

SPOT

ID 1

DONTMOVEHERE

OUTLINE 488,6 506,6 506,19 488,19

LOC 378,102

SCRIPT

ON ENTER { OutSBall GLOBAL InSBall GLOBAL game GLOBAL { { game GLOBAL { EXIT } game 0 == IF { POSX x = POSY y = MOUSEPOS ty = tx = tx x - 3 / tx = ty y - 3 / ty = { -1267696486 x y addlooseprop tx x += ty y += clearlooseprops i++ } { i 3 <= } WHILE -1267696486 x y addlooseprop ")pop !SPLAT!" MOUSEPOS SAYAT "" CHATSTR = } CHATSTR "ball" == ME GETSPOTSTATE NOT AND game 1 == AND IF { CLEARLOOSEPROPS PAINTCLEAR } CHATSTR "clean" == IF } OutSBall DEF { game GLOBAL { EXIT } game 0 == IF { { { "@" posx itoa & "," & posy itoa & "!" & WHOCHAT WHONAME & " Je t'ai touché !! " & ROOMMSG ";HAaaa Grr " WHOCHAT PRIVATEMSG;other snowball rooms; 500 3 RANDOM + GOTOROOM } "$3" GREPSUB "SPLAT" SUBSTR IF } "$1" GREPSUB ATOI POSX - dup 40 < SWAP -40 > AND "$2" GREPSUB ATOI POSY - dup 40 < swap -40 > AND AND IF } CHATSTR "@(.*),(.*) (.*)" GREPSTR WHOCHAT WHOME == NOT AND IF { sballscore global sballscore ++ " J'ai touché " whochat whoname & " j'ai maintenant " & sballscore itoa & " point(s)!" & localmsg } CHATSTR ";HAaaa Grr " == WHOCHAT WHOME == NOT AND IF } InSBall DEF 1 game = " Bienvenue dans la bataille de neige ! Choisissez votre camp et dite BALL pour lancer. " LOCALMSG } ME GETSPOTSTATE 0 == game 1 <> AND IF { "Wizards: say Balls on|off to toggle" LOGMSG } USERNAME "*" SUBSTR IF}ON INCHAT {game GLOBAL{ 0 game = "Balls disabled" statusmsg } CHATSTR "balls off" == WHOCHAT WHONAME "*" SUBSTR AND IF{ 1 game = "Balls enabled" statusmsg } CHATSTR "balls on" == WHOCHAT WHONAME "*" SUBSTR AND IFInSBall GLOBALInSBall EXEC}ON OUTCHAT {{ 1 ME SETSPOTSTATE "Balls disabled" statusmsg } CHATSTR "balls off" == WHOCHAT WHONAME "*" SUBSTRAND IF{ 0 ME SETSPOTSTATE "Balls enabled" statusmsg } CHATSTR "balls on" == WHOCHAT WHONAME "*" SUBSTR ANDIFOutSBall GLOBALOutSBall EXEC}

ENDSCRIPT

ENDSPOT

SPOT

ID 2

OUTLINE 187,10 203,10 203,24 187,24

LOC 93,106

SCRIPT

ON LEAVE {{ CLEARLOOSEPROPS PAINTCLEAR } NBRROOMUSERS 2 < IF}

ENDSCRIPT

ENDSPOT

DOOR

ID 3

NAME "Camp 1"

DONTMOVEHERE

SHOWNAME

SHOWFRAME

OUTLINE 120,2 165,2 165,19 120,19

LOC 143,4

SCRIPT

ON SELECT { [1140548088] SETPROPS }

ENDSCRIPT

ENDDOOR

DOOR

ID 4

NAME "Camp 2"

DONTMOVEHERE

SHOWNAME

SHOWFRAME

OUTLINE 327,3 372,3 372,20 327,20

LOC 350,5

SCRIPT

ON SELECT { [1140548068] SETPROPS }

ENDSCRIPT

ENDDOOR

ENDROOM