Opening the Theater in our Minds: Visual Thinking

home *** CD-ROM | disk | FTP | other *** search

/ Opening the Theater in our Minds: Visual Thinking / Gatekeeper Multi Media Video Software - Volume 1 Visual Thinking.ISO / firstlit / adding2.gbk (.txt) < prev next >

Wrap

Asymetrix ToolBook File | 1993-03-19 | 56.4 KB | 1,233 lines

-- SysBook GateKeeper Click Change Presentations -- Copyright 1993, Firstlight Incorporated -- Version 03/17/93 16:45 4firstTime,svDrive,svChanges linkDLLs checkCD tbkMCI(" ;&"\FIRSTLIT\ONE.AVI alias aviFile1 style child " && , "") " && , "") qclose avifile1","") c"Edit" c"Text" c"Page" c"Help" hideItAll play -4,-23,650,500 syslockScreen putitback mainWIndow 0,0,640,480 hideitall tbkmm.dll MCI commands STRING tbkTimerStart( ,WORD, 0tbkTimerStop( EtbkMMVersion() "The your path, cannot tbkDlg dialog boxes "tbkdlg. openDlg( setValue( getValue( tbkWin parameters MoveWindow "tbkwin.dll" INT xPixelsFromUnits ( yPixelsFromUnits ( clientFromPage ( GetWinIniVar ( SetWinIniVar ( YieldApp ( ) kernel memory functions gGlobalAlloc( GlobalLock( gGlobalUnlock( gGlobalFree( "Cannot Windows Kernel, commdlg requester GetOpenFileName( GetSaveFileName( DWORD CommDlgExtendedError() USER.EXE "User" GetSystemMetrics( getWindowLong( :) -- (hwnd, nIndex) setWindowLong( ) -- ( *, wNewWord) tbkfile. "TBKFILE.DLL" copyFile( removeFile( unlinkDLLs getWinIniVar("gatekeeper", "cddrive") retValue (dlgBox 8, dlgInit -, "comboBox setWinIniVar(" &":") dwithout the CD-ROM letter." key,isShift,isCntrl sysSuspendMessages stopIt deletePage sysRuntime appendPage key = appendBook -- ignore just -- %control isControl =keyDownArrow nextPage objectFromPoint( "screen" playAVIfile fileName aviFileName newBook closeAVI " && d&& " nostatic " && , "") realize /","") w","") hWnd status ","") ,SysMagnification, xstart ystart xunits yunits ., 1) state ","") AVIFile","") ","") 4timerID tbkmmNotify mode","") sleep sleepTime "single", * 1000,1000, tbkMMTimer OpenDlg( &"\", "*.avi","Current "&&filename , "Choose "Do you really want f"No" "Yes" selectPage ", "*.gbk","Select presentation newBookName originalBook @,"C:\") "Unable create temporary "C:\"&shortFileName( copiedBook newbookname newCnt -- Exit" saveToNewBook originalName saveFileName() newName setExtension( overwrite existing sysErrorNumber "Not enough room on disk "Problem occurred trying " && ItemName shortFilename( -- we location tbook.exe WIN.INI Extensions","GBK") DefDir ) - 6) RunDir /) - 9) CmdLine IconPath ?&"FIRSTICO. "[AddItem("& ?&","& &","& 6&","&IconIndex 8&",-1,-1,"& &")]" "PROGMAN" fName ) - 1 Vi+1 q- 1 x- 4 & ". 2","") "Would like 8?" \ makeAVIsize + 2400 + 1800 hOPENFILENAME 66,1024) --66 zero init movable pOPENFILENAME StructByteCount filter ","*. All files (*.*)","*.*" hFilter 66,256) pFilter totalLength (i+1) (i+1) hFileName 66,256) pFileName ,pfileName) ,256) hFileTitle 66,256) pFileTitle ,256) InitDir hInitDir 66,256) pInitDir ,6144) eEnter mouseLeave reader enterPage linkDLLs playAVIfile enterBook nextPage closeAVI unlinkDLLs stopIt tbkmmNotify putitback sleep tbkMMTimer checkCD rightButtonDown keyDown deletePage author appendPage buttonDown appendBook saveToNewBook hideItAll leavePage mouseEnter makeAVIsize shortFileName setExtension saveFileName enterBook wjlinkDLLs checkCD open \FIRSTLIT\ONE.AVI alias aviFile1 style child parent tbkMCI open \FIRSTLIT\ONE.AVI alias aviFile2 style child parent tbkMCI close avifile1 tbkMCI hideItAll firstTime svDrive svChanges hideItAll putitback author putitback firstTime reader hideitall linkDLLs tbkmm.dll tbkMCI tbkTimerStart tbkTimerStop tbkMMVersion The file tbkmm.dll is not in your path, cannot continue. tbkdlg.dll openDlg dialog setValue getValue The file tbkdlg.dll is not in your path, cannot continue. tbkwin.dll xPixelsFromUnits yPixelsFromUnits clientFromPage GetWinIniVar SetWinIniVar YieldApp The file tbkwin.dll is not in your path, cannot continue. kernel GlobalAlloc GlobalLock GlobalUnlock GlobalFree Cannot link to Windows Kernel, cannot continue. commdlg.dll GetOpenFileName GetSaveFileName CommDlgExtendedError The file commdlg.dll is not in your path, cannot continue. MoveWindow GetSystemMetrics getWindowLong setWindowLong The file USER.EXE is not in your path, cannot continue. TBKFILE.DLL copyFile removeFile The file tbkfile.dll is not in your path, cannot continue. unlinkDLLs tbkmm.dll tbkdlg.dll tbkwin.dll tbkfile.dll checkCD gatekeeper cddrive getWinIniVar dlgBox dlgInit dialog comboBox drive getValue gatekeeper cddrive setWinIniVar Cannot continue without the CD-ROM drive letter. retValue svDrive keyDown (stopIt mouseEnter deletePage author appendPage appendBook Kkeydown jnextPage isControl firstTime isCntrl isShift buttonDown jnextPage mouseEnter field button screen firstTime mouseLeave firstTime enterPage playAVIfile firstTime playAVIfile fileName rightButtonDown fileName newBook fileName ecloseAVI alias aviFile nostatic style child parent tbkMCI rightButtonDown paintObject realize aviFile background tbkMCI realize aviFile normal tbkMCI status aviFile window handle tbkMCI screen clientFromPage MoveWindow window aviFile state show tbkMCI play aviFile tbkMCI yunits xunits ystart xstart aviFileName svDrive nextPage (stopIt mouseEnter firstTime closeAVI stop AVIFile tbkMCI window aviFile state hide tbkMCI close AVIFile tbkMCI stopIt tbkTimerStop ecloseAVI timerID tbkmmNotify status AVIFile mode tbkMCI pause ecloseAVI jnextPage firstTime sleep single tbkTimerStart timerID sleepTime tbkMMTimer jnextPage timerID rightButtonDown screen *.avi Current AVI file is filename Choose an AVI file for this page. OpenDlg fileName newBook svChanges svDrive deletePage Do you really want to delete this page? selectPage clear svChanges appendPage Do you want to add a copy of this page? selectPage paste fileName fileName svChanges appendBook \FIRSTLIT\ *.gbk Select presentation to append Choose a presentation OpenDlg copyFile Unable to create temporary file, cannot continue. shortFileName newbookname send selectPage;send copy;go next page paste fileName fileName send Exit removeFile newCnt copiedBook originalBook newBookName svChanges svDrive saveToNewBook saveFileName setExtension Do you want to overwrite existing book? Do you want to overwrite existing book? Not enough room on disk to save Not enough file memory to save Not enough memory to save file Not enough local memory to save file Problem occurred trying to save file shortFilename Extensions getWinIniVar FIRSTICO.DLL [AddItem( IconIndex ,-1,-1, PROGMAN PROGMAN IconPath CmdLine RunDir DefDir ItemName newName originalName svDrive newBook shortFileName fName setExtension fName close avifile2 tbkMCI Would you like to save your changes to a new book? E\saveToNewBook svChanges leavePage tbkTimerStop timerID makeAVIsize screen screen 3} saveFileName GlobalAlloc GlobalLock GateKeeper *.gbk All files (*.*) GlobalAlloc GlobalLock GlobalAlloc GlobalLock pfileName GlobalAlloc GlobalLock C:\FIRSTLIT GlobalAlloc GlobalLock GetSaveFileName GlobalUnlock GlobalFree GlobalUnlock GlobalFree GlobalUnlock GlobalFree GlobalUnlock GlobalFree GlobalUnlock GlobalFree saveFileName pInitDir hInitDir InitDir pFileTitle hFileTitle pFileName hFileName totalLength pFilter hFilter filter StructByteCount pOPENFILENAME hOPENFILENAME dlgBox dlgInit mes New Roman System 524480,3,30,20,124,57,,,Choose CD-ROM Drive letter,8,Helv,ok,5.60,24.82,50.86,12.31,6,1342242817,128,OK,0,,62.02,24.82,50.86,12.31,7,1342242816,128,Cancel,0,DRIVE,42.93,6.73,31.73,82.31,11,1352728899,133,,0 button ok,b6,TRUE ,b7,FALSE combobox DRIVE,c11,A Arial iconIndex false Courier New Times New Roman Times New Roman "firstlit.sbk" "File FIRSTLIT.SBK your path, please Xinstallation." enterBook enterBook firstlit.sbk File FIRSTLIT.SBK is not in your path, please check installation. :PHYSSIZE Text 2 shadow it upg it upwn to business. Text 2 4svChanges ("Enter "Text 2 shadow" rightButtonDown rightButtonDown Enter new text. Text 2 shadow svChanges it upg it upwn to business. Text 1 shadow adding it upwn to business. Text 1 4svChanges ("Enter "Text 1 shadow" rightButtonDown rightButtonDown Enter new text. Text 1 shadow svChanges adding it upwn to business. HelpText Function key definitions for "Click & Change" presentations Esc - Exits "Click & Change" presentation, if changes have been made, you will be asked if you want to save your changes. F1 - Help, what you are looking at. F2 - Edit Mode - immediately enters "Click & Change" mode. F3 - Adds duplicate page following current page. SHIFT+F3 - Deletes current page. F4 - Append new book to end of current book. F5 - Play whole presentation from the start. CTRL+RIGHT ARROW - Goes to next page. CTRL+LEFT ARROW - Goes to previous page. CTRL+UP ARROW - Goes to first page. CTRL+DOWN ARROW- Goes to last page. You can play video by left-click on video box. Pointer changes to pencil when over an editable text area. Pointer changes to a frame when over a video area. en over a video area. ter changes to a frame when over a video area. table text area. Pointer changes to a frame when over a video area. HelpTitle Click & Change help - page 1 "help" buttonDown buttonDown 4firstTime sleep 3 enterPage enterPage sleep firstTime Main Text shadow When you consider that many companies failll Main Text When you consider that many companies failll Edit main text 4svChanges init dlgInit retValue dialog(dlgBox getValue( *, "Text") --DLL function "Main ; shadow" rightButtonDown rightButtonDown dlgInit dlgBox dialog getValue Main Text Main Text shadow dlgInit retValue svChanges dlgInit edit EditText,e5,When you consider that many companies button Accept,b6,TRUE button Cancel,b7,FALSE dlgBox 524480,3,30,20,56,114,,,Edit Text,8,Helv,EditText,7.47,7.02,42.78,53.95,5,1350631428,129,When you consider that many companies1 fail,0,Accept,7.31,66.99,42.93,12.31,6,1342242817,128,OK,0,Cancel,7.31,85.09,42.93,12.31,7,1342242816,128,Cancel,0 ctrlID filename D:\TROUBLE\trubl14.avi Main Text shadow When you consider that many companies failll Main Text When you consider that many companies failll Edit main text 4svChanges init dlgInit retValue dialog(dlgBox getValue( *, "Text") --DLL function "Main ; shadow" rightButtonDown rightButtonDown dlgInit dlgBox dialog getValue Main Text Main Text shadow dlgInit retValue svChanges ctrlID dlgBox 524480,3,30,20,56,114,,,Edit Text,8,Helv,EditText,7.47,7.02,42.78,53.95,5,1350631428,129,When you consider that many companies1 fail,0,Accept,7.31,66.99,42.93,12.31,6,1342242817,128,OK,0,Cancel,7.31,85.09,42.93,12.31,7,1342242816,128,Cancel,0 dlgInit edit EditText,e5,When you consider that many companies button Accept,b6,TRUE button Cancel,b7,FALSE screen playAVIfile buttonDown buttonDown playAVIfile fileName E:\ANNOUNCE\anonc11.avi screen playAVIfile buttonDown buttonDown playAVIfile Main Text shadow to bring home a winnermpanies failll Main Text to bring home a winnermpanies failll Edit main text 4svChanges init dlgInit retValue dialog(dlgBox getValue( *, "Text") --DLL function "Main ; shadow" rightButtonDown rightButtonDown dlgInit dlgBox dialog getValue Main Text Main Text shadow dlgInit retValue svChanges ctrlID dlgBox 524480,3,30,20,56,114,,,Edit Text,8,Helv,EditText,7.47,7.02,42.78,53.95,5,1350631428,129,When you consider that many companies1 fail,0,Accept,7.31,66.99,42.93,12.31,6,1342242817,128,OK,0,Cancel,7.31,85.09,42.93,12.31,7,1342242816,128,Cancel,0 dlgInit edit EditText,e5,to bring home a winner button Accept,b6,TRUE button Cancel,b7,FALSE D:\ANNOUNCE\anonc10.avi 4firstTime sleep 6 enterPage enterPage sleep firstTime Main Text shadow We know when to listen and when to go into action. And we know how to WIN! for our clients. Main Text We know when to listen and when to go into action. And we know how to WIN! for our clients. Edit main text 4svChanges init dlgInit retValue dialog(dlgBox getValue( *, "EditText") --DLL function "Main ; shadow" rightButtonDown rightButtonDown dlgInit dlgBox dialog EditText getValue Main Text Main Text shadow dlgInit retValue svChanges dlgInit edit EditText,e5, We know when to listen and when to go into action. And we know how to WIN! for our clients. button Accept,b6,TRUE button Cancel,b7,FALSE dlgBox 524480,3,30,20,71,150,,,Edit Text,8,Helv,EditText,5.60,6.52,59.73,94.48,5,1350631428,129, We know when to listen and when to go1 into action. And we know how to WIN for our clients.,0,Accept,5.60,105.03,59.73,12.31,6,1342242817,128,OK,0,Cancel,5.60,121.11,59.73,12.31,7,1342242816,128,Cancel,0 ctrlID Body Text Amy Andersen andersen + ross advertising 611-432-8600 611-432-8600 Edit Body Text 4svChanges init dlgInit retValue dialog(dlgBox getValue( *, "EditText") --DLL function "Body rightButtonDown rightButtonDown dlgInit dlgBox dialog EditText getValue Body Text dlgInit retValue svChanges dlgInit edit EditText,e5, Amy Andersen andersen + ross advertising 611-432-8600 button Accept,b6,TRUE button Cancel,b7,FALSE dlgBox 524480,3,30,20,109,112,,,Edit Text,8,Helv,EditText,5.60,6.61,97.07,70.36,5,1350631429,129, Amy Andersen andersen + ross advertising12345678901234 611-432-8600 2g,0,Accept,5.60,82.99,42.93,12.31,6,1342242817,128,OK,0,Cancel,59.73,82.99,42.93,12.31,7,1342242816,128,Cancel,0 ctrlID 4firstTime sleep 3 enterPage enterPage sleep firstTime Main Text shadow because they won't take a chance failll Main Text because they won't take a chance failll Edit main text 4svChanges init dlgInit retValue dialog(dlgBox getValue( *, "Text") --DLL function "Main ; shadow" rightButtonDown rightButtonDown dlgInit dlgBox dialog getValue Main Text Main Text shadow dlgInit retValue svChanges ctrlID dlgBox 524480,3,30,20,56,114,,,Edit Text,8,Helv,EditText,7.47,7.02,42.78,53.95,5,1350631428,129,When you consider that many companies1 fail,0,Accept,7.31,66.99,42.93,12.31,6,1342242817,128,OK,0,Cancel,7.31,85.09,42.93,12.31,7,1342242816,128,Cancel,0 dlgInit edit EditText,e5,because they won't take a chance button Accept,b6,TRUE button Cancel,b7,FALSE filename D:\TROUBLE\trubl11.avi Main Text shadow because they won't take a chance failll Main Text because they won't take a chance failll Edit main text 4svChanges init dlgInit retValue dialog(dlgBox getValue( *, "Text") --DLL function "Main ; shadow" rightButtonDown rightButtonDown dlgInit dlgBox dialog getValue Main Text Main Text shadow dlgInit retValue svChanges ctrlID dlgBox 524480,3,30,20,56,114,,,Edit Text,8,Helv,EditText,7.47,7.02,42.78,53.95,5,1350631428,129,When you consider that many companies1 fail,0,Accept,7.31,66.99,42.93,12.31,6,1342242817,128,OK,0,Cancel,7.31,85.09,42.93,12.31,7,1342242816,128,Cancel,0 dlgInit edit EditText,e5,because they won't take a chance button Accept,b6,TRUE button Cancel,b7,FALSE screen playAVIfile buttonDown buttonDown playAVIfile 4firstTime sleep 3 enterPage enterPage sleep firstTime Main Text shadow or are afraid of losing ities failll Main Text or are afraid of losing ities failll Edit main text 4svChanges init dlgInit retValue dialog(dlgBox getValue( *, "Text") --DLL function "Main ; shadow" rightButtonDown rightButtonDown dlgInit dlgBox dialog getValue Main Text Main Text shadow dlgInit retValue svChanges ctrlID dlgBox 524480,3,30,20,56,114,,,Edit Text,8,Helv,EditText,7.47,7.02,42.78,53.95,5,1350631428,129,When you consider that many companies1 fail,0,Accept,7.31,66.99,42.93,12.31,6,1342242817,128,OK,0,Cancel,7.31,85.09,42.93,12.31,7,1342242816,128,Cancel,0 dlgInit edit EditText,e5,or are afraid of losing it button Accept,b6,TRUE button Cancel,b7,FALSE filename D:\TROUBLE\trubl10.avi Main Text shadow or are afraid of losing ities failll Main Text or are afraid of losing ities failll Edit main text 4svChanges init dlgInit retValue dialog(dlgBox getValue( *, "Text") --DLL function "Main ; shadow" rightButtonDown rightButtonDown dlgInit dlgBox dialog getValue Main Text Main Text shadow dlgInit retValue svChanges ctrlID dlgBox 524480,3,30,20,56,114,,,Edit Text,8,Helv,EditText,7.47,7.02,42.78,53.95,5,1350631428,129,When you consider that many companies1 fail,0,Accept,7.31,66.99,42.93,12.31,6,1342242817,128,OK,0,Cancel,7.31,85.09,42.93,12.31,7,1342242816,128,Cancel,0 dlgInit edit EditText,e5,or are afraid of losing it button Accept,b6,TRUE button Cancel,b7,FALSE screen playAVIfile buttonDown buttonDown playAVIfile 4firstTime sleep 3 enterPage enterPage sleep firstTime Main Text shadow remember that it takes more than talkilll Main Text remember that it takes more than talkilll Edit main text 4svChanges init dlgInit retValue dialog(dlgBox getValue( *, "Text") --DLL function "Main ; shadow" rightButtonDown rightButtonDown dlgInit dlgBox dialog getValue Main Text Main Text shadow dlgInit retValue svChanges ctrlID dlgBox 524480,3,30,20,56,114,,,Edit Text,8,Helv,EditText,7.47,7.02,42.78,53.95,5,1350631428,129,When you consider that many companies1 fail,0,Accept,7.31,66.99,42.93,12.31,6,1342242817,128,OK,0,Cancel,7.31,85.09,42.93,12.31,7,1342242816,128,Cancel,0 dlgInit edit EditText,e5,remember that it takes more than button Accept,b6,TRUE button Cancel,b7,FALSE filename D:\ANNOUNCE\anonc05.avi Main Text shadow remember that it takes more than talkilll Main Text remember that it takes more than talkilll Edit main text 4svChanges init dlgInit retValue dialog(dlgBox getValue( *, "Text") --DLL function "Main ; shadow" rightButtonDown rightButtonDown dlgInit dlgBox dialog getValue Main Text Main Text shadow dlgInit retValue svChanges ctrlID dlgBox 524480,3,30,20,56,114,,,Edit Text,8,Helv,EditText,7.47,7.02,42.78,53.95,5,1350631428,129,When you consider that many companies1 fail,0,Accept,7.31,66.99,42.93,12.31,6,1342242817,128,OK,0,Cancel,7.31,85.09,42.93,12.31,7,1342242816,128,Cancel,0 dlgInit edit EditText,e5,remember that it takes more than button Accept,b6,TRUE button Cancel,b7,FALSE screen playAVIfile buttonDown buttonDown playAVIfile 4firstTime sleep 3 enterPage enterPage sleep firstTime Main Text shadow to bring home a winnermpanies failll Main Text to bring home a winnermpanies failll Edit main text 4svChanges init dlgInit retValue dialog(dlgBox getValue( *, "Text") --DLL function "Main ; shadow" rightButtonDown rightButtonDown dlgInit dlgBox dialog getValue Main Text Main Text shadow dlgInit retValue svChanges ctrlID dlgBox 524480,3,30,20,56,114,,,Edit Text,8,Helv,EditText,7.47,7.02,42.78,53.95,5,1350631428,129,When you consider that many companies1 fail,0,Accept,7.31,66.99,42.93,12.31,6,1342242817,128,OK,0,Cancel,7.31,85.09,42.93,12.31,7,1342242816,128,Cancel,0 dlgInit edit EditText,e5,to bring home a winner button Accept,b6,TRUE button Cancel,b7,FALSE deD f deD f deD f deD f deD f