Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- OBJECT=MUSIC
- MUSIC:TYPE=MUSIC
- MUSIC:FILENAME=M_1.WAV
- OBJECT=S1
- S1:TYPE=STRING
- OBJECT=S2
- S2:TYPE=STRING
- OBJECT=ISCRNO
- ISCRNO:TYPE=INTEGER
- ISCRNO:VALUE=-1
- ISCRNO:ONCHANGED={@IF(ARRINFO^GET([ISCRNO+4]),"_","-1","BFITMP0","BFITMP1");}
- OBJECT=SSCRNAME
- SSCRNAME:TYPE=STRING
- SSCRNAME:ONCHANGED={IMGSCR^LOAD(["$COMMON\"+SSCRNAME]);IMGSCR^SETPOSITION(376,132);}
- OBJECT=ISTRZALKI
- ISTRZALKI:TYPE=INTEGER
- ISTRZALKI:VALUE=-1
- ISTRZALKI:ONCHANGED^1={IMGMENUSIZEBKG^SHOW();GSTRZALKIANN^SHOW();GSTRZALKIBUT^ENABLE();TREFRESH^ENABLE();}
- ISTRZALKI:ONCHANGED^0={IMGMENUSIZEBKG^HIDE();GSTRZALKIANN^HIDE();GSTRZALKIBUT^DISABLE();}
- OBJECT=ISIZEX
- ISIZEX:TYPE=INTEGER
- ISIZEX:VALUE=16
- OBJECT=ISIZEY
- ISIZEY:TYPE=INTEGER
- ISIZEY:VALUE=12
- OBJECT=SSLOTSEL
- SSLOTSEL:TYPE=STRING
- SSLOTSEL:ONCHANGED^NULL={S1^SET(S1);}
- SSLOTSEL:ONCHANGED={ISCRNO^SET(*SSLOTSEL^GETCLONEINDEX());}
- OBJECT=BWSTEP
- BWSTEP:TYPE=BOOL
- BWSTEP:VALUE=FALSE
- OBJECT=BEDITMENU
- BEDITMENU:TYPE=BOOL
- BEDITMENU:VALUE=FALSE
- OBJECT=SCHEATEDITOR
- SCHEATEDITOR:TYPE=STRING
- SCHEATEDITOR:ONCHANGED^ED={TCHEATEDITOR^DISABLE();BCHEATEDITOR^SET(TRUE);PRZYGODA^GOTO("CHASZCZEMENU");}
- OBJECT=ANNMENU
- ANNMENU:TYPE=ANIMO
- ANNMENU:VISIBLE=TRUE
- ANNMENU:FILENAME=MENU.ANN
- ANNMENU:TOCANVAS=TRUE
- ANNMENU:PRIORITY=10
- ANNMENU:FPS=16
- ANNMENU:PRELOAD=TRUE
- ANNMENU:RELEASE=TRUE
- ANNMENU:MONITORCOLLISION=FALSE
- ANNMENU:MONITORCOLLISIONALPHA=FALSE
- OBJECT=ANNLEVEL
- ANNLEVEL:TYPE=ANIMO
- ANNLEVEL:VISIBLE=TRUE
- ANNLEVEL:FILENAME=LEVELS.ANN
- ANNLEVEL:TOCANVAS=TRUE
- ANNLEVEL:PRIORITY=10
- ANNLEVEL:FPS=16
- ANNLEVEL:PRELOAD=TRUE
- ANNLEVEL:RELEASE=TRUE
- ANNLEVEL:MONITORCOLLISION=FALSE
- ANNLEVEL:MONITORCOLLISIONALPHA=FALSE
- OBJECT=ANNSLOT
- ANNSLOT:TYPE=ANIMO
- ANNSLOT:VISIBLE=TRUE
- ANNSLOT:FILENAME=SLOTY.ANN
- ANNSLOT:TOCANVAS=TRUE
- ANNSLOT:PRIORITY=12
- ANNSLOT:FPS=16
- ANNSLOT:PRELOAD=TRUE
- ANNSLOT:RELEASE=TRUE
- ANNSLOT:MONITORCOLLISION=FALSE
- ANNSLOT:MONITORCOLLISIONALPHA=FALSE
- OBJECT=ANNSLOTGLOW
- ANNSLOTGLOW:TYPE=ANIMO
- ANNSLOTGLOW:VISIBLE=TRUE
- ANNSLOTGLOW:FILENAME=SLOTY_GLOW.ANN
- ANNSLOTGLOW:TOCANVAS=TRUE
- ANNSLOTGLOW:PRIORITY=15
- ANNSLOTGLOW:FPS=16
- ANNSLOTGLOW:PRELOAD=TRUE
- ANNSLOTGLOW:RELEASE=TRUE
- ANNSLOTGLOW:MONITORCOLLISION=FALSE
- ANNSLOTGLOW:MONITORCOLLISIONALPHA=FALSE
- OBJECT=ANNSTRZALKA
- ANNSTRZALKA:TYPE=ANIMO
- ANNSTRZALKA:VISIBLE=TRUE
- ANNSTRZALKA:FILENAME=STRZALKI.ANN
- ANNSTRZALKA:TOCANVAS=TRUE
- ANNSTRZALKA:PRIORITY=10
- ANNSTRZALKA:FPS=16
- ANNSTRZALKA:PRELOAD=TRUE
- ANNSTRZALKA:RELEASE=TRUE
- ANNSTRZALKA:MONITORCOLLISION=FALSE
- ANNSTRZALKA:MONITORCOLLISIONALPHA=FALSE
- OBJECT=ANNHAND
- ANNHAND:TYPE=ANIMO
- ANNHAND:VISIBLE=TRUE
- ANNHAND:FILENAME=HAND.ANN
- ANNHAND:TOCANVAS=TRUE
- ANNHAND:PRIORITY=1090
- ANNHAND:FPS=16
- ANNHAND:PRELOAD=TRUE
- ANNHAND:RELEASE=TRUE
- ANNHAND:MONITORCOLLISION=FALSE
- ANNHAND:MONITORCOLLISIONALPHA=FALSE
- OBJECT=ANNCUTINTRO
- ANNCUTINTRO:TYPE=ANIMO
- ANNCUTINTRO:VISIBLE=FALSE
- ANNCUTINTRO:FILENAME=CUT_KRZAKI_INTRO.ANN
- ANNCUTINTRO:TOCANVAS=TRUE
- ANNCUTINTRO:PRIORITY=83
- ANNCUTINTRO:FPS=16
- ANNCUTINTRO:PRELOAD=TRUE
- ANNCUTINTRO:RELEASE=TRUE
- ANNCUTINTRO:MONITORCOLLISION=FALSE
- ANNCUTINTRO:MONITORCOLLISIONALPHA=FALSE
- OBJECT=IMGSCR
- IMGSCR:TYPE=IMAGE
- IMGSCR:VISIBLE=TRUE
- IMGSCR:FILENAME=$COMMON\CH_SCR_DEF.IMG
- IMGSCR:TOCANVAS=TRUE
- IMGSCR:PRIORITY=10
- IMGSCR:PRELOAD=TRUE
- IMGSCR:RELEASE=TRUE
- IMGSCR:MONITORCOLLISION=FALSE
- IMGSCR:MONITORCOLLISIONALPHA=FALSE
- OBJECT=IMGCIEN
- IMGCIEN:TYPE=IMAGE
- IMGCIEN:VISIBLE=TRUE
- IMGCIEN:FILENAME=CIEN.IMG
- IMGCIEN:TOCANVAS=TRUE
- IMGCIEN:PRIORITY=20
- IMGCIEN:PRELOAD=TRUE
- IMGCIEN:RELEASE=TRUE
- IMGCIEN:MONITORCOLLISION=FALSE
- IMGCIEN:MONITORCOLLISIONALPHA=FALSE
- OBJECT=B_HELP_OFF
- B_HELP_OFF:TYPE=IMAGE
- B_HELP_OFF:VISIBLE=TRUE
- B_HELP_OFF:FILENAME=B_HELP_OFF.IMG
- B_HELP_OFF:TOCANVAS=TRUE
- B_HELP_OFF:PRIORITY=1010
- B_HELP_OFF:PRELOAD=TRUE
- B_HELP_OFF:RELEASE=TRUE
- B_HELP_OFF:MONITORCOLLISION=FALSE
- B_HELP_OFF:MONITORCOLLISIONALPHA=FALSE
- OBJECT=B_HELP_ON
- B_HELP_ON:TYPE=IMAGE
- B_HELP_ON:VISIBLE=TRUE
- B_HELP_ON:FILENAME=B_HELP_ON.IMG
- B_HELP_ON:TOCANVAS=TRUE
- B_HELP_ON:PRIORITY=1010
- B_HELP_ON:PRELOAD=TRUE
- B_HELP_ON:RELEASE=TRUE
- B_HELP_ON:MONITORCOLLISION=FALSE
- B_HELP_ON:MONITORCOLLISIONALPHA=FALSE
- OBJECT=B_WYJSCIE_OFF
- B_WYJSCIE_OFF:TYPE=IMAGE
- B_WYJSCIE_OFF:VISIBLE=TRUE
- B_WYJSCIE_OFF:FILENAME=B_WYJSCIE_OFF.IMG
- B_WYJSCIE_OFF:TOCANVAS=TRUE
- B_WYJSCIE_OFF:PRIORITY=1010
- B_WYJSCIE_OFF:PRELOAD=TRUE
- B_WYJSCIE_OFF:RELEASE=TRUE
- B_WYJSCIE_OFF:MONITORCOLLISION=FALSE
- B_WYJSCIE_OFF:MONITORCOLLISIONALPHA=FALSE
- OBJECT=B_WYJSCIE_ON
- B_WYJSCIE_ON:TYPE=IMAGE
- B_WYJSCIE_ON:VISIBLE=TRUE
- B_WYJSCIE_ON:FILENAME=B_WYJSCIE_ON.IMG
- B_WYJSCIE_ON:TOCANVAS=TRUE
- B_WYJSCIE_ON:PRIORITY=1010
- B_WYJSCIE_ON:PRELOAD=TRUE
- B_WYJSCIE_ON:RELEASE=TRUE
- B_WYJSCIE_ON:MONITORCOLLISION=FALSE
- B_WYJSCIE_ON:MONITORCOLLISIONALPHA=FALSE
- OBJECT=IMGMENUSIZEBKG
- IMGMENUSIZEBKG:TYPE=IMAGE
- IMGMENUSIZEBKG:VISIBLE=TRUE
- IMGMENUSIZEBKG:FILENAME=MENU_SIZE_BKG.IMG
- IMGMENUSIZEBKG:TOCANVAS=TRUE
- IMGMENUSIZEBKG:PRIORITY=8
- IMGMENUSIZEBKG:PRELOAD=TRUE
- IMGMENUSIZEBKG:RELEASE=TRUE
- IMGMENUSIZEBKG:MONITORCOLLISION=FALSE
- IMGMENUSIZEBKG:MONITORCOLLISIONALPHA=FALSE
- OBJECT=BUTPREV
- BUTPREV:TYPE=BUTTON
- BUTPREV:VISIBLE=TRUE
- BUTPREV:ENABLE=TRUE
- BUTPREV:DRAGGABLE=FALSE
- BUTPREV:ONCLICKED={@IF("ISCRNO",">","0","BFITMP2","");}
- BUTPREV:ONFOCUSON={ANNMENU^NEXTFRAME();}
- BUTPREV:ONFOCUSOFF={ANNMENU^PREVFRAME();}
- OBJECT=BUTNEXT
- BUTNEXT:TYPE=BUTTON
- BUTNEXT:VISIBLE=TRUE
- BUTNEXT:ENABLE=TRUE
- BUTNEXT:DRAGGABLE=FALSE
- BUTNEXT:ONCLICKED={@IF("ISCRNO","<","9","BFITMP3","");}
- BUTNEXT:ONFOCUSON={ANNMENU_1^NEXTFRAME();}
- BUTNEXT:ONFOCUSOFF={ANNMENU_1^PREVFRAME();}
- OBJECT=BUTEDIT
- BUTEDIT:TYPE=BUTTON
- BUTEDIT:VISIBLE=TRUE
- BUTEDIT:ENABLE=TRUE
- BUTEDIT:DRAGGABLE=FALSE
- BUTEDIT:ONCLICKED={ARRINFO^CHANGEAT(0,FALSE);ARRINFO^CHANGEAT(1,ISCRNO);ARRINFO^CHANGEAT(2,ISIZEX);ARRINFO^CHANGEAT(3,ISIZEY);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");PRZYGODA^GOTO("CHASZCZEEDITOR");}
- BUTEDIT:ONFOCUSON={SNDICONFOCUS^PLAY();ANNMENU_2^NEXTFRAME();}
- BUTEDIT:ONFOCUSOFF={ANNMENU_2^PREVFRAME();}
- OBJECT=BUTPLAY
- BUTPLAY:TYPE=BUTTON
- BUTPLAY:VISIBLE=TRUE
- BUTPLAY:ENABLE=TRUE
- BUTPLAY:DRAGGABLE=FALSE
- BUTPLAY:ONCLICKED={@IF(ARRINFO^GET([ISCRNO+4]),"!_","-1","BFITMP4","BFITMP5");}
- BUTPLAY:ONFOCUSON={SNDICONFOCUS^PLAY();ANNMENU_3^NEXTFRAME();}
- BUTPLAY:ONFOCUSOFF={ANNMENU_3^PREVFRAME();}
- OBJECT=BUTDEL
- BUTDEL:TYPE=BUTTON
- BUTDEL:VISIBLE=TRUE
- BUTDEL:ENABLE=TRUE
- BUTDEL:DRAGGABLE=FALSE
- BUTDEL:ONCLICKED={@IF(ARRINFO^GET([ISCRNO+4]),"!_","-1","BFITMP6","");}
- BUTDEL:ONFOCUSON={SNDICONFOCUS^PLAY();ANNMENU_4^NEXTFRAME();}
- BUTDEL:ONFOCUSOFF={ANNMENU_4^PREVFRAME();}
- OBJECT=BUTU
- BUTU:TYPE=BUTTON
- BUTU:VISIBLE=TRUE
- BUTU:ENABLE=TRUE
- BUTU:DRAGGABLE=FALSE
- BUTU:ONCLICKED={ISIZEY^INC();ISIZEY^CLAMP(12,24);TXTY^SETTEXT(ISIZEY);}
- BUTU:ONFOCUSON={SNDICONFOCUS^PLAY();ANNSTRZALKA^NEXTFRAME();}
- BUTU:ONFOCUSOFF={ANNSTRZALKA^PREVFRAME();}
- OBJECT=BUTD
- BUTD:TYPE=BUTTON
- BUTD:VISIBLE=TRUE
- BUTD:ENABLE=TRUE
- BUTD:DRAGGABLE=FALSE
- BUTD:ONCLICKED={ISIZEY^DEC();ISIZEY^CLAMP(12,24);TXTY^SETTEXT(ISIZEY);}
- BUTD:ONFOCUSON={SNDICONFOCUS^PLAY();ANNSTRZALKA_1^NEXTFRAME();}
- BUTD:ONFOCUSOFF={ANNSTRZALKA_1^PREVFRAME();}
- OBJECT=BUTL
- BUTL:TYPE=BUTTON
- BUTL:VISIBLE=TRUE
- BUTL:ENABLE=TRUE
- BUTL:DRAGGABLE=FALSE
- BUTL:ONCLICKED={ISIZEX^DEC();ISIZEX^CLAMP(16,32);TXTX^SETTEXT(ISIZEX);}
- BUTL:ONFOCUSON={SNDICONFOCUS^PLAY();ANNSTRZALKA_2^NEXTFRAME();}
- BUTL:ONFOCUSOFF={ANNSTRZALKA_2^PREVFRAME();}
- OBJECT=BUTR
- BUTR:TYPE=BUTTON
- BUTR:VISIBLE=TRUE
- BUTR:ENABLE=TRUE
- BUTR:DRAGGABLE=FALSE
- BUTR:ONCLICKED={ISIZEX^INC();ISIZEX^CLAMP(16,32);TXTX^SETTEXT(ISIZEX);}
- BUTR:ONFOCUSON={SNDICONFOCUS^PLAY();ANNSTRZALKA_3^NEXTFRAME();}
- BUTR:ONFOCUSOFF={ANNSTRZALKA_3^PREVFRAME();}
- OBJECT=BUTLVL0
- BUTLVL0:TYPE=BUTTON
- BUTLVL0:VISIBLE=TRUE
- BUTLVL0:ENABLE=TRUE
- BUTLVL0:DRAGGABLE=FALSE
- BUTLVL0:ONCLICKED={ARRINFO^CHANGEAT(0,TRUE);ARRINFO^CHANGEAT(1,0);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");PRZYGODA^GOTO("CHASZCZE");}
- BUTLVL0:ONFOCUSON={SNDICONFOCUS^PLAY();ANNLEVEL^NEXTFRAME();}
- BUTLVL0:ONFOCUSOFF={ANNLEVEL^PREVFRAME();}
- OBJECT=BUTLVL1
- BUTLVL1:TYPE=BUTTON
- BUTLVL1:VISIBLE=TRUE
- BUTLVL1:ENABLE=TRUE
- BUTLVL1:DRAGGABLE=FALSE
- BUTLVL1:ONCLICKED={@IF(ARRINFO^GET(14),"_","1","BFITMP7","BFITMP8");}
- BUTLVL1:ONFOCUSON={@IF(ARRINFO^GET(14),"_","1","BFITMP9","");}
- BUTLVL1:ONFOCUSOFF={ANNLEVEL_1^PREVFRAME();}
- OBJECT=BUTLVL2
- BUTLVL2:TYPE=BUTTON
- BUTLVL2:VISIBLE=TRUE
- BUTLVL2:ENABLE=TRUE
- BUTLVL2:DRAGGABLE=FALSE
- BUTLVL2:ONCLICKED={@IF(ARRINFO^GET(15),"_","1","BFITMP10","BFITMP11");}
- BUTLVL2:ONFOCUSON={@IF(ARRINFO^GET(15),"_","1","BFITMP12","");}
- BUTLVL2:ONFOCUSOFF={ANNLEVEL_2^PREVFRAME();}
- OBJECT=BUTLVL3
- BUTLVL3:TYPE=BUTTON
- BUTLVL3:VISIBLE=TRUE
- BUTLVL3:ENABLE=TRUE
- BUTLVL3:DRAGGABLE=FALSE
- BUTLVL3:ONCLICKED={@IF(ARRINFO^GET(16),"_","1","BFITMP13","BFITMP14");}
- BUTLVL3:ONFOCUSON={@IF(ARRINFO^GET(16),"_","1","BFITMP15","");}
- BUTLVL3:ONFOCUSOFF={ANNLEVEL_3^PREVFRAME();}
- OBJECT=BUTLVL4
- BUTLVL4:TYPE=BUTTON
- BUTLVL4:VISIBLE=TRUE
- BUTLVL4:ENABLE=TRUE
- BUTLVL4:DRAGGABLE=FALSE
- BUTLVL4:ONCLICKED={@IF(ARRINFO^GET(17),"_","1","BFITMP16","BFITMP17");}
- BUTLVL4:ONFOCUSON={@IF(ARRINFO^GET(17),"_","1","BFITMP18","");}
- BUTLVL4:ONFOCUSOFF={ANNLEVEL_4^PREVFRAME();}
- OBJECT=BUTLVL5
- BUTLVL5:TYPE=BUTTON
- BUTLVL5:VISIBLE=TRUE
- BUTLVL5:ENABLE=TRUE
- BUTLVL5:DRAGGABLE=FALSE
- BUTLVL5:ONCLICKED={@IF(ARRINFO^GET(18),"_","1","BFITMP19","BFITMP20");}
- BUTLVL5:ONFOCUSON={@IF(ARRINFO^GET(18),"_","1","BFITMP21","");}
- BUTLVL5:ONFOCUSOFF={ANNLEVEL_5^PREVFRAME();}
- OBJECT=BUTLVL6
- BUTLVL6:TYPE=BUTTON
- BUTLVL6:VISIBLE=TRUE
- BUTLVL6:ENABLE=TRUE
- BUTLVL6:DRAGGABLE=FALSE
- BUTLVL6:ONCLICKED={@IF(ARRINFO^GET(19),"_","1","BFITMP22","BFITMP23");}
- BUTLVL6:ONFOCUSON={@IF(ARRINFO^GET(19),"_","1","BFITMP24","");}
- BUTLVL6:ONFOCUSOFF={ANNLEVEL_6^PREVFRAME();}
- OBJECT=BUTLVL7
- BUTLVL7:TYPE=BUTTON
- BUTLVL7:VISIBLE=TRUE
- BUTLVL7:ENABLE=TRUE
- BUTLVL7:DRAGGABLE=FALSE
- BUTLVL7:ONCLICKED={@IF(ARRINFO^GET(20),"_","1","BFITMP25","BFITMP26");}
- BUTLVL7:ONFOCUSON={@IF(ARRINFO^GET(20),"_","1","BFITMP27","");}
- BUTLVL7:ONFOCUSOFF={ANNLEVEL_7^PREVFRAME();}
- OBJECT=BUTLVL8
- BUTLVL8:TYPE=BUTTON
- BUTLVL8:VISIBLE=TRUE
- BUTLVL8:ENABLE=TRUE
- BUTLVL8:DRAGGABLE=FALSE
- BUTLVL8:ONCLICKED={@IF(ARRINFO^GET(21),"_","1","BFITMP28","BFITMP29");}
- BUTLVL8:ONFOCUSON={@IF(ARRINFO^GET(21),"_","1","BFITMP30","");}
- BUTLVL8:ONFOCUSOFF={ANNLEVEL_8^PREVFRAME();}
- OBJECT=BUTLVL9
- BUTLVL9:TYPE=BUTTON
- BUTLVL9:VISIBLE=TRUE
- BUTLVL9:ENABLE=TRUE
- BUTLVL9:DRAGGABLE=FALSE
- BUTLVL9:ONCLICKED={@IF(ARRINFO^GET(22),"_","1","BFITMP31","BFITMP32");}
- BUTLVL9:ONFOCUSON={@IF(ARRINFO^GET(22),"_","1","BFITMP33","");}
- BUTLVL9:ONFOCUSOFF={ANNLEVEL_9^PREVFRAME();}
- OBJECT=BUTLVL10
- BUTLVL10:TYPE=BUTTON
- BUTLVL10:VISIBLE=TRUE
- BUTLVL10:ENABLE=TRUE
- BUTLVL10:DRAGGABLE=FALSE
- BUTLVL10:ONCLICKED={@IF(ARRINFO^GET(23),"_","1","BFITMP34","BFITMP35");}
- BUTLVL10:ONFOCUSON={@IF(ARRINFO^GET(23),"_","1","BFITMP36","");}
- BUTLVL10:ONFOCUSOFF={ANNLEVEL_10^PREVFRAME();}
- OBJECT=BUTLVL11
- BUTLVL11:TYPE=BUTTON
- BUTLVL11:VISIBLE=TRUE
- BUTLVL11:ENABLE=TRUE
- BUTLVL11:DRAGGABLE=FALSE
- BUTLVL11:ONCLICKED={@IF(ARRINFO^GET(24),"_","1","BFITMP37","BFITMP38");}
- BUTLVL11:ONFOCUSON={@IF(ARRINFO^GET(24),"_","1","BFITMP39","");}
- BUTLVL11:ONFOCUSOFF={ANNLEVEL_11^PREVFRAME();}
- OBJECT=BUTEXIT
- BUTEXIT:TYPE=BUTTON
- BUTEXIT:VISIBLE=TRUE
- BUTEXIT:RECT=B_WYJSCIE_OFF
- BUTEXIT:ENABLE=TRUE
- BUTEXIT:DRAGGABLE=FALSE
- BUTEXIT:GFXSTANDARD=B_WYJSCIE_OFF
- BUTEXIT:GFXONMOVE=B_WYJSCIE_ON
- BUTEXIT:ONCLICKED={BEHEXIT^RUN();}
- BUTEXIT:ONFOCUSON={SNDICONFOCUS^PLAY();}
- OBJECT=BUTNULLHELP
- BUTNULLHELP:TYPE=BUTTON
- BUTNULLHELP:VISIBLE=TRUE
- BUTNULLHELP:RECT=0,0,800,600
- BUTNULLHELP:ENABLE=FALSE
- BUTNULLHELP:DRAGGABLE=FALSE
- BUTNULLHELP:ONCLICKED={BEHHELPOFF^RUN();}
- OBJECT=BUTHELP
- BUTHELP:TYPE=BUTTON
- BUTHELP:VISIBLE=TRUE
- BUTHELP:RECT=B_HELP_OFF
- BUTHELP:ENABLE=TRUE
- BUTHELP:DRAGGABLE=FALSE
- BUTHELP:GFXSTANDARD=B_HELP_OFF
- BUTHELP:GFXONMOVE=B_HELP_ON
- BUTHELP:ONCLICKED={BUTNULLHELP^ENABLE();ANNHAND^PLAY("H0");SEQHELP^PLAY("H0");}
- BUTHELP:ONFOCUSON={SNDICONFOCUS^PLAY();}
- OBJECT=BUTNULLWSTEP
- BUTNULLWSTEP:TYPE=BUTTON
- BUTNULLWSTEP:VISIBLE=TRUE
- BUTNULLWSTEP:RECT=0,0,800,600
- BUTNULLWSTEP:ENABLE=FALSE
- BUTNULLWSTEP:DRAGGABLE=FALSE
- BUTNULLWSTEP:ONCLICKED={BEHWSTEPOFF^RUN();}
- OBJECT=TXTX
- TXTX:TYPE=TEXT
- TXTX:VISIBLE=TRUE
- TXTX:HYPERTEXT=
- TXTX:FONT=DIGITS
- TXTX:TOCANVAS=TRUE
- TXTX:RECT=166,345,208,376
- TXTX:PRIORITY=9
- TXTX:HJUSTIFY=TRUE
- TXTX:VJUSTIFY=TRUE
- TXTX:MONITORCOLLISION=FALSE
- TXTX:MONITORCOLLISIONALPHA=FALSE
- OBJECT=TXTY
- TXTY:TYPE=TEXT
- TXTY:VISIBLE=TRUE
- TXTY:HYPERTEXT=
- TXTY:FONT=DIGITS
- TXTY:TOCANVAS=TRUE
- TXTY:RECT=98,383,132,421
- TXTY:PRIORITY=9
- TXTY:HJUSTIFY=TRUE
- TXTY:VJUSTIFY=TRUE
- TXTY:MONITORCOLLISION=FALSE
- TXTY:MONITORCOLLISIONALPHA=FALSE
- OBJECT=SEQHELP
- SEQHELP:TYPE=SEQUENCE
- SEQHELP:FILENAME=SEHELP.SEQ
- SEQHELP:ONFINISHED^H0={ANNHAND^PLAY("H1");SEQHELP^PLAY("H1");}
- SEQHELP:ONFINISHED^H1={ANNHAND^PLAY("H2");SEQHELP^PLAY("H2");}
- SEQHELP:ONFINISHED^H2={ANNHAND^PLAY("NULL");SEQHELP^PLAY("H3");}
- SEQHELP:ONFINISHED^H3={ANNHAND^PLAY("H4");SEQHELP^PLAY("H4");}
- SEQHELP:ONFINISHED^H4={ANNHAND^PLAY("H5");SEQHELP^PLAY("H5");}
- SEQHELP:ONFINISHED^H5={ANNHAND^PLAY("NULL");SEQHELP^PLAY("H6");}
- SEQHELP:ONFINISHED^H6={ANNHAND^PLAY("H7");SEQHELP^PLAY("H7");}
- SEQHELP:ONFINISHED^H7={BEHHELPOFF^RUN();}
- OBJECT=SEQWSTEP
- SEQWSTEP:TYPE=SEQUENCE
- SEQWSTEP:FILENAME=SEWSTEP.SEQ
- SEQWSTEP:ONFINISHED^WS0={BEHWSTEPOFF^RUN();}
- SEQWSTEP:ONFINISHED^WS1={@IF("BEDITMENU","_","TRUE","BFITMP40","");}
- OBJECT=TREFRESH
- TREFRESH:TYPE=TIMER
- TREFRESH:ENABLED=FALSE
- TREFRESH:ELAPSE=10
- TREFRESH:TICKS=1
- TREFRESH:ONTICK^1={CANVASOBSERVER^REFRESH();}
- OBJECT=TCHEATEDITOR
- TCHEATEDITOR:TYPE=TIMER
- TCHEATEDITOR:ENABLED=FALSE
- TCHEATEDITOR:ELAPSE=200
- TCHEATEDITOR:TICKS=1
- TCHEATEDITOR:ONTICK^1={SCHEATEDITOR^SET("");}
- OBJECT=GSTRZALKIANN
- GSTRZALKIANN:TYPE=GROUP
- OBJECT=GSTRZALKIBUT
- GSTRZALKIBUT:TYPE=GROUP
- OBJECT=KRZAKI_H17
- KRZAKI_H17:TYPE=SOUND
- KRZAKI_H17:FILENAME=KRZAKI_H17.WAV
- KRZAKI_H17:PRELOAD=FALSE
- KRZAKI_H17:FLUSHAFTERPLAYED=FALSE
- OBJECT=KRZAKI_H14
- KRZAKI_H14:TYPE=SOUND
- KRZAKI_H14:FILENAME=KRZAKI_H14.WAV
- KRZAKI_H14:PRELOAD=FALSE
- KRZAKI_H14:FLUSHAFTERPLAYED=FALSE
- OBJECT=KRZAKI_H15
- KRZAKI_H15:TYPE=SOUND
- KRZAKI_H15:FILENAME=KRZAKI_H15.WAV
- KRZAKI_H15:PRELOAD=FALSE
- KRZAKI_H15:FLUSHAFTERPLAYED=FALSE
- OBJECT=KRZAKI_H16
- KRZAKI_H16:TYPE=SOUND
- KRZAKI_H16:FILENAME=KRZAKI_H16.WAV
- KRZAKI_H16:PRELOAD=FALSE
- KRZAKI_H16:FLUSHAFTERPLAYED=FALSE
- OBJECT=KRZAKI_H28
- KRZAKI_H28:TYPE=SOUND
- KRZAKI_H28:FILENAME=KRZAKI_H28.WAV
- KRZAKI_H28:PRELOAD=FALSE
- KRZAKI_H28:FLUSHAFTERPLAYED=FALSE
- OBJECT=KRZAKI_H25
- KRZAKI_H25:TYPE=SOUND
- KRZAKI_H25:FILENAME=KRZAKI_H25.WAV
- KRZAKI_H25:PRELOAD=FALSE
- KRZAKI_H25:FLUSHAFTERPLAYED=FALSE
- OBJECT=KRZAKI_H26
- KRZAKI_H26:TYPE=SOUND
- KRZAKI_H26:FILENAME=KRZAKI_H26.WAV
- KRZAKI_H26:PRELOAD=FALSE
- KRZAKI_H26:FLUSHAFTERPLAYED=FALSE
- OBJECT=KRZAKI_H27
- KRZAKI_H27:TYPE=SOUND
- KRZAKI_H27:FILENAME=KRZAKI_H27.WAV
- KRZAKI_H27:PRELOAD=FALSE
- KRZAKI_H27:FLUSHAFTERPLAYED=FALSE
- OBJECT=KRZAKI09
- KRZAKI09:TYPE=SOUND
- KRZAKI09:FILENAME=KRZAKI09.WAV
- KRZAKI09:PRELOAD=FALSE
- KRZAKI09:FLUSHAFTERPLAYED=FALSE
- OBJECT=KRZAKI10
- KRZAKI10:TYPE=SOUND
- KRZAKI10:FILENAME=KRZAKI10.WAV
- KRZAKI10:PRELOAD=FALSE
- KRZAKI10:FLUSHAFTERPLAYED=FALSE
- OBJECT=KRZAKI11
- KRZAKI11:TYPE=SOUND
- KRZAKI11:FILENAME=KRZAKI11.WAV
- KRZAKI11:PRELOAD=FALSE
- KRZAKI11:FLUSHAFTERPLAYED=FALSE
- OBJECT=KRZAKI12
- KRZAKI12:TYPE=SOUND
- KRZAKI12:FILENAME=KRZAKI12.WAV
- KRZAKI12:PRELOAD=FALSE
- KRZAKI12:FLUSHAFTERPLAYED=FALSE
- OBJECT=DIGITS
- DIGITS:TYPE=FONT
- DIGITS:DEF_ARIAL_STANDARD_14=DIGITS.FNT
- OBJECT=ARRINFO
- ARRINFO:TYPE=ARRAY
- OBJECT=MOUSE
- MOUSE:TYPE=MOUSE
- MOUSE:RAW=0
- MOUSE:ONCLICK^LEFT={SSLOTSEL^SET(CANVASOBSERVER^GETGRAPHICSAT(MOUSE^GETPOSX(),MOUSE^GETPOSY(),TRUE,12,12,TRUE));}
- OBJECT=CNVLOADER
- CNVLOADER:TYPE=CNVLOADER
- OBJECT=CANVASOBSERVER
- CANVASOBSERVER:TYPE=CANVAS_OBSERVER
- OBJECT=KEYBOARD
- KEYBOARD:TYPE=KEYBOARD
- KEYBOARD:ONKEYDOWN={TCHEATEDITOR^DISABLE();TCHEATEDITOR^ENABLE();SCHEATEDITOR^ADD(KEYBOARD^GETLATESTKEY());}
- OBJECT=__INIT__
- __INIT__:TYPE=BEHAVIOUR
- __INIT__:CODE={BUTHELP^DISABLE();KEYBOARD^SETAUTOREPEAT(FALSE);BUTNULLHELP^SETPRIORITY(1100);BUTNULLWSTEP^SETPRIORITY(1100);TXTX^SETCOLOR(0,0,0);TXTY^SETCOLOR(0,0,0);TXTX^SETTEXT(ISIZEX);TXTY^SETTEXT(ISIZEY);ARRINFO^LOAD("$COMMON\CH_INFO.ARR");@IF(ARRINFO^GETSIZE(),"_","0","BFITMP41","");@IF("BCHEATEDITOR","_","TRUE","BFITMP42","BFITMP43");@IF("BEDITMENU","_","TRUE","BFITMP46","");TREFRESH^ENABLE();@IF("BCHASZCZEWSTEPDONE","_","FALSE","BFITMP47","BFITMP48");}
- OBJECT=BEHINITINTRO
- BEHINITINTRO:TYPE=BEHAVIOUR
- BEHINITINTRO:CODE={ANNCUTINTRO^SHOW();ANNCUTINTRO^CLONE(2);ANNCUTINTRO^PLAY("CUT_KRZAKI_INTRO");ANNCUTINTRO_1^PLAY("OCZY");ANNCUTINTRO_2^PLAY("USTA");}
- OBJECT=BEHINITEDITMENU
- BEHINITEDITMENU:TYPE=BEHAVIOUR
- BEHINITEDITMENU:CODE={BEDITMENU^SET(TRUE);ANNMENU^CLONE(4);ANNMENU^SETFRAME("LEFT",0);ANNMENU_1^SETFRAME("RIGHT",0);ANNMENU_2^SETFRAME("EDIT",0);ANNMENU_3^SETFRAME("PLAY",0);ANNMENU_4^SETFRAME("DEL",0);BUTPREV^SETRECT("ANNMENU");BUTNEXT^SETRECT("ANNMENU_1");BUTEDIT^SETRECT("ANNMENU_2");BUTPLAY^SETRECT("ANNMENU_3");BUTDEL^SETRECT("ANNMENU_4");BUTPREV^DISABLE();BUTNEXT^DISABLE();ANNMENU^HIDE();ANNMENU_1^HIDE();ANNSLOT^CLONE(9);@LOOP("{S1^SET(["ANNSLOT_"+_I_]);@IF(ARRINFO^GET([_I_+4]),"_","-1","BFITMP49","BFITMP50");}",0,10,1);ANNSTRZALKA^CLONE(3);ANNSTRZALKA^SETFRAME("U",0);ANNSTRZALKA_1^SETFRAME("D",0);ANNSTRZALKA_2^SETFRAME("L",0);ANNSTRZALKA_3^SETFRAME("R",0);BUTU^SETRECT("ANNSTRZALKA");BUTD^SETRECT("ANNSTRZALKA_1");BUTL^SETRECT("ANNSTRZALKA_2");BUTR^SETRECT("ANNSTRZALKA_3");GSTRZALKIANN^ADDCLONES("ANNSTRZALKA",0,3);GSTRZALKIANN^ADD("TXTX","TXTY");GSTRZALKIBUT^ADD("BUTU","BUTD","BUTL","BUTR");}
- OBJECT=BEHEDITMENUOFF
- BEHEDITMENUOFF:TYPE=BEHAVIOUR
- BEHEDITMENUOFF:CODE={BEDITMENU^SET(FALSE);BUTPREV^DISABLE();BUTNEXT^DISABLE();ANNMENU^HIDE();ANNSTRZALKA^HIDE();ANNSLOT^HIDE();ANNSLOTGLOW^HIDE();IMGSCR^HIDE();IMGCIEN^HIDE();IMGMENUSIZEBKG^HIDE();TXTX^HIDE();TXTY^HIDE();}
- OBJECT=BEHINITMENU
- BEHINITMENU:TYPE=BEHAVIOUR
- BEHINITMENU:CODE={ANNLEVEL^CLONE(11);@LOOP("{S1^SET(["ANNLEVEL_"+_I_]);S2^SET(["BUTLVL"+_I_]);*S1^SETFRAME(["LVL"+_I_],0);*S2^SETRECT(S1);}",0,12,1);}
- OBJECT=_______________
- _______________:TYPE=BEHAVIOUR
- _______________:CODE={}
- OBJECT=BEHHELPOFF
- BEHHELPOFF:TYPE=BEHAVIOUR
- BEHHELPOFF:CODE={SEQHELP^STOP(FALSE);ANNHAND^PLAY("NULL");BUTNULLHELP^DISABLE();}
- OBJECT=BEHWSTEPOFF
- BEHWSTEPOFF:TYPE=BEHAVIOUR
- BEHWSTEPOFF:CODE={SEQWSTEP^STOP(FALSE);ANNCUTINTRO^STOP(FALSE);ANNCUTINTRO_1^STOP(FALSE);ANNCUTINTRO_2^STOP(FALSE);ANNCUTINTRO^HIDE();ANNCUTINTRO_1^HIDE();ANNCUTINTRO_2^HIDE();BCHASZCZEWSTEPDONE^SET(TRUE);BUTNULLWSTEP^DISABLE();SEQWSTEP^PLAY("WS1");}
- OBJECT=_______________
- _______________:TYPE=BEHAVIOUR
- _______________:CODE={}
- OBJECT=BEHEXIT
- BEHEXIT:TYPE=BEHAVIOUR
- BEHEXIT:CODE={BCHEATEDITOR^SET(FALSE);BCHASZCZEWSTEPDONE^SET(FALSE);PRZYGODA^GOTO("MG");}
- OBJECT=BFITMP0
- BFITMP0:TYPE=BEHAVIOUR
- BFITMP0:CODE={ANNSLOTGLOW^SETFRAME(["SLOT"+ISCRNO],0);SSCRNAME^SET("CH_SCR_DEF.IMG");ISTRZALKI^SET(1);BUTPLAY^DISABLE();BUTDEL^DISABLE();}
- OBJECT=BFITMP1
- BFITMP1:TYPE=BEHAVIOUR
- BFITMP1:CODE={ANNSLOTGLOW^SETFRAME(["SLOT"+ISCRNO],1);SSCRNAME^SET(["CH_SCR"+ISCRNO+".IMG"]);ISTRZALKI^SET(0);BUTPLAY^ENABLE();BUTDEL^ENABLE();}
- OBJECT=BFITMP2
- BFITMP2:TYPE=BEHAVIOUR
- BFITMP2:CODE={ISCRNO^DEC();}
- OBJECT=BFITMP3
- BFITMP3:TYPE=BEHAVIOUR
- BFITMP3:CODE={ISCRNO^INC();}
- OBJECT=BFITMP4
- BFITMP4:TYPE=BEHAVIOUR
- BFITMP4:CODE={ARRINFO^CHANGEAT(0,FALSE);ARRINFO^CHANGEAT(1,ISCRNO);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");PRZYGODA^GOTO("CHASZCZE");}
- OBJECT=BFITMP5
- BFITMP5:TYPE=BEHAVIOUR
- BFITMP5:CODE={}
- OBJECT=BFITMP6
- BFITMP6:TYPE=BEHAVIOUR
- BFITMP6:CODE={ARRINFO^CHANGEAT([ISCRNO+4],-1);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");SSCRNAME^SET("CH_SCR_DEF.IMG");ISTRZALKI^SET(1);*["ANNSLOT_"+ISCRNO]^SETFRAME(["SLOT"+ISCRNO],0);ANNSLOTGLOW^SETFRAME(["SLOT"+ISCRNO],0);BUTPLAY^DISABLE();BUTDEL^DISABLE();ANNMENU_4^PREVFRAME();}
- OBJECT=BFITMP7
- BFITMP7:TYPE=BEHAVIOUR
- BFITMP7:CODE={ARRINFO^CHANGEAT(0,TRUE);ARRINFO^CHANGEAT(1,1);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");PRZYGODA^GOTO("CHASZCZE");}
- OBJECT=BFITMP8
- BFITMP8:TYPE=BEHAVIOUR
- BFITMP8:CODE={SEQWSTEP^PLAY("LVL_LOCKED");}
- OBJECT=BFITMP9
- BFITMP9:TYPE=BEHAVIOUR
- BFITMP9:CODE={SNDICONFOCUS^PLAY();ANNLEVEL_1^NEXTFRAME();}
- OBJECT=BFITMP10
- BFITMP10:TYPE=BEHAVIOUR
- BFITMP10:CODE={ARRINFO^CHANGEAT(0,TRUE);ARRINFO^CHANGEAT(1,2);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");PRZYGODA^GOTO("CHASZCZE");}
- OBJECT=BFITMP11
- BFITMP11:TYPE=BEHAVIOUR
- BFITMP11:CODE={SEQWSTEP^PLAY("LVL_LOCKED");}
- OBJECT=BFITMP12
- BFITMP12:TYPE=BEHAVIOUR
- BFITMP12:CODE={SNDICONFOCUS^PLAY();ANNLEVEL_2^NEXTFRAME();}
- OBJECT=BFITMP13
- BFITMP13:TYPE=BEHAVIOUR
- BFITMP13:CODE={ARRINFO^CHANGEAT(0,TRUE);ARRINFO^CHANGEAT(1,3);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");PRZYGODA^GOTO("CHASZCZE");}
- OBJECT=BFITMP14
- BFITMP14:TYPE=BEHAVIOUR
- BFITMP14:CODE={SEQWSTEP^PLAY("LVL_LOCKED");}
- OBJECT=BFITMP15
- BFITMP15:TYPE=BEHAVIOUR
- BFITMP15:CODE={SNDICONFOCUS^PLAY();ANNLEVEL_3^NEXTFRAME();}
- OBJECT=BFITMP16
- BFITMP16:TYPE=BEHAVIOUR
- BFITMP16:CODE={ARRINFO^CHANGEAT(0,TRUE);ARRINFO^CHANGEAT(1,4);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");PRZYGODA^GOTO("CHASZCZE");}
- OBJECT=BFITMP17
- BFITMP17:TYPE=BEHAVIOUR
- BFITMP17:CODE={SEQWSTEP^PLAY("LVL_LOCKED");}
- OBJECT=BFITMP18
- BFITMP18:TYPE=BEHAVIOUR
- BFITMP18:CODE={SNDICONFOCUS^PLAY();ANNLEVEL_4^NEXTFRAME();}
- OBJECT=BFITMP19
- BFITMP19:TYPE=BEHAVIOUR
- BFITMP19:CODE={ARRINFO^CHANGEAT(0,TRUE);ARRINFO^CHANGEAT(1,5);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");PRZYGODA^GOTO("CHASZCZE");}
- OBJECT=BFITMP20
- BFITMP20:TYPE=BEHAVIOUR
- BFITMP20:CODE={SEQWSTEP^PLAY("LVL_LOCKED");}
- OBJECT=BFITMP21
- BFITMP21:TYPE=BEHAVIOUR
- BFITMP21:CODE={SNDICONFOCUS^PLAY();ANNLEVEL_5^NEXTFRAME();}
- OBJECT=BFITMP22
- BFITMP22:TYPE=BEHAVIOUR
- BFITMP22:CODE={ARRINFO^CHANGEAT(0,TRUE);ARRINFO^CHANGEAT(1,6);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");PRZYGODA^GOTO("CHASZCZE");}
- OBJECT=BFITMP23
- BFITMP23:TYPE=BEHAVIOUR
- BFITMP23:CODE={SEQWSTEP^PLAY("LVL_LOCKED");}
- OBJECT=BFITMP24
- BFITMP24:TYPE=BEHAVIOUR
- BFITMP24:CODE={SNDICONFOCUS^PLAY();ANNLEVEL_6^NEXTFRAME();}
- OBJECT=BFITMP25
- BFITMP25:TYPE=BEHAVIOUR
- BFITMP25:CODE={ARRINFO^CHANGEAT(0,TRUE);ARRINFO^CHANGEAT(1,7);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");PRZYGODA^GOTO("CHASZCZE");}
- OBJECT=BFITMP26
- BFITMP26:TYPE=BEHAVIOUR
- BFITMP26:CODE={SEQWSTEP^PLAY("LVL_LOCKED");}
- OBJECT=BFITMP27
- BFITMP27:TYPE=BEHAVIOUR
- BFITMP27:CODE={SNDICONFOCUS^PLAY();ANNLEVEL_7^NEXTFRAME();}
- OBJECT=BFITMP28
- BFITMP28:TYPE=BEHAVIOUR
- BFITMP28:CODE={ARRINFO^CHANGEAT(0,TRUE);ARRINFO^CHANGEAT(1,8);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");PRZYGODA^GOTO("CHASZCZE");}
- OBJECT=BFITMP29
- BFITMP29:TYPE=BEHAVIOUR
- BFITMP29:CODE={SEQWSTEP^PLAY("LVL_LOCKED");}
- OBJECT=BFITMP30
- BFITMP30:TYPE=BEHAVIOUR
- BFITMP30:CODE={SNDICONFOCUS^PLAY();ANNLEVEL_8^NEXTFRAME();}
- OBJECT=BFITMP31
- BFITMP31:TYPE=BEHAVIOUR
- BFITMP31:CODE={ARRINFO^CHANGEAT(0,TRUE);ARRINFO^CHANGEAT(1,9);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");PRZYGODA^GOTO("CHASZCZE");}
- OBJECT=BFITMP32
- BFITMP32:TYPE=BEHAVIOUR
- BFITMP32:CODE={SEQWSTEP^PLAY("LVL_LOCKED");}
- OBJECT=BFITMP33
- BFITMP33:TYPE=BEHAVIOUR
- BFITMP33:CODE={SNDICONFOCUS^PLAY();ANNLEVEL_9^NEXTFRAME();}
- OBJECT=BFITMP34
- BFITMP34:TYPE=BEHAVIOUR
- BFITMP34:CODE={ARRINFO^CHANGEAT(0,TRUE);ARRINFO^CHANGEAT(1,10);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");PRZYGODA^GOTO("CHASZCZE");}
- OBJECT=BFITMP35
- BFITMP35:TYPE=BEHAVIOUR
- BFITMP35:CODE={SEQWSTEP^PLAY("LVL_LOCKED");}
- OBJECT=BFITMP36
- BFITMP36:TYPE=BEHAVIOUR
- BFITMP36:CODE={SNDICONFOCUS^PLAY();ANNLEVEL_10^NEXTFRAME();}
- OBJECT=BFITMP37
- BFITMP37:TYPE=BEHAVIOUR
- BFITMP37:CODE={ARRINFO^CHANGEAT(0,TRUE);ARRINFO^CHANGEAT(1,11);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");PRZYGODA^GOTO("CHASZCZE");}
- OBJECT=BFITMP38
- BFITMP38:TYPE=BEHAVIOUR
- BFITMP38:CODE={SEQWSTEP^PLAY("LVL_LOCKED");}
- OBJECT=BFITMP39
- BFITMP39:TYPE=BEHAVIOUR
- BFITMP39:CODE={SNDICONFOCUS^PLAY();ANNLEVEL_11^NEXTFRAME();}
- OBJECT=BFITMP40
- BFITMP40:TYPE=BEHAVIOUR
- BFITMP40:CODE={SEQWSTEP^PLAY("WS2");}
- OBJECT=BFITMP41
- BFITMP41:TYPE=BEHAVIOUR
- BFITMP41:CODE={ARRINFO^ADD(TRUE,0,0,0,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,0,0,0,0,0,0,0,0,0,0,0,0);ARRINFO^SAVE("$COMMON\CH_INFO.ARR");}
- OBJECT=BFITMP42
- BFITMP42:TYPE=BEHAVIOUR
- BFITMP42:CODE={BEHINITEDITMENU^RUN();}
- OBJECT=BFITMP43
- BFITMP43:TYPE=BEHAVIOUR
- BFITMP43:CODE={BEHEDITMENUOFF^RUN();BEHINITMENU^RUN();}
- OBJECT=BFITMP44
- BFITMP44:TYPE=BEHAVIOUR
- BFITMP44:CODE={ISCRNO^SET(0);}
- OBJECT=BFITMP45
- BFITMP45:TYPE=BEHAVIOUR
- BFITMP45:CODE={ISCRNO^SET(ARRINFO^GET(1));}
- OBJECT=BFITMP46
- BFITMP46:TYPE=BEHAVIOUR
- BFITMP46:CODE={@IF(ARRINFO^GET(0),"_","TRUE","BFITMP44","BFITMP45");}
- OBJECT=BFITMP47
- BFITMP47:TYPE=BEHAVIOUR
- BFITMP47:CODE={BUTNULLWSTEP^ENABLE();BEHINITINTRO^RUN();SEQWSTEP^PLAY("WS0");}
- OBJECT=BFITMP48
- BFITMP48:TYPE=BEHAVIOUR
- BFITMP48:CODE={SEQWSTEP^PLAY("WS1");}
- OBJECT=BFITMP49
- BFITMP49:TYPE=BEHAVIOUR
- BFITMP49:CODE={*S1^SETFRAME(["SLOT"+_I_],0);}
- OBJECT=BFITMP50
- BFITMP50:TYPE=BEHAVIOUR
- BFITMP50:CODE={*S1^SETFRAME(["SLOT"+_I_],1);}
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement