Added files

This commit is contained in:
Patryk Gensch
2026-02-23 21:11:22 +01:00
parent db30b71ee8
commit bb190c6937
207 changed files with 12001 additions and 0 deletions

View File

@@ -0,0 +1,564 @@
OBJECT=PROBA
PROBA:TYPE=INTEGER
PROBA:VALUE=1
OBJECT=VAR_CYFRA
VAR_CYFRA:TYPE=INTEGER
VAR_CYFRA:VALUE=0
VAR_CYFRA:ONCHANGED^2=B_CYFRA_2
VAR_CYFRA:ONCHANGED^3=B_CYFRA_3
VAR_CYFRA:ONCHANGED^4=B_CYFRA_4
VAR_CYFRA:ONCHANGED^5={B_CYFRA_4^RUN();VAR_CYFRA^SET(6);}
VAR_CYFRA:ONCHANGED^7={B_CYFRA_4^RUN();VAR_CYFRA^SET(6);}
OBJECT=VAR_KOD
VAR_KOD:TYPE=STRING
OBJECT=ZNACZKI1
ZNACZKI1:TYPE=ANIMO
ZNACZKI1:VISIBLE=TRUE
ZNACZKI1:FILENAME=ZNACZKI1.ANN
ZNACZKI1:TOCANVAS=TRUE
ZNACZKI1:PRIORITY=6
ZNACZKI1:FPS=16
ZNACZKI1:PRELOAD=TRUE
ZNACZKI1:RELEASE=TRUE
ZNACZKI1:MONITORCOLLISION=FALSE
ZNACZKI1:MONITORCOLLISIONALPHA=FALSE
ZNACZKI1:ONINIT=THISHIDE
OBJECT=ZNACZKI2
ZNACZKI2:TYPE=ANIMO
ZNACZKI2:VISIBLE=TRUE
ZNACZKI2:FILENAME=ZNACZKI2.ANN
ZNACZKI2:TOCANVAS=TRUE
ZNACZKI2:PRIORITY=6
ZNACZKI2:FPS=16
ZNACZKI2:PRELOAD=TRUE
ZNACZKI2:RELEASE=TRUE
ZNACZKI2:MONITORCOLLISION=FALSE
ZNACZKI2:MONITORCOLLISIONALPHA=FALSE
ZNACZKI2:ONINIT=THISHIDE
OBJECT=ZNACZKI3
ZNACZKI3:TYPE=ANIMO
ZNACZKI3:VISIBLE=TRUE
ZNACZKI3:FILENAME=ZNACZKI3.ANN
ZNACZKI3:TOCANVAS=TRUE
ZNACZKI3:PRIORITY=6
ZNACZKI3:FPS=16
ZNACZKI3:PRELOAD=TRUE
ZNACZKI3:RELEASE=TRUE
ZNACZKI3:MONITORCOLLISION=FALSE
ZNACZKI3:MONITORCOLLISIONALPHA=FALSE
ZNACZKI3:ONINIT=THISHIDE
OBJECT=ZNACZKI4
ZNACZKI4:TYPE=ANIMO
ZNACZKI4:VISIBLE=TRUE
ZNACZKI4:FILENAME=ZNACZKI4.ANN
ZNACZKI4:TOCANVAS=TRUE
ZNACZKI4:PRIORITY=6
ZNACZKI4:FPS=16
ZNACZKI4:PRELOAD=TRUE
ZNACZKI4:RELEASE=TRUE
ZNACZKI4:MONITORCOLLISION=FALSE
ZNACZKI4:MONITORCOLLISIONALPHA=FALSE
ZNACZKI4:ONINIT=THISHIDE
OBJECT=GLINA_9
GLINA_9:TYPE=ANIMO
GLINA_9:VISIBLE=TRUE
GLINA_9:FILENAME=GLINA.ANN
GLINA_9:TOCANVAS=TRUE
GLINA_9:PRIORITY=20
GLINA_9:FPS=16
GLINA_9:PRELOAD=TRUE
GLINA_9:RELEASE=TRUE
GLINA_9:MONITORCOLLISION=FALSE
GLINA_9:MONITORCOLLISIONALPHA=FALSE
OBJECT=EKRAN
EKRAN:TYPE=ANIMO
EKRAN:VISIBLE=TRUE
EKRAN:FILENAME=EKRAN.ANN
EKRAN:TOCANVAS=TRUE
EKRAN:PRIORITY=0
EKRAN:FPS=16
EKRAN:PRELOAD=TRUE
EKRAN:RELEASE=TRUE
EKRAN:MONITORCOLLISION=FALSE
EKRAN:MONITORCOLLISIONALPHA=FALSE
EKRAN:ONFINISHED=ENABLEALL
OBJECT=ANNEXIT
ANNEXIT:TYPE=ANIMO
ANNEXIT:VISIBLE=TRUE
ANNEXIT:FILENAME=M_EXIT.ANN
ANNEXIT:TOCANVAS=TRUE
ANNEXIT:PRIORITY=0
ANNEXIT:FPS=16
ANNEXIT:PRELOAD=TRUE
ANNEXIT:RELEASE=TRUE
ANNEXIT:MONITORCOLLISION=FALSE
ANNEXIT:MONITORCOLLISIONALPHA=FALSE
OBJECT=KLAWISZ1
KLAWISZ1:TYPE=IMAGE
KLAWISZ1:VISIBLE=FALSE
KLAWISZ1:FILENAME=KLAWISZ1.IMG
KLAWISZ1:TOCANVAS=TRUE
KLAWISZ1:PRIORITY=4
KLAWISZ1:PRELOAD=TRUE
KLAWISZ1:RELEASE=TRUE
KLAWISZ1:MONITORCOLLISION=FALSE
KLAWISZ1:MONITORCOLLISIONALPHA=FALSE
OBJECT=KLAWISZ2
KLAWISZ2:TYPE=IMAGE
KLAWISZ2:VISIBLE=FALSE
KLAWISZ2:FILENAME=KLAWISZ2.IMG
KLAWISZ2:TOCANVAS=TRUE
KLAWISZ2:PRIORITY=4
KLAWISZ2:PRELOAD=TRUE
KLAWISZ2:RELEASE=TRUE
KLAWISZ2:MONITORCOLLISION=FALSE
KLAWISZ2:MONITORCOLLISIONALPHA=FALSE
OBJECT=KLAWISZ3
KLAWISZ3:TYPE=IMAGE
KLAWISZ3:VISIBLE=FALSE
KLAWISZ3:FILENAME=KLAWISZ3.IMG
KLAWISZ3:TOCANVAS=TRUE
KLAWISZ3:PRIORITY=4
KLAWISZ3:PRELOAD=TRUE
KLAWISZ3:RELEASE=TRUE
KLAWISZ3:MONITORCOLLISION=FALSE
KLAWISZ3:MONITORCOLLISIONALPHA=FALSE
OBJECT=KLAWISZ4
KLAWISZ4:TYPE=IMAGE
KLAWISZ4:VISIBLE=FALSE
KLAWISZ4:FILENAME=KLAWISZ4.IMG
KLAWISZ4:TOCANVAS=TRUE
KLAWISZ4:PRIORITY=4
KLAWISZ4:PRELOAD=TRUE
KLAWISZ4:RELEASE=TRUE
KLAWISZ4:MONITORCOLLISION=FALSE
KLAWISZ4:MONITORCOLLISIONALPHA=FALSE
OBJECT=KLAWISZ5
KLAWISZ5:TYPE=IMAGE
KLAWISZ5:VISIBLE=FALSE
KLAWISZ5:FILENAME=KLAWISZ5.IMG
KLAWISZ5:TOCANVAS=TRUE
KLAWISZ5:PRIORITY=4
KLAWISZ5:PRELOAD=TRUE
KLAWISZ5:RELEASE=TRUE
KLAWISZ5:MONITORCOLLISION=FALSE
KLAWISZ5:MONITORCOLLISIONALPHA=FALSE
OBJECT=KLAWISZ6
KLAWISZ6:TYPE=IMAGE
KLAWISZ6:VISIBLE=FALSE
KLAWISZ6:FILENAME=KLAWISZ6.IMG
KLAWISZ6:TOCANVAS=TRUE
KLAWISZ6:PRIORITY=4
KLAWISZ6:PRELOAD=TRUE
KLAWISZ6:RELEASE=TRUE
KLAWISZ6:MONITORCOLLISION=FALSE
KLAWISZ6:MONITORCOLLISIONALPHA=FALSE
OBJECT=ENTER
ENTER:TYPE=IMAGE
ENTER:VISIBLE=TRUE
ENTER:FILENAME=ENTER.IMG
ENTER:TOCANVAS=TRUE
ENTER:PRIORITY=0
ENTER:PRELOAD=TRUE
ENTER:RELEASE=TRUE
ENTER:MONITORCOLLISION=FALSE
ENTER:MONITORCOLLISIONALPHA=FALSE
OBJECT=BUT1
BUT1:TYPE=BUTTON
BUT1:VISIBLE=TRUE
BUT1:RECT=KLAWISZ1
BUT1:ENABLE=TRUE
BUT1:DRAGGABLE=FALSE
BUT1:ONINIT=DIDISABLE
BUT1:ONCLICKED=B_WPIS(1)
OBJECT=ENTERBUT
ENTERBUT:TYPE=BUTTON
ENTERBUT:VISIBLE=TRUE
ENTERBUT:ENABLE=TRUE
ENTERBUT:DRAGGABLE=FALSE
ENTERBUT:GFXSTANDARD=ENTER
ENTERBUT:ONINIT=DIDISABLE
ENTERBUT:ONCLICKED=B_CHECK
OBJECT=GLINABUT
GLINABUT:TYPE=BUTTON
GLINABUT:VISIBLE=TRUE
GLINABUT:ENABLE=TRUE
GLINABUT:DRAGGABLE=FALSE
GLINABUT:GFXSTANDARD=GLINA_9
GLINABUT:ONCLICKED=GLINAGADA3B
GLINABUT:ONINIT=DIDISABLE
OBJECT=EXITPROGAM
EXITPROGAM:TYPE=BUTTON
EXITPROGAM:VISIBLE=TRUE
EXITPROGAM:ENABLE=TRUE
EXITPROGAM:DRAGGABLE=FALSE
EXITPROGAM:ONRELEASED={EXITPROGRAMNAMAXA^RUN();}
EXITPROGAM:ONFOCUSON={ANNEXIT^PLAY("ONFOCUSON");}
EXITPROGAM:ONFOCUSOFF={ANNEXIT^PLAY("ONFOCUSOFF");}
EXITPROGAM:ONCLICKED={ANNEXIT^PLAY("ONCLICK");}
OBJECT=BUT2
BUT2:TYPE=BUTTON
BUT2:VISIBLE=TRUE
BUT2:RECT=KLAWISZ2
BUT2:ENABLE=TRUE
BUT2:DRAGGABLE=FALSE
BUT2:ONINIT=DIDISABLE
BUT2:ONCLICKED=B_WPIS(2)
OBJECT=BUT3
BUT3:TYPE=BUTTON
BUT3:VISIBLE=TRUE
BUT3:RECT=KLAWISZ3
BUT3:ENABLE=TRUE
BUT3:DRAGGABLE=FALSE
BUT3:ONINIT=DIDISABLE
BUT3:ONCLICKED=B_WPIS(3)
OBJECT=BUT4
BUT4:TYPE=BUTTON
BUT4:VISIBLE=TRUE
BUT4:RECT=KLAWISZ4
BUT4:ENABLE=TRUE
BUT4:DRAGGABLE=FALSE
BUT4:ONINIT=DIDISABLE
BUT4:ONCLICKED=B_WPIS(4)
OBJECT=BUT5
BUT5:TYPE=BUTTON
BUT5:VISIBLE=TRUE
BUT5:RECT=KLAWISZ5
BUT5:ENABLE=TRUE
BUT5:DRAGGABLE=FALSE
BUT5:ONINIT=DIDISABLE
BUT5:ONCLICKED=B_WPIS(5)
OBJECT=BUT6
BUT6:TYPE=BUTTON
BUT6:VISIBLE=TRUE
BUT6:RECT=KLAWISZ6
BUT6:ENABLE=TRUE
BUT6:DRAGGABLE=FALSE
BUT6:ONINIT=DIDISABLE
BUT6:ONCLICKED=B_WPIS(6)
OBJECT=GLINA
GLINA:TYPE=SEQUENCE
GLINA:FILENAME=GLINA.SEQ
GLINA:ONFINISHED^ENTRE=GLINAGADA1
GLINA:ONFINISHED^GADA1=GLINAGADA2
GLINA:ONFINISHED^GADA2=GLINAGADA3
GLINA:ONFINISHED^GADA3=GLINAPOKAZUJE
GLINA:ONFINISHED^EXIT={BEHCSEND^RUN();}
GLINA:ONFINISHED^GADA4=GLINAGADA5
GLINA:ONFINISHED^GADA7={GLINAOK^RUN();}
GLINA:ONFINISHED^OK={GLINAEXIT^RUN();}
GLINA:ONFINISHED^GADA5=B_RESET
GLINA:ONFINISHED^GADA6=B_RESET
OBJECT=MOUSE
MOUSE:TYPE=MOUSE
OBJECT=CNVLOADER
CNVLOADER:TYPE=CNVLOADER
OBJECT=CANVASOBSERVER
CANVASOBSERVER:TYPE=CANVAS_OBSERVER
OBJECT=CONPR1
CONPR1:TYPE=CONDITION
CONPR1:OPERAND1=PROBA
CONPR1:OPERATOR=LESSEQUAL
CONPR1:OPERAND2=4
CONPR1:ONRUNTIMESUCCESS=GLINAGADA4
OBJECT=CONPR2
CONPR2:TYPE=CONDITION
CONPR2:OPERAND1=PROBA
CONPR2:OPERATOR=EQUAL
CONPR2:OPERAND2=5
CONPR2:ONRUNTIMESUCCESS=GLINAGADA5
OBJECT=CONPR3
CONPR3:TYPE=CONDITION
CONPR3:OPERAND1=PROBA
CONPR3:OPERATOR=GREATEREQUAL
CONPR3:OPERAND2=6
CONPR3:ONRUNTIMESUCCESS=GLINAGADA6
OBJECT=KEYBOARD
KEYBOARD:TYPE=KEYBOARD
OBJECT=THISHIDE
THISHIDE:TYPE=BEHAVIOUR
THISHIDE:CODE={THIS^HIDE();}
OBJECT=THISPLAY
THISPLAY:TYPE=BEHAVIOUR
THISPLAY:CODE={THIS^PLAY("PLAY");}
OBJECT=GLINAENTRE
GLINAENTRE:TYPE=BEHAVIOUR
GLINAENTRE:CODE={GLINA^PLAY("ENTRE");}
OBJECT=GLINAGADA1
GLINAGADA1:TYPE=BEHAVIOUR
GLINAGADA1:CODE={EKRAN^PLAY("PLAY");GLINA^PLAY("GADA1");}
OBJECT=GLINAGADA2
GLINAGADA2:TYPE=BEHAVIOUR
GLINAGADA2:CODE={GLINA^PLAY("GADA2");}
OBJECT=GLINAGADA3
GLINAGADA3:TYPE=BEHAVIOUR
GLINAGADA3:CODE={GLINA^PLAY("GADA3");}
OBJECT=GLINAGADA4
GLINAGADA4:TYPE=BEHAVIOUR
GLINAGADA4:CODE={GLINA^PLAY("GADA4");}
OBJECT=GLINAGADA5
GLINAGADA5:TYPE=BEHAVIOUR
GLINAGADA5:CODE={GLINA^PLAY("GADA5");}
OBJECT=GLINAGADA6
GLINAGADA6:TYPE=BEHAVIOUR
GLINAGADA6:CODE={GLINA^PLAY("GADA6");}
OBJECT=GLINAGADA7
GLINAGADA7:TYPE=BEHAVIOUR
GLINAGADA7:CODE={GLINA^PLAY("GADA7");}
OBJECT=GLINAEXIT
GLINAEXIT:TYPE=BEHAVIOUR
GLINAEXIT:CODE={EKRAN^HIDE();ZNACZKI1^HIDE();ZNACZKI2^HIDE();ZNACZKI3^HIDE();ZNACZKI4^HIDE();BUT1^DISABLE();BUT2^DISABLE();BUT3^DISABLE();BUT4^DISABLE();BUT5^DISABLE();BUT6^DISABLE();ENTERBUT^DISABLE();GLINABUT^DISABLE();GLINA^PLAY("EXIT");}
OBJECT=GLINAOK
GLINAOK:TYPE=BEHAVIOUR
GLINAOK:CODE={GLINA^PLAY("OK");}
OBJECT=GLINAPOKAZUJE
GLINAPOKAZUJE:TYPE=BEHAVIOUR
GLINAPOKAZUJE:CODE={GLINA^PLAY("POKAZUJE");}
OBJECT=DIDISABLE
DIDISABLE:TYPE=BEHAVIOUR
DIDISABLE:CODE={THIS^DISABLE();}
OBJECT=ENABLEALL
ENABLEALL:TYPE=BEHAVIOUR
ENABLEALL:CODE={BUT1^ENABLE();BUT2^ENABLE();BUT3^ENABLE();BUT4^ENABLE();BUT5^ENABLE();BUT6^ENABLE();ENTERBUT^ENABLE();GLINABUT^ENABLE();}
OBJECT=ENTERBUTBEH
ENTERBUTBEH:TYPE=BEHAVIOUR
ENTERBUTBEH:CODE={CON1^CHECK(RUN);CON2^CHECK(RUN);CON3^CHECK(RUN);CON4^CHECK(RUN);}
OBJECT=HASLOOKIEJ
HASLOOKIEJ:TYPE=BEHAVIOUR
HASLOOKIEJ:CODE={GLINAGADA7^RUN();DISABLEALL^RUN();}
OBJECT=DISABLEALL
DISABLEALL:TYPE=BEHAVIOUR
DISABLEALL:CODE={BUT1^DISABLEBUTVISIBLE();BUT2^DISABLEBUTVISIBLE();BUT3^DISABLEBUTVISIBLE();BUT4^DISABLEBUTVISIBLE();BUT5^DISABLEBUTVISIBLE();BUT6^DISABLEBUTVISIBLE();ENTERBUT^DISABLEBUTVISIBLE();GLINABUT^DISABLEBUTVISIBLE();}
OBJECT=DORZEKI
DORZEKI:TYPE=BEHAVIOUR
DORZEKI:CODE={PRZYGODA^GOTO("S31_0_ZIEMIA");}
OBJECT=RESTART
RESTART:TYPE=BEHAVIOUR
RESTART:CODE={DIDISABLE^RUN();KTORAPROBA^RUN();ENABLEALL^RUN();PROBA^INC();ZNACZKI1^HIDE();ZNACZKI2^HIDE();ZNACZKI3^HIDE();ZNACZKI4^HIDE();}
OBJECT=KTORAPROBA
KTORAPROBA:TYPE=BEHAVIOUR
KTORAPROBA:CODE={CONPR1^CHECK(TRUE);CONPR2^CHECK(TRUE);CONPR3^CHECK(TRUE);}
OBJECT=GLINAGADA3B
GLINAGADA3B:TYPE=BEHAVIOUR
GLINAGADA3B:CODE={GLINA^PLAY("GADA3B");}
OBJECT=EXITPROGRAMNAMAXA
EXITPROGRAMNAMAXA:TYPE=BEHAVIOUR
EXITPROGRAMNAMAXA:CODE={PRZYGODA^GOTO("NAPISYMAIN");}
OBJECT=__INIT__
__INIT__:TYPE=BEHAVIOUR
__INIT__:CODE={G_SARCADESCENELAST^SET("TUNEL");G_SARCADESCENE^SET("KOMIN");SCENENAME^SET("KONTROLA");G_CURSOR^SETCURSOR("INACTIVE");ANNEXIT^SETPOSITION(-700,-450);EXITPROGAM^SETRECT("ANNEXIT");GLINAENTRE^RUN();}
OBJECT=B_CYFRA_4
B_CYFRA_4:TYPE=BEHAVIOUR
B_CYFRA_4:CODE={ZNACZKI1^SHOW();ZNACZKI1^SETFRAME("PLAY",ZNACZKI2^GETFRAMENAME());ZNACZKI2^SHOW();ZNACZKI2^SETFRAME("PLAY",ZNACZKI3^GETFRAMENAME());ZNACZKI3^SHOW();ZNACZKI3^SETFRAME("PLAY",ZNACZKI4^GETFRAMENAME());}
OBJECT=B_CYFRA_3
B_CYFRA_3:TYPE=BEHAVIOUR
B_CYFRA_3:CODE={ZNACZKI2^SHOW();ZNACZKI2^SETFRAME("PLAY",ZNACZKI3^GETFRAMENAME());ZNACZKI3^SHOW();ZNACZKI3^SETFRAME("PLAY",ZNACZKI4^GETFRAMENAME());}
OBJECT=B_CYFRA_2
B_CYFRA_2:TYPE=BEHAVIOUR
B_CYFRA_2:CODE={ZNACZKI3^SHOW();ZNACZKI3^SETFRAME("PLAY",ZNACZKI4^GETFRAMENAME());}
OBJECT=B_WPIS
B_WPIS:TYPE=BEHAVIOUR
B_WPIS:CODE={VAR_CYFRA^INC();ZNACZKI4^SHOW();ZNACZKI4^SETFRAME("PLAY",$1);}
OBJECT=B_LOST
B_LOST:TYPE=BEHAVIOUR
B_LOST:CODE={DISABLEALL^RUN();KTORAPROBA^RUN();PROBA^INC();}
OBJECT=B_WIN
B_WIN:TYPE=BEHAVIOUR
B_WIN:CODE={DISABLEALL^RUN();HASLOOKIEJ^RUN();}
OBJECT=B_CHECK
B_CHECK:TYPE=BEHAVIOUR
B_CHECK:CODE={VAR_KOD^SET([ZNACZKI1^GETFRAMENAME()+ZNACZKI2^GETFRAMENAME()]);VAR_KOD^ADD([ZNACZKI3^GETFRAMENAME()+ZNACZKI4^GETFRAMENAME()]);@IF("VAR_KOD","!_","6251","BFITMP0","BFITMP1");}
OBJECT=B_RESET
B_RESET:TYPE=BEHAVIOUR
B_RESET:CODE={ZNACZKI1^HIDE();ZNACZKI2^HIDE();ZNACZKI3^HIDE();ZNACZKI4^HIDE();ZNACZKI4^SETFRAME("PLAY",0);ZNACZKI3^SETFRAME("PLAY",0);ZNACZKI2^SETFRAME("PLAY",0);ZNACZKI1^SETFRAME("PLAY",0);VAR_CYFRA^SET(0);ENABLEALL^RUN();}
OBJECT=__PAUSESTART__
__PAUSESTART__:TYPE=BEHAVIOUR
__PAUSESTART__:CODE={SCENENAME^SET(PRZYGODA^GETCURRENTSCENE());MOUSE^DISABLESIGNAL();__KEYB__^SET(KEYBOARD^ISENABLED());KEYBOARD^DISABLE();__HSPOTMAX__^SET(*SCENENAME^GETMAXHSPRIORITY());__HSPOTMIN__^SET(*SCENENAME^GETMINHSPRIORITY());*SCENENAME^GETPLAYINGANIMO("__GRHELP__");}
OBJECT=__PAUSEEND__
__PAUSEEND__:TYPE=BEHAVIOUR
__PAUSEEND__:CODE={MOUSE^ENABLESIGNAL();KEYBOARD^ENABLE();__GRHELP__^REMOVEALL();}
OBJECT=_CURSORMOVE_
_CURSORMOVE_:TYPE=BEHAVIOUR
_CURSORMOVE_:CODE={G_CURSOR^SETOBJECT(CANVASOBSERVER^GETGRAPHICSAT(MOUSE^GETPOSX(),MOUSE^GETPOSY(),TRUE,0,5000,TRUE));}
OBJECT=__HELPSTART__
__HELPSTART__:TYPE=BEHAVIOUR
__HELPSTART__:CODE={SCENENAME^SET(PRZYGODA^GETCURRENTSCENE());MOUSE^DISABLESIGNAL();__KEYB__^SET(KEYBOARD^ISENABLED());KEYBOARD^DISABLE();__HSPOTMAX__^SET(*SCENENAME^GETMAXHSPRIORITY());__HSPOTMIN__^SET(*SCENENAME^GETMINHSPRIORITY());*SCENENAME^GETPLAYINGANIMO("__GRHELP__");CNVLOADER^LOAD([G_SCUTSCENE+".CNV"]);}
OBJECT=__HELPEND__
__HELPEND__:TYPE=BEHAVIOUR
__HELPEND__:CODE={MOUSE^ENABLESIGNAL();@IF("__KEYB__","_","TRUE","BFITMP2","BFITMP3");CNVLOADER^RELEASE([G_SCUTSCENE+".CNV"]);}
OBJECT=_VOLUME_
_VOLUME_:TYPE=BEHAVIOUR
_VOLUME_:CODE={DIALOGS^SETMUSICVOLUME([0.8*G_ARRSETTINGS^GET(1)]);}
OBJECT=_NEWGAME_
_NEWGAME_:TYPE=BEHAVIOUR
_NEWGAME_:CODE={@IF(G_ARRDATAS^FIND(G_SARCADESCENE),">","-1","BFITMP4","BFITMP5");}
OBJECT=_LOADGAME_
_LOADGAME_:TYPE=BEHAVIOUR
_LOADGAME_:CODE={@IF(G_ARRDATAS^FIND(G_SARCADESCENE),">","-1","BFITMP6","BFITMP7");}
OBJECT=BEHCSSTART
BEHCSSTART:TYPE=BEHAVIOUR
BEHCSSTART:CODE={}
OBJECT=BEHCSEND
BEHCSEND:TYPE=BEHAVIOUR
BEHCSEND:CODE={S_IACC^SET(FALSE);G_SARCADESCENELAST^SET("CS_PREKOPIEC");G_SARCADESCENE^SET("KOMIN");PRZYGODA^GOTO("ARCADE");@BREAK();}
OBJECT=BFITMP0
BFITMP0:TYPE=BEHAVIOUR
BFITMP0:CODE={B_LOST^RUN();}
OBJECT=BFITMP1
BFITMP1:TYPE=BEHAVIOUR
BFITMP1:CODE={B_WIN^RUN();}
OBJECT=BFITMP2
BFITMP2:TYPE=BEHAVIOUR
BFITMP2:CODE={KEYBOARD^ENABLE();}
OBJECT=BFITMP3
BFITMP3:TYPE=BEHAVIOUR
BFITMP3:CODE={KEYBOARD^DISABLE();}
OBJECT=BFITMP4
BFITMP4:TYPE=BEHAVIOUR
BFITMP4:CODE={PRZYGODA^GOTO("ARCADE");@BREAK();}
OBJECT=BFITMP5
BFITMP5:TYPE=BEHAVIOUR
BFITMP5:CODE={PRZYGODA^GOTO(G_SARCADESCENE);@BREAK();}
OBJECT=BFITMP6
BFITMP6:TYPE=BEHAVIOUR
BFITMP6:CODE={PRZYGODA^GOTO("ARCADE");@BREAK();}
OBJECT=BFITMP7
BFITMP7:TYPE=BEHAVIOUR
BFITMP7:CODE={PRZYGODA^GOTO(G_SARCADESCENE);@BREAK();}

View File

@@ -0,0 +1,109 @@
OBJECT=GLINA_9
GLINA_9:TYPE=ANIMO
GLINA_9:VISIBLE=TRUE
GLINA_9:FILENAME=GLINA.ANN
GLINA_9:TOCANVAS=TRUE
GLINA_9:PRIORITY=20
GLINA_9:FPS=16
GLINA_9:PRELOAD=TRUE
GLINA_9:RELEASE=TRUE
GLINA_9:MONITORCOLLISION=FALSE
GLINA_9:MONITORCOLLISIONALPHA=FALSE
OBJECT=ANNEXIT
ANNEXIT:TYPE=ANIMO
ANNEXIT:VISIBLE=TRUE
ANNEXIT:FILENAME=M_EXIT.ANN
ANNEXIT:TOCANVAS=TRUE
ANNEXIT:PRIORITY=0
ANNEXIT:FPS=16
ANNEXIT:PRELOAD=TRUE
ANNEXIT:RELEASE=TRUE
ANNEXIT:MONITORCOLLISION=FALSE
ANNEXIT:MONITORCOLLISIONALPHA=FALSE
OBJECT=EXITPROGAM
EXITPROGAM:TYPE=BUTTON
EXITPROGAM:VISIBLE=TRUE
EXITPROGAM:ENABLE=TRUE
EXITPROGAM:DRAGGABLE=FALSE
EXITPROGAM:ONRELEASED={EXITPROGRAM^RUN();}
EXITPROGAM:ONFOCUSON={ANNEXIT^PLAY("ONFOCUSON");}
EXITPROGAM:ONFOCUSOFF={ANNEXIT^PLAY("ONFOCUSOFF");}
EXITPROGAM:ONCLICKED={ANNEXIT^PLAY("ONCLICK");}
OBJECT=GLINA
GLINA:TYPE=SEQUENCE
GLINA:FILENAME=GLINA.SEQ
GLINA:ONFINISHED^ENTRE=GLINAGADA1
GLINA:ONFINISHED^GADA1=GLINAGADA2
GLINA:ONFINISHED^GADA2=GLINAGADA3
GLINA:ONFINISHED^GADA3=GLINAPOKAZUJE
GLINA:ONFINISHED^EXIT={BEHCSEND^RUN();}
GLINA:ONFINISHED^GADA4=GLINAGADA5
GLINA:ONFINISHED^GADA7={GLINAOK^RUN();}
GLINA:ONFINISHED^OK={GLINAEXIT^RUN();}
OBJECT=MOUSE
MOUSE:TYPE=MOUSE
OBJECT=CNVLOADER
CNVLOADER:TYPE=CNVLOADER
OBJECT=CANVASOBSERVER
CANVASOBSERVER:TYPE=CANVAS_OBSERVER
OBJECT=KEYBOARD
KEYBOARD:TYPE=KEYBOARD
OBJECT=GLINAENTRE
GLINAENTRE:TYPE=BEHAVIOUR
GLINAENTRE:CODE={GLINA^PLAY("ENTRE");}
OBJECT=GLINAGADA1
GLINAGADA1:TYPE=BEHAVIOUR
GLINAGADA1:CODE={GLINA^PLAY("GADA1");}
OBJECT=GLINAGADA2
GLINAGADA2:TYPE=BEHAVIOUR
GLINAGADA2:CODE={GLINA^PLAY("GADA2");}
OBJECT=GLINAGADA3
GLINAGADA3:TYPE=BEHAVIOUR
GLINAGADA3:CODE={GLINA^PLAY("GADA3");}
OBJECT=GLINAGADA4
GLINAGADA4:TYPE=BEHAVIOUR
GLINAGADA4:CODE={GLINA^PLAY("GADA4");}
OBJECT=GLINAGADA5
GLINAGADA5:TYPE=BEHAVIOUR
GLINAGADA5:CODE={GLINA^PLAY("GADA5");}
OBJECT=GLINAGADA6
GLINAGADA6:TYPE=BEHAVIOUR
GLINAGADA6:CODE={GLINA^PLAY("GADA6");}
OBJECT=GLINAGADA7
GLINAGADA7:TYPE=BEHAVIOUR
GLINAGADA7:CODE={GLINA^PLAY("GADA7");}
OBJECT=GLINAEXIT
GLINAEXIT:TYPE=BEHAVIOUR
GLINAEXIT:CODE={GLINA^PLAY("EXIT");}
OBJECT=GLINAOK
GLINAOK:TYPE=BEHAVIOUR
GLINAOK:CODE={GLINA^PLAY("OK");}
OBJECT=GLINAPOKAZUJE
GLINAPOKAZUJE:TYPE=BEHAVIOUR
GLINAPOKAZUJE:CODE={GLINA^PLAY("POKAZUJE");}
OBJECT=GLINAGADA3B
GLINAGADA3B:TYPE=BEHAVIOUR
GLINAGADA3B:CODE={GLINA^PLAY("GADA3B");}
OBJECT=__INIT__
__INIT__:TYPE=BEHAVIOUR
__INIT__:CODE={G_CURSOR^SETCURSOR("INACTIVE");ANNEXIT^SETPOSITION(-700,-450);EXITPROGAM^SETRECT("ANNEXIT");GLINAENTRE^RUN();}

View File

@@ -0,0 +1,554 @@
OBJECT=PROBA
PROBA:TYPE=INTEGER
PROBA:VALUE=1
OBJECT=VAR_CYFRA
VAR_CYFRA:TYPE=INTEGER
VAR_CYFRA:VALUE=0
VAR_CYFRA:ONCHANGED^2=B_CYFRA_2
VAR_CYFRA:ONCHANGED^3=B_CYFRA_3
VAR_CYFRA:ONCHANGED^4=B_CYFRA_4
VAR_CYFRA:ONCHANGED^5={B_CYFRA_4^RUN();VAR_CYFRA^SET(6);}
VAR_CYFRA:ONCHANGED^7={B_CYFRA_4^RUN();VAR_CYFRA^SET(6);}
OBJECT=VAR_KOD
VAR_KOD:TYPE=STRING
OBJECT=ZNACZKI1
ZNACZKI1:TYPE=ANIMO
ZNACZKI1:VISIBLE=TRUE
ZNACZKI1:FILENAME=ZNACZKI1.ANN
ZNACZKI1:TOCANVAS=TRUE
ZNACZKI1:PRIORITY=6
ZNACZKI1:FPS=16
ZNACZKI1:PRELOAD=TRUE
ZNACZKI1:RELEASE=TRUE
ZNACZKI1:MONITORCOLLISION=FALSE
ZNACZKI1:MONITORCOLLISIONALPHA=FALSE
ZNACZKI1:ONINIT=THISHIDE
OBJECT=ZNACZKI2
ZNACZKI2:TYPE=ANIMO
ZNACZKI2:VISIBLE=TRUE
ZNACZKI2:FILENAME=ZNACZKI2.ANN
ZNACZKI2:TOCANVAS=TRUE
ZNACZKI2:PRIORITY=6
ZNACZKI2:FPS=16
ZNACZKI2:PRELOAD=TRUE
ZNACZKI2:RELEASE=TRUE
ZNACZKI2:MONITORCOLLISION=FALSE
ZNACZKI2:MONITORCOLLISIONALPHA=FALSE
ZNACZKI2:ONINIT=THISHIDE
OBJECT=ZNACZKI3
ZNACZKI3:TYPE=ANIMO
ZNACZKI3:VISIBLE=TRUE
ZNACZKI3:FILENAME=ZNACZKI3.ANN
ZNACZKI3:TOCANVAS=TRUE
ZNACZKI3:PRIORITY=6
ZNACZKI3:FPS=16
ZNACZKI3:PRELOAD=TRUE
ZNACZKI3:RELEASE=TRUE
ZNACZKI3:MONITORCOLLISION=FALSE
ZNACZKI3:MONITORCOLLISIONALPHA=FALSE
ZNACZKI3:ONINIT=THISHIDE
OBJECT=ZNACZKI4
ZNACZKI4:TYPE=ANIMO
ZNACZKI4:VISIBLE=TRUE
ZNACZKI4:FILENAME=ZNACZKI4.ANN
ZNACZKI4:TOCANVAS=TRUE
ZNACZKI4:PRIORITY=6
ZNACZKI4:FPS=16
ZNACZKI4:PRELOAD=TRUE
ZNACZKI4:RELEASE=TRUE
ZNACZKI4:MONITORCOLLISION=FALSE
ZNACZKI4:MONITORCOLLISIONALPHA=FALSE
ZNACZKI4:ONINIT=THISHIDE
OBJECT=GLINA_9
GLINA_9:TYPE=ANIMO
GLINA_9:VISIBLE=TRUE
GLINA_9:FILENAME=GLINA.ANN
GLINA_9:TOCANVAS=TRUE
GLINA_9:PRIORITY=0
GLINA_9:FPS=16
GLINA_9:PRELOAD=TRUE
GLINA_9:RELEASE=TRUE
GLINA_9:MONITORCOLLISION=FALSE
GLINA_9:MONITORCOLLISIONALPHA=FALSE
OBJECT=EKRAN
EKRAN:TYPE=ANIMO
EKRAN:VISIBLE=TRUE
EKRAN:FILENAME=EKRAN.ANN
EKRAN:TOCANVAS=TRUE
EKRAN:PRIORITY=0
EKRAN:FPS=16
EKRAN:PRELOAD=TRUE
EKRAN:RELEASE=TRUE
EKRAN:MONITORCOLLISION=FALSE
EKRAN:MONITORCOLLISIONALPHA=FALSE
EKRAN:ONFINISHED=ENABLEALL
OBJECT=ANNEXIT
ANNEXIT:TYPE=ANIMO
ANNEXIT:VISIBLE=TRUE
ANNEXIT:FILENAME=M_EXIT.ANN
ANNEXIT:TOCANVAS=TRUE
ANNEXIT:PRIORITY=0
ANNEXIT:FPS=16
ANNEXIT:PRELOAD=TRUE
ANNEXIT:RELEASE=TRUE
ANNEXIT:MONITORCOLLISION=FALSE
ANNEXIT:MONITORCOLLISIONALPHA=FALSE
OBJECT=KLAWISZ1
KLAWISZ1:TYPE=IMAGE
KLAWISZ1:VISIBLE=FALSE
KLAWISZ1:FILENAME=KLAWISZ1.IMG
KLAWISZ1:TOCANVAS=TRUE
KLAWISZ1:PRIORITY=4
KLAWISZ1:PRELOAD=TRUE
KLAWISZ1:RELEASE=TRUE
KLAWISZ1:MONITORCOLLISION=FALSE
KLAWISZ1:MONITORCOLLISIONALPHA=FALSE
OBJECT=KLAWISZ2
KLAWISZ2:TYPE=IMAGE
KLAWISZ2:VISIBLE=FALSE
KLAWISZ2:FILENAME=KLAWISZ2.IMG
KLAWISZ2:TOCANVAS=TRUE
KLAWISZ2:PRIORITY=4
KLAWISZ2:PRELOAD=TRUE
KLAWISZ2:RELEASE=TRUE
KLAWISZ2:MONITORCOLLISION=FALSE
KLAWISZ2:MONITORCOLLISIONALPHA=FALSE
OBJECT=KLAWISZ3
KLAWISZ3:TYPE=IMAGE
KLAWISZ3:VISIBLE=FALSE
KLAWISZ3:FILENAME=KLAWISZ3.IMG
KLAWISZ3:TOCANVAS=TRUE
KLAWISZ3:PRIORITY=4
KLAWISZ3:PRELOAD=TRUE
KLAWISZ3:RELEASE=TRUE
KLAWISZ3:MONITORCOLLISION=FALSE
KLAWISZ3:MONITORCOLLISIONALPHA=FALSE
OBJECT=KLAWISZ4
KLAWISZ4:TYPE=IMAGE
KLAWISZ4:VISIBLE=FALSE
KLAWISZ4:FILENAME=KLAWISZ4.IMG
KLAWISZ4:TOCANVAS=TRUE
KLAWISZ4:PRIORITY=4
KLAWISZ4:PRELOAD=TRUE
KLAWISZ4:RELEASE=TRUE
KLAWISZ4:MONITORCOLLISION=FALSE
KLAWISZ4:MONITORCOLLISIONALPHA=FALSE
OBJECT=KLAWISZ5
KLAWISZ5:TYPE=IMAGE
KLAWISZ5:VISIBLE=FALSE
KLAWISZ5:FILENAME=KLAWISZ5.IMG
KLAWISZ5:TOCANVAS=TRUE
KLAWISZ5:PRIORITY=4
KLAWISZ5:PRELOAD=TRUE
KLAWISZ5:RELEASE=TRUE
KLAWISZ5:MONITORCOLLISION=FALSE
KLAWISZ5:MONITORCOLLISIONALPHA=FALSE
OBJECT=KLAWISZ6
KLAWISZ6:TYPE=IMAGE
KLAWISZ6:VISIBLE=FALSE
KLAWISZ6:FILENAME=KLAWISZ6.IMG
KLAWISZ6:TOCANVAS=TRUE
KLAWISZ6:PRIORITY=4
KLAWISZ6:PRELOAD=TRUE
KLAWISZ6:RELEASE=TRUE
KLAWISZ6:MONITORCOLLISION=FALSE
KLAWISZ6:MONITORCOLLISIONALPHA=FALSE
OBJECT=ENTER
ENTER:TYPE=IMAGE
ENTER:VISIBLE=TRUE
ENTER:FILENAME=ENTER.IMG
ENTER:TOCANVAS=TRUE
ENTER:PRIORITY=0
ENTER:PRELOAD=TRUE
ENTER:RELEASE=TRUE
ENTER:MONITORCOLLISION=FALSE
ENTER:MONITORCOLLISIONALPHA=FALSE
OBJECT=BUT1
BUT1:TYPE=BUTTON
BUT1:VISIBLE=TRUE
BUT1:RECT=KLAWISZ1
BUT1:ENABLE=TRUE
BUT1:DRAGGABLE=FALSE
BUT1:ONINIT=DIDISABLE
BUT1:ONCLICKED=B_WPIS(1)
OBJECT=ENTERBUT
ENTERBUT:TYPE=BUTTON
ENTERBUT:VISIBLE=TRUE
ENTERBUT:ENABLE=TRUE
ENTERBUT:DRAGGABLE=FALSE
ENTERBUT:GFXSTANDARD=ENTER
ENTERBUT:ONINIT=DIDISABLE
ENTERBUT:ONCLICKED=B_CHECK
OBJECT=GLINABUT
GLINABUT:TYPE=BUTTON
GLINABUT:VISIBLE=TRUE
GLINABUT:ENABLE=TRUE
GLINABUT:DRAGGABLE=FALSE
GLINABUT:GFXSTANDARD=GLINA_9
GLINABUT:ONCLICKED=GLINAGADA3B
GLINABUT:ONINIT=DIDISABLE
OBJECT=EXITPROGAM
EXITPROGAM:TYPE=BUTTON
EXITPROGAM:VISIBLE=TRUE
EXITPROGAM:ENABLE=TRUE
EXITPROGAM:DRAGGABLE=FALSE
EXITPROGAM:ONRELEASED=EXITPROGRAMNAMAXA
EXITPROGAM:ONFOCUSON={ANNEXIT^PLAY("ONFOCUSON");}
EXITPROGAM:ONFOCUSOFF={ANNEXIT^PLAY("ONFOCUSOFF");}
EXITPROGAM:ONCLICKED={ANNEXIT^PLAY("ONCLICK");}
OBJECT=BUT2
BUT2:TYPE=BUTTON
BUT2:VISIBLE=TRUE
BUT2:RECT=KLAWISZ2
BUT2:ENABLE=TRUE
BUT2:DRAGGABLE=FALSE
BUT2:ONINIT=DIDISABLE
BUT2:ONCLICKED=B_WPIS(2)
OBJECT=BUT3
BUT3:TYPE=BUTTON
BUT3:VISIBLE=TRUE
BUT3:RECT=KLAWISZ3
BUT3:ENABLE=TRUE
BUT3:DRAGGABLE=FALSE
BUT3:ONINIT=DIDISABLE
BUT3:ONCLICKED=B_WPIS(3)
OBJECT=BUT4
BUT4:TYPE=BUTTON
BUT4:VISIBLE=TRUE
BUT4:RECT=KLAWISZ4
BUT4:ENABLE=TRUE
BUT4:DRAGGABLE=FALSE
BUT4:ONINIT=DIDISABLE
BUT4:ONCLICKED=B_WPIS(4)
OBJECT=BUT5
BUT5:TYPE=BUTTON
BUT5:VISIBLE=TRUE
BUT5:RECT=KLAWISZ5
BUT5:ENABLE=TRUE
BUT5:DRAGGABLE=FALSE
BUT5:ONINIT=DIDISABLE
BUT5:ONCLICKED=B_WPIS(5)
OBJECT=BUT6
BUT6:TYPE=BUTTON
BUT6:VISIBLE=TRUE
BUT6:RECT=KLAWISZ6
BUT6:ENABLE=TRUE
BUT6:DRAGGABLE=FALSE
BUT6:ONINIT=DIDISABLE
BUT6:ONCLICKED=B_WPIS(6)
OBJECT=GLINA
GLINA:TYPE=SEQUENCE
GLINA:FILENAME=GLINA.SEQ
GLINA:ONFINISHED^ENTRE=GLINAGADA1
GLINA:ONFINISHED^GADA1=GLINAGADA2
GLINA:ONFINISHED^GADA2=GLINAGADA3
GLINA:ONFINISHED^GADA3=GLINAPOKAZUJE
GLINA:ONFINISHED^EXIT={G_SARCADESCENELAST^SET("GABINETDYR");G_SARCADESCENE^SET("HOLGLOWNY");__SCREENSHOT__^RUN();S_IACC^SET(FALSE);PRZYGODA^GOTO("ARCADE");}
GLINA:ONFINISHED^GADA4=GLINAGADA5
GLINA:ONFINISHED^GADA7=GLINAOK
GLINA:ONFINISHED^OK=GLINAEXIT
GLINA:ONFINISHED^GADA5=B_RESET
GLINA:ONFINISHED^GADA6=B_RESET
OBJECT=MOUSE
MOUSE:TYPE=MOUSE
OBJECT=CNVLOADER
CNVLOADER:TYPE=CNVLOADER
OBJECT=CANVASOBSERVER
CANVASOBSERVER:TYPE=CANVAS_OBSERVER
OBJECT=CONPR1
CONPR1:TYPE=CONDITION
CONPR1:OPERAND1=PROBA
CONPR1:OPERATOR=LESSEQUAL
CONPR1:OPERAND2=4
CONPR1:ONRUNTIMESUCCESS=GLINAGADA4
OBJECT=CONPR2
CONPR2:TYPE=CONDITION
CONPR2:OPERAND1=PROBA
CONPR2:OPERATOR=EQUAL
CONPR2:OPERAND2=5
CONPR2:ONRUNTIMESUCCESS=GLINAGADA5
OBJECT=CONPR3
CONPR3:TYPE=CONDITION
CONPR3:OPERAND1=PROBA
CONPR3:OPERATOR=GREATEREQUAL
CONPR3:OPERAND2=6
CONPR3:ONRUNTIMESUCCESS=GLINAGADA6
OBJECT=KEYBOARD
KEYBOARD:TYPE=KEYBOARD
OBJECT=THISHIDE
THISHIDE:TYPE=BEHAVIOUR
THISHIDE:CODE={THIS^HIDE();}
OBJECT=THISPLAY
THISPLAY:TYPE=BEHAVIOUR
THISPLAY:CODE={THIS^PLAY("PLAY");}
OBJECT=GLINAENTRE
GLINAENTRE:TYPE=BEHAVIOUR
GLINAENTRE:CODE={GLINA^PLAY("ENTRE");}
OBJECT=GLINAGADA1
GLINAGADA1:TYPE=BEHAVIOUR
GLINAGADA1:CODE={EKRAN^PLAY("PLAY");GLINA^PLAY("GADA1");}
OBJECT=GLINAGADA2
GLINAGADA2:TYPE=BEHAVIOUR
GLINAGADA2:CODE={GLINA^PLAY("GADA2");}
OBJECT=GLINAGADA3
GLINAGADA3:TYPE=BEHAVIOUR
GLINAGADA3:CODE={GLINA^PLAY("GADA3");}
OBJECT=GLINAGADA4
GLINAGADA4:TYPE=BEHAVIOUR
GLINAGADA4:CODE={GLINA^PLAY("GADA4");}
OBJECT=GLINAGADA5
GLINAGADA5:TYPE=BEHAVIOUR
GLINAGADA5:CODE={GLINA^PLAY("GADA5");}
OBJECT=GLINAGADA6
GLINAGADA6:TYPE=BEHAVIOUR
GLINAGADA6:CODE={GLINA^PLAY("GADA6");}
OBJECT=GLINAGADA7
GLINAGADA7:TYPE=BEHAVIOUR
GLINAGADA7:CODE={GLINA^PLAY("GADA7");}
OBJECT=GLINAEXIT
GLINAEXIT:TYPE=BEHAVIOUR
GLINAEXIT:CODE={EKRAN^HIDE();ZNACZKI1^HIDE();ZNACZKI2^HIDE();ZNACZKI3^HIDE();ZNACZKI4^HIDE();BUT1^DISABLE();BUT2^DISABLE();BUT3^DISABLE();BUT4^DISABLE();BUT5^DISABLE();BUT6^DISABLE();ENTERBUT^DISABLE();GLINABUT^DISABLE();GLINA^PLAY("EXIT");}
OBJECT=GLINAOK
GLINAOK:TYPE=BEHAVIOUR
GLINAOK:CODE={GLINA^PLAY("OK");}
OBJECT=GLINAPOKAZUJE
GLINAPOKAZUJE:TYPE=BEHAVIOUR
GLINAPOKAZUJE:CODE={GLINA^PLAY("POKAZUJE");}
OBJECT=DIDISABLE
DIDISABLE:TYPE=BEHAVIOUR
DIDISABLE:CODE={THIS^DISABLE();}
OBJECT=ENABLEALL
ENABLEALL:TYPE=BEHAVIOUR
ENABLEALL:CODE={BUT1^ENABLE();BUT2^ENABLE();BUT3^ENABLE();BUT4^ENABLE();BUT5^ENABLE();BUT6^ENABLE();ENTERBUT^ENABLE();GLINABUT^ENABLE();}
OBJECT=ENTERBUTBEH
ENTERBUTBEH:TYPE=BEHAVIOUR
ENTERBUTBEH:CODE={CON1^CHECK(RUN);CON2^CHECK(RUN);CON3^CHECK(RUN);CON4^CHECK(RUN);}
OBJECT=HASLOOKIEJ
HASLOOKIEJ:TYPE=BEHAVIOUR
HASLOOKIEJ:CODE={GLINAGADA7^RUN();KONTROLAVAR^SET(1);DISABLEALL^RUN();}
OBJECT=DISABLEALL
DISABLEALL:TYPE=BEHAVIOUR
DISABLEALL:CODE={BUT1^DISABLEBUTVISIBLE();BUT2^DISABLEBUTVISIBLE();BUT3^DISABLEBUTVISIBLE();BUT4^DISABLEBUTVISIBLE();BUT5^DISABLEBUTVISIBLE();BUT6^DISABLEBUTVISIBLE();ENTERBUT^DISABLEBUTVISIBLE();GLINABUT^DISABLEBUTVISIBLE();}
OBJECT=DORZEKI
DORZEKI:TYPE=BEHAVIOUR
DORZEKI:CODE={PRZYGODA^GOTO("S31_0_ZIEMIA");}
OBJECT=RESTART
RESTART:TYPE=BEHAVIOUR
RESTART:CODE={DIDISABLE^RUN();KTORAPROBA^RUN();ENABLEALL^RUN();PROBA^INC();ZNACZKI1^HIDE();ZNACZKI2^HIDE();ZNACZKI3^HIDE();ZNACZKI4^HIDE();}
OBJECT=KTORAPROBA
KTORAPROBA:TYPE=BEHAVIOUR
KTORAPROBA:CODE={CONPR1^CHECK(TRUE);CONPR2^CHECK(TRUE);CONPR3^CHECK(TRUE);}
OBJECT=GLINAGADA3B
GLINAGADA3B:TYPE=BEHAVIOUR
GLINAGADA3B:CODE={GLINA^PLAY("GADA3B");}
OBJECT=EXITPROGRAMNAMAXA
EXITPROGRAMNAMAXA:TYPE=BEHAVIOUR
EXITPROGRAMNAMAXA:CODE={__SCREENSHOT__^RUN();PRZYGODA^GOTO("CREDITS");}
OBJECT=__INIT__
__INIT__:TYPE=BEHAVIOUR
__INIT__:CODE={G_IFLIPPAGE^SET(1);G_SARCADESCENELAST^SET("GABINETDYR");G_SARCADESCENE^SET("GABINETDYR");SCENENAME^SET("KONTROLA");G_CURSOR^SETSCENE("KONTROLA");G_MENU^SETSCENE("KONTROLA");G_MENU^SAVESETS();G_MENU^SHOW(FALSE);ANNEXIT^SETPOSITION(-700,-450);EXITPROGAM^SETRECT("ANNEXIT");GLINAENTRE^RUN();}
OBJECT=B_CYFRA_4
B_CYFRA_4:TYPE=BEHAVIOUR
B_CYFRA_4:CODE={ZNACZKI1^SHOW();ZNACZKI1^SETFRAME("PLAY",ZNACZKI2^GETFRAMENAME());ZNACZKI2^SHOW();ZNACZKI2^SETFRAME("PLAY",ZNACZKI3^GETFRAMENAME());ZNACZKI3^SHOW();ZNACZKI3^SETFRAME("PLAY",ZNACZKI4^GETFRAMENAME());}
OBJECT=B_CYFRA_3
B_CYFRA_3:TYPE=BEHAVIOUR
B_CYFRA_3:CODE={ZNACZKI2^SHOW();ZNACZKI2^SETFRAME("PLAY",ZNACZKI3^GETFRAMENAME());ZNACZKI3^SHOW();ZNACZKI3^SETFRAME("PLAY",ZNACZKI4^GETFRAMENAME());}
OBJECT=B_CYFRA_2
B_CYFRA_2:TYPE=BEHAVIOUR
B_CYFRA_2:CODE={ZNACZKI3^SHOW();ZNACZKI3^SETFRAME("PLAY",ZNACZKI4^GETFRAMENAME());}
OBJECT=B_WPIS
B_WPIS:TYPE=BEHAVIOUR
B_WPIS:CODE={VAR_CYFRA^INC();ZNACZKI4^SHOW();ZNACZKI4^SETFRAME("PLAY",$1);}
OBJECT=B_LOST
B_LOST:TYPE=BEHAVIOUR
B_LOST:CODE={DISABLEALL^RUN();KTORAPROBA^RUN();PROBA^INC();}
OBJECT=B_WIN
B_WIN:TYPE=BEHAVIOUR
B_WIN:CODE={DISABLEALL^RUN();HASLOOKIEJ^RUN();}
OBJECT=B_CHECK
B_CHECK:TYPE=BEHAVIOUR
B_CHECK:CODE={VAR_KOD^SET([ZNACZKI1^GETFRAMENAME()+ZNACZKI2^GETFRAMENAME()]);VAR_KOD^ADD([ZNACZKI3^GETFRAMENAME()+ZNACZKI4^GETFRAMENAME()]);@IF("VAR_KOD","!_","1546","BFITMP0","BFITMP1");}
OBJECT=B_RESET
B_RESET:TYPE=BEHAVIOUR
B_RESET:CODE={ZNACZKI1^HIDE();ZNACZKI2^HIDE();ZNACZKI3^HIDE();ZNACZKI4^HIDE();ZNACZKI4^SETFRAME("PLAY",0);ZNACZKI3^SETFRAME("PLAY",0);ZNACZKI2^SETFRAME("PLAY",0);ZNACZKI1^SETFRAME("PLAY",0);VAR_CYFRA^SET(0);ENABLEALL^RUN();}
OBJECT=__PAUSESTART__
__PAUSESTART__:TYPE=BEHAVIOUR
__PAUSESTART__:CODE={SCENENAME^SET(PRZYGODA^GETCURRENTSCENE());MOUSE^DISABLESIGNAL();__KEYB__^SET(KEYBOARD^ISENABLED());KEYBOARD^DISABLE();__HSPOTMAX__^SET(*SCENENAME^GETMAXHSPRIORITY());__HSPOTMIN__^SET(*SCENENAME^GETMINHSPRIORITY());*SCENENAME^GETPLAYINGANIMO("__GRHELP__");}
OBJECT=__PAUSEEND__
__PAUSEEND__:TYPE=BEHAVIOUR
__PAUSEEND__:CODE={MOUSE^ENABLESIGNAL();KEYBOARD^ENABLE();__GRHELP__^REMOVEALL();}
OBJECT=_CURSORMOVE_
_CURSORMOVE_:TYPE=BEHAVIOUR
_CURSORMOVE_:CODE={G_CURSOR^SETOBJECT(CANVASOBSERVER^GETGRAPHICSAT(MOUSE^GETPOSX(),MOUSE^GETPOSY(),TRUE,0,5000,TRUE));}
OBJECT=__HELPSTART__
__HELPSTART__:TYPE=BEHAVIOUR
__HELPSTART__:CODE={SCENENAME^SET(PRZYGODA^GETCURRENTSCENE());MOUSE^DISABLESIGNAL();__KEYB__^SET(KEYBOARD^ISENABLED());KEYBOARD^DISABLE();__HSPOTMAX__^SET(*SCENENAME^GETMAXHSPRIORITY());__HSPOTMIN__^SET(*SCENENAME^GETMINHSPRIORITY());*SCENENAME^GETPLAYINGANIMO("__GRHELP__");CNVLOADER^LOAD([G_SCUTSCENE+".CNV"]);}
OBJECT=__HELPEND__
__HELPEND__:TYPE=BEHAVIOUR
__HELPEND__:CODE={MOUSE^ENABLESIGNAL();@IF("__KEYB__","_","TRUE","BFITMP2","BFITMP3");CNVLOADER^RELEASE([G_SCUTSCENE+".CNV"]);}
OBJECT=_VOLUME_
_VOLUME_:TYPE=BEHAVIOUR
_VOLUME_:CODE={DIALOGS^SETMUSICVOLUME([0.8*G_ARRSETTINGS^GET(1)]);}
OBJECT=_NEWGAME_
_NEWGAME_:TYPE=BEHAVIOUR
_NEWGAME_:CODE={@IF(G_ARRDATAS^FIND(G_SARCADESCENE),">","-1","BFITMP4","BFITMP5");}
OBJECT=_LOADGAME_
_LOADGAME_:TYPE=BEHAVIOUR
_LOADGAME_:CODE={@IF(G_ARRDATAS^FIND(G_SARCADESCENE),">","-1","BFITMP6","BFITMP7");}
OBJECT=BFITMP0
BFITMP0:TYPE=BEHAVIOUR
BFITMP0:CODE={B_LOST^RUN();}
OBJECT=BFITMP1
BFITMP1:TYPE=BEHAVIOUR
BFITMP1:CODE={B_WIN^RUN();}
OBJECT=BFITMP2
BFITMP2:TYPE=BEHAVIOUR
BFITMP2:CODE={KEYBOARD^ENABLE();}
OBJECT=BFITMP3
BFITMP3:TYPE=BEHAVIOUR
BFITMP3:CODE={KEYBOARD^DISABLE();}
OBJECT=BFITMP4
BFITMP4:TYPE=BEHAVIOUR
BFITMP4:CODE={PRZYGODA^GOTO("ARCADE");@BREAK();}
OBJECT=BFITMP5
BFITMP5:TYPE=BEHAVIOUR
BFITMP5:CODE={PRZYGODA^GOTO(G_SARCADESCENE);@BREAK();}
OBJECT=BFITMP6
BFITMP6:TYPE=BEHAVIOUR
BFITMP6:CODE={PRZYGODA^GOTO("ARCADE");@BREAK();}
OBJECT=BFITMP7
BFITMP7:TYPE=BEHAVIOUR
BFITMP7:CODE={PRZYGODA^GOTO(G_SARCADESCENE);@BREAK();}

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@@ -0,0 +1,113 @@
NAME = GLINA
GLINA:TYPE = SEQUENCE
GLINA:MODE = PARAMETER
GLINA:SEQEVENT:ENTRE = 1
GLINA:SEQEVENT:EXIT = 2
GLINA:SEQEVENT:POKAZUJE = 3
GLINA:SEQEVENT:OK = 4
GLINA:SEQEVENT:GADA1 = 5
GLINA:SEQEVENT:GADA2 = 6
GLINA:SEQEVENT:GADA3 = 7
GLINA:SEQEVENT:GADA4 = 8
GLINA:SEQEVENT:GADA5 = 9
GLINA:SEQEVENT:GADA6 = A
GLINA:SEQEVENT:GADA7 = B
GLINA:SEQEVENT:GADA3B = C
NAME = ENTRE
ENTRE:FILENAME = GLINA.ANN
ENTRE:EVENT = WEJSCIE
ENTRE:TYPE = SIMPLE
ENTRE:ADD GLINA
NAME = EXIT
EXIT:FILENAME = GLINA.ANN
EXIT:EVENT = WYJSCIE
EXIT:TYPE = SIMPLE
EXIT:ADD GLINA
NAME = POKAZUJE
POKAZUJE:FILENAME = GLINA.ANN
POKAZUJE:EVENT = POKAZUJE
POKAZUJE:TYPE = SIMPLE
POKAZUJE:ADD GLINA
NAME = OK
OK:FILENAME = GLINA.ANN
OK:EVENT = OK
OK:TYPE = SIMPLE
OK:ADD GLINA
NAME = GADA1
GADA1:TYPE = SPEAKING
GADA1:ANIMOFN = GLINA.ANN
GADA1:PREFIX = GADA
GADA1:WAVFN = ZABEZ1.WAV
GADA1:STARTING=TRUE
GADA1:ENDING=TRUE
GADA1:ADD GLINA
NAME = GADA2
GADA2:TYPE = SPEAKING
GADA2:ANIMOFN = GLINA.ANN
GADA2:PREFIX = GADA
GADA2:WAVFN = ZABEZ2.WAV
GADA2:STARTING=TRUE
GADA2:ENDING=TRUE
GADA2:ADD GLINA
NAME = GADA3
GADA3:TYPE = SPEAKING
GADA3:ANIMOFN = GLINA.ANN
GADA3:PREFIX = GADA
GADA3:WAVFN = ZABEZ3.WAV
GADA3:STARTING=TRUE
GADA3:ENDING=TRUE
GADA3:ADD GLINA
NAME = GADA4
GADA4:TYPE = SPEAKING
GADA4:ANIMOFN = GLINA.ANN
GADA4:PREFIX = GADA
GADA4:WAVFN = ZABEZ4.WAV
GADA4:STARTING=TRUE
GADA4:ENDING=TRUE
GADA4:ADD GLINA
NAME = GADA5
GADA5:TYPE = SPEAKING
GADA5:ANIMOFN = GLINA.ANN
GADA5:PREFIX = GADA
GADA5:WAVFN = ZABEZ5.WAV
GADA5:STARTING=TRUE
GADA5:ENDING=TRUE
GADA5:ADD GLINA
NAME = GADA6
GADA6:TYPE = SPEAKING
GADA6:ANIMOFN = GLINA.ANN
GADA6:PREFIX = GADA
GADA6:WAVFN = ZABEZ6.WAV
GADA6:STARTING=TRUE
GADA6:ENDING=TRUE
GADA6:ADD GLINA
NAME = GADA7
GADA7:TYPE = SPEAKING
GADA7:ANIMOFN = GLINA.ANN
GADA7:PREFIX = GADA
GADA7:WAVFN = ZABEZ7.WAV
GADA7:STARTING=TRUE
GADA7:ENDING=TRUE
GADA7:ADD GLINA
NAME = GADA3B
GADA3B:TYPE = SPEAKING
GADA3B:ANIMOFN = GLINA.ANN
GADA3B:PREFIX = GADA
GADA3B:WAVFN = ZABEZ3.WAV
GADA3B:STARTING=TRUE
GADA3B:ENDING=TRUE
GADA3B:ADD GLINA

View File

@@ -0,0 +1,113 @@
NAME = GLINA
GLINA:TYPE = SEQUENCE
GLINA:MODE = SEQUENCE # crashuje silnik, aha?
GLINA:SEQEVENT:ENTRE = 1
GLINA:SEQEVENT:EXIT = 2
GLINA:SEQEVENT:POKAZUJE = 3
GLINA:SEQEVENT:OK = 4
GLINA:SEQEVENT:GADA1 = 5
GLINA:SEQEVENT:GADA2 = 6
GLINA:SEQEVENT:GADA3 = 7
GLINA:SEQEVENT:GADA4 = 8
GLINA:SEQEVENT:GADA5 = 9
GLINA:SEQEVENT:GADA6 = A
GLINA:SEQEVENT:GADA7 = B
GLINA:SEQEVENT:GADA3B = C
NAME = ENTRE
ENTRE:FILENAME = GLINA.ANN
ENTRE:EVENT = WEJSCIE
ENTRE:TYPE = SIMPLE
ENTRE:ADD GLINA
NAME = EXIT
EXIT:FILENAME = GLINA.ANN
EXIT:EVENT = WYJSCIE
EXIT:TYPE = SIMPLE
EXIT:ADD GLINA
NAME = POKAZUJE
POKAZUJE:FILENAME = GLINA.ANN
POKAZUJE:EVENT = POKAZUJE
POKAZUJE:TYPE = SIMPLE
POKAZUJE:ADD GLINA
NAME = OK
OK:FILENAME = GLINA.ANN
OK:EVENT = OK
OK:TYPE = SIMPLE
OK:ADD GLINA
NAME = GADA1
GADA1:TYPE = SPEAKING
GADA1:ANIMOFN = GLINA.ANN
GADA1:PREFIX = GADA
GADA1:WAVFN = ZABEZ1.WAV
GADA1:STARTING=TRUE
GADA1:ENDING=TRUE
GADA1:ADD GLINA
NAME = GADA2
GADA2:TYPE = SPEAKING
GADA2:ANIMOFN = GLINA.ANN
GADA2:PREFIX = GADA
GADA2:WAVFN = ZABEZ2.WAV
GADA2:STARTING=TRUE
GADA2:ENDING=TRUE
GADA2:ADD GLINA
NAME = GADA3
GADA3:TYPE = SPEAKING
GADA3:ANIMOFN = GLINA.ANN
GADA3:PREFIX = GADA
GADA3:WAVFN = ZABEZ3.WAV
GADA3:STARTING=TRUE
GADA3:ENDING=TRUE
GADA3:ADD GLINA
NAME = GADA4
GADA4:TYPE = SPEAKING
GADA4:ANIMOFN = GLINA.ANN
GADA4:PREFIX = GADA
GADA4:WAVFN = ZABEZ4.WAV
GADA4:STARTING=TRUE
GADA4:ENDING=TRUE
GADA4:ADD GLINA
NAME = GADA5
GADA5:TYPE = SPEAKING
GADA5:ANIMOFN = GLINA.ANN
GADA5:PREFIX = GADA
GADA5:WAVFN = ZABEZ5.WAV
GADA5:STARTING=TRUE
GADA5:ENDING=TRUE
GADA5:ADD GLINA
NAME = GADA6
GADA6:TYPE = SPEAKING
GADA6:ANIMOFN = GLINA.ANN
GADA6:PREFIX = GADA
GADA6:WAVFN = ZABEZ6.WAV
GADA6:STARTING=TRUE
GADA6:ENDING=TRUE
GADA6:ADD GLINA
NAME = GADA7
GADA7:TYPE = SPEAKING
GADA7:ANIMOFN = GLINA.ANN
GADA7:PREFIX = GADA
GADA7:WAVFN = ZABEZ7.WAV
GADA7:STARTING=TRUE
GADA7:ENDING=TRUE
GADA7:ADD GLINA
NAME = GADA3B
GADA3B:TYPE = SPEAKING
GADA3B:ANIMOFN = GLINA.ANN
GADA3B:PREFIX = GADA
GADA3B:WAVFN = ZABEZ3.WAV
GADA3B:STARTING=TRUE
GADA3B:ENDING=TRUE
GADA3B:ADD GLINA

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.