home *** CD-ROM | disk | FTP | other *** search
Copyright 1993,1994 Asymetrix Corporation gives you permission e, revise, reuse the individual scripts your own applications. You may J entire substantial part redistribution b product. retains copyright on original elements . Include notice "Portions are contain copied Authors: Joseph Brick Jim Geldmacher (indexing hyperlinking) Jeff Ayars (path animation) Mike Florence (media widgets) Tim Pearson ( packager) Last revision: 7/13/94 Standard ToolBook messages -- initialize sysbook unlinksysbook se = sen = sysErrorNumber ss = c"tbk_tools" 1= ss removeLinks "ftsScripts" stopAnimTimer linkSysbook sysBook one getting -- bookloc=sysBookLoc( setUpDlls cexists; -- Note: menuitems added enterMenu. ss = errornumber se = menuEnabled(" cisn't there: c"&Werkzeuge" alias " fhelpText "Angepa te Autorenwerkzeuge. Erweiterungen des Systembuchs MTB30.SBK" c"&Index" zum Erstellen und Durchsuchen von B chern mit Volltextsuch- -Indexfunktionalit menuItemEnabled("tbk_sysInfo" ..." Zeigt Informationen ber Ihr 1= ss syserrornumber = sen -- load startup options: tbk_setStartup tbk_linkMessageFuncs -- sent rightClick custom clicked Property Browser chosen called obj parameter will e on: customEdit {winRef,browser 4stbk_lastWinSize sysRuntime -- used know sizing needed. H = 0,0 selectionChanged -- optimization: cache {reference tbk_linkConvert -- turn on wait cursor oldCursor = parentHandle -- came updateBrowser sel = <> obj -- display checkSelection windowsized -- value -- c, close -- was , so <> obj sends whenever Q. When something nothing -- However, ;, two . This why we post a toolbook does xyield between -- these , so we that we receive translated have been we don't image twice. gwinHan,winMes postSuccessful changed ,-mode targetWindow = xalwaysReader activateInstance a different enterWindow lastWindow isOpen 4stbk_lastActiveWindow -- Also, fanimations their starting positions -- so moved/ work %expected stops current fw = focusWindow 4 = fw closeAllAnimations handles realigning 3D rectangles ( 4s_anim_idleAnimations ZnewPos, settingsTable[][] threeDeeRect = objs = sz = pupp = syspageUnitsPerPixel sz > sz > inOut threeDStyle b = "sculpted" xpix = -1* syspageunitsperpixel ypix = -1* ll = lr = ur = ul = bottomLine = topline = m"topLine" sysSuspendMessages = x"MS" ll,lr,ur ll,ul, ul,lr -- traps repositions -- user has xselected coordinate "anim_animationSettings" ss = = FALSE r= NULL dimensions( ) <> anim_startPosition(1) dx = dy = i][13] anim_StartPosition(i) + dx, 8(i) . If . (Waiting -- entermenu build menus saves on 'menuname,aliasName 4sftsMainBk --begin kludge = "combobox" selHW = selectedHotwords selT = ss = ftsIndexSettings" 1= ss loadMenus "Extra initLinks disable e"ftsObjectSettings" e"ftsHotwordSettings" e"ftsFullTextSearch" e"ftsKeywordSearch" (sel) = 1 B,comboBox" enable ftsIndexName -- we've loaded ss = 1= ss -- a known state: c"Center" c"Spread" e"tbk_tabOrder" "tbk_importText" "tbk_exportText" "tbk_3D" c"OLE e"tbk_taborder" "hyperLinking" "EditHyperlinkButton" "CreateHyperlinkHotword" "EditHyperlinkHotword" ftsLink ) = 1 ) = 0 -- ) <= 1 -- -- mm_media mmWidget mm_WidgetProps "mm_mediaWidgets" Tools handers 6/94 mediaPackager 4 stbk_thisBook msgBox("Media-Pakete","Dieses Buch mu zuerst gespeichert werden.","Stop") "clipPkg" tbkToolsDlg( -- brings up startUp preferences dialog box tbk_startPref ,"Starteinstellungen", oApplications tbk_AddOnApps ,"Anwendungen", -- exports "extra --imports a file -- calls up replace tbk_replaceScripts a required instance. searchAndReplace ,"Suchen Ersetzen Skripten", tbk_sysinfo sc = se = sysToolBookDirectory & " ?.exe" "SYSINFO.EXE wurde Ihrem K-Verzeichnis nicht gefunden." Drawing aids: -- spreads }horizontally tbk_spreadHorz }vertically tbk_spreadVert -- shrinks smallest tbk_shrink shrinkgrow " -- grows M!boggest tbk_grow Olargest" sides tbk_centerHorz O"horz" tbk_centerVert tbk_centerBoth adding 3D style w"tbkToolsdlg handler. W![],sel already a 3D , actually) o = ![1] = "[2] = ""[3] = useWindowsColors on what type wants retval = ,"3D-Stil festlegen", ecancelled" -- extrascript Zsel,lowestlayer Zsortobjects[][] obRef = 2 "Sie m ssen 2 oder mehrere Objekte ausw hlen" #[1] = -- ,"Tabulatorreihenfolge -- returns values: -- fwhich %tabbing; tells -- us 'way autotab: startlayer = horzOrVert = -- sending array containing -- sorted either sortbyposition ls = i-1][ Custom handlers functions HlinkSysBook. Sets -- Preferences" section .ini. getToolBookIniItem (,itemName,defaultVal fileName = iniFile() getIniVar( DLL --The following linkDLL statements I(grouped memory tbk_linkMemFuncs P"KERNEL" WORD tbk_GlobalAlloc= ,DWORD) "Free=GlobalFree( H!=GlobalHandle(INT) POINTER tbk_GlobalLock= sUnlock=GlobalUnlock( dealing fconversion "tb30Dlg.dll" STRING tbk_listtoTextline= fini files: tbk_linkIniFileFuncs tbk_GetIniInfo=GetPrivateProfileString( ,INT, & tbk_SetIniInfo=WritePrivateProfileString( "tb30win. dll's fdrawing tbk_linkDrawFuncs "gdi" tbk_moveto= tbk_lineto= tbk_setRop2=setROP2( tbk_createPen= INT tbk_deleteObject= tbk_selectobject= tbk_getDC= tbk_releaseDC= * passing tbk_peekMessage= tbk_registerWindowMessage = tbk_postMessage= - INI -- sets Toolbook.ini setToolBookIniItem ,itm, -- Used property browsing) englishName 5-"friendly" "Hauptfenster" ^!ow "Ansichtsobjekt" && !ow & -- otherwise B"props" "Systemeigenschaften" "Systemvariablen" -- color constants xprovide. , but useful benchmarking startTime 4s_start = a_timeGetTime() endTime ;)throughout 8needs itself. tbk_bookRef a locked tbk_getWinPointer memFlag = 66 ZretValue "Speicherzuordnung fehlgeschlagen." -- unlocks frees supplied. tbk_freeWinPointer pMem = tbk_GlobalHandle( = tbk_GlobalUnlock( tbk_GlobalFree( a generic Pass initialization (Required.) -- What 3 viewers frames ,"Dialog1" "Dialog2" "Dialog3" -- (If 'plan nest 3can just -- In initDlg fa single dynamic parameters. -- In , HIDE If you @3calling code upon hitting ok, returnString -- In Close pageRef,captionString, i = 0 -- find unused vRef = "&i) Z i = 3 vref "Es k nnen als 3 Dialogfelder verschachtelt -- store defaultpage pageref fw = -- -- holding interface -- User -- execution -- dismissed parentWindow %modal continues hidden closed. -- still $pressed OK r= "ok" -- -- stub -- doesn't filename without shortFileName fn slashLoc = 0 U(fn) Vslashloc+1 U(fn) -- finds m7location 5 bookname,booklist testName )= bookName sysversion c" MM" "mtb30.ini" enterApplication -- 7 DLLs -- sftsSetFile identifies associated cleared ftsSbk AddHyperlinkButton ftsAddLink ftsCreateLink ftsEditLink ftsModifyLink ftsGetWinPointer ftsFreeWinPointer -- pops up a entry textEntry dbCaption,dbPrompt,initVal,dType tagEntry multiline multiEntry ,dbType checks itemNumber xitem,xlist fa specified getSetFile -- stripExtension() removes - letter extension ( -- splitPath() takes a -- creates a writeDefaultSST setFile ftsBuildIndex ftsCreateIndex ftsSearchIndex -- perform a keyword ftsKwSearch level ftsReaderLevelSettings ftsReaderSettings >pageSettings ftsPageSettings ftsHWSet openWaitDlg ,dbMsg closeWaitDlg inserting a U. Will maintain %. No duplicates ftsInsertLine txt,newLine removing a ftsRemoveLine matching ftsFindLine 4"winHelp context callWinHelp contextName @ stuff PathAnimation 4s_anim_sourcePage, ssm = sc = slestyle = sysLineendStyle slesize = sysLineendSize v,solidHead ! = 1,3 onBackground "Es sind keine !>Animieren vorhanden. nlegen." >pathAnimation stopAnimation "aborted != copyObject( objList = getObjectList( !, "", ') > 0 U) > 0 excludeTab ) > 0 !, "stage", ) > 0 readerVisible = "0,0" , "", ) > 0 ) > 0 ) > 0 ) > 0 "SelectionHandles" currentPage ?during editing 5= ssm o= sc related 8le[][] ss = 9) <> dx = ?9 - dy = Z9 - }9i][13] q4i) + dx, -- These tHhelper C -- ZLOGICAL sysSuspendState Iinstead getTickCount() 's more accurate calculating durations "mmSystem. Request "Animationen k :)abgespielt ,, weil mmSYSTEM. ^)ordnungsgem verkn playing playAnimation SI, notifyObject, waitTillDone ;ns,s_anim_animationCache[][] & = 1 only *8 = objectAnimation( M8) = 0 theTarget = {<ns) = 0 startAnimTimer G(being animated on restart he[i][3] <> doneAnimatingNotify "Reset he[i][12] animCount = =ns = he[i][1] = --StartTime he[i][2] = 0 --CurrentStep he[i][3] = he[i][j] = u:[j] he[i][12] = lockScreen he[i][6] he[i][4] -- finish 4continuing R?ns) playStep j he[j][12] yieldApp() (sysMediaBreakKey) down he[i][12] >@ns = -- potential infinite loop ( reps=forever) unless <presses Escape key @ns) = 0 "During Idle" status @ns, he[][] 'Ans) <> 0 IAns) <> 0 ][1] = 0 ][3] -- ][12] animating 2Bns) LBns <> entries i >= -- lets users specify a jumpToStep whichStep, whichAnimation ! = 1 "? = 8?) > 0 I?[9] Y?[9] ~ = 0 y?[6] ?[15] < 0 )*4-3 ?[10] ,@[6] F@[6] `@[6] fake tempSuspendMessages = updateCel +A[11], a percent Sfull Slength jumpToPercent percentComplete, A) > 0 A[9]) B[9] < 0 +1)*4-3 +1)*4 UB[10] oB[6] -- -- JC[4] gC[11], -- plays "Without Yielding" currentAnimation Gns, he[][] ZtheTickCount, StepNumber,celNumber should be on TLcovered Hnow? %complete = [elapsed Isince mSec] ][1])/ ][8]/1000 ][9]) ][5] ][2] + 1 . screen so P happen simultaneously ls = >= ( ][9]* ][7]) ][7] <> 0 -- past -- ][9] * 4 + 1 ][10] -- fbuilt- ][11], ][9], -- queue 's on successful" -- Ypoint ][9]) -- +1)*4-3 +1)*4 ][10] -- ][11], -- S currentStep ][2] = -- hides shows , StepsPerCel, previousStepNumber ZCelNumberToShow,CelNumberToHide,CelCount ; so -- ( 0 corresponds -- calculate fregards -- so 7Q starts ) -- total Cels -- i.e. n kn = 0 -- shown -- so -- i.e. n kn = 0 -- assume ,whatObject V] so no generated c,be restoreAnimation objectList, animationList d) > 0 currentObject mQns, he[][] he[i][12] he[i][12] he[i][12] ~`utilities rowNum ss = lR = Q = 1 j][1] <> N[i] = O[14] = ss = 1S = O[14]][i] = S1][i] = working outside kbeditor animationCacheEntry \Tns) vTns) <> 0 <> 0 -- Run ,a Properties anim_Offset he[][] IT = 0 he[IT][6] he[][] IT <> 0 isType( he[IT][6] = r= -1 anim_CurrentStep he[][] IT = 0 he[IT][2] he[][] IT <> 0 he[IT][2] = -- Persistent anim_NumRepetitions he[][] LOCAL IT = 0 R) > 0 he[IT][7] he[][] IT <> 0 ?=", he[IT][7] = S) > 0 S[7] = anim_CelAnimation he[][] IT = 0 2T = JT) > 0 XT[4] he[IT][4] he[][] IT <> 0 he[IT][4] = U) > 0 U[4] = anim_ShowAllSteps he[][] IT = 0 U) > 0 he[IT][5] he[][] IT <> 0 he[IT][5] = AV = XV) > 0 cV[5] = anim_Duration he[][] IT = 0 V) > 0 he[IT][8] he[][] IT <> 0 *A", he[IT][8] = W) > 0 W[8] = anim_NumSteps " he[][] IT = 0 5X) > 0 CX[9] he[IT][9] he[][] IT <> 0 xB", he[IT][9] = X) > 0 X[9] = anim_StepsPerCell t!he[][] IT = 0 oY = Y) > 0 Y[11] !he[IT][11] "he[][] IT <> 0 I"he[IT][11] = 2Z = IZ) > 0 TZ[11] = Z) > 0 [) > 0 [[6] = $b Only (persistent) anim_StartSize t[ = [) > 0 [[15] anim_EndSize [) > 0 [[16] anim_StartTime n$he[][] IT = 0 $he[IT][1] anim_elapsedTime $he[][] IT = 0 q? - $he[IT][1] anim_currentTime updateAnimations )ans, ^%he[][] [ans) whatAnim = %he[i][12] ans) > 0 0&he[i][12] K&he[i][12] Gbns) = 0 animTimer whatHandle, whatMsg, wparam ' animTimerID, "USER" INT anim_setTimer = SetTimer ( /killTimer = KillTimer ( = 4843 _(sysClientHandle, ,20,0) nnte Qeingerichtet T; es k translateWindowMessage 0x001F 0x0113 anim_killTimer( untranslateWindowMessage 0 -- WIDGETS whatWin = HwindowHandle focuswindow showWidgetsProps obj, bj, "mm_MediaDialog" currentWin myWin = myPage = windowRefFromHandle( myStage = currentStage clipRef hasSlider B"sliderUpdate" B"preloadMedia" B"autoPlayMedia" B"autoShowMedia" B"autoCloseMedia" "stageSizing" enabled B"chooseClip" resourceCount(" 8) > 0 mm_mediaHelp1 mm_mediaHelp2 %"'>( strChecked strChecked strChecked stepClip - spult den Clip um 5% oder den Wert von stepDist (Benutzereigenschaft) in Richtung Clip-Ende. stepClipBack - zeigt Einzelbild 1 des Clips oder den Wert von stepDist an. seekClip arg - springt zum Einzelbild (arg). seekClipFromEnd arg - springt zum Einzelbild (arg) ausgehend vom Clip-Ende.m Einzelbild (arg) ausgehend vom Clip-Ende. strChecked strChecked strChecked strChecked Multimedia Widget-Eigenschaften strChecked Diese Schaltfl chen legen das Gr en-verhalten des Media-Elements w hrend des Ablaufs fest.d.yed. strChecked Klicken Sie auf die Schaltfl che "Ausw hlen", um einen vor-handenen Clip auszuw hlen. Klicken Sie auf die Schaltfl che "Neu", um einen neuen Clip zu erstellen und zuzuweisen. strChecked chooseClip strChecked hlen... newClip strChecked Neu... strChecked frame inside outside enterPage notifyBefore b = "outside" x = syspageunitsperpixel y = "inside" b)-x,( b)-y, ( b)+x, ( Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked inside strChecked outside strChecked stageSizing Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description stretchMedia stretchMedia myMode strChecked stretchMedia strChecked &Media strecken stretchStage strChecked &Clip-Rahmen strecken centerMedia strChecked M&edia zentrieren clipMedia strChecked Me&dia zuschneiden strChecked Media/Clip-Rahmen strChecked Clip-Rahmen... strChecked Klicken Sie auf diese Schalt-fl che, um das Dialogfeld Clip-Rahmen-Eigenschaften zu ffnen. strChecked Alle Widgets reagieren auf die folgenden Botschaften.ages:....es.set of messages. strChecked playClip - spielt den Clip ab. openClip - ffnet den Clip. closeClip - w hlt den Clip aus. pauseClip - h lt den Clip an. stopClip - bricht den Clip ab. showClip - zeigt Einzelbild 1 des Clips an. strChecked strChecked strChecked strChecked hlen Sie "Vorausladen", um den Clip in der enterPage-Routine im voraus zu laden und den Start des Clips zu beschleunigen.n entering the page. Select AUTOCLOSE to close the clip when leaving the page.e.e...........e page. strChecked hlen Sie "Auto-Wiedergeben", um den Clip in der enterPage-Routine zu starten.lose the clip when leaving the page.clip when entering the page. Select AUTOCLOSE to close the clip when leaving the page.e.e...........e page. strChecked hlen Sie "Auto-Schlie en", um den Clip in der leavePage-Routine zu schlie en. play. Select AUTOPLAY to play the clip when entering the page. Select AUTOCLOSE to close the clip when leaving the page.e.e...........e page. 8 H J strChecked H!` E! hlen Sie "Auto-Anzeigen", um das erste Einzelbild in der enterPage-Routine anzuzeigen.clip when leaving the page.clip when entering the page. Select AUTOCLOSE to close the clip when leaving the page.e.e...........e page. preLoadMedia D"T"J Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked &Vorausladen autoPlayMedia ^#n#J Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked &Auto-Wiedergeben autoCloseMedia Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked Auto-&Schlie strChecked Schaltet den Schieberegler ein, damit Sie die aktuelle Position im Clip anzeigen oder festlegen k nnen. sliderUpdate Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked Sc&hieber aktualisieren, w hrend Media abspielt. eren. autoPlayMedia Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked Auto-An&zeigen strChecked enterPage strChecked strChecked info dialog close keyDown = keyEnter buttonClick B"close" strChecked Close dialog buttonClick buttonClick isOpen "dialog" close strChecked Schlie message strChecked Sie m ssen zuerst einen Suchindex f r dieses Buch erstellen, um Suchoperationen durchf hren zu k nnen.. }d$2| *7r1]8 index _stopAnimTimer removeLinks ftsScripts tbk_tools unlinksysbook &Werkzeuge indexing Werkzeuge zum Erstellen und Durchsuchen von B chern mit Volltextsuch- und Indexfunktionalit Angepa te Autorenwerkzeuge. Erweiterungen des Systembuchs MTB30.SBK ytbk_linkMessageFuncs &Index tbk_setStartup bookloc setUpDlls tbk_sysInfo sysBookLoc Zeigt Informationen ber Ihr System an. S&ystem-Info... tbk_tools linkSysbook .&+ +E tbk_linkConvert oldCursor 1LlastWin \updateBrowser browser stbk_lastWinSize acheckSelection selection customEdit browser acheckSelection selectionChanged 1LlastWin \updateBrowser browser enterPage browser acheckSelection activateInstance author 1LlastWin browser acheckSelection stbk_lastActiveWindow enterWindow browser L$closeAllAnimations author browser reader .&, " .&, " 1,!Ex threeDStyle topline s_anim_idleAnimations group topLine sculpted threeDeeRect AngledLine Canim_StartPosition threeDeeRect anim_animationSettings inOut Canim_StartPosition Canim_startPosition bottomLine anim_animationSettings Author sized Center tbk_importText field initLinks OLE id indexing ftsObjectSettings mm_media group Extra scripts rectangle CreateHyperlinkHotword loadMenus tbk_exportText field,recordfield ftsIndexSettings browser lmmWidget false sftsMainBk mm_mediaWidgets EditHyperlinkHotword ftsFullTextSearch ftsKeywordSearch recordField,field,button,comboBox combobox tbk_taborder Spread ftsIndexName ftsScripts customEdit selHW tbk_tabOrder author mm_WidgetProps |EftsLink paintobject ftsHotwordSettings EditHyperlinkButton hyperLinking tbk_3D tbk_tools ,rectangle entermenu tbkToolsDlg msgBox Media-Pakete stbk_thisBook Dieses Buch mu zuerst gespeichert werden. clipPkg mediaPackager tbkToolsDlg system Starteinstellungen tbk_startPref tbkToolsDlg Anwendungen AddOnApps tbk_AddOnApps extra scripts exportText tbk_exportText extra scripts importText tbk_importText tbkToolsDlg searchAndReplace Suchen und Ersetzen in Skripten tbk_replaceScripts .&+ +E sysinfo.exe SYSINFO.EXE wurde in Ihrem ToolBook-Verzeichnis nicht gefunden. tbk_sysinfo extra scripts spread tbk_spreadHorz extra scripts spread tbk_spreadVert shrinkgrow extra scripts smallest tbk_shrink shrinkgrow extra scripts largest tbk_grow extra scripts center tbk_centerHorz extra scripts center tbk_centerVert extra scripts center tbk_centerBoth .&, " .&, " window cancelled tbkToolsdlg 3D-Stil festlegen extra scripts Group angledLine threeDeeRect retval threeDee threeDeeRect tbk_3D ,%H.% horzOrVert tbkToolsdlg lowestlayer Sie m ssen zuerst 2 oder mehrere Objekte ausw extra scripts window cancelled retval Tabulatorreihenfolge festlegen taborder sortbyposition tbk_tabOrder fileName .iniFile getIniVar getToolBookIniItem extra scripts setStartup tbk_setStartup KERNEL GlobalAlloc tbk_GlobalAlloc GlobalFree tbk_GlobalFree GlobalHandle tbk_GlobalHandle GlobalLock tbk_GlobalLock GlobalUnlock tbk_GlobalUnlock tbk_linkMemFuncs tb30Dlg.dll listtoTextline tbk_listtoTextline 63Kg tbk_linkConvert tb30win.dll KERNEL getIniVar GetPrivateProfileString tbk_GetIniInfo GetPrivateProfileString tbk_GetIniInfo WritePrivateProfileString tbk_SetIniInfo tbk_linkIniFileFuncs moveto tbk_moveto lineto tbk_lineto ,"TProf-" setROP2 tbk_setRop2 createPen tbk_createPen tbk-# deleteObject tbk_deleteObject ,#TTalL-" selectobject tbk_selectobject getDC tbk_getDC releaseDC tbk_releaseDC tbk_linkDrawFuncs peekMessage tbk_peekMessage registerWindowMessage tbk_registerWindowMessage postMessage tbk_postMessage tbk_linkMessageFuncs .iniFile rtbk_SetIniInfo setToolBookIniItem false Ansichtsobjekt stbk_lastActiveWindow Hauptfenster lastWin Systemvariablen browser Systemeigenschaften <system> props obRef 9a_timeGetTime s_start startTime 9a_timeGetTime s_start endTime tbk_bookRef .&, " Ytbk_GlobalLock Speicherzuordnung fehlgeschlagen. memFlag retval tbk_GlobalAlloc tbk_getWinPointer tbk_GlobalUnlock tbk_GlobalHandle Ttbk_GlobalFree tbk_freeWinPointer 8initDlg false nnen nicht mehr als 3 Dialogfelder verschachtelt werden! sEreturnString dialog rEreturnString window cancelled tbkToolsDlg initDlg shortFileName ,%H.% HshortFileName testName sysBookLoc mtb30.ini toolbook.ini iniFile initLinks ftsScripts enterApplication sftsSetFile leaveBook ftsSbk ftsScripts ftsAddLink AddHyperlinkButton GftsCreateLink ftsScripts CreateHyperlinkHotword ftsScripts ftsEditLink EditHyperlinkButton WftsModifyLink ftsScripts EditHyperlinkHotword ftsGetWinPointer ftsScripts ftsGetWinPointer ftsFreeWinPointer ftsScripts ftsFreeWinPointer textEntry ftsScripts textEntry eztagEntry ftsScripts tagEntry ftsScripts multiEntry multiEntry itemNumber ftsScripts itemNumber getSetFile ftsScripts getSetFile stripExtension ftsScripts stripExtension ftsScripts splitPath splitPath writeDefaultSST ftsScripts writeDefaultSST ftsScripts ktftsCreateIndex ftsBuildIndex uftsSearchIndex ftsScripts ftsFullTextSearch ftsScripts ftsKwSearch ftsKeywordSearch ftsScripts ftsIndexSettings ftsIndexSettings ftsScripts ftsReaderSettings ftsReaderLevelSettings ftsScripts ftsPageSettings ftsPageSettings ftsHWSet ftsScripts ftsHotwordSettings *%ftsObjectSet ftsScripts ftsObjectSettings openWaitDlg ftsScripts openWaitDlg closeWaitDlg ftsScripts closeWaitDlg ]ftsInsertLine ftsScripts ftsInsertLine XftsRemoveLine ftsScripts ftsRemoveLine ftsFindLine ftsScripts ftsFindLine callWinHelp ftsScripts callWinHelp .&+ +E .&+ +E ,%H.% slestyle s_anim_sourcePage objList slesize button s_anim_idleAnimations field newPage Es sind keine Objekte zum Animieren vorhanden. Sie m ssen zuerst Objekte anlegen. ZstopAnimation stage aborted by edit SelectionHandles field,recordField newBackground solidHead PathAnimation Author s_anim_idleAnimations Canim_StartPosition anim_animationSettings Canim_StartPosition Canim_startPosition anim_animationSettings moved timeGetTime a_timeGetTime Animationen k nnen nicht abgespielt werden, weil mmSYSTEM.DLL nicht ordnungsgem verkn pft wurde mmSystem.dll setUpDlls ,%H.% ,%H.% 1+U!8 ,%H.% ,%H.% s_anim_animationCache }gyieldApp ZstopAnimation s_anim_idleAnimations }playStep objectAnimation Reset by play command YdoneAnimatingNotify theTarget 9a_timeGetTime _stopAnimTimer startAnimTimer aborted by the user playAnimation 1, "V s_anim_animationCache _stopAnimTimer s_anim_idleAnimations YdoneAnimatingNotify notifyObj stopAnimation 1+U!8 Author objectAnimation updateCel jumpToStep whichStep Author objectAnimation updateCel jumpToPercent s_anim_animationCache successful ZstopAnimation 9a_timeGetTime updateCel playStep .&, " .&, " .&, " 1+U!! 1+U!8 updateCel doneAnimatingNotify jumpToStep currentAnimation currentObject restoreAnimation .&+ +E ,%H.% s_anim_animationCache _stopAnimTimer s_anim_idleAnimations ZstopAnimation restoreAnimation aborted by the user default closeAllAnimations anim_animationSettings objectAnimation anim_animationSettings anim_animationSettings objectAnimation 1, "V s_anim_idleAnimations animationCacheEntry s_anim_animationCache ULanimationCacheEntry anim_Offset s_anim_animationCache ULanimationCacheEntry anim_Offset s_anim_animationCache ULanimationCacheEntry anim_CurrentStep s_anim_animationCache ULanimationCacheEntry anim_CurrentStep s_anim_animationCache objectAnimation ULanimationCacheEntry whichAnimation anim_NumRepetitions s_anim_animationCache objectAnimation ULanimationCacheEntry whichAnimation objectAnimation anim_NumRepetitions s_anim_animationCache objectAnimation ULanimationCacheEntry whichAnimation anim_CelAnimation s_anim_animationCache objectAnimation ULanimationCacheEntry whichAnimation objectAnimation anim_CelAnimation s_anim_animationCache objectAnimation ULanimationCacheEntry anim_ShowAllSteps s_anim_animationCache objectAnimation ULanimationCacheEntry objectAnimation anim_ShowAllSteps s_anim_animationCache objectAnimation ULanimationCacheEntry anim_Duration s_anim_animationCache objectAnimation ULanimationCacheEntry objectAnimation anim_Duration s_anim_animationCache objectAnimation ULanimationCacheEntry anim_NumSteps s_anim_animationCache objectAnimation ULanimationCacheEntry objectAnimation anim_NumSteps s_anim_animationCache objectAnimation ULanimationCacheEntry anim_StepsPerCell s_anim_animationCache objectAnimation ULanimationCacheEntry objectAnimation anim_StepsPerCell objectAnimation anim_StartPosition objectAnimation objectAnimation anim_StartPosition objectAnimation anim_StartSize objectAnimation anim_EndSize s_anim_animationCache ULanimationCacheEntry anim_StartTime s_anim_animationCache ULanimationCacheEntry 9a_timeGetTime anim_elapsedTime 9a_timeGetTime anim_currentTime ,%H.% ,%H.% s_anim_animationCache ZstopAnimation s_anim_idleAnimations whatAnim }playStep _stopAnimTimer aborted by the user updateAnimations updateAnimations animTimerID animTimer zIanim_setTimer animTimer animTimer closeAllAnimations animTimerID Animation k nnte nicht eingerichtet werden; es k nnen keine Animationen abgespielt werden. SetTimer anim_setTimer KillTimer anim_killTimer startAnimTimer Rlanim_killTimer animTimer animTimerID stopAnimTimer mm_mediaWidgets whatWin mm_mediaWidgets showWidgetsProps whatWin mm_WidgetProps myWin autoPlayMedia myStage preloadMedia kautoCloseMedia stageSizing sliderUpdate preloadMedia hasSlider autoCloseMedia kQautoShowMedia sliderUpdate =+currentStage myPage chooseClip stage HautoPlayMedia mm_MediaDialog currentWin currentObj mm_WidgetProps ,3clipRef autoShowMedia showWidgetsProps *-"-"- procedure walks the books be included index removes settings xfound file. updateBooks -- declare 4sftsSetFile 4sftsValidObs 4sftsContexts, sftsKeywords, sftsSections 4sftsBooks, sftsVRef, sftsMainBk, sftsHwtags 4booksLeft Zcontexts,keywords,hwtags reference "dialog" tbk_bookRef() oldPageRef defaultPage status bar oldRSB = readerStatusBar = TRUE -- initialize -- these used throughout updateStatus "Die Einstellungen werden gelesen" -- list = ftsGetIniVar("Options","includeBooks", = NULL numLines = ","lines", isType(DWORD, kwLine = ","kw"&i, itemNumber(kw,pgKeywords) = 0 = ftsListToTextline( available contextLine = num = CREATE","KEYFIELDS", kfNum = kfieldData = VF"&(i+3), kfielddata named sections CONC_SECTION", B,comboBox" non-existant ftsFileExists( ) <= 0 %modal ) > 0 nextBook urchsuchen"&& ssm = sysSuspendMessages walkAllObjects ( -- clean up Fertig." close -- These two handlers specified. -- How routine works: every 8. Since aren't necessarily consecutive, -- checks ackground each has been stored ackgrounds array. If added -- sent walkObjects be walked. -- What's fuss about recordFields? Hotwords recordfields , which lives on . The returned , however, does hotwords. So whenever -- a passed adds vbackgrounds fone row , like ?[i][1] H[i][2] R[i][n] ... JReference 1> ... < -- When comes enumerate living their ZbackID, \backIndex {curPage -- xdefined, i <> ftsFindLine( ) = 0 kw = -- undefined (kw) kw) = 0 = kw -- -- we have previously -- dimensions( [j][1] -- -- so we don't visit ) + 1 ][1] = -- iterate ,backindex, -- objecttoWalk. -- On entry either a . Note: [][] only -- a [][] 4sftsLpMsg, Zstack tlist,objList recFieldCount {curObj objectToWalk = obRef = ) > 0 -- current {owns other -- curObjType = = getObjectList( ,FALSE) ) > 0 count iterating Jcondition below) recfieldCount = 0 ) > 0 located )[n][2] recIndex = 2 3]&&\ we're enumerating +2] = \ we're ) > 0 ) = 0 ) > 0 -- we already looked ) > 0 ) > 0 ) = 0 = ftsTag 's tag ) = 0 ) > 0 ) = 0 -- puts -- process statusbar message isOpen -- returns a friendly obName obj nm = ob = -- This message sent clicked changed Hsetting -- tabMode. Put code handler, -- on tabPressed tabNum -- handles clicking on buttonclick -- test 9was Hchecking "obtype" userProperty -- each named " ", N being tabname = -- Changes which 9folder front. It does Hmoving U"mask" -- Value zbetween 1 tabs value < 1 > tabLimit() "Tabulator kann nicht gesetzt werden" && v = -- moves visually -- appear See sized below adiagram v + xpix(), -- stores a userproperty myTabMode -- sends notification -- The handlers resizing ,mode. -- -- Used %a constant. Returns -- Note: you wish more , follow procedure: -- Go duplicate one -- Rename that 9appropriately. ( instance would -- be Tab7", thirteenth # be "Tab13"). -- Set its behind function reflect pageUnits given n pixels. n = 1 sysPageUnitsPerPixel * n ypix n n = 1 Qel * n -- returns currently selected -- sets up height units. tabHeight mytabheight handled myTabHeight tabSpace myTabSpace arrangeTabs numTabs sls = valid parameter "Mindestens ein vorhanden sein" maximal" && && "Tabulatoren haben" -- cache {reference optimization. 9"&i) i <= -- hidden %they've xbeen -- receiving them # are "manual" myNumTabs '= sls mynumtabs resized Notice -- methodSent: used differentiate =messages toolBook explicitly ssm = syssuspendmessages off toolbooks messaging, %we will be changing stuff. Without recursively -- calls itself over -- thing -- has a called -- -- 5,6 _________ 7,8 -- -- 3,4 | | 9,10 -- -- -- -- 1,2 |____________| 11,12 -- -- Here amap -- goal here maintain shape -- . (Otherwise gets stretchy.) Also, -- should be -- -- find how tall supposed -- tabRef = -- tsection makes " corners -- Need be sure -- )least 6 wide 4doing m"tabHighlight" B"tabLabel" O () -- only editor. -- rectangular -- body b = SuspendMessages sysSuspendMessages = Z = ssm -- -- following condition triggered %a whole -- -- -- , even though their sizes So we must notify -- can themselves. -- -- xarranged -- ref = 9"&i) -- don't bother arranging -- mynumTabs = ssm '= sls -- assures aligned context spaced evenly. anchor = "tab1" bk = ts = mytabspace bp = where order xpos = bp - b(ts,0) through remaining place -- 9"&i) -- -- now b = tbit masking others. bchecks x(e.g., just moved tname = " v = above = ssm -- spread Buccaneer index settings editorScripts list dialog Startup Preferences value dialog page options Buccaneer Regular Buccaneer Regular OS/2y3E Ncmap7 cvt Tfpgm dglyf Hhead 6hhea $hmtx name Generated by Fontographer 3.5 5Buccaneer rRegular rAltsys Fontographer 3.5 Buccaneer Regular rBuccaneer Regular rAltsys Fontographer 3.5 10/1/92 2Buccaneer Regular %E#ah #h`D-,E %E#ah#h`D-, 68-, Fv Gh #Fah X 6e8Y-@ +EhDEhDEhDEhDEhD "&5467 #"&54632 "&5467 #"&54632 @Wifc_\WH5ur E28>( %;{/% ........10 #"&5465. 54632 #"&5467# 32654&#" 32767 #"&54632 32654&#" 3254&'3 #"&54632 dL?O<18* #I*@? 08184 ,IdK+2> %,wH0 W:kO9R"<4* (BB_Gs u@):# :81DS "&5467 #"&54632 "&5467 #"&54632 54632 54632 54632 "&5467 #"&54632 54632 .....10 +?IU ....10 #"&'#" #"&54654657 4'&'4673 '&54674&#&#" 3267326 f0#1, 454632 32767632 j@163 <</<< ..... ......10 #"&'#" #"&54654657 4'&'4673 3263> "&54632> QDI@?; ....10 #"&5> 32673 732673 &5467# 1E( +T!$ q@5A6461: &Fv/7 ?<<?< ...10 '"&'# 732673 &5467# 32673 1E( +T!$ ....10 454632 32676&'5 @Ra`%"`Q- W-,(TSWON "Fv/7 ....10 #"&#"&'5676= 75"'&'# "&5465467 67632 3267. 5467#"&'5632 ...10 "&5465467 67632 .....10 #"&54&54632 fbPBP.` [@(/&% <Fv/7 ..... ..........10 54&54632 #"&#" #"&5> ^o`Il*% ......10 &565465 g@.+( <(';$ ........10 54&'3 #"&'> E~W3? -E0n0 T LL]7O @9@M=t6 .......10 &'&'53 54&54'&'53 #"&5. 3%Af(( V017, 54632 m@3A?=;9B 9Fv/7 ....10 4&'67. #"&'" 4&'63 *5;H5C +%67> 54632 q@7R:41.&SA('&L 65ED> .Fv/7 ..... ......10 &54674&#&#" 3267326 #"#&' #"&54654657 4'&'4673 f0#1, #"� 32654'&'&54632 E-P>L= ?NLn]rkjs !u`O9QJ=>MW8r *Fv/7 ?<<?<< .....10 "&5465467 P@$10/. ........10 5&54767/ 3267> !BHB- *>/$x ...10 '4&5463 54&5654'3 22%?$ L@ ?( A@%$3 ?Fv/7 ...10 54&5463 54&5654'3 22%?$ X@(eYVPM@;0'&% @AA>>dD ..... ................10 32632 54632 54654&#" N@!# .........10 ("i^T ......10 54632 -0* " 8Fv/7 ...10 +%4&'"&#" 326'2 54&5#" 54632 32632 #"&54> *2=*&<m #E"&1 ?4F}&;r *2)3@ +Nf@f bE2< L@#21,+% .........10 #"&#" 5-HoLxb/n O'< .....10 32767 #"&54632 '^M!=YX#&% UCk:K~ -Fv/7 ....10 #"&#" 354&'> #"&54> l,`zKrF/ R@&' ......10 327673 3263> m-"+2 ^@-KH?=:+# ..........10 '65&546324632 #"&'" 546'&54632 32657654& kH112F ...10 #"&#" 32632 #"&546= 4654&54632 >!9U9 =, *=e;,&# ;WNzPL*S 9-, ^@,6# ....10 4654&#" 4654&'5> 1BF' + _{Q:~=('+ Fv/7 #"&54632 #"&#" ?<v?< ...10 &5&54636232 54632 72672 ]@*B?-' 2 #32 'Fv/7 ........10 #"&#" 4&54632 54&54632 OEP@1I ....10 #"&#" 4'&'4672 @ATSDA>; *+*'58 AFv/7 .......10 "5467 #"&'> 54&#" #"&5#"&'> 54&54654&'> #"&'> 54&#" KMV%( &-0yj s@4DA>; *+*'58! AFv/7 .......10 "5467 #"&'> 54&#" #"&5#"&'> 54&54654&'> KMV%( #"&54632 54&#" 5;t)7HF$ GHX_TB\P i@540 4Fv/7 32654&7 4654&+ 54"'3 GZ:}&&ey \\]u: 68$) [@,.+' D1AHG2 :Fv/7 .....10 32632 00#;[F @/j-$ 9v][^ #"'&'" #"&5> 54'&'4672 67632 ....10 #"&'#&54675467 32654'&'&5463 /JEEJ T_=TD 0+!")-GK/ ]@+65 ......10 #"&5> #&#"&#" 327367673 +"1:7+r GD/,* 1>?>: *Fv/7 ...... ......10 #"&54654'&/ 4&'5632 '4&5463 54&565'3 S@%+! ...10 74&5463 54&565'3 t@3>+(& N?<<_A`T9 TKHQT/H 32632 54632 54654&#" /Fv/7 ......10 #"&5&6767 }>t0Pk4 ......10 !"#$ %&'()*+,-./0123456789:;<=>? info dialogs entry dialog combo dialogs section dialog widgets wait dlg palette Compiler SelectObject Create Search Index info dialog ftsscripts page settings reader settings update books text entry upropsdlg settings not found bottomBar changePrompt propValues searchandreplace system multi entry Widgets clipPkg foundScripts where used clipPkgChoosePath clipPkgPrompt Settings mm_firstWidget AddOnApps propEdit about index settings extra scripts clipPkgPaths mm_WidgetProps drawing hyperlink mm_MediaWidgets assign section value entry ThreeDee TabOrder test2 wait dlg update settings mm_mediaHelp2 Media Widgets Help browser credits assign value credits " Z " ! * ! * 6 { a k h [ } S cannon -435,1635 endpos -1890,1635 startpos scroll scroll strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked B R J strChecked strChecked strChecked strChecked b!r!J strChecked credits 0R>jA strChecked names names scrollToNext scrollToNext names = >+1) r+1) strChecked Das Hook Team Programmentwicklung Michael Ormes Brian Malcolm Dennis Clawson Dick Earl Paul Meisenheimer Rob Lanphier Steve Bard Programmentwicklung Bruce Jones Dan Hodge Mae Sahabu Mike Neufeld Projekt Management Winnie Wu Chris Carden Anwendungsentwicklung Charles Hiestand Jeff Ayars Jim Geldmacher Joseph Brick Michael Florence Steve Beck Tim Pearson International Hiroka Mamiya Rick Edelblut Mark Graf Ute Medley Kerstin Nolder Dirk L Jochen Liesche International Robert Lanphier Dan Mott Charles Hiestand Jim Geldmacher Jennifer Steele Jennifer Tobin Karen Johnson International Joel Kittinger Curtis Laird David Hamaoka Alwin Vyhmeister Laura Searl Brian Malcolm Qualitaetssicherung Jim Bartlett Michael Stahl Allan Fink Bruce Jackman Greg Eigsti Qualitaetssicherung Joel Kittinger John Grachan Karen Johnson Stephen Shih Teron Uy Dokumentation Beck Andros Cynthia Peterson Lindsay Latimore Mike Pope Nancy Matthew Susan Hancock Lernprogramm Jennifer Tobin Margo Crandall Raine Bergstrom Reid Johnson Marketing Larry Rask Susanna Poon Steve Linsk (International) Technischer Support Dave Hardwick Craig McDonald David Kester Diane Droubay Erik Reitan Josh Baker Ned Baker Robert Fink Terry Lee Todd Drollinger Tyrone Floyd Besonderer Dank gilt Paul Allen Bert Kolde Shabbir Dahod Brent Wayland Clark Bohmont Claude Ostyn Richard Ying Debbie Cosbey Debbie Pfeifer Harriet Landrum Jeff Day Mary Nelson Marc McDonald Shuang Li Steven Esau Steve Falcon alcon strChecked strChecked strChecked hook2 strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked > N J strChecked strChecked &!6!J strChecked strChecked <"L"J strChecked strChecked <#L#J strChecked strChecked <$L$J strChecked strChecked $%4%J strChecked strChecked $&4&J strChecked strChecked L'\'J strChecked strChecked strChecked strChecked ,):*D* l*|*J strChecked strChecked ,)j/v/ anchor strChecked ,)F0P0 break strChecked x= y= dx = ( (xm)-x)/10 dy = ( (ym)-y)/10 Hdx,dy dx = ((xm/2-270)-x)/10 dy = ((ym/2-270)-y)/10 Hdx,dy strChecked ; R:^ strChecked >6N6J strChecked strChecked strChecked 28B8J strChecked strChecked 29B9J strChecked strChecked 2:B:J strChecked strChecked 2;B;J strChecked strChecked 2<B<J strChecked strChecked 2=B=J strChecked strChecked 2>B>J strChecked headhole strChecked ^?n?J strChecked :@J@J strChecked strChecked 0,0,0,0 mybounds strChecked 2910,2370 realsize Keine Steuerelemente. Klicken zum Abspielen.to play.U mmPlayer mmWidget custom,newClip() boolean boolean boolean boolean boolean list,stretchMedia,stretchStage,clipMedia,centerMedia tbk_wid_values clipRef preLoadMedia autoPlayMedia autoCloseMedia autoShowMedia SliderUpdate MediaSizing tbk_wid_props stretchMedia mediaSizing preLoadMedia FALSE AutoPlayMedia autoCloseMedia FALSE autoShowMedia Multimedia Widget tbk_wid_name enterPage strChecked strChecked leavePage 2925,2715 realsize ckspulen, Schrittweise zur ck, Anhalten, Stop, Spielen, Schrittweise vor und Vorspulen.rd. mmPlayer mmwidget_stage myStage mmWidget custom,newClip() boolean boolean boolean boolean boolean list,stretchMedia,stretchStage,clipMedia,centerMedia tbk_wid_values clipRef preLoadMedia autoPlayMedia autoCloseMedia autoShowMedia SliderUpdate MediaSizing tbk_wid_props stretchMedia mediaSizing preLoadMedia FALSE AutoPlayMedia autoCloseMedia FALSE autoShowMedia Multimedia Widget tbk_wid_name mmwidget_controls 150,1816,2715,2191 llplayClip buttonClick buttonClick playClip 1616,1816,1982,2191 aspect pause pauseClip buttonClick buttonClick pauseClip 883,1816,1249,2191 aspect DystopClip buttonClick buttonClick stopClip 1249,1816,1616,2191 aspect step forward pstepClip buttonClick mmYieldApp pstepClip buttonStillDown buttonClick stepClip --HACK: should use mmYield mmYieldApp() aspect 1982,1816,2348,2191 fast forward seekClipFromEnd buttonClick buttonClick seekClipFromEnd 0 aspect 2348,1816,2715,2191 step backward stepClipBack buttonClick mmYieldApp stepClipBack buttonStillDown buttonClick stepClipBack --HACK: should use mmYield mmYieldApp() aspect 517,1816,883,2191 rewind _seekClip start buttonClick buttonClick seekClip aspect 150,1816,517,2191 mmwidget_stage enterPage strChecked leavePage strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked Anhalten/Spielen, Stop und Schieberegler zum Festlegen der aktuellen Position. mmPlayer mmwidget_stage myStage mmWidget hasSlider FALSE sliderUpdate Multimedia Widget tbk_wid_name clipRef preLoadMedia autoPlayMedia autoCloseMedia autoShowMedia SliderUpdate MediaSizing tbk_wid_props custom,newClip() boolean boolean boolean boolean boolean list,stretchMedia,stretchStage,clipMedia,centerMedia tbk_wid_values stretchMedia mediaSizing preLoadMedia FALSE AutoPlayMedia autoCloseMedia FALSE autoShowMedia mmwidget_stage mmwidget_controls 150,1809,2715,2184 mmwidget_controls realname myStage myClip pauseClip llplayClip ,3clipRef whatStage playing status buttonClick buttonClick myStage = whatStage() myClip = clipRef status = mmStatus "playing" pauseClip playClip 150,1809,525,2184 PlayPause realname DystopClip buttonClick buttonClick stopClip 525,1809,900,2184 slider 900,1809,2715,2184 slider realname lastTickCount frame slider thumb sized author moved lastX lastX setPos sized ssm = syssuspendmessages = TRUE syspageunitsperpixel moved bnds = setPos x lastX x = NULL x < 0 x = 0 x > 1 x = 1 myWid = ( backWid = <*x)- = ssm lastX thumb realname enterpage leavePage strChecked leavePage strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked 2910,2730 realsize strChecked Anhalten, Stop, Spielen und ein Schieberegler zum Anzeigen bzw. Festlegen der aktuellen Position. mmPlayer mmwidget_stage myStage mmWidget hasSlider FALSE sliderUpdate custom,newClip() boolean boolean boolean boolean boolean list,stretchMedia,stretchStage,clipMedia,centerMedia tbk_wid_values clipRef preLoadMedia autoPlayMedia autoCloseMedia autoShowMedia SliderUpdate MediaSizing tbk_wid_props stretchMedia mediaSizing preLoadMedia FALSE AutoPlayMedia autoCloseMedia FALSE autoShowMedia Multimedia Widget tbk_wid_name strChecked mmwidget_stage strChecked mmwidget_controls 150,1815,2715,2190 strChecked Pause pauseClip buttonClick buttonClick pauseClip 150,1815,525,2190 strChecked DystopClip buttonClick buttonClick stopClip 525,1815,900,2190 strChecked llplayClip buttonClick buttonClick playClip 900,1815,1275,2190 strChecked slider 1275,1815,2715,2190 lastTickCount strChecked frame strChecked strChecked slider strChecked thumb sized author moved lastX lastX setPos sized ssm = syssuspendmessages = TRUE syspageunitsperpixel moved bnds = setPos x lastX x = NULL x < 0 x = 0 x > 1 x = 1 myWid = ( backWid = <*x)- = ssm lastX strChecked enterpage leavePage leavePage widgets screen reader author notifyBefore FALSE allowDrop frame description frameupdate frameupdate b = "description" x = syspageunitsperpixel y = b)-x,( b)-y, ( b)+x, ( Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description description reader author newobj showWidgetsProps s_art_dragObj howBig default endDrag endDrag obj, loc, whatViewer SYSTEM s_art_dragObj = default whatHandle = windowHandle H = NULL = TRUE howBig = newobj = copyObject( , currentPage windowRefFromHandle( nnewObj = FALSE showWidgetsProps Z j J strChecked strChecked strChecked strChecked strChecked mm_firstWidget 2910,2730 realsize strChecked Anhalten, Stop, Spielen und ein Schieberegler zum Anzeigen bzw. Festlegen der aktuellen Position.on. mmPlayer mmwidget_stage myStage mmWidget hasSlider FALSE sliderUpdate custom,newClip() boolean boolean boolean boolean boolean list,stretchMedia,stretchStage,clipMedia,centerMedia tbk_wid_values clipRef preLoadMedia autoPlayMedia autoCloseMedia autoShowMedia SliderUpdate MediaSizing tbk_wid_props stretchMedia mediaSizing 160,120 mmMediaSize autoCloseMedia preLoadMedia FALSE autoPlayMedia FALSE autoShowMedia Multimedia Widget tbk_wid_name strChecked mmwidget_controls 150,1813,2715,2188 strChecked Pause pauseClip buttonClick buttonClick pauseClip 150,1813,525,2188 strChecked DystopClip buttonClick buttonClick stopClip 525,1813,900,2188 strChecked llplayClip buttonClick buttonClick playClip 900,1813,1275,2188 strChecked slider 1275,1813,2715,2188 lastTickCount strChecked frame strChecked strChecked sliderline strChecked strChecked slider strChecked thumb sized author moved lastX lastX setPos sized ssm = syssuspendmessages = TRUE syspageunitsperpixel moved bnds = setPos x lastX x = NULL x < 0 x = 0 x > 1 x = 1 myWid = ( backWid = <*x)- = ssm lastX strChecked mmwidget_stage mmwidget_stage myStage 160,120 mmMediaSize strChecked enterpage leavePage leavePage mm_mediaHelp mm_MediaHelp buttonclick buttonclick close "mm_MediaHelp" strChecked strChecked mm_mediaHelp1 strChecked strChecked strChecked strChecked mmwidget_stage strChecked strChecked 5625,2923,6000,3298 strChecked pause 5507,2806,5875,3181 aspect strChecked 5875,2806,6245,3181 aspect strChecked step forward aspect 6613,2806,6981,3181 strChecked fast forward aspect 6981,2806,7350,3181 strChecked step backward aspect 5139,2806,5507,3181 strChecked rewind aspect 4770,2806,5139,3181 strChecked strChecked Klicken Sie auf die Schaltfl che "Spielen", um den Clip abzuspielen. Der Clip wird von der aktuellen Position abgespielt. strChecked Klicken Sie auf die Schaltfl che "Stop", um den Clip-Ablauf zu unterbrechen. Der Clip wird verborgen an den Anfang zur ckgespult. strChecked Klicken Sie auf die Schaltfl che "Anhalten", um den Clip-Ablauf anzuhalten. Der Clip bleibt sichtbar. strChecked Klicken Sie beim angehaltenen Clip auf die Schaltfl che "Schrittweise vorspulen", um die Clip-Position um 5% vorzuspulen. strChecked Klicken Sie beim angehaltenen Clip auf die Schaltfl che "Schrittweise zur ckspulen", um die Clip-Position um 5% zur ckzuspulen. strChecked Klicken Sie auf die Schaltfl che "Vorspulen", um zum Ende eines angehaltenen Clips zu gelangen. strChecked Klicken Sie auf die Schaltfl che "Zur ckspulen", um zum Anfang eines angehaltenen Clips zu gelangen. slider 900,1830,2730,2205 slider realname lastTickCount strChecked frame strChecked strChecked slider strChecked thumb lastX thumb realname strChecked strChecked Das CLIP-RAHMEN-Objekt bestimmt die Position und das Abspielverhalten des visuellen Media-Elements. strChecked Die SCHIEBEREGLER werden zum Anzeigen und zum ndern des aktuellen Einzelbilds eines Clips. W hrend des Clip-Ablaufs wird der Schieberegler (falls er aktiviert ist) stets auf die aktuelle Position aktualisiert. Wenn der Clip angehalten ist, k nnen die Schieberegler verwendet werden, um sich zu einer anderen Position im Clip zu bewegen. slider 1275,1828,2730,2203 lastTickCount strChecked frame strChecked strChecked sliderline strChecked strChecked slider strChecked thumb lastX strChecked strChecked Multimedia Widget-Elementees strChecked strChecked mm_WidgetProps strChecked strChecked frame inside outside enterPage notifyBefore b = "outside" x = syspageunitsperpixel y = "inside" b)-x,( b)-y, ( b)+x, ( Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked inside strChecked outside strChecked stageSizing myMode buttonClick buttonClick myMode mode value = FALSE = TRUE Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description stretchMedia stretchStage myMode strChecked stretchMedia strChecked &Media strecken stretchStage strChecked &Clip-Rahmen strecken centerMedia strChecked M&edia zentrieren clipMedia strChecked Me&dia zuschneiden frame enterPage notifyBefore b = "clip" x = syspageunitsperpixel y = b)-x,( b)-y, ( b)+x, ( Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked strChecked Zugewiesener Clip: strChecked Fertig buttonclick buttonclick close shownBy strChecked Schlie frame inside outside enterPage notifyBefore b = "outside" x = syspageunitsperpixel y = "inside" b)-x,( b)-y, ( b)+x, ( Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked inside strChecked outside strChecked strChecked Beim Eintreten in die Seite sliderUpdate Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked Sc&hieber aktualisieren, w hrend Media abspielt. strChecked Media/Clip-Rahmen chooseClip currentWin nnen nur Clips aus visuellen Medien verwendet werden. animation bitmap digitalVideo overlay whatClip currentObj whatWin buttonClick buttonClick whatWin = currentWin shownBy obj = currentObj windowRefFromHandle( resourceCount("clip", 8) = 0 clips 8) <> 0 whatClip = chooseResource(" %<> NULL mmMediaType "animation bitmap digitalVideo overlay" "Es k nnen nur Clips aus visuellen Medien verwendet werden." strChecked hlen... newClip currentWin nnen nur Clips aus visuellen Medien verwendet werden. animation bitmap digitalVideo overlay whatClip currentObj whatWin buttonClick buttonClick whatWin = currentWin shownBy obj = currentObj windowreffromhandle( clips resourceCount(" 8) <> 0 whatClip = chooseResource(" %<> NULL mmMediaType "animation bitmap digitalVideo overlay" "Es k nnen nur Clips aus visuellen Medien verwendet werden." strChecked Neu... Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked mm_MediaHelp2 mm_MediaHelp buttonclick buttonclick "mm_MediaHelp" currentPage "mm_MediaHelp2" %modal `"p"J strChecked Hilfe currentWin whatStage <+currentStage whatWin currentObj buttonclick buttonclick whatWin = currentWin shownBy whatStage = currentStage obj = currentObj windowRefFromHandle( sysTool = strChecked Clip-Rahmen... strChecked preLoadMedia Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked &Vorausladen autoPlayMedia preLoadMedia buttonClick buttonClick enabled B"preLoadMedia" = Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked &Auto-Wiedergeben 4% )4) autoCloseMedia Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked Auto-&Schlie 4%>*.+ autoShowMedia preLoadMedia buttonClick buttonClick enabled B"preLoadMedia" = Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked Auto-An&zeigen frameUpdate enterPage palette strChecked mm_MediaWidgets 15,15 lastUnits strChecked strChecked flipPages -$, #? right previous number mm_MediaWidgets mm_MediaImager targetPage direction buttonclick buttonclick "mm_MediaImager" direction = " targetPage = firstPage = "mm_MediaWidgets" = C&&"von"&& Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked previous strChecked strChecked number -$, #? 1 von widgets enterpage notifyBefore = "1 von"&& /"widgets" Stage object with controls. Pause, Stop, Play and a slider to indicate or set the current position. description strChecked 1 von 5tion strChecked showWidgetsProps newObj whatWindow whatObject mm_MediaImager buttonClick buttonClick whatObject = currentPage "mm_MediaImager" newObj = copyObject( whatWindow = windowHandle showWidgetsProps strChecked In Buch kopieren cancel buttonclick buttonclick close strChecked Abbrechen cancel mm_MediaHelp1 mm_MediaHelp buttonclick buttonclick "mm_MediaHelp" currentPage "mm_MediaHelp1" %modal strChecked Hilfe target .&+ +E mouseEnter default mouseLeave mm_mediaImager s_art_dragObj mm_MediaImager buttonDown = default {loc, isShift, isControl SYSTEM s_art_dragObj currentPage "mm_MediaImager" "mm_mediaImager" U silently strChecked enterpage strChecked AddOnApps in,false ThreeDeeRect bottomLine topLine Abbrechen cation appList iconDisplay appStuff pageRef vshowIcon appName appRef appDescr buttonclick keyup runApp buttonDoubleClick buttonclick pageRef = stl = selectedTextLines appRef = tabloc = appStuff = VtabLoc + 1 appName = appDescr = showIcon BiconDisplay flushMessageQueue() runApp buttonclick buttonclick cancel buttonclick buttonclick in,ms ThreeDeeRect bottomLine topLine iconDisplay appDescr Startet das Multimedia-Albumookpt Editorpt programming. Effekt strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked hlen Sie eine Anwendung aus: drawing .p/(0 strChecked strChecked strChecked snapToGrid strChecked &Beim Gitter einrasten showGrid strChecked &Gitter anzeigen strChecked Gitter&abstand: in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked gridspacing leavefield t = t < .02 t = "0.02" %"0"&sysdecimal&"000" decimal ftype strChecked 0.021002333333333e-002 R b J strChecked &Vieleckfigur: in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked polygonShape MoldText enterField ,!Jc" Fehler: sysPolygonShape mu ein Wert zwischen 3 und 99 MoldText leaveField oldText xisType(real, >= 3 <=99 ) "Fehler: ein Wert zwischen 3 und 99" oldText strChecked polygonshape polygonShape update update buttondown update buttondoubleClick update buttonstilldown enterbutton leavebutton enterpage update "polygonShape" j(99, "polygonshape" buttondoubleClick notifyBefore strChecked &Schaltfl polygonshape polygonShape update update buttondown update buttonstilldown update buttondoubleclick enterbutton leavebutton enterpage update "polygonShape" "polygonshape"-1) notifyBefore strChecked &Schaltfl colorPaletteDlg colorPaletteDlg recRef retcolor scolor tb30DLG.DLL buttonclick -- allows user specify buttonclick linkDLL "tb30DLG. STRING colorPaletteDlg (WORD, BYTE, recRef = rgb = rgbfill retcolor = _(windowhandle retColor "scolor" strChecked fcolor strChecked llfarbe: fcolor strChecked scolor strChecked S&trichfarbe: scolor strChecked patternGroup patternFlipper solidFill pattern custom solidStroke update pttrn solidFill pattern solidStroke pttrn chooser control pttrn value "patternFlipper" B"custom" update @ P J strChecked solidFill patternFlipper buttonclick buttonclick "patternFlipper" strChecked &Mit Basisfarbe ausf solidStroke patternFlipper buttonclick buttonclick "patternFlipper" strChecked Bas&is-Strichfarbe custom patternFlipper buttonclick buttonclick "patternFlipper" strChecked Ben&utzerdefiniert patternFlipper pattern update update strChecked pattern &0&J strChecked pattern strChecked pattern update update update buttondown update buttondoubleClick update buttonstilldown enterbutton leavebutton enterpage update j(128, buttondoubleClick notifyBefore strChecked &Schaltfl pattern update update update buttondown update buttonstilldown update buttondoubleclick enterbutton leavebutton enterpage update notifyBefore strChecked &Schaltfl drawDirect :/J/J strChecked &Direkt zeichnen strChecked Gitter units strChecked R1b1J strChecked Muster:::::: "222J out,ms ThreeDeeRect strChecked bottomLine strChecked 1@3L3 topLine strChecked fcolor strChecked out,ms ThreeDeeRect strChecked $4 505 bottomLine X5h5J strChecked topLine strChecked $4R6^6 scolor strChecked enterpage retchStage mediaSize = mmVisualSize = 160,100 changePrompt &Schaltfl replacestring strChecked strChecked strChecked strChecked in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked scriptDisplay strChecked vwrRef = viewer "Standard" of ftsSbk()tsSbk()faultValem,4096,"toolbook.ini")hor with helpText "Runs application specified in ToolBook.ini file."n the book."le."."o upper-most objects."" objectRef strChecked Page id 20 ("ftsscripts")"OLS30.SBK"er")") ("C:\JXBETA\0PROJ\LIBRARY\LIBRARY.TBK") strChecked buttonclick buttonclick strChecked &Nein buttonclick buttonclick strChecked EyyestoAll buttonclick buttonclick yestoAll strChecked Ja &f r Alle cancel buttonclick buttonclick strChecked &Abbrechen strChecked ftsSbk() durch tbk_bookRef() in diesem Skript ersetzen? script? script? in this script? in this script? &Schaltfl findstring strChecked strChecked strChecked in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked tabSpacing decimal ftype strChecked 0.5001 Einzug Startup Preferences in,false ThreeDeeRect bottomLine topLine folder mytabheight myNumTabs myTabMode myTabSpace Folder tbk_wid_Name tabHeight numTabs tabMode tabSpace tbk_wid_props list,1,2,3,4,5,6 tbk_wid_values obtype tabHighlight tabLabel obtype tabHighlight tabLabel obtype tabHighlight tabLabel awing obtype tabHighlight tabLabel Drawing goPage Abbrechen obtype tabHighlight tabLabel goPage Te&xt obtype tabHighlight tabLabel system goPage S&ystem highlight system updateIni bookref tbk_bookRef drawing buttonclick buttonclick bookref = tbk_bookRef() updateIni "drawing" close buttonclick buttonclick close strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked Zeichnung &Zeichnung system strChecked leavefield maxsize = 14 t = strChecked strChecked Seiten&breite: in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked Pagewidth strChecked 0.000 strChecked Seiten&h in,ms ThreeDeeRect strChecked bottomLine strChecked topLine & 6 J strChecked pageHeight strChecked 0.000666666666667 strChecked showHotwords strChecked &Aktionsw rter anzeigen showRulers strChecked &Lineale anzeigen readerRightClick strChecked Leser-&Kontextmen recordHistory strChecked Ch&ronik aufzeichnen strChecked Syste&mb strChecked strChecked Pfad: c:\jx\src\exe\hook\gr\\c:\jxbeta\animate\clrftbktool2.sbk c:\jxbeta\ bottomLine strChecked topLine strChecked sysbooks w, #> Pfad: gpathinfo Pfad: tabloc updatePath updatePath keyup updatePath buttonup updatePath stl = selectedtextlines txt = tabloc = "Pfad: "&pathinfo( strChecked mtb30.sbk c:\jx\src\exe\hook\gr\E tb30dlg.dll filendir fileAndDir Systemb cher (*.sbk),*.sbk,ToolBook (*.tbk),*.tbk,Alle Dateien (*.*),*.* filterList OpenFileDlg sysbooks Systembuch hinzuf openFileDlg updatePath buttonclick buttonclick X"tb30dlg.dll" STRING openFileDlg ( , INT) filterList = "Systemb cher (*.sbk),*. ,ToolBook (*.tbk),*. ,Alle Dateien (*.*),*.*" OpenFileDlg("Systembuch hinzuf gen", NULL, fn = fref = filendir = fileAndDir(fn) selectedTextLines updatePath strChecked &Neu... remove sysbooks updatePath buttonclick initEnabled buttonclick sysbooks initEnabled buttonclick fref = stl = selectedTextLines tc = tc > 0 selectedtextlines o,tc) updatePath notifyAfter initEnabled oenabled strChecked &Entfernen units strChecked strChecked strChecked buttonclick strChecked about initdlg cancel keychar cancel initdlg keyEnter close strChecked ToolBook-Eigenschafts bersicht buttonclick buttonclick close Geschrieben in: Multimedia ToolBook 3.0 Asymetrix Corporation strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked extra scripts Diese Seite enth lt zus tzliche Skripten, damit das Buchskript nicht zu viele Behandlungsroutinen enth lt...... strChecked strChecked strChecked ThreeDee Beispiel: in,false ThreeDeeRect bottomLine topLine sample in,ms ThreeDeeRect bottomLine topLine stylebuttons updatesample buttonclick raised inset ThreeDeeStyle raised ThreeDeeStyle buttonclick updatesample ThreeDeeStyle value B"raised" B"inset" "out" inset f nset raised aised Stile 3D-Stil zur Auswahl hinzuf gencts buttonclick buttonclick cancel buttonclick buttonclick in,false ThreeDeeRect bottomLine topLine Rahmen borderbuttons =checkedButton updatesample buttonclick false sculpted =checkedButton border =checkedButton border buttonclick ocheckedButton updatesample border value -- backwards compatibility earlier version O = " f = "sculpted" checkedButton out,ms threeDeeRect sculpted &Profil &MS-Stil &Kein strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked &Eingesetzt &Gehoben Abbrechen strChecked TabOrder LayerNum initDlg cancel keychar sEreturnstring layerNum lefttoRight retval cancel -- initializes dialog that prompts user change 9order. -- value[1] has the starting initDlg "LayerNum" keyEnter "layerNum" retval B"lefttoRight" n = 1 n = 2 returnstring close in,false ThreeDeeRect bottomLine topLine Tabulatorreihenfolge der Auswahl bearbeiten &Anfangsschicht: in,ms ThreeDeeRect bottomLine topLine LayerNum 0123456789 keychar keyEnter "0123456789" LeftToRight eft to Right TopToBottom Abbrechen Reihenfolge anwenden: buttonclick buttonclick cancel buttonclick buttonclick strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked &Links nach rechts &Oben nach unten strChecked foundScripts foundScripts U"searchString initDlg foundScripts cancel cancel keychar tb30win.dll {keyF5} Cssendkeys {keyEscape}+{keyF5} sendkeys 0'H-" editScript -- initializes dialog that shows the user found strings. -- value[1] has Dcontaining )cript initDlg "foundScripts" searchString close keyEnter -- edits editScript obj, searchText X"tb30win.dll" sendkeys( }",0) focusWindow preloadmedia searchString strChecked instructions strChecked Objektskripten bearbeiten: in,ms ThreeDeeRect strChecked bottomLine strChecked topLine F V J strChecked foundScripts .&+ + nameOffset stbk_searchString nameOffset stbk_searchString buttondoubleclick -- edits the found 4stbk_searchString selectedTextlines obj = nameOffset = ~("(", $-1) editScript strChecked Book "C:\JX\SRC\EXE\MTB30.SBK" Button id 46 of Page id 49 ("autoShowMedia") Button id 44 of Page id 49 ("autoPlayMedia") Button id 16 of Page id 49 Group id 55 of Page id 51 ("mmPlayer") Group id 22 of Page id 52 ("mmPlayer") Group id 85 of Page id 53 ("mmPlayer") Group id 11 of Page id 54 ("mmPlayer") Stage id 0 of Page id 55 ("mmPlayer") Field id 18 of Page id 28 ("Entry") Field id 18 of Page id 29 ("Entry") Field id 6 of Page id 32 ("pages") Page id 33 ("page settings") Page id 34 ("index settings") Page id 35 ("reader settings") Page id 3 ("propEdit") Field id 0 of Page id 3 ("Propedit") Page id 4 ("upropsdlg") Field id 3 of Page id 4 ("upropvalue") Page id 5 ("searchandreplace") Background id 9 Button id 36 of Page id 14 Button id 35 of Page id 14 Button id 24 of Page id 14 Button id 23 of Page id 14 Field id 33 of Page id 48 ("number") Group id 30 of Page id 49 ("frame") Field id 12 of Page id 49 ("frame") Group id 3 of Page id 49 ("frame") Group id 45 of Page id 63 ("frame") Group id 52 of Page id 51 ("slider") Group id 55 of Page id 51 ("mmPlayer") Group id 20 of Page id 52 ("slider") Group id 22 of Page id 52 ("mmPlayer") Group id 83 of Page id 53 ("slider") Group id 85 of Page id 53 ("mmPlayer") Group id 11 of Page id 54 ("mmPlayer") Stage id 0 of Page id 55 ("mmPlayer") Page id 72 ("credits")d 5 of Page id 6 Button id 6 of Page id 6 Page id 7 ("foundScripts") Field id 0 of Page id 7 ("foundScripts") Button id 6 of Page id 7 Button id 7 of Page id 7 Page id 8 ("TabOrder") Field id 5 of Page id 8 ("LayerNum") Button id 1 of Page id 8 Button id 2 of Page id 8 Page id 9 ("ThreeDee") Group id 12 of Page id 9 ("stylebuttons") Button id 14 of Page id 9 ("sculpted") Button id 17 of Page id 9 Button id 18 of Page id 9 Page id 10 ("extra scripts") Page id 11 ("about") Button id 3 of Page id 11 Background id 11 ("Startup Preferences") Group id 36 of Background id 11 ("folder") Button id 47 of Background id 11 Button id 48 of Background id 11 Page id 12 ("system") Group id 21 of Page id 12 Field id 4 of Page id 12 ("sysbooks") Button id 6 of Page id 12 Button id 7 of Page id 12 ("remove") Page id 13 ("text") Button id 26 of Page id 13 Button id 24 of Page id 13 ("character") Group id 25 of Page id 13 ("tabbuttons") Page id 14 ("drawing") Field id 8 of Page id 14 ("gridspacing") Button id 23 of Page id 14 Button id 24 of Page id 14 Field id 22 of Page id 14 ("polygonShape") Group id 43 of Page id 14 Group id 40 of Page id 14 ("patternGroup") Button id 37 of Page id 14 ("solidFill") Button id 38 of Page id 14 ("solidStroke") Button id 33 of Page id 14 ("custom") Group id 39 of Page id 14 ("patternFlipper") Button id 35 of Page id 14 Button id 36 of Page id 14 Page id 15 ("AddOnApps") Field id 1 of Page id 15 ("appList") Button id 3 of Page id 15 Button id 4 of Page id 15 strChecked buttonclick buttonclick strChecked Bearbeiten cancel buttonclick buttonclick strChecked Schlie strChecked strChecked strChecked strChecked changePrompt strChecked strChecked strChecked strChecked in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked scriptDisplay strChecked vwrRef = viewer "Standard" of ftsSbk()tsSbk()faultValem,4096,"toolbook.ini")hor with helpText "Runs application specified in ToolBook.ini file."n the book."le."."o upper-most objects."" objectRef strChecked Page id 20 ("ftsscripts")"OLS30.SBK"er")") ("C:\JXBETA\0PROJ\LIBRARY\LIBRARY.TBK") strChecked buttonclick buttonclick strChecked &Nein buttonclick buttonclick strChecked EyyestoAll buttonclick buttonclick yestoAll strChecked Ja &f r Alle cancel buttonclick buttonclick strChecked &Abbrechen strChecked ftsSbk() durch tbk_bookRef() in diesem Skript ersetzen? script? script? in this script? in this script? strChecked searchandreplace 31,38 selectChars sysSuspend searchString strChecked folder mytabheight myNumTabs myTabMode myTabSpace Folder tbk_wid_Name tabHeight numTabs tabMode tabSpace tbk_wid_props list,1,2,3,4,5,6 tbk_wid_values strChecked obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked obtype strChecked strChecked tabHighlight 0 J strChecked tabLabel strChecked obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked obtype strChecked strChecked tabHighlight strChecked tabLabel Drawing goPage strChecked obtype strChecked strChecked tabHighlight strChecked tabLabel goPage strChecked &Ersetzen obtype strChecked strChecked tabHighlight strChecked tabLabel system goPage strChecked &Suchen strChecked strChecked highlight strChecked strChecked strChecked Suchen &nach: in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked findString &updateStartButton keychar updateStartButton &updateStartButton keyup enterField &updateStartButton paste &updateStartButton &updateStartButton clear updateStartButton bref = B"ok" allowSearch = ( enabled notifyAfter strChecked Start hiroka replaceWith strChecked strChecked E&rsetzen durch: 6 F ~ X h J in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked ReplaceString enterField strChecked matchword strChecked &Ganzes Wort firstfind strChecked &Am ersten Auftreten des Suchbegriffs anhalten prompt strChecked An&frage vor dem ndern anzeigen ^%n%J strChecked Such&bereich: range strChecked Skripten aller Objektearchysipts Skripten aller Objekte Seiten-/Hintergrund-/Buchskripten Skripten in der Objekthierarchie buttonclick buttonclick strChecked cancel cancel buttonclick buttonclick strChecked Schlie instructions strChecked Skripten durchsuchen und ersetzennnnnnnnnnnn paste clear alleeeeeeeea strChecked upropsdlg 12,14 selectChars cancel retval stbk_vref searchString strChecked strChecked strChecked strChecked nameLabel strChecked &Name der Eigenschaft: in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked upropname keychar strChecked valueLabel strChecked &Wert der Eigenschaft: in,ms ThreeDeeRect strChecked bottomLine > N J strChecked topLine strChecked upropvalue zashowOrHideScrollbar enterPage zashowOrHideScrollbar keyup zashowOrHideScrollbar zashowOrHideScrollbar clear zashowOrHideScrollbar paste showOrHideScrollbar notifyAfter showOrHideScrollbar E> 0 strChecked strChecked buttonclick buttonclick strChecked cancel buttonclick buttonclick strChecked Abbrechen enterPage strChecked propEdit cancel retval strChecked strChecked strChecked strChecked propname strChecked Abbrechen in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked Propedit zashowOrHideScrollbar enterPage zashowOrHideScrollbar keyup zashowOrHideScrollbar zashowOrHideScrollbar clear zashowOrHideScrollbar paste showOrHideScrollbar enterField notifyAfter showOrHideScrollbar E> 0 strChecked strChecked buttonclick buttonclick strChecked cancel buttonclick buttonclick strChecked enterPage &Song bearbeiten: propValues 7j8r; <T?T?T?- strChecked props strChecked /+background fillColor,color,hls idNumber,na imageInvalid,na name,text notifyObjects,na object,na objectCount,na objects,na pageCount,na parent,na pattern,text percentFreeSpace,na rgbFill,color,rgb rgbStroke,color,rgb script,script size,text storedImages,na storeImage,boolean strokeColor,color,hls uniqueName,na userProperties,na useWindowsColors,boolean +Book activeCacheFile,text backgroundCount,na buildCacheFile,list,never,temporary,permanent cacheFileType,list,minimal,preferred,extended CDMediaPath,text customColors,text footer,text header,text HDMediaPath,text hotwordColor,color,hls hotwordStyle,list,color,frame,none keepMenuBar,boolean name,na object,na pageCount,na palette,text saveOnClose,list,yes,no,ask,system script,script size,text solidColorsEnabled,boolean uniqueName,na userProperties,na windows,na +button borderStyle,list,none,checkBox,label,radioButton,rectangle,rounded,pushButton,shadowed,checkBox3D,radioButton3D bounds,text caption,text CaptionPosition,list,auto,bottom,top,left,right,center checked,boolean checkedGraphic,text defaultAllowDrag,boolean defaultAllowDrop,boolean disabledGraphic,text dragImage,text drawDirect,boolean enabled,boolean excludeTab,boolean fillColor,color,hls fontFace,font,text fontSize,font,text fontStyle,font,text highlight,boolean idNumber,na invert,boolean invertGraphic,text layer,text name,text noDropImage,text normalGraphic,text notifyAfterMessages,na notifyBeforeMessages,na object,na parent,na position,text rgbFill,color,rgb rgbStroke,color,rgb script,script size,text stretchGraphic,boolean strokeColor,color,hls textOverflow,na textUnderflow,na transparent,boolean uniqueName,na userProperties,na useWindowsColors,boolean vertices,text visible,boolean +comboBox bounds,text defaultAllowDrag,boolean defaultAllowDrop,boolean dragImage,text drawDirect,boolean dropDownItems,multiLine editable,boolean enabled,boolean fillColor,color,hls fontFace,font,text fontSize,font,text fontStyle,font,text idNumber,na layer,text lineCount,na name,text noDropImage,text notifyAfterMessages,na notifyBeforeMessages,na object,na parent,na position,text rgbFill,color,rgb rgbStroke,color,rgb script,scriot scrollable,boolean selectedItem,text size,text sortItems,boolean strokeColor,color,hls text,text textOverflow,na textUnderflow,na transparent,boolean uniqueName,na userProperties,na useWindowsColors,boolean vertices,text visible,boolean +field activated,boolean baselines,boolean borderStyle,list,none,rectangle,inset,raised,shadowed,scrolling bounds,text defaultAllowDrag,boolean defaultAllowDrop,boolean dragImage,text drawDirect,boolean drawTextDirect,boolean enabled,boolean fieldType,list,wordWrap,noWrap,singleLineWrap,singleSelect,multiSelect fillColor,color,hls fontFace,font,text fontSize,font,text fontStyle,font,text idNumber,na indents,text layer,text name,text noDropImage,text notifyAfterMessages,na notifyBeforeMessages,na object,na objects,na parent,na position,text rgbFill,color,rgb rgbStroke,color,rgb richText,multiLine script,script scroll,text selectedTextLines,text size,text spacing,text strokeColor,color,hls tabSpacing,text tabType,list,left,decimal text,multiLine textAlignment,list,left,right,center,justify textOverflow,na textUnderflow,na transparent,boolean uniqueName,na userProperties,na useWindowsColors,boolean vertices,text visible,boolean +oneDgraphics bounds,text defaultAllowDrag,boolean defaultAllowDrop,boolean dragImage,text drawDirect,boolean fillcolor,color,hls idNumber,na layer,text lineEndSize,text lineEndStyle,text lineStyle,list,none,1,2,3,4,6,8,dotted,dashed name,text noDropImage,text notifyAfterMessages,na notifyBeforeMessages,na object,na parent,na position,text rgbFill,color,rgb rgbStroke,color,rgb script,script size,text strokeColor,color,hls transparent,boolean uniqueName,na userProperties,na useWindowsColors,boolean vertices,text visible,boolean +twoDgraphics bounds,text defaultAllowDrag,boolean defaultAllowDrop,boolean dragImage,text drawDirect,boolean fillColor,color,hls idNumber,na layer,text lineStyle,list,none,1,2,3,4,6,8,dotted,dashed name,text noDropImage,text notifyAfterMessages,na notifyBeforeMessages,na object,na parent,na pattern,text position,text rgbFill,color,rgb rgbStroke,color,rgb script,script size,text strokeColor,color,hls transparent,boolean uniqueName,na userProperties,na vertices,text visible,boolean +group autoRadioButtons,boolean bounds,text dragImage,text drawDirect,boolean idNumber,na layer,text name,text noDropImage notifyAfterMessages,na notifyBeforeMessages,na object,na objects,na parent,na position,text script,script size,text transparent,boolean uniqueName,na userProperties,na vertices,text visible,boolean +hotword bounds,na defaultAllowDrag,boolean defaultAllowDrop,boolean dragImage,text highlight,boolean hotwordStyle,list,bookDefault,color,frame,none idNumber,na invert,boolean name,text noDropImage,text object,na parent,na script,script text,text textOffset,na uniqueName,na userProperties,na +oleObject action,text bounds,text defaultAllowDrag,boolean defaultAllowDrop,boolean dragImage,text drawDirect,boolean fillColor,color,hls idNumber,na layer,text lineStyle,none,1,2,3,4,6,8,dotted,dashed name,text noDropImage,text notifyAfterMessages,na notifyBeforeMessages,na object,na parent,na position,text reference,text rgbFill,color,rgb rgbStroke,color,rgb script,script size,text strokeColor,color,hls trackSize,boolean transparent,boolean uniqueName,na updateType,list,automatic,manual upToDate,na userProperties,na useWindowsColors,boolean vertices,text visible,boolean +page defaultAllowDrop,boolean idNumber,na imageInvalid,na name,text object,na objectCount,na objects,na pageNumber,text parent,na percentFreeSpace,na script,script skipNavigation,boolean storedImages,na storeImage,boolean uniqueName,na userProperties,na +paintObject bounds,text defaultAllowDrag,boolean defaultAllowDrop,boolean dragImage,text drawDirect,boolean fillColor,color,hls idNumber,na layer,text lineStyle,list,none,1,2,3,4,6,8,dotted,dashed name,text noDropImage,text notifyAfterMessages,na notifyBeforeMessages,na object,na parent,na pattern,text position,text rgbFill,color,rgb rgbStroke,color,rgb script,script size,text strokeColor,color,hls transparent,boolean uniqueName,na useChromakey,boolean userProperties,na vertices,text visible,boolean +recordField activated,boolean baselines,boolean borderStyle,list,none,rectangle,inset,raised,shadowed,scrolling bounds,text defaultAllowDrag,boolean defaultAllowDrop,boolean dragImage,text drawDirect,boolean drawTextDirect,boolean enabled,boolean fieldType,list,wordWrap,noWrap,singleLineWrap,singleSelect,multiSelect fillColor,color,hls fontFace,font,text fontSize,font,text fontStyle,font,text idNumber,na indents,text layer,text name,text noDropImage,text notifyAfterMessages,na notifyBeforeMessages,na object,na objects,na parent,na position,text rgbFill,color,rgb rgbStroke,color,rgb richText,multiLine script,script size,text scroll,text selectedTextlines,text size,text spacing,text strokeColor,color,hls tabSpacing,text tabType,list,left,decimal text,multiLine textAlignment,list,left,center,right,justify textOverflow,na textUnderflow,na transparent,boolean uniqueName,na userProperties,na useWindowsColors,boolean vertices,text visible,boolean +window alwaysOnTop,boolean alwaysReader,boolean authorStatusBar,boolean autoClose,boolean autoShow,boolean autoSize,boolean borderstyle,list,thickFrame,thinFrame,dialogFrame,shadowed,none bounds,text caption,text captionBar,list,normal,thin,none centerClient,boolean clientHandle,na clientSize,text currentPage,text defaultClientSize,text defaultPage,text defaultPosition,text defaultState,text defaultType,list,child,popup enabled,boolean focus,na hideOnDeactivate,boolean icon,text idNumber,na imageBuffers,list,0,1,2 isOpen,boolean matcolor,color,hls magnification,list,1,2,4,8,16 maximumSize,text menuBar,text minimumSize,text mousePosition,text name,text object,na onBackground,boolean pageScroll parent,na parentHandle,text parentWindow,text position,text readerStatusBar,boolean revertFocus,boolean rulers,boolean selectedHotwords,na selectedText,na selectedTextState,na selection,na script,script size,text state,list,minimized,maximized,normal style,text tile,list,top,bottom,left,right,none tileOrder,na type,list,popup,child uniqueName,na userProperties,na useWindowsColors windowHandle,na +systemProps activeWindowHandle,text caretLocation,text focus,text focusWindow,text mainWindow,na selectedText,na selectedTextState,na selection,text startup3DInterface,boolean startupAutoScriptFile,text startupBook,text startupDrawDirect,boolean startupHeight,text startupReaderRightClick,boolean startupSysBooks,text startupUnits,list,english,metric startupWidth,text sys3DInterface,boolean sysAlignment,list,left,right,justify,center sysAutoScriptFile,text sysBooks,text sysCentered,boolean sysChangesDB,boolean sysClientHandle,na sysCountry,text sysCurrency,text sysCursor,text sysDate,na sysDateFormat,text sysDrawDirect,boolean sysError,text sysErrorNumber,text sysEvening,text sysFillColor,color,hls sysFontFace,font,text sysFontSize,font,text sysFontStyle,font,text sysGrid,boolean sysGridSnap,boolean sysGridSpacing,text sysHistory,text sysHistoryRecord,boolean sysHotwordsShown,boolean sysICountry,text sysICurrDigits,text sysICurrency,text sysIDate,text sysIDigits,text sysILZero,text sysIMeasure,text sysIndents,text sysINegCurr,text sysITime,text sysITLZero,text sysLanguage,text sysLevel,text sysLineEndSize,text sysLineEndStyle,text sysLineSpacing,text sysLineStyle,list,none,1,2,3,4,6,8,dotted,dashed sysList,text sysLongDate,text sysMagnification,list,1,2,4,8,16 sysMediaBreakKey,text sysMediaSuspend,boolean sysMMEngineVersion,na sysMorning,text sysMousePosition,text sysNumberFormat,text sysOpenMedia,na sysOperatingSystem,na sysOptimizedSave,boolean sysPageScroll,text sysPageUnitsPerPixel,na sysPasswords,na sysPattern,text sysPolygonShape,text sysReaderRightClick,boolean sysRGBFill,color,rgb sysRGBStroke,color,rgb sysRuler,boolean sysRuntime,na sysShortDate,text sysShowMRUfiles,boolean sysStrokeColor,color,hls sysSupportedMedia,na sysSuspend,boolean sysSuspendMessages,boolean sysTabType,list,left,decimal sysTabSpacing,text sysThousand,text sysTime,na sysTimeChar,text sysTimeFormat,text sysTool,list,arc,angledLine,borderlessField,button,checkBox,checkBox3D,comboBox,curve,ellipse,field,irregularPolygon,labelButton,line,magnify,ole,polygon,pie,radioButton,radioButton3D,reader,recordField,rectangle,roundedRectangle,select,singleSelectListBox sysTransparent,boolean sysUnits,text sysUseWindowsColors,boolean sysVersion,na sysWindowHandle,na target,text targetWindow,text +widget bounds,text layer,text name,text parent,na position,text script,script size,text vertices,text visible,boolean +stage borderWidth,text bounds,text defaultAllowDrag,boolean defaultAllowDrop,boolean dragImage,text drawDirect,boolean fillColor,color,hls idNumber,na innerBevelWidth,text layer,text mediaOpen,text mediaSize,text name,text noDropImage,text notifyAfterMessages,na notifyBeforeMessages,na object,na outerBevelWidth,text outline,boolean overlayOpen,boolean parent,na position,text postEffect,text preEffect,text readerVisible,boolean rgbFill,color,rgb rgbStroke,color,rgb roundedCorners,boolean script,script size,text stageAnchor,list,center,topLeft,topRight,bottomLeft,bottomRight stageSizing,list,centerMedia,clipMedia,stretchMedia,stretchStage strokeColor,color,hls transparent,boolean uniqueName,na userProperties,na useWindowsColors,boolean vertices,text visible,boolean testing R2`2y afsddd strChecked Skripten und Eigenschaften schreiben <3L3J strChecked strChecked `4p4J strChecked unknown,,, strChecked strChecked &Schaltfl B6R6J strChecked Dieses Feld enth lt eine Liste aller Eigenschaften aller Objekte und ihre zul ssigen Werte. Die obenstehende Schaltfl che wertet diese Liste aus, schreibt das Skript dieser Seite (der Geschwindigkeit halber im Programmcode geschrieben) und legt alle notwendigen Bucheigenschaften fest. strChecked Diese Objekte werden in der Eigenschafts- bersicht verwendet. &9t90u ThreeDeeRect strChecked strChecked j8l:|: bottomLine strChecked topLine B;R;J strChecked strChecked B=R=J strChecked test2 strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked Optionsfeld &1 strChecked Optionsfeld &2 strChecked Optionsfeld &3 strChecked Optionsfeld &4 strChecked &Option strChecked strChecked strChecked strChecked Beispiel-Ansichtsobjekt 5760,2966 extSz nrmlSz 5760,5040 strChecked hyperlink 'r(8) ftskeywords strChecked in,none ThreeDeeRect strChecked strChecked bottomLine strChecked topLine strChecked strChecked strChecked strChecked strChecked target page strChecked New Page strChecked &Neuer Seite strChecked &chster Seite Previous strChecked &Vorhergehender Seite Other Page strChecked &Anderer Seite destination page other page notifybefore oenabled = B"other strChecked in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked page id strChecked strChecked Zielseite:n Page: transition extSz +nrmlSz buttonClick buttonClick /= extSz /= nrmlSz strChecked bergangs&effekt in,none ThreeDeeRect strChecked strChecked bottomLine strChecked topLine strChecked in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked strChecked slidelge blinds dissolve puzzle slide spiral split turnPage in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked right bottom dropDownText strChecked bottom right strChecked strChecked strChecked strChecked buttonClick buttonClick odir = strChecked strChecked strChecked strChecked strChecked strChecked strChecked speed buttonUp ospd = j!z!J Normal strChecked strChecked &Schnell < h"t" Normal strChecked N&ormal (#8#J strChecked &Langsam Testen speed tbk_bookRef dialog vwrRef buttonClick buttonClick vwrRef = "dialog" tbk_bookRef() *"Testen" currentpage "test" fx = combobox "fx" spd = "speed" dir = dst = 9dest" trFX =fx&& transition trFx close strChecked &Testen j'z'J strChecked Verkn pfen mit "(2(J strChecked bergang:n destlabel strChecked Ziel:nation strChecked Geschwindigkeit Geschwindigkeit X*h*J strChecked Richtungn Eksavelink standard FALSE Keine g ltige Seitenreferenz: ftsLinkPage saveLink page id tbk_bookRef other page buttonClick buttonClick saveLink = TRUE B"other xisObject( ftsLinkPage()) "Keine g ltige Seitenreferenz:"&& FALSE savelink isOpen "standard" tbk_bookRef() close strChecked Cancel standard tbk_bookRef buttonClick buttonClick isOpen "standard" tbk_bookRef() close V/f/J strChecked Abbrechen strChecked reader settings strChecked in,none ThreeDeeRect strChecked strChecked bottomLine strChecked topLine strChecked strChecked strChecked strChecked strChecked strChecked Modifikationen auf Leserebene choice strChecked strChecked Suchoptionen zum Men Seite hinzuf handlers strChecked Nur Such-Behandlungsroutinen hinzuf & 6 J strChecked &Skripten aller einbezogenen B cher anpassen standard modifyBooks buttonClick buttonClick modifyBooks isOpen "standard" strChecked Cancel standard buttonClick buttonClick isOpen "standard" close strChecked Abbrechen callWinHelp MM_CMD_Reader_Level_Settings buttonClick buttonClick callWinHelp "MM_CMD_Reader_Level_Settings" strChecked Hilfe index settings strChecked index settings ftskeywords strChecked in,none ThreeDeeRect strChecked strChecked bottomLine strChecked topLine strChecked folder mytabheight myNumTabs myTabMode myTabSpace tbk_wid_name numTabs tabHeight tabMode tabSpace tbk_wid_props strChecked obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked S&chl sselw obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked &Aktionsw obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked &Objekte obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked &Seiten obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked &Dateien strChecked strChecked highlight strChecked strChecked strChecked Einstellungsdatei: settings file strChecked C:\MTB30\FTS.SSTE2.SST strChecked Optionen festlegen f fileTab strChecked strChecked strChecked strChecked *!:!J strChecked included books strChecked C:\HOOKZIP\INDEXME2.TBK C:\MTB30\FTS.TBK add book strChecked &Hinzuf gen... remove book included books lines sftsKwNum buttonClick included books buttonClick 4sftsKwNum lines = selectedtextlines "included books" lc = clc > 0 notifybefore oenabled Z%j%J strChecked En&tfernen strChecked strChecked strChecked strChecked excluded words aftsFileExists leaveField <> NULL ftsFileExists( ) < 0 $)4)J strChecked C:\HOOK\COMMWORD.TXT choose excluded words fileName KpftsOpenFileDlg Wortausschlu dateien (*.TXT),*.TXT filterList Datei f r auszuschlie ende W rter ausw wrdFile excluded words commword.txt buttonClick buttonClick fileName = "commword.txt" filterList = "Wortausschlu dateien (*.TXT),*. wrdFile = ftsOpenFileDlg("Datei f r auszuschlie ende W rter ausw hlen",filename,"", `<> NULL "excluded i" = &,6,J strChecked A&usw hlen... edit excluded words notepad.exe excluded words buttonClick buttonClick "notepad.exe"&& "excluded strChecked &Bearbeiten... ..>.J strChecked Einbezogene B cherr strChecked rter ausschlie en pageTab strChecked strChecked strChecked strChecked ,2<2J strChecked strChecked N3^3J strChecked strChecked b4r4J strChecked object object reference buttonClick buttonClick enabled {reference" = TRUE strChecked O&bjekttext verwenden 6/"686 object reference `6p6J strChecked *7:7J in,ms ThreeDeeRect strChecked bottomLine strChecked 6H8T8 topLine strChecked obType 29B9J strChecked recordField field button in,ms ThreeDeeRect strChecked obName strChecked bottomLine R;b;J strChecked topLine strChecked strChecked Name:t: @=P=J strChecked Objekttyp:e: caption object reference buttonClick buttonClick enabled {reference" = FALSE strChecked Tite&l verwenden 6/*?8? contexts `?p?J strChecked New Context Neue Kontexte eingeben: contexts ]ftsInsertLine Kontexte contextName Neue Kontexte multiEntry buttonClick buttonClick ZcontextList contexts = numLines = 2 = multiEntry("Neue Kontexte"," eingeben:"," i <> contextName <> NULL ftsInsertLine( <BLBJ strChecked &Neu... Remove topic ftsSetPage contexts lines supdBooks buttonClick contexts buttonClick lines = selectedtextlines "contexts" '<> NULL updBooks ftsSetPage() = TRUE numLines = lc = clc > 0 notifybefore oenabled = lE|EJ strChecked En&tfernen strChecked Seitenkennzeichnungn strChecked Seitenkontexte objTab strChecked strChecked *I:IJ strChecked strChecked >JNJJ strChecked in,ms ThreeDeeRect strChecked nJhKxK bottomLine strChecked topLine >LNLJ strChecked sections strChecked G:MdO new section secName ]ftsInsertLine Abschnitte Neue Abschnitte sections Neue Abschnitte eingeben: multiEntry secNameList buttonClick buttonClick Zsections secNameList = multiEntry("Neue Abschnitte"," eingeben:"," l = ftsInsertLine( strChecked &Neu... remove section ftsSetPage lines sections supdBooks buttonClick sections buttonClick lines = selectedtextlines "sections" '<> NULL updBooks ftsSetPage() = TRUE lc = clc > 0 notifybefore oenabled strChecked En&tfernen textContinues S0SJ strChecked Te&xt erstreckt sich ber alle Objekte strChecked ^TnTJ strChecked strChecked strChecked recordfield strChecked Datensat&zfelder GlVvV field strChecked &Felder button ,W<WJ strChecked Scha<fl combobox strChecked &Kombinationsfelder XXhXJ strChecked strChecked strChecked strChecked G`ZpZ background strChecked Hin&tergrundobjekte hidden 2[B[J strChecked Verbor&gene Objekte strChecked Abschnitte strChecked In den Index einbeziehennnnnnnnnnnnnnnnnnn b]r]J strChecked Aus Index ausschlie hwTab dataType formats remove value notifybefore tl = selectedtextlines "tags" enabled value" = x(tl = NULL) "type" = x(tl = tl = comboBox "formats" = dataType = "UDS" M = TRUE strChecked $ .eh new value strChecked &Neu... remove value ftsSetPage lines valCnt valCnt supdBooks buttonClick buttonClick lines = selectedtextlines "tags" #<> NULL updBooks ftsSetPage() = TRUE numLines = valCnt lc = clc > 0 strChecked En&tfernen in,none ThreeDeeRect strChecked DfTfJ strChecked bottomLine strChecked .e@gLg topLine strChecked "h2hJ in,ms ThreeDeeRect strChecked bottomLine strChecked g@iLi topLine strChecked ftsSetPage initType keyRef dataType buttonUp ftsSetPage initType keyRef dataType keyDown tl = oselectedtextlines tl <> y -- Added HHirokaM keyRef = dataType = initType "type" ftsSetPage() tl = strChecked Foo C chte C strChecked strChecked strChecked $o4oJ strChecked strChecked To4p:p bprpJ strChecked &Reelle Zahl strChecked &Ganze Zahl ToNqXs [yy]yy:mm:dd dateFormats dataTypes dd:mm:[yy]yy U,D,S mm:dd:[yy]yy formats buttonClick buttonClick dateFormats = "mm:dd:[yy]yy" & "dd:mm:[yy]yy" & "[yy]yy:mm:dd" cBox = combobox "formats" dropDownItems dataTypes cbox = "U,D,S" strChecked Dat&um strChecked &Zeichen strChecked (u8uJ strChecked strChecked <vLvJ strChecked in,ms ThreeDeeRect strChecked lvfwvw bottomLine strChecked topLine <xLxJ strChecked formats w, /E dataTypes keyRef dataType myFormats selectChange selectChange newText myFormats = odropdownitems i = 1 numFormats = ci <= dataType = odataTypes tl = selectedTextlines "tags" keyRef = \{l{e U,D,S dataTypes strChecked mm:dd:[yy]yy dd:mm:[yy]yy [yy]yy:mm:dd B|R|J strChecked Aktionswortkennzeichen: strChecked Datentype strChecked Format kwTab ,foo,bar,bob,a,fd,gdg e,g,foo,,,,bar,,,,bob,,foo,bar,bob,sue,sob,,foo newKW strChecked in,none ThreeDeeRect strChecked strChecked bottomLine strChecked topLine strChecked in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked keywords strChecked Diagramm Dinosaurier Tech-Support Warnunguit generate Globe Tech Support Warning Warning New Keyword newKWList Neue Schl sselw sselw ]ftsInsertLine newKW keywords newKW Neue Schl sselw rter eingeben: multiEntry newKW buttonClick buttonClick Zkeywords, valName newKWList = multiEntry("Neue Schl sselw rter"," eingeben:"," j<> NULL = ftsInsertLine( strChecked &Neu... Remove Keyword ftsSetPage lines keywords supdBooks buttonClick keywords buttonClick lines = selectedtextlines "keywords" numLines = lc = L<> NULL updBooks ftsSetPage() = TRUE clc > 0 notifybefore oenabled = strChecked En&tfernen where strChecked Ver&wendung strChecked Im Index verwendete Schl sselw rter: V, #? .&+ +E .&+ +E cher einbezogen. Bitte entfernen Sie B cher, bevor Sie forfahren. standard [^stepBack included books +1infoDlg ftsscripts tbk_bookRef In einen Index k nnen maximal 20 B cher einbezogen werden. 2saveSettings Sie haben Warnung Z^stepBack buttonClick buttonClick numBooks = "included books") #> 20 infoDlg "Warnung","In einen Index k nnen maximal 20 B cher einbezogen werden."&&\ "Sie haben"&& &&" B 3. Bitte entfernen M, bevor 7forfahren."\ "ftsscripts" tbk_bookRef() settings saveSettings stepBack = "main" isOpen "standard" close strChecked Cancel standard [^stepBack Z^stepBack buttonClick buttonClick stepBack = "main" isOpen "standard" close strChecked Abbrechen load settings sftsSetFile fileName stripExtension fname Einstellungsdatei ausw pathAndName updateSettings filterList sftsMainBk setFile Einstellungsdatei (*.SST),*.sst splitPath KpftsOpenFileDlg buttonClick buttonClick 4sftsSetFile, sftsMainBk fileName = stripExtension( &)&".SST" filterList = "Einstellungsdatei (*. &),*.sst" pathAndName = splitPath( fname = setFile = ftsOpenFileDlg(" uausw hlen", 4<> NULL updateSettings strChecked &Einstellungen laden... save settings sftsSetFile fname ftsCopyFile Einstellungsdatei speichern unter pathAndName filterList settings file ftsSaveAsDlg 2saveSettings `QftsRemoveFile Einstellungsdatei (*.SST),*.sst splitPath newFile buttonClick buttonClick 4sftsSetFile filterList = "Einstellungsdatei (*.SST),*.sst" pathAndName = splitPath( fname = newFile = ftsSaveAsDlg(" sspeichern unter", 6<> NULL ftsRemoveFile( ftsCopyFile( saveSettings "settings file" = strChecked E&instellungen speichern... Defaults .&+ +E .&+ +E sftsSetFile ftsSetPage writeDefaultSST updateSettings Abbrechen Fortfahren Diese Operation setzt alle Einstellungen auf die Standardwerte und berschreibt Ihre Einstellungsdatei. supdBooks buttonClick buttonClick 4sftsSetFile "Diese Operation setzt alle Einstellungen auf die Standardwerte und berschreibt Ihre Einstellungsdatei." f"Fortfahren" "Abbrechen" writeDefaultSST updateSettings updBooks ftsSetPage() = TRUE strChecked &Vorgaben verwenden callWinHelp MM_CMD_Index_Settings buttonClick buttonClick callWinHelp "MM_CMD_Index_Settings" strChecked Hilfe page options strChecked page settings R&T)U ftskeywords foobar ftsTitle strChecked in,none ThreeDeeRect strChecked strChecked bottomLine strChecked topLine strChecked strChecked strChecked strChecked strChecked strChecked Seitenkontext: strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked title location mtitleLoc property object reference title buttonClick buttonClick >= "property" enabled "title" = {reference" = titleLoc property titleLoc strChecked property strChecked &Titel verwenden object strChecked &Standard-Indexeinstellungen verwenden object reference in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked object reference strChecked in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked title strChecked foobarrix Confidential Exclude strChecked Seite aus Index &ausschlie in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked contexts strChecked <STANDARD>nsf Book "C:\HOOK\MMTOOLS.SBK" <STANDARD> ntexts50 of Book "C:\HOOK\MMTOOLS.SBK" new context Neuer Kontext Kontext textEntry contexts Neuen Kontext eingeben: newContext newContext ]ftsInsertLine Kontextnamen d rfen keine Kommas enthalten. buttonClick buttonClick newContext = textEntry("Neuer Kontext","Neuen eingeben:",""," "Kontextnamen d rfen keine Kommas enthalten." <> NULL combobox "contexts" = = dropdownitems 7 = ftsInsertLine( J,newcontext) g" = strChecked &Neu... strChecked strChecked strChecked strChecked in,ms ThreeDeeRect strChecked bottomLine strChecked topLine 4!D!J strChecked index keywords add keyword buttondoubleClick add keyword keyDown buttondoubleClick oselectedTextlines <> NULL buttonClick keyword" stl = / = keyEnter strChecked add keyword index keywords ]ftsInsertLine keywords page keywords newKW buttonClick index keywords buttonClick tl = selectedtextlines "index keywords" newKW = = ftsInsertLine( notifybefore oenabled = = NULL) strChecked &Hinzuf gen > remove keyword page keywords newKW buttonClick page keywords buttonClick tl = selectedtextlines keywords" newKW = notifybefore oenabled = ^ = NULL) strChecked <&Entfernen new keyword newKWList index keywords Neue Schl sselw ]ftsInsertLine newKW Keywords page keywords newKW ndxKW Neue Schl sselw rter eingeben: multiEntry newKW buttonClick buttonClick newKWList = multiEntry("Neue Schl sselw rter"," eingeben:","Keywords") pgKW = keywords" ndxKW = "index <> NULL XftsInsertLine( strChecked Ne&u... (-8-~ J-Z-J in,ms ThreeDeeRect strChecked bottomLine strChecked ,h.t. topLine strChecked page keywords remove keyword buttonDoubleClick remove keyword keyDown oselectedTextlines <> NULL buttonClick keyword" stl = / = keyEnter strChecked reference strChecked Page "page settings"ungen"al"MTOOLS.SBK"K" strChecked Seitentitelficationn 63F3J strChecked Schl sselw rter: strChecked sselw rter im Buch: strChecked sselw rter der Seite:!5 standard 2saveSettings buttonClick buttonClick settings saveSettings isOpen "standard" close P6`6J strChecked Cancel standard buttonClick buttonClick settings isOpen "standard" close strChecked Abbrechen callWinHelp MM_CMD_Page_Settings buttonClick buttonClick callWinHelp "MM_CMD_Page_Settings" strChecked Hilfe list dialog strChecked where used close keyDown = keyEnter buttonClick B"close" Close dialog buttonClick buttonClick isOpen "dialog" close in,none ThreeDeeRect bottomLine topLine Seitentitel: in,ms ThreeDeeRect bottomLine topLine pages .&+ + enterPage notifybefore ) > 0 oselectedtextlines = 1 Seiteneinstellungen is not currently used. > > id 50 of Book "C:\HOOK\MMTOOLS.SBK"' Seitennummer: in,ms ThreeDeeRect bottomLine topLine page number page reference pages notifybefore selectedtextlines " <> NULL stl = selectedTextlines reference" Page number 16 of book "MMTOOLS.SBK" page reference Page number 16 of book "MMTOOLS.SBK" enterPage strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked Schlie info dialogs frame ThreeDeeRect bottomLine topLine in,none strChecked strChecked strChecked strChecked strChecked strChecked settings not found cancel keyDown buttonClick B"help" strChecked fname sftsInfoVal writeDefaultSST pathAndName filterList dialog ftsSaveAsDlg Einstellungsdatei (*.SST),*.sst splitPath Neue Einstellungsdatei buttonClick buttonClick 4sftsInfoVal filterList = "Einstellungsdatei (*.SST),*.sst" pathAndName = splitPath( fname = v = ftsSaveAsDlg("Neue <> NULL writeDefaultSST isOpen "dialog" strChecked &Neu... strChecked Keine Textsuche-Einstellungen wurden f r dieses Buch gefunden. Wollen Sie eine neue Einstellungsdatei erstellen oder eine bereits vorhandene ausw hlen? Choose KpftsOpenFileDlg fname Einstellungsdatei ausw sftsInfoVal pathAndName filterList dialog Einstellungsdatei (*.SST),*.sst splitPath buttonClick buttonClick 4sftsInfoVal filterList = "Einstellungsdatei (*.SST),*.sst" pathAndName = splitPath( fname = v = ftsOpenFileDlg(" pausw hlen", isOpen "dialog" strChecked &Ausw hlen... Cancel sftsInfoVal dialog buttonClick buttonClick 4sftsInfoVal isOpen "dialog" close strChecked Abbrechen MM_CMD_Search_Settings_Not_Found callWinHelp buttonClick buttonClick callWinHelp "MM_CMD_Search_Settings_Not_Found" strChecked Hilfe combo dialogs Cancel keyDown keyChar = keyEnter buttonClick B"OK" B"Cancel" _ <> in,true ThreeDeeRect bottomLine topLine strChecked strChecked strChecked strChecked strChecked assign value strChecked in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked choice strChecked [Kein] [Kein] bar (Real Number) foo (String))r) object (String) Weight (Integer) Weight (Integer) Weight (Integer) strChecked &Neu... Title strChecked Kennzeichen ausw hlen: newKF standard newKF addKF buttonClick V, #> ,%H.% sftsSetFile tagName numKF ?4ftsSetIniVar newKF dataType CREATE *ftsGetIniVar KEYFIELDS addKF buttonClick isOpen "standard" newKF <> NULL addKF newKFList 4sftsSetFile tagName = dataType = numKF = ftsGetIniVar("CREATE","KEYFIELDS", xisType(DWORD, ftsSetIniVar(" y+1,"#"& strChecked Cancel standard buttonClick buttonClick isOpen "standard" close strChecked Abbrechen callWinHelp MM_CMD_Hotword_Settings buttonClick buttonClick callWinHelp "MM_CMD_Hotword_Settings" strChecked Hilfe multi entry cancel keyDown entryPg = keyEnter buttonClick B"ok" B"help" entryPg Keywords dataType strChecked Title strChecked Neue Schl sselw rter eingeben:: in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked Entry entry keyChar enterpage = keyEnter caretLocation tl = entry = <> NULL notifyafter strChecked entry rfen keine Kommas enthalten. kdataType dialog RentryPg buttonClick buttonClick "entry" dataType entryPg()&&"d rfen keine Kommas enthalten." isOpen "dialog" strChecked Cancel dialog buttonClick buttonClick isOpen "dialog" close strChecked Abbrechen MM_CMD_New_Keywords callWinHelp Contexts MM_CMD_New_Sections Keywords kdataType MM_CMD_New_Contexts RentryPg Sections other buttonClick buttonClick dataType entryPg() = "Sections" callWinHelp "MM_CMD_New_Sections" >Contexts" 3D_New_Contexts" dKeywords" YD_New_Keywords" rother" strChecked Hilfe enterpage entry dialog = keyEnter buttonClick B"OK" B"Cancel" in,none ThreeDeeRect bottomLine topLine strChecked strChecked strChecked strChecked strChecked text entry cancel keyDown entryPg = keyEnter buttonClick B"ok" B"help" entryPg section dataType strChecked Title strChecked Abschnittsname:xt:n:ection:key: in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked Entry enterpage notifyafter strChecked dialog buttonClick buttonClick isOpen "dialog" strChecked Cancel dialog buttonClick buttonClick isOpen "dialog" close N ^ J strChecked Abbrechen MM_CMD_New_Section callWinHelp MM_CMD_New_Context context kdataType section RentryPg other buttonClick buttonClick dataType entryPg() = "section" callWinHelp "MM_CMD_New_Section" <context" 1D_New_Context" Iother" strChecked Hilfe enterpage Neuen Abschnittsnamen eingeben: section dialog strChecked assign section ftskeywords strChecked in,none ThreeDeeRect strChecked strChecked bottomLine strChecked topLine strChecked strChecked strChecked strChecked strChecked in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked choice strChecked [Kein] [Kein] Footnote Title secName sftsSections textEntry Abschnittsnamen d rfen keine Kommas enthalten. Choice ]ftsInsertLine Neuen Abschnittsnamen eingeben: Neuer Abschnittsname newSec [Kein] Abschnitt buttonClick buttonClick 4sftsSections cBox = combobox "Choice" numLines = secName = textEntry("Neuer Abschnittsname","Neuen Abschnittsnamen eingeben:",""," rfen keine Kommas enthalten." newSec = ftsInsertLine( dropDownItems "[Kein]"& strChecked &Neu... exclude strChecked &Objekt aus Index ausschlie Title strChecked Abschnittsname: object strChecked Button id 0 of Page id 1d id 1 newSec sftsSections standard addSec newSec buttonClick sftsSetFile sftsSections ?4ftsSetIniVar CONC_SECTION `/ftsTextlineToList CREATE addSec buttonClick 4sftsSections isOpen "standard" newSec <> NULL addSec 4sftsSetFile, = ftsTextlineToList( ftsSetIniVar("CREATE","CONC_SECTION", strChecked Cancel sftsSections standard buttonClick buttonClick 4sftsSections isOpen "standard" close strChecked Abbrechen MM_CMD_Object_Settings callWinHelp buttonClick buttonClick callWinHelp "MM_CMD_Object_Settings" strChecked Hilfe value dialog strChecked value entry cancel keyDown = keyEnter buttonClick B"ok" B"help" dataType in,none ThreeDeeRect bottomLine topLine in,ms ThreeDeeRect bottomLine topLine Entry Cancel keyDown keyChar enterpage = keyEnter buttonClick B"OK" B"Cancel" _ <> notifyafter formats dataTypes kdataType myFormats selectChange selectChange newText myFormats = odropdownitems i = 1 numFormats = ci <= dataType odataTypes U,D,S dataTypes mm:dd:[yy]yy dd:mm:[yy]yy [yy]yy:mm:yyU Title Neues Kennzeichen eingeben:lue:d: Datentype &Ganze Zahl &Datum [yy]yy:mm:dd dateFormats dataTypes dd:mm:[yy]yy U,D,S mm:dd:[yy]yy formats buttonClick buttonClick dateFormats = "mm:dd:[yy]yy" & "dd:mm:[yy]yy" & "[yy]yy:mm:dd" cBox = combobox "formats" dropDownItems dataTypes cbox = "U,D,S" &Zeichen Format: bottomLine topLine Dialog buttonClick buttonClick isOpen "Dialog" Cancel Entry Dialog buttonClick buttonClick "Entry" isOpen "Dialog" close callWinHelp MM_CMD_New_Tag buttonClick buttonClick callWinHelp "MM_CMD_New_Tag" Hilfe initType enterpage strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked &Reelle Zahl Abbrechen sftsSetFile ftsSetFile getSetFile sftsMainBk tbk_bookRef enterPage cancel keyDown 4sftsSetFile, sftsMainBk " <> tbk_bookRef() F = NULL S = getSetFile( = keyEnter buttonClick B"ok" B"help" Das Erstellen eines Suchindexes f r ein Buch macht die Volltextsuche m glich. Dieser Vorgang nimmt evtl. einige Zeit in Anspruch. Soll der Suchindex jetzt erstellt werden? create search index tbk_bookRef createIndex buttonClick the build process buttonClick createIndex index" tbk_bookRef() Cancel standard buttonClick buttonClick "standard" close Settings index settings [^stepBack tbk_bookRef buttonClick buttonClick stepBack "index settings" tbk_bookRef() = "main" ettings... MM_CMD_Build_Index callWinHelp buttonClick buttonClick callWinHelp "MM_CMD_Build_Index" Hilfe strChecked strChecked strChecked strChecked strChecked strChecked Abbrechen &Einstellungen... update books strChecked in,none ThreeDeeRect strChecked strChecked bottomLine strChecked topLine strChecked strChecked strChecked cher werden entsprechend den aktuellen Einstellungen aktualisiert. Bitte warten... update settings strChecked in,none ThreeDeeRect strChecked strChecked bottomLine strChecked topLine strChecked strChecked strChecked Aktuelle B cher werden in die Ein-stellungsdatei aufgenommen. Bitte warten... Create Search Index in,none ThreeDeeRect bottomLine topLine Suchindex wird erstellt. Bitte warten.... strChecked strChecked strChecked strChecked strChecked strChecked strChecked wait dlg strChecked wait dlg strChecked in,none ThreeDeeRect strChecked strChecked bottomLine strChecked topLine strChecked strChecked strChecked Seitenliste wird erstellt, bitte warten... bottomLine topLine in,none ThreeDeeRect strChecked strChecked strChecked strChecked strChecked ftsscripts Systembuch f r Multimedia-Werkzeuge Skriptseite strChecked strChecked Compiler strChecked bottomBar z'B(0* strChecked slider mySliderMin mySliderMax mysliderPos myNumTics scaledSlider tbk_wid_name numTics tallTicSpacing sliderMin sliderMax sliderPageSize sliderPos tbk_wid_props tbk_wid_values myTallTicSpacing sliderPageSize strChecked strChecked strChecked strChecked : J J strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked ""2"J strChecked strChecked 2#B#J strChecked strChecked sized sized strChecked 5.00000 thumb 6&F&36 R&b&{ hSliderThumb txClassName button id 103 of page id 15 glide width false hilight Yb@o& myTrackPos Shuttle helptext strChecked currentTime *':'J strChecked 0,00000% strChecked Cancel aborted s_anim_idleAnimations ZstopAnimation buttonClick buttonClick 4s_anim_idleAnimations stopAnimation "aborted", close strChecked &Abbrechen SelectObject 8ksavePath aborted s_anim_idleAnimations ZstopAnimation s_anim_PathObject buttonClick buttonClick 4s_anim_PathObject, s_anim_idleAnimations stopAnimation "aborted", i <> savePath "SelectObject" close strChecked &Fertig strChecked strChecked @.P.J strChecked Tools /6/Ze H/X/J Button id 95 of Page id 42 invertedButton Button id 95 of Page id 42 buttonPressed strChecked Select select default s_anim_selectedTool buttonClick buttonClick 4s_anim_selectedTool l = " o= default strChecked p.r1d2 Vertex vertex s_anim_selectedTool buttonClick buttonClick 4s_anim_selectedTool l = "vertex" o= cursor " strChecked settings aborted s_anim_idleAnimations ZstopAnimation settings buttonClick buttonClick 4s_anim_idleAnimations stopAnimation "aborted", "settings" %modal focusWindow = .5>5J enabeld strChecked p6|6M previousLine nextLine middleCurve lastCurve firstCurve strChecked SelectObject selectObject aborted s_anim_idleAnimations ZstopAnimation SelectObject objects s_anim_CurrentObject buttonClick buttonClick 4s_anim_idleAnimations, s_anim_CurrentObject stopAnimation "aborted", Vct = combobox " "selectObject" "SelectObject" %modal focusWindow = strChecked normal objectColor strChecked previousLine nextLine middleCurve lastCurve firstCurve strChecked startSliderMove sliderMove endSliderMove enterpage hlen Sie ein Objekt und eine Animation aus den untenstehenden Listen. an animation to the object. object. strChecked strChecked strChecked strChecked strChecked SelectObject strChecked objects buttonClick buttonClick = combobox " strChecked &Abbrechen animations buttonClick buttonClick = combobox "animations" strChecked A&nimation: 8ksavePath Animation: ceditPath animations selectObject bottomBar objects newObject <neu> s_anim_PathObject animation buttonClick buttonClick 4s_anim_PathObject isObject( savePath "selectObject" newObject = combobox " ~(TAB, animation = Ganimations" ""<neu>" (dropDownItems editPath enabled "bottomBar" ) - 1 "Animation: &&"von"&& isOpen close strChecked Cancel buttonClick buttonClick close strChecked ancel objects strChecked Rectangle id 1 of Page id 69 of Page id 69d 73 animations strChecked <neu> <neu> enterPage enterPage &Zu animierendes Objekt: buttonClick buttonClick B"reps" &petitions: constant buttonClick buttonClick B"constant" CelAnimation Ze&llanimation: integer duration buttonClick buttonClick integer "duration" iming: strChecked Z j J strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked &Wiederholungen: &Geschwindigkeit: &Zeitverhalten: Settings h' )X+ strChecked strChecked Schritte pro Sekunde: strChecked Zeitdauer in Sekunden: Duration strChecked strChecked w%spinUp buttonDown w%spinUp buttonDoubleClick w%spinUp buttonStillDown spinUp strChecked |spinDown buttonDown |spinDown buttonDoubleClick |spinDown buttonStillDown spinDown strChecked integer strChecked Steps integer s_anim_animationSettings spinUp integer s_anim_animationSettings spinDown s_anim_animationSettings leaveField spinUp 4s_anim_animationSettings[] ?12] = "integer" spinDown 12] = xisType("WORD", >= 30 12] = strChecked strChecked w%spinUp buttonDown w%spinUp buttonDoubleClick w%spinUp buttonStillDown spinUp strChecked |spinDown buttonDown |spinDown buttonDoubleClick |spinDown buttonStillDown spinDown strChecked integer strChecked ShowAllSteps s_anim_animationSettings buttonClick buttonClick 4s_anim_animationSettings[] 5] = strChecked Alle Schritte anzeigen s_anim_animationSettings buttonClick buttonClick 4s_anim_animationSettings[] 3] = strChecked Constant strChecked Konstant Variable strChecked Variabel integer settings s_anim_animationSettings buttonClick buttonClick 4s_anim_animationSettings[] B"reps" "settings" enabled D7] = "integer" FALSE 7] = 0 strChecked integer settings enterButton integer settings buttonClick "integer" "reps" "settings" buttonClick strChecked integer s_anim_animationSettings spinUp integer s_anim_animationSettings spinDown spinUp 4s_anim_animationSettings[] 7] = "integer" spinDown ~7] = strChecked strChecked w%spinUp buttonDown w%spinUp buttonDoubleClick w%spinUp buttonStillDown spinUp X#h#J strChecked |spinDown buttonDown |spinDown buttonDoubleClick |spinDown buttonStillDown spinDown strChecked integer strChecked 11111 Forever <'L'J strChecked &Endlos FixedPath FALSE s_anim_animationSettings buttonClick buttonClick 4s_anim_animationSettings[] 13] = ( Z= FALSE) strChecked &Pfad beim Verschieben aktualisieren CelAnimation StepsPerCel stepsPerCel Settings s_anim_animationSettings buttonClick buttonClick 4s_anim_animationSettings[] 4] = enabled "stepsPerCel" B"StepsPerCel" .+>+J strChecked steps strChecked X+*,~0 StepsPerCel integer s_anim_animationSettings spinUp integer s_anim_animationSettings spinDown integer s_anim_animationSettings leaveField spinUp 4s_anim_animationSettings[] 511] = "integer" spinDown 11] = xisType(" 11] = strChecked :1J1J strChecked w%spinUp buttonDown w%spinUp buttonDoubleClick w%spinUp buttonStillDown spinUp strChecked |spinDown buttonDown |spinDown buttonDoubleClick |spinDown buttonStillDown spinDown J5Z5J strChecked integer >6N6J strChecked StepsPerCel strChecked S&chritte pro Zelle: Close strChecked &Schlie editorScripts strChecked SelectionHandles SW_handle S_handle NW_handle E_handle NE_handle N_handle SE_handle W_handle editorScripts buttonClick buttonClick getHandlerList( /"editorScripts", "") EditorScripts settings buttonClick buttonClick getHandlerList( "settings", "") ttings selectObject buttonClick buttonClick getHandlerList( "selectObject", "") SelectObject Compiler buttonClick buttonClick gethandlerList( ", "") periodic buttonClick timer timerNotify rightButtonClick buttonClick timerStart("periodic", 33, 55, timerNotify 4&CRLF rightButtonClick timerStop(0) BottomBar Seiten: Hintergr strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked Einstellungen strChecked clipPkgPaths keyDown -- Tim Pearson, Asymetrix 6/94 keyEnter buttonClick B"OK" ThreeDeeRect in,none bottomLine topLine Abbrechen Paths Of: hardDisk &Festplatte cdRom &CD-ROM sEreturnString cdRom hardDisk buttonClick buttonClick returnString B"hardDisk", B"cdRom" buttonClick buttonClick close strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked $ 4 J strChecked l | J strChecked Zu Media-Pfaden auf diesem Datentr ger hinzuf gen:@@ ThreeDeeRect in,none bottomLine topLine strChecked strChecked strChecked strChecked strChecked clipPkgChoosePath 9hdPaths ListToTextline paths cdRom paths 5cdPaths hardDisk initDlg keyDown -- Tim Pearson, Asymetrix 6/94 initDlg B"hardDisk" = B"cdRom" = hdPaths "paths" = ListToTextline( `[2]) cdPaths x[3]) keyEnter buttonClick B"OK" in,sculpted ThreeDeeRect paths 5cdPaths 9hdPaths paths .&+ + enterPage paths = TRUE ohdPaths ocdPaths otextOverFlow = 0 notifyAfter textlineCount( ) > 0 oselectedTextlines = 1 C:\A\MTB30\BOOKS\TEST hdPaths cdPaths C:\A\MTB30\BOOKS\TEST2 bottomLine topLine sized sized xOff = sysPageUnitsPerPixel yOff = Media-PfadenClip: paths paths hardDisk buttonClick buttonClick paths B"hardDisk" hardDisk &Festplatte cdRom &CD-ROM sEreturnString cdRom paths hardDisk buttonClick buttonClick returnString B(selectedTextlines "paths") B"hardDisk", B"cdRom" buttonClick buttonClick close enterPage strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked Abbrechen ThreeDeeRect in,none bottomLine topLine strChecked strChecked strChecked strChecked strChecked clipPkgPrompt fileName 9hdPaths clipPkgPaths cdRom 5cdPaths hardDisk clipRef buttons initDlg -- Tim Pearson, Asymetrix 6/94 initDlg "fileName" = upperCase( &[1]) "clipRef" = ohdPaths = ocdPaths = l[3] = NULL {[4] = enabled "buttons" = FALSE B"hardDisk" "clipPkgPaths" = B"cdRom" C:\A\MTB30\BOOKS\TEST hdPaths strChecked strChecked Diese Datei existiert momentan weder in den Media-Pfaden auf der Festplatte noch auf der CD-ROM: in,sculpted ThreeDeeRect strChecked fileName strChecked C:\A\MTB30\BOOKS\TEST2\ZUG.WAVAVVv bottomLine strChecked topLine strChecked strChecked Clip:rce of Clip: clipRef strChecked id 107 buttons tbkToolsDlg FALSE 5cdPaths stbk_thisBook 9hdPaths Pfad ausw sEreturnString clipRef clipPkgChoosePath buttonClick buttonClick 8 stbk_thisBook Z init[], clipRef " && " && " " && mmSearchHD F1] = TRUE mmSearchCD k1] = FALSE 1] = 2] = hdPaths 3] = cdPaths tbkToolsDlg( "clipPkgChoosePath" ,"Pfad ausw hlen", <> NULL returnString strChecked strChecked &Verschieben... moveAll strChecked &Alle verschieben... strChecked &Kopieren... copyAll strChecked A&lle kopieren... tbkToolsDlg clipPkgPaths Media-Pfad ausw sEreturnString buttonClick buttonClick Z init[] tbkToolsDlg( "clipPkgPaths" ,"Media-Pfad ausw hlen", <> NULL returnString strChecked H&inzuf gen... sEreturnString buttonClick buttonClick returnString e= "skip" strChecked &bergehen winHelp winHelpDword *winHelpDword mtb30.hlp buttonClick buttonClick linkDLL "USER" INT winHelpDword= (WORD,STRING, DWORD) ((windowHandle targetWindow,"mtb30.hlp",1,62680) unlinkDLL " strChecked &Hilfe cancel buttonClick buttonClick close strChecked Abbrechen ThreeDeeRect in,none bottomLine topLine strChecked strChecked strChecked strChecked strChecked clipPkg strChecked packageClips buttonClick buttonClick packageClips strChecked S&tart strChecked Hinweis: Wenn Sie alle Media-Dateien in einem Verzeichnis zusammenstellen wollen, sollte nur ein Verzeichnis in Ihren Media-Pfaden aufgef hrt sein. strChecked Der Media-Paket-Manager entfernt alle explizite Dateireferenzen aus den Media-Referenzen Ihres Clips. Sie werden w hrend dieses Vorgangs evtl. aufgefordert, Fragen ber Ihre Media-Dateien zu beantworten. buttonClick buttonClick mediaPaths strChecked Me&dia-Pfade buttonClick buttonClick close strChecked &Schlie winHelp winHelpDword *winHelpDword mtb30.hlp buttonClick buttonClick linkDLL "USER" INT winHelpDword= (WORD,STRING, DWORD) ((windowHandle targetWindow,"mtb30.hlp",1,62674) unlinkDLL " strChecked &Hilfe strChecked strChecked browser as fleas searchmode 29,33 selectChars searchString strChecked buttons script system buttondown selection checkingSelection selection checkingSelection yhelptext statusbar mouseEnter leftWhere statusbar mouseleave bref = enabled checkingSelection value helptext statusbar leftWhere = objectfrompoint( strChecked selection acheckSelection buttonup checkSelection Examine the current selection helptext strChecked 1LlastWin \updateBrowser stbk_curOb buttonup 4stbk_curOb = currentPage lastWin() updateBrowser Examine the current page helptext strChecked background 1LlastWin \updateBrowser stbk_curOb buttonup 4stbk_curOb currentPage lastWin() updateBrowser Examine the current background helptext strChecked 1LlastWin \updateBrowser stbk_curOb buttonup 4stbk_curOb currentPage lastWin() updateBrowser Examine the current book helptext strChecked viewer 1LlastWin \updateBrowser stbk_curOb buttonup 4stbk_curOb = lastWin() updateBrowser Examine the current viewer helptext strChecked system \updateBrowser stbk_curOb <system> buttonup 4stbk_curOb = "< updateBrowser Examine system properties and variables helptext strChecked script 1LlastWin stbk_curOb buttondown yhelptext statusbar mouseEnter statusbar mouseleave 4stbk_curOb lastWin() helptext statusbar Edit script of current object helptext strChecked header idNumber curProp strChecked cheader false pvalue \updateBrowser Tsetprop stbk_curOb lScurProp pname selectChange selectChange 4stbk_curOb pname = curProp pvalue = setprop updateBrowser canSee dropDownLineCount scrolling strChecked trueI falsea stretchStage clipMedia centerMedianded pushButton shadowed checkBox3D radioButton3D textHeader \updateBrowser pageref TsetProp fheader stbk_curOb lScurProp updatePropFromHeader stbk_beforeVal fheader stbk_Canceled cancelPropFromHeader -- update the property. (sent enter pressed #checkmark updatePropFromHeader justLeftField 4stbk_curOb pageref = fref = fheader setProp <,curProp updateBrowser they old value cancelPropFromHeader 4stbk_beforeVal,stbk_Canceled canType false canSee strChecked v!r&+ fheader stbk_beforeVal updatebuttons enterField updatebuttons updatePropFromHeader stbk_Canceled leaveField updatePropFromHeader ^mcancelPropFromHeader propvalue keychar that browser where values can be edited -- store Muser cancels 4stbk_beforeVal enabled "updatebuttons" you leave , unless 4stbk_Canceled updatePropFromHeader keyEnter cancelPropFromHeader -- propValue typed fref = "propvalue" tl = selectedtextlines tl > 0 R&b&J strChecked updateButtons strChecked check updatePropFromHeader buttonup updatePropFromHeader B(R(J strChecked ^mcancelPropFromHeader buttonup cancelPropFromHeader strChecked dialog propValue buttondown "propValue" 6+F+J strChecked strChecked propgroup strChecked propname ^-adjustScroll propValue buttonDown tl = tl > 0 fref = "propValue" selectedTextLines adjustScroll strChecked defaultAllowDrop idNumber imageInvalid object objectCount objects pageNumber parent percentFreeSpace script skipNavigation storedImages storeImage uniqueName userPropertiesdents layer noDropImage notifyAfterMessages notifyBeforeMessages object objects parent position rgbFill rgbStroke richText script scroll selectedTextLines spacing strokeColor tabSpacing tabType textAlignment textOverflow textUnderflow transparent uniqueName userProperties useWindowsColors vertices visible 6,\1j1 propvalue strChecked browser Group id 23 of Page id 1,Button id 28 of Page id 1,Group id 9 of Page id 1,Line id 30 of Page id 1,Group id 2 of Page id 1,Group id 6 of Page id 1,Field id 19 of Page id 1,Line id 24 of Page id 1,Line id 25 of Page id 1,Line id 31 of Page id 1,Line id 44 of Page id 1,Group id 75 of Page id 1,Line id 78 of Page id 1 Background id 1 of Book "C:\JX\SRC\EXE\MTB30.SBK" to handle idle false false Page id 1 of Book "C:\JX\SRC\EXE\MTB30.SBK" searchmode,selectChars,searchString,strCheckedeld id 33 of Page id 48 description,strChecked false 720,3465,2160,3750 strChecked propButtonGroup \updateBrowser stbk_curOb buttonclick yhelptext statusbar mouseEnter statusbar mouseleave properties userProperties props properties uprops props -- scipt pprop) buttonclick 4stbk_curOb updateBrowser helptext statusbar B"props" value B"uprops" strChecked 4N9X9 props Edit properties of current object helptext strChecked &Objekteigenschaften 40:<: uprops Edit userProperties of current object helptext strChecked &Benutzereigenschaften obtype `;p;J strChecked Page "browser"ue"p2""ols")\NEWREL.TBK"TBK" ><N<J strChecked strChecked >=N=J strChecked strChecked labelGroup J>Z>J strChecked nameLabel strChecked valueLabel strChecked Werte splitter strChecked readerlevelstatusbar browser 1395,915 noActivate false returnString 3390,4635 minClientSize 214,260 maximimumSize 286,608 propEdit &it the property page "propEdit" cancel propEdit retval openWindow openWindow retval currentpage "propEdit" currentPage uProps &d userProperty page "upropsdlg" cancel retval openWindow openWindow retval currentpage Dialog1 Page "bottomBar" !lect Object Page "selectObject" parentWindow viewer id 1 of Book "C:\JXBETA\TBKTOOLS.SBK" parentWindowHandle Dialog2 "stPosition parentWindowHandle returnString Page "settings" . ge 4 Dialog3 "v#H# &owser [Hauptfenster] ilding Page List Page "wait dlg" C:\A\MTB30\BOOKS\TEST,true,false Animation: 1 of Field id 0 standard |J p J Page "ftsscripts" dPageRef Page "ftsscripts" &. X\SRC\EXE\MTB30.SBK" tbk_wid_name,Dog false Credits Page "Credits" SetTimer KillTimer AnimateCredits CreditsViewer AnimateTimer Credits xSetTimer openWindow KillTimer AnimateTimer closeWindow openWindow 4AnimateTimer, CreditsViewer X"User" gSetTimer( KillTimer( translateWindowMessage windowHandle on 0x113 AnimateCredits --If we were unable a timer Fclose the e, 1, 1, 0) = 0 = targetWindow closeWindow <> 0 sftsKwNum closeWindow closeWindow 4sftsKwNum dialog w+U!! statusBar openWindow openWindow statusBar wait dlg mm_MediaHelp settings setCursor openWindow .&+ +E setCursor setCursor --This handler translates emessages WM_SETCURSOR openWindow translateWindowMessage oclienthandle on 0x0020 setCursor oparentHandle windowHandle sets the cursor arrow ever hWnd, msg, hWndmsg, hitTest, mouseMessage = 0x0200 o<> 2 o<> 1 bottomBar initViewer setCursor openWindow .&+ +E setCursor setCursor setSize SelectObject cancel initViewer --This handler sets the buttons ToolBar correct toggle state translates emessages WM_SETCURSOR WM_NCRIGHTBUTTONDOWN openWindow translateWindowMessage oclienthandle on 0x0020 setCursor initViewer cursor arrow ever YhWnd, msg, hWndmsg, hitTest, mouseMessage o<> 1 o<> 4 setSize ClientSize ocurrentPage enabled FALSE B"SelectObject" SelectObject setCursor openWindow .&+ +E setCursor setCursor --This handler translates emessages WM_SETCURSOR openWindow translateWindowMessage oclienthandle on 0x0020 setCursor oparentHandle windowHandle sets the cursor arrow ever hWnd, msg, hWndmsg, hitTest, mouseMessage = 0x0200 o<> 1 mm_MediaWidgets Media-Widgets clipRef preLoadMedia autoPlayMedia autoCloseMedia autoShowMedia SliderUpdate MediaSizing Media Widgets page "mm_MediaWidgets" page "mm_firstWidget" turnString boolean boolean boolean boolean boolean list,stretchMedia,stretchStage,clipMedia,centerMedia Page "ftsscripts" "e id 0 Gefundene Skripten Media-Widget-Eigenschaften ripts currentStage dia Specialist Media Widget Properties mm_MediaImager ge "browser" Stage id 27 of Page id 0 Stage id 46 of Page id 0 Media Widgets Help page "mm_WidgetProps" page "mm_MediaWidgets" 'B! 47 of Page id 0 of Book "D:\CLIPS.TBK" currentObj page "mm_mediaHelp1" Objekt ausw Animationseinstellungen Seitenliste wird erstellt ation Settings Stage id 15 of Page id 0 "D:\CLIPS.TBK" clipRef AutoLoad SliderUpdate MediaSizing page "mm_firstWidget" mm_MediaDialog page "mm_WidgetProps" ediaImager" enabled 1FALSE moved defaultposition page "mm_mediaHelp1" Stage id 29 of Page id 0 Pfad ausw e id 0 Hilfe zu Media-Widgets TB30.SBK" Page id 61 of Book "C:\A\MTB30\MTB30.SBK" dia Packager #arteinstellungen Suchen und Ersetzen in Skripten currentWin whatWin mm_MediaImager windowshown windowshown whatWin = "mm_MediaImager" enabled 1FALSE %dPageRef %" D %2#it Property it Property Benutzereigenschaft hinzuf Eigenschaft bearbeiten &p dRSB & id 5 of Book "C:\MTB30\MTB30.SBK" 'chindex erstellen Hyperlink-Schaltfl che hinzuf #X&BK" p&BK" Page id 7 of Book "C:\JX\SRC\EXE\MTB30.SBK" Testen #owser [Hauptfenster] Page id 5 of Book "C:\JX\SRC\EXE\MTB30.SBK" Eigenschafts bersicht [Hauptfenster] Group id 16 of Page id 0 of Book "" KillTimer AnimateTimer credits +endAnim closeWindow openWindow 4AnimateTimer, CreditsViewer X"User" gSetTimer( KillTimer( gGetActiveWindow() getActiveWindow()& k&windowHandle translateWindowMessage on 0x113 AnimateCredits --If we were unable a timer Fclose the e, 1, 1000, 0) = 0 = targetWindow closeWindow <> 0 endAnim "credits" p_Book MS Sans Serif MS Sans Serif System Courier New p_button lst_button color,hls list,color,frame,none boolean list,yes,no,ask,system script boolean solidColorsEnabled uniqueName userProperties windows &H0ame userProperties useWindowsColors p_background color,hls color,rgb color,rgb script boolean color,hls boolean lst_background color,hls list,color,frame,none boolean list,yes,no,ask,system script boolean solidColorsEnabled uniqueName userProperties windows color,hls list,color,frame,none boolean list,yes,no,ask,system script boolean lst_Book boolean script boolean boolean percentFreeSpace script skipNavigation storedImages storeImage uniqueName userProperties list,automatic,manual boolean boolean transparent uniqueName updateType upToDate userProperties useWindowsColors vertices visible tUnderflow transparent uniqueName userProperties useWindowsColors vertices visible 3iqueName userProperties useWindowsColors vertices visible p_field lst_field p_oneDgraphics lst_oneDgraphics boolean boolean boolean boolean boolean boolean list,thickFrame,thinFrame,dialogFrame,shadowed,none list,normal,thin,none boolean list,child,popup boolean boolean list,0,1,2 boolean color,hls list,1,2,4,8,16 boolean pageScroll boolean boolean boolean script list,minimized,maximized,normal list,top,bottom,left,right,none list,popup,child useWindowsColors tedTextState selection script state style tileOrder uniqueName userProperties useWindowsColors windowHandle boolean transparent uniqueName updateType upToDate userProperties useWindowsColors vertices visible tUnderflow transparent uniqueName userProperties useWindowsColors vertices visible p_comboBox boolean boolean boolean list,bookDefault,color,frame,none boolean script textOffset uniqueName userProperties iqueName userProperties vertices visible boolean boolean boolean lst_comboBox boolean boolean boolean list,bookDefault,color,frame,none boolean script P5:& boolean script boolean boolean boolean boolean boolean color,hls list,none,1,2,3,4,6,8,dotted,dashed color,rgb color,rgb script color,hls boolean useChromakey boolean lst_paintObject vertices visible 4niqueName userProperties p_twoDgraphics lst_twoDgraphics p_group lst_group boolean boolean boolean color,hls list,none,1,2,3,4,6,8,dotted,dashed color,rgb color,rgb script color,hls boolean boolean boolean boolean boolean boolean list,bookDefault,color,frame,none boolean script boolean script boolean boolean activated baselines borderStyle bounds defaultAllowDrag defaultAllowDrop dragImage drawDirect drawTextDirect enabled fieldType fillColor fontFace fontSize fontStyle idNumber indents layer noDropImage notifyAfterMessages notifyBeforeMessages object objects parent position rgbFill rgbStroke richText script scroll selectedTextlines spacing strokeColor tabSpacing tabType textAlignment textOverflow textUnderflow transparent uniqueName userProperties useWindowsColors vertices visible 5nDselection script state style tileOrder uniqueName userProperties useWindowsColors windowHandle upToDate userProperties useWindowsColors vertices visible ;niqueName userProperties iqueName userProperties vertices visible eColor transparent uniqueName userProperties vertices visible p_hotword lst_hotword p_oleObject lst_oleObject borderStyle bounds caption CaptionPosition checked checkedGraphic defaultAllowDrag defaultAllowDrop disabledGraphic dragImage drawDirect enabled excludeTab fillColor fontFace fontSize fontStyle highlight idNumber invert invertGraphic layer noDropImage normalGraphic notifyAfterMessages notifyBeforeMessages object parent position rgbFill rgbStroke script stretchGraphic strokeColor textOverflow textUnderflow transparent uniqueName userProperties useWindowsColors vertices visible @;tedTextState selection script state style tileOrder uniqueName userProperties useWindowsColors windowHandle transparent uniqueName updateType upToDate userProperties useWindowsColors vertices visible textOffset uniqueName userProperties p_page boolean script boolean boolean lst_page p_recordField lst_recordField boolean boolean boolean list,bookDefault,color,frame,none boolean script boolean script boolean boolean boolean boolean boolean color,hls list,none,1,2,3,4,6,8,dotted,dashed color,rgb color,rgb script color,hls boolean boolean boolean script strokeColor transparent uniqueName userProperties useWindowsColors vertices visible boolean boolean boolean color,hls none,1,2,3,4,6,8,dotted,dashed color,rgb color,rgb script color,hls boolean boolean list,automatic,manual boolean boolean transparent uniqueName updateType upToDate userProperties useWindowsColors vertices visible 8ties p_window lst_window p_systemProps lst_systemProps bounds defaultAllowDrag defaultAllowDrop dragImage drawDirect fillColor idNumber layer lineStyle noDropImage notifyAfterMessages notifyBeforeMessages object parent pattern position rgbFill rgbStroke script strokeColor transparent uniqueName userProperties vertices visible .PowsColors vertices visible boolean boolean boolean list,english,metric boolean list,left,right,justify,center boolean boolean boolean color,hls font,text font,text font,text boolean boolean boolean boolean list,none,1,2,3,4,6,8,dotted,dashed list,1,2,4,8,16 boolean boolean boolean color,rgb color,rgb boolean boolean color,hls boolean boolean list,left,decimal list,arc,angledLine,borderlessField,button,checkBox,checkBox3D,comboBox,curve,ellipse,field,irregularPolygon,labelButton,line,magnify,ole,polygon,pie,radioButton,radioButton3D,reader,recordField,rectangle,roundedRectangle,select,singleSelectListBox boolean boolean boolean boolean boolean boolean color,hls list,none,1,2,3,4,6,8,dotted,dashed color,rgb color,rgb script color,hls boolean boolean boolean strokeColor transparent uniqueName useChromakey userProperties vertices visible script state style tileOrder uniqueName userProperties useWindowsColors windowHandle p_widget script boolean lst_widget script boolean visible System Serif MS Sans Serif MS SansSerif Arial boolean VbWerties vertices visible list,never,temporary,permanent list,minimal,preferred,extended color,hls list,color,frame,none boolean list,yes,no,ask,system script boolean activated baselines borderStyle bounds defaultAllowDrag defaultAllowDrop dragImage drawDirect drawTextDirect enabled fieldType fillColor fontFace fontSize fontStyle idNumber indents layer noDropImage notifyAfterMessages notifyBeforeMessages object objects parent position rgbFill rgbStroke richText script scroll selectedTextLines spacing strokeColor tabSpacing tabType textAlignment textOverflow textUnderflow transparent uniqueName userProperties useWindowsColors vertices visible color,hls boolean boolean boolean ,d7dH boolean boolean noDropImage script boolean boolean boolean boolean boolean list,bookDefault,color,frame,none boolean script textOffset uniqueName userProperties :t,singleSelectListBox boolean boolean p_stage color,hls color,rgb color,rgb script boolean color,hls boolean .gbStroke script storedImages storeImage strokeColor uniqueName userProperties useWindowsColors boolean lst_stage color,hls color,rgb color,rgb script boolean color,hls boolean list,never,temporary,permanent list,minimal,preferred,extended color,hls list,color,frame,none boolean list,yes,no,ask,system script boolean 2niqueName userProperties windows boolean boolean list,none,rectangle,inset,raised,shadowed,scrolling boolean boolean boolean boolean boolean list,wordWrap,noWrap,singleLineWrap,singleSelect,multiSelect color,hls font,text font,text font,text color,rgb color,rgb multiLine script color,hls list,left,decimal multiLine list,left,right,center,justify boolean boolean boolean bounds defaultAllowDrag defaultAllowDrop dragImage drawDirect fillColor idNumber layer lineStyle noDropImage notifyAfterMessages notifyBeforeMessages object parent pattern position rgbFill rgbStroke script strokeColor transparent uniqueName useChromakey userProperties vertices visible boolean boolean boolean strokeColor transparent uniqueName useChromakey userProperties vertices visible p_paintObject vertices visible ertices visible boolean script boolean boolean boolean boolean boolean color,hls list,none,1,2,3,4,6,8,dotted,dashed color,rgb color,rgb script color,hls boolean boolean boolean strokeColor transparent uniqueName useChromakey userProperties vertices visible list,none,1,2,3,4,6,8,dotted,dashed color,rgb color,rgb script color,hls boolean boolean boolean boolean boolean boolean list,bookDefault,color,frame,none boolean script textOffset uniqueName userProperties @,HiqueName userProperties vertices visible boolean script boolean boolean 4rent percentFreeSpace script skipNavigation storedImages storeImage uniqueName userProperties list,automatic,manual boolean boolean transparent uniqueName updateType upToDate userProperties useWindowsColors vertices visible boolean boolean defaultAllowDrop idNumber imageInvalid object objectCount objects pageNumber parent percentFreeSpace script skipNavigation storedImages storeImage uniqueName userProperties list,automatic,manual boolean boolean boolean boolean list,none,rectangle,inset,raised,shadowed,scrolling boolean boolean boolean boolean boolean list,wordWrap,noWrap,singleLineWrap,singleSelect,multiSelect color,hls font,text font,text font,text color,rgb color,rgb multiLine script color,hls list,left,decimal multiLine list,left,center,right,justify boolean boolean boolean alwaysOnTop alwaysReader authorStatusBar autoClose autoShow autoSize borderstyle bounds caption captionBar centerClient clientHandle clientSize currentPage defaultClientSize defaultPage defaultPosition defaultState defaultType enabled focus hideOnDeactivate idNumber imageBuffers isOpen matcolor magnification maximumSize menuBar minimumSize mousePosition object onBackground pageScroll parent parentHandle parentWindow position readerStatusBar revertFocus rulers selectedHotwords selectedText selectedTextState selection script state style tileOrder uniqueName userProperties useWindowsColors windowHandle (r\userProperties vertices visible mmWidgetSysBook ^$_|L:^ Arial ?r? @ ^$_|L:^ Buccaneer ^$_|L:^ @ @P_ccaneer ^$_|L:^ Buccaneer ^$_|L:^ Arial VAZfvA C:\TEMP\MTB30.SST strChecked ^$_|L:^ Arial boolean boolean boolean multiLine boolean boolean color,hls font,text font,text font,text color,rgb color,rgb scriot boolean boolean color,hls boolean boolean boolean +lable selectedItem sortItems strokeColor textOverflow textUnderflow transparent uniqueName userProperties useWindowsColors vertices visible font,text boolean boolean color,rgb color,rgb script boolean color,hls boolean boolean boolean boolean boolean list,none,rectangle,inset,raised,shadowed,scrolling boolean boolean boolean boolean boolean list,wordWrap,noWrap,singleLineWrap,singleSelect,multiSelect color,hls font,text font,text font,text color,rgb color,rgb multiLine script color,hls list,left,decimal multiLine list,left,center,right,justify boolean boolean boolean userProperties useWindowsColors vertices visible olean bounds defaultAllowDrag defaultAllowDrop dragImage highlight hotwordStyle idNumber invert noDropImage object parent script textOffset uniqueName userProperties G<Qd7iqueName userProperties vertices visible action bounds defaultAllowDrag defaultAllowDrop dragImage drawDirect fillColor idNumber layer lineStyle noDropImage notifyAfterMessages notifyBeforeMessages object parent position reference rgbFill rgbStroke script strokeColor trackSize transparent uniqueName updateType upToDate userProperties useWindowsColors vertices visible solidColorsEnabled uniqueName userProperties windows NEame userProperties useWindowsColors autoRadioButtons bounds dragImage drawDirect idNumber layer noDropImage notifyAfterMessages notifyBeforeMessages object objects parent position script transparent uniqueName userProperties vertices visible NK.P<QeColor transparent uniqueName userProperties vertices visible QowsColors vertices visible script boolean visible Times New Roman aoolean noDropImage boolean boolean script list,center,topLeft,topRight,bottomLeft,bottomRight list,centerMedia,clipMedia,stretchMedia,stretchStage boolean boolean MS Sans Serif Lf^r? ^$_|L:^T_ ^2B4"= ZAjAJ color,hls color,rgb color,rgb script boolean color,hls boolean a<[gbStroke script storedImages storeImage strokeColor uniqueName userProperties useWindowsColors boolean boolean boolean boolean color,hls list,none,1,2,3,4,6,8,dotted,dashed color,rgb color,rgb script color,hls boolean boolean script strokeColor transparent uniqueName userProperties vertices visible @zJowsColors vertices visible boolean boolean noDropImage script boolean boolean JnGobjects parent position script transparent uniqueName userProperties vertices visible @6GeColor transparent uniqueName userProperties vertices visible Gndle >)erties useWindowsColors vertices visible script boolean visible bounds dragImage drawDirect idNumber innerBevelWidth outerBevelWidth outline layer mediaSize noDropImage notifyAfterMessages notifyBeforeMessages object parent position readerVisible roundedCorners script stageAnchor stageSizing transparent uniqueName userProperties vertices visible p_mmContainer boolean boolean noDropImage boolean boolean script list,center,topLeft,topRight,bottomLeft,bottomRight list,centerMedia,clipMedia,stretchMedia,stretchStage boolean boolean lst_mmContainer color,hls color,rgb color,rgb script boolean color,hls boolean @,IgbStroke script storedImages storeImage strokeColor uniqueName userProperties useWindowsColors script boolean visible list,never,temporary,permanent list,minimal,preferred,extended color,hls list,color,frame,none boolean list,yes,no,ask,system script boolean @ndlorsEnabled uniqueName userProperties windows >userProperties vertices visible bounds defaultAllowDrag defaultAllowDrop dragImage drawDirect fillcolor idNumber layer lineEndSize lineEndStyle lineStyle noDropImage notifyAfterMessages notifyBeforeMessages object parent position rgbFill rgbStroke script strokeColor transparent uniqueName userProperties useWindowsColors vertices visible color,hls list,left,decimal multiLine list,left,right,center,justify boolean boolean boolean @L Name userProperties useWindowsColors vertices visible script boolean visible activeCacheFile backgroundCount buildCacheFile cacheFileType CDMediaPath customColors footer header HDMediaPath hotwordColor hotwordStyle keepMenuBar object pageCount palette saveOnClose script solidColorsEnabled uniqueName userProperties windows transparent uniqueName userProperties vertices visible bounds defaultAllowDrag defaultAllowDrop dragImage drawDirect dropDownItems editable enabled fillColor fontFace fontSize fontStyle idNumber layer lineCount noDropImage notifyAfterMessages notifyBeforeMessages object parent position rgbFill rgbStroke script scrollable selectedItem sortItems strokeColor textOverflow textUnderflow transparent uniqueName userProperties useWindowsColors vertices visible Bparent uniqueName userProperties useWindowsColors vertices visible t+boolean ^>K:( script boolean visible (V(:^g^ MS Sans Serif (V(:^ Arial (V(:^ Arial (V(:^ ^$_Q_ Arial list,never,temporary,permanent list,minimal,preferred,extended color,hls list,color,frame,none boolean list,yes,no,ask,system script boolean `<[^VlorsEnabled uniqueName userProperties windows @HWies useWindowsColors script boolean visible fillColor idNumber imageInvalid notifyObjects object objectCount objects pageCount parent pattern percentFreeSpace rgbFill rgbStroke script storedImages storeImage strokeColor uniqueName userProperties useWindowsColors script stageAnchor stageSizing transparent uniqueName userProperties vertices visible list,none,checkBox,label,radioButton,rectangle,rounded,pushButton,shadowed,checkBox3D,radioButton3D list,auto,bottom,top,left,right,center boolean boolean boolean boolean boolean boolean color,hls font,text font,text font,text boolean boolean color,rgb color,rgb script boolean color,hls boolean boolean boolean transparent uniqueName userProperties useWindowsColors vertices visible @R]boolean script boolean visible boolean boolean boolean color,hls boolean boolean boolean color,rgb color,rgb boolean script list,center,topLeft,topRight,bottomLeft,bottomRight list,centerMedia,clipMedia,stretchMedia,stretchStage color,hls boolean boolean boolean stageSizing strokeColor transparent uniqueName userProperties useWindowsColors vertices visible Buccaneer color,hls boolean boolean boolean color,rgb color,rgb boolean script list,center,topLeft,topRight,bottomLeft,bottomRight list,centerMedia,clipMedia,stretchMedia,stretchStage color,hls boolean boolean boolean @~Kle,select,singleSelectListBox boolean boolean bounds layer parent position script vertices visible borderWidth bounds defaultAllowDrag defaultAllowDrop dragImage drawDirect fillColor idNumber innerBevelWidth layer mediaOpen mediaSize noDropImage notifyAfterMessages notifyBeforeMessages object outerBevelWidth outline overlayOpen parent position postEffect preEffect readerVisible rgbFill rgbStroke roundedCorners script stageAnchor stageSizing strokeColor transparent uniqueName userProperties useWindowsColors vertices visible boolean color,rgb color,rgb boolean boolean color,hls boolean boolean list,left,decimal list,arc,angledLine,borderlessField,button,checkBox,checkBox3D,comboBox,curve,ellipse,field,irregularPolygon,labelButton,line,magnify,ole,polygon,pie,radioButton,radioButton3D,reader,recordField,rectangle,roundedRectangle,select,singleSelectListBox boolean boolean mm_mediaHelp credits playMIDI myChan, myKey, myVelo 4 s_hMidiOut,s_stop noteOn = 144 + 9 -- 144 3 = TRUE MidiOutShortMsg( gpackDword( -- sending fvelo the same a noteOff changeProgram chngProg = 192 + -- 192 U program _,0)) stopMIDI = 128 + -- 128 openMIDI 4 s_device, Z pMem closeMIDI MidiOutGetNumDevs() <= 0 devices found" -1 -- midi mapper hMem = globalAlloc(66,32) = globalLock( MidiOutOpen( 0,0,0) -- "Unable globalUnlock( globalFree( MidiOutReset( MidiOutClose( packDWord a, b, c a + (b * 256) + (c * 65536) 4s_mm xisOpen "credits" 2 = 10 X"mmSystem.dll" DWORD timeGetTime() -- link memory management functions linkDLL "KERNEL" M GlobalAlloc( e GlobalFree( y GlobalHandle(INT) POINTER GlobalLock( GlobalUnlock( skipDlgAnim initMidiMapper openMidi initSong startSong 4s_songPointer, 4dlgViewer stopMidiTimer closeMidi unlinkDLL " kernel" 4INT s_chanOffset,s_drumOffset -- we will take a peek see what map -- currently . If there a port channel 1, we'll assume -- that a high level card, )least -- 1. We tell because named, written a particular address file we dlocate information hM = y-- should happen "Low Memory!" = 12 -- we'll try anyway pM = sysSize = getSystemDirectory(pM,144) sysDir = 1(0,pM) midiMapper = 2& "\midimap.cfg" imHere = 6 1 -- location cMNum = ) -- cM channelMap cMOffset = 14 =* 54)-- lowByte = highByte = ) * 256 cMAddress = Q+ 2 - ) <> 0 -- we have a -- we'll point, doesn't we just give up. = 12 [189][5] iPointer,s_aPointer 4s_lastSongPointer fill ] order s_iPointer = 72 -- trumpet } < 0 = 24 -- acoustic guitar [3][4] = [1][4] = -- now we find dimensions( <> 0 -- only we need [i][3] = 9 [i][3] [i][3] midiReady 4s_startTime, [189][5] startMIDITimer A = getTime() + 50 = FALSE k32768) [3][4] = [1][4] = startMidiTimer 4midiTimerID, , creditClient "USER" midi_setTimer = SetTimer ( ,INT, midi_killTimer = KillTimer ( = clientHandle tbk_bookRef() = 1555 ,10,0) -- ("Could xsetup , no translateWindowMessage 0x001F stopMIDITimer 0x0113 SYSTEM untranslateWindowMessage 0 whatHandle, whatMsg, wparam timerNotify whatTimer [189][5] 4s_timerId, ZmErr s_timerID (80) - 1 Z"|" & & "|" "|36|37|38|39|43|47|52|53|54|55|58|62|63|77|" aList = "0,1,2,3,6,7,11,12,15,24,25,26,27,45,46" rAList = animateCredits l_songPointer = -- asure we messin' around R][2] b-- sends message 8depending on type ][3], ][4], ][5]) ][3], ][4]) ][3], ][4],0) ][3], ][4]) -- error condition "Error < 0 = -1 = -2 = -3 = 190 -- These scripts the compiling animation paths -- -- compiles specified Cuser a compiled = that includes -- a point every }duration one repetition compilePath animationSettings[] ZboundsPath,newPath,newPoint,newLength,loopedPath,i,StepNumber,currentOffset ZcurrentVertex,currentLineLength,currentIncrementLength ZtotalSteps,segLengthList,theLineVertices k = 1 currentDistanceOnLine = 0 12] * possible closed (e.g. are touching) , don't want (because 'll be same -- so we'll throw out 1] - 1])<= sysPageUnitsPerPixel*2 1] - 1])<= =el*2 "Constant" -- calculate length 1])-3 hypotenuseFromVertices( -- correct lengths curved segments i = 1 ci <= -- what percentage overall lenght distance between tempPercent = -- each curveLength( (i*2)-1 (i*2)+4 -- firstPoint already = "0,0," StepsPerSegment = i = 1 ci <= -- "Variable" timedCurveVertices( i*2-1 i*2+4 *2)&"," xreturned Hfunction since always within motherwise skip rounding error >= 0 points curveVertices( i*2-1 i*2+4 gth)&"," -- lineVertices( i*2-1 i*2+2 )&"," >= 0 i*2-1 i*2+2 comma s (see comment 4above = -- y value U -- x -- should be (implying a -- so leave --we have positions , now athem xStart = yStart = xInc = (( 16] - ) DIV 2 yInc = (( 16] - j = 0 ) > 0 x - ( {* j),y - ( `* j),x + * j),y + * j)&"," o= default on a mstarting vertice )subsequent increments thereafter screen units. Requires 3 theVertices,offsetDistance,incrementDistance ZxOld,yOld,x,y,t,oldDistance, ZpointList,nextPointToFind ZAx,Ay,Bx,Bye,Cx,Cy Ax = Ay = Bx = TwoBx = Bx * 2 TwoBye = Cx = Cy = -- t can -- 0 beginning -- 1 = Ax = Ay -- special Mso no ?/0 condition happens cstatement below Ax,Ay&"," theDistance = incrementSquared = tTwo = 2 * x = ( Ax - ( %* (Ax - Bx)) + ( p* (Ax - + Cx)) ) y = ( Ay - ( ]* (Ay - Bye)) + ( * (Ay - + Cy)) ) -- find J(old x,y) -- ) >= 0 -- desired/ -- i.e. + (x- + (y- )&"," pointlist -- gets arranged feven along Zx,y,t,returnVertices, -- t -- 0 -- 1 ZAx,Ay,Bx, Ax = Ay = Bx = Cx = Cy = >= 1 x = ( Ax - ( * (Ax - Bx)) + ( * (Ax - + Cx)) ) y = ( Ay - ( * (Ay - * (Ay - + Cy)) ) on a verticeList, Za,b,xRate,yRate,c, redundant -- but I'm xadding more confusing parameters a = b = c = (a,b) travel y directions traveled = a/c = b/c iterations given passed &"," ZAx,Ay,Bx, Ax = Ay = Bx = 2 * Bx 2 * Bye Cx = Cy = will split = 60 -- t -- 0 -- 1 x = ( Ax - ( * (Ax - Bx)) + ( * (Ax - + Cx)) ) y = ( Ay - ( * (Ay - * (Ay - + Cy)) ) pathLength (seglengthlist)) on a Ubased on pntFromDistanceOnLine Zs_anim_dx,s_anim_dy,c, c = WM_LBUTTONDOWN hWnd, Msg, wp, x, y 4s_anim_PathObject, s_anim_selectedVertex, s_anim_dragging, s_anim_CurrentObject, s_anim_selectedTool 4s_anim_dy, s_anim_dx, s_anim_animationSettings[], s_anim_idleAnimations focusWindow = ( <> stopAnimation "aborted", mousePos = clientToPageUnits( theTarget = objectFromPoint( "selectionHandles"))) -- they clicked on path, a {itself, message ssm = sysSuspendMessages = TRUE lockScreen a vertice 2] too verticeCount = addVertice( WHITE ex = BLACK moveTarget vertexPosition( e= FALSE = ssm onBackground whatLayer = " && QUOTE & &TAB& combobox " "SelectObject" selectChange "selectObject" %modal do_buttonDown , isShift, isControl, x, s_anim_Pathdx, s_anim_Pathdy, s_anim_Objectdx, s_anim_Objectdy ZnewVertice changeSelectedVertex = 2]) > 2 2] = removeVertice( "Das L schen von einem der letzten zwei Scheitelpunkte erzeugt + Null- JBearbeiten einer ist dem Erstellen neuen gleich, mit sAusnahme, da r die zugeordnete Speicher wiederverwendet wird, statt da . Wollen Sie f"&OK" "&Abbrechen" = "OK" clearAnimation B") ) 2] too t = qone zwill be off --so correct ex >= "BottomBar" buttonClick k <> " = -1 -- update current Bhilighted ex = r= -1 error sizeTarget do_dragging --moves lines = -1 do_endDrag tdy, ex,s_anim_segLengthList, hypotenuseFromVertices( /"compiler" [s_anim_pathdy ex = 1 ex = showHandles "SelectionHandles" do_curveVertice asure that 's valid a curved one previousLine nextLine xlastCurve xfirstCurve beside another } so oldCursor = xmiddleCurve - 1) + 1) newCurveID = drawCurve( -1), -1), ) + 1 - 1) + 1) objectColor( "Dieser kann nicht einen Kurven- verwandelt werden."&&\ "F ersten oder Rkein festgelegt A"&&\ :neben vorhandenen steht." do_keyDown stepSize = 10 -- sysPageUnitsPerPixel * -- el * keyDownArrow -- -- -- -- -- -- -- s_anim_SelectedVertex) 2]) > 2 LockScreen 2] = ex < 1 ex = 1 f"&OK" = "OK" ex = 1 ex = ex = ( ) + 1 "bottomBar" ex = 1 ex = pathObject based on given moveVertex verticeNumber, newPosition, ZOBJECT has changed l) -- compensates width l) -- height + 1) - 1) , dx, dy, currentObject -- tempPos = CurveTopVertice( -- 's a regular -dx, ! = 1 !dy, t) > 0 p" > 1 sizePercent = " - 1 xGrowBy = (( I"15] + ( ["16] - l"15]) * o) - )DIV 2 yGrowBy = (( "15] + ( "16] - "15]) * "15]) - #15]) - <> 0 currentOBject $ = drawHandle x, y, curvedVertices, (x - 3* l),(y - 3* (x + 3* l),(y + 3* > 1) > 1 color ellipses excludeTab drawDirect drawLine fstPt, sndPt, i " (e.g. vertext i-1) fill midPt, lstPt, i -- 's a U(i - 1)) "CurveColor" U(i)) ZnewObjectList, oldLineID, oldRectangleID %SysSuspendMessages 7!reference -- M - 1) newLineID = -- -- newRectangleID = "old property xanymore + 1) (CurvedVertices) - 1) - 2) + 1 m(i) --there adding + 1 - 1) ) + 1 ) = ssm ZremoveRectangleID, removeLineID 0* = --removing a - 1) + 1) - 1) -- also either = 1) + 1) + 2) + 1) + 1) + 1) - 1) - 1) deleting + 1) -- just a - 1) - 1) - 1) + 1) -- + 1) - 1) - 1) -- fno curves envolved + 1) - 1) --re- ) - 1 B(i+1) U(i+1) m(i+1) B(i+1) special -1) - 2) - 1) - 2) - 1) -- deleted Uso no re-numbering necessary. = ssm value "curveColor" ghostColor = LIGHTGRAY StrokeColor -- gets a -- used being moved editPath theVertices ZAx,Ay,Bx,Bye,Cx,Cy Ax = Ay = Bx = Cx = Cy = x = ((Ax y4) + (Bx y2) + (Cx y = ((Ay y4) + ( y2) + (Cy -- clears 4 information ClearAnimation 15i] = C515] = S516] = ss = dimensions( 5ngs) isn't objectAnimation reset -- Folder widget -- This message sent clicked changed Hsetting -- tabMode. Put code handler, -- on tabPressed tabNum -- handles clicking on buttonclick -- test 9was Hchecking "obtype" userProperty -- each named " ", N being tabname = -- Changes which 9folder front. It does Hmoving U"mask" -- Value zbetween 1 tabs navigate value < 1 > tabLimit() "Tabulator kann nicht gesetzt werden" && v = -- moves visually -- appear See sized below adiagram v + xpix(), -- stores a userproperty myTabMode -- sends notification -- The handlers resizing ,mode. -- -- Used %a constant. Returns -- Note: you wish more , follow procedure: -- Go duplicate one -- Rename that 9appropriately. ( instance would -- be Tab7", thirteenth # be "Tab13"). -- Set its behind function reflect pageUnits given n pixels. n = 1 sysPageUnitsPerPixel * n ypix n n = 1 Qel * n -- returns currently selected -- sets up height units. tabHeight mytabheight handled myTabHeight tabSpace myTabSpace arrangeTabs numTabs sls = valid parameter "Mindestens ein vorhanden sein" maximal" && && "Tabulatoren haben" -- cache {reference optimization. 9"&i) i <= -- hidden %they've xbeen -- receiving them # are "manual" myNumTabs mynumtabs resized Notice -- methodSent: used differentiate =messages ToolBook explicitly ssm = syssuspendmessages off toolbooks messaging, %we will be changing stuff. Without recursively -- calls itself over -- thing -- has a called -- -- 5,6 _________ 7,8 -- -- 3,4 | | 9,10 -- -- -- -- 1,2 |____________| 11,12 -- -- Here amap -- goal here maintain shape -- . (Otherwise gets stretchy.) Also, -- should be -- -- find how tall supposed -- tabRef = -- tsection makes " corners -- Need be sure -- )least 6 wide 4doing m"tabHighlight" B"tabLabel" c () -- only editor. -- rectangular -- body b = SuspendMessages sysSuspendMessages = Z = ssm -- -- following condition triggered %a whole -- -- -- , even though their sizes So we must notify -- can themselves. -- -- xarranged -- ref = 9"&i) -- don't bother arranging -- mynumTabs = ssm -- assures aligned spaced evenly. anchor = "tab1" ts = mytabspace bp = where order xpos = bp - b(ts,0) through remaining place -- 9"&i) -- -- now tbit masking others. bchecks x(e.g., just moved tname = " v = above = ssm -- August 10, 1993 -- Joseph Brick -- This message sent clicked changed Hsetting -- tabMode. Put code handler, -- on tabPressed tabNum goPage B"tablabel" currentPage -- handles clicking on buttonclick -- test 9was Hchecking "obtype" userProperty -- each named " ", N being tabname = -- Changes which 9folder front. It does Hmoving U"mask" -- Value zbetween 1 tabs navigate value < 1 > tabLimit() "Cannot 9" && v = -- moves visually -- appear See sized below adiagram v + xpix(), -- stores a userproperty myTabMode -- sends notification -- The handlers resizing ,mode. -- -- Used %a constant. Returns -- Note: you wish more , follow procedure: -- Go duplicate one -- Rename that 9appropriately. ( instance would -- be Tab7", thirteenth # be "Tab13"). -- Set its behind function reflect pageUnits given n pixels. n = 1 sysPageUnitsPerPixel * n ypix n n = 1 Qel * n -- returns currently selected -- sets up height units. tabHeight mytabheight handled myTabHeight tabSpace myTabSpace arrangeTabs numTabs sls = valid parameter "Must have )least 1 "Can only 2" && && "Tabulatoren haben" -- cache {reference optimization. 9"&i) i <= -- hidden %they've xbeen -- receiving them # are "manual" myNumTabs mynumtabs resized Notice -- methodSent: used differentiate =messages ToolBook explicitly ssm = syssuspendmessages off toolbooks messaging, %we will be changing stuff. Without recursively -- calls itself over -- thing -- has a called -- -- 5,6 _________ 7,8 -- -- 3,4 | | 9,10 -- -- -- -- 1,2 |____________| 11,12 -- -- Here amap -- goal here maintain shape -- . (Otherwise gets stretchy.) Also, -- should be -- -- find how tall supposed -- tabRef = -- tsection makes " corners -- Need be sure -- wide 4doing m"tabHighlight" B"tabLabel" Q () editor. -- rectangular -- body b = SuspendMessages sysSuspendMessages = Z = ssm -- -- following condition triggered %a whole -- -- -- , even though their sizes So we must notify -- can themselves. -- -- xarranged -- ref = 9"&i) -- don't bother arranging -- mynumTabs = ssm -- assures aligned spaced evenly. anchor = "tab1" ts = mytabspace bp = where order xpos = bp - b(ts,0) through remaining place -- 9"&i) -- -- now tbit masking others. bchecks x(e.g., just moved tname = " v = above = ssm )-- initialize menus: gets sent on enterMenu loadMenus menuAlias "tbk_tools" -- joseph's stuff e"Eige&nschafts bersicht" alias "customEdit" fhelpText "Anzeige-/Bearbeitungswerkzeug f r Eigenschaften und Benutzereigenschaften." e"Start&einstellungen..." tbk_startPref" Legt die Werte f r Systemvariablen beim _ fest." e"&Anwendungen..." tbk_AddOnApps" der MTB30.INI-Datei angegebenen \ aus." e"&Suchen/Ersetzen..." tbk_replaceScripts" ?-Operationen allen Skripten im Buch durch." c"&Zentrieren" Zentriert ausgew hlten Objekte" e"Zwischen den &Seiten" tbk_centerHorz" Cm &oberen unteren Rand" tbk_centerVert" e"In &beiden Richtungen" tbk_centerBoth" c"&Gr auf eine einheitliche Gr e"&Kleinstes tbk_shrink" c"Size" e"&Gr tbk_grow" c"&Verteilen" spread" Positioniert mit einem einheitlichen Abstand." e"&Horizontal" tbk_spreadhorz" Verteilt anhand des Abstands zwischen zwei am weitesten links stehenden e"&Vertikal" tbk_spreadvert" zobenstehenden e"&Tabulatorreihenfolge festlegen..." tbk_TabOrder" nach e"&3D-Stil hinzuf tbk_3D" fhelptext\ "Hinzuf oder Bearbeiten 3D-Stils von Rechtecken Feldern." &importieren..." tbk_importText" aus einer Datensatzfeld e&xportieren..." tbk_exportText" Exportiert -- Jeff's "Pfadani&mation..." PathAnimation c"tbk_Tools" Erstellt modifiziert Pfadanimationen." -- Jim's c"&Hyperlink" hyperLinking" Werkzeuge f 9-Verkn pfungen, ohne zu schreiben" j-&Schaltfl AddHyperlinkButton" bearbeiten..." EditHyperlinkButton" einzugreifen" -&Aktionswort erstellen..." CreateHyperlinkHotword" EditHyperlinkHotword" Bearbeitet -- mike's c"Me&dia" mm_media zum Arbeiten Media-Widgets" mm_MediaWidgets M zur aktuellen ..." mm_WidgetProps -- tim's &Pakete..." mediaPackager" "Stellt Clip- Dateien zu N zusammen." "indexing" -- jim's "I&ndexeinstellungen..." ftsIndexSettings" Optionen Erstellen eines Indexes f Volltextsuche ftsBuildIndex" einen "&Einstellungen f r Leserebene..." ftsReaderLevelSettings" r Volltextsuchen NULL "&Seiteneinstellungen..." ftsPageSettings" Seitenoptionen f "&Objekteinstellungen..." ftsObjectSettings" Indexoptionen f "&Aktionsworteinstellungen..." ftsHotwordSettings" Aktionswortkennzeichens" ..." ftsFullTextSearch" "S&chl sselw rter ..." ftsKeywordSearch" sselwortsuche spreading }proportionally -- n: 1 , two HspreadHorz spreadVert Zbnds,list,temp ZobjArray[][] xy1 = 1 obRef = 2 obcount = sortbyposition -- between }, use that %standard sp = (n+2) 1][obref],0) loc = k2 + 1) ls = i-1][ ] + sp "Sie m ssen zuerst mehrere Elemente ausw hlen." -- handles shrinking largest/smallest shrinkgrow how objList = ) < 2 sortbysize sz = sz = dimensions( ls = lowest lowestlayer minlayer = -- handler centering -- "how" newpos = 0,0 bkSize = "0,0" ls = curob curOb <> " -- sets up twoDquicksort Hreference,n i][1] = i][2] = sz = i][1] = sz * i][2] = -- sorting algorithm: -- keep mind arrays are passed here, Hvalue fArray[][] ,dtype 4stbk_noSwap twoDquicksrt 9, 1, H),n, l, r,n, r > l , l, ((l+r) lst = l (l+1) i][n] < l][n] i][n] < l][n] i][n] < l][n] stbk_noswap , l, lst-1,n, +1,r,n, a, b = farray[a][i] b][i] b][i] = -- brings up content a 2D requestArray a[][] d = ( a) a[i][j] & " " -- sculpts a existing 3D a 3D -- inOrOut specifies style inset raised -- sculpted -whether outside border threeDeeRect ls = ls = curObj = curObjType = ll = lr = ur = ul = "OLE" "combobox" curLayer = drawdirect bottomline = "bottomLine" sysPageUnitsPerPixel, topline = "topLine" ThreeDeeRect sized xThreeDeeRect xpix = -1* syspageunitsperpixel ypix = -1* "out" topcolor = bottomColor = ls = ( ll = lr = ur = ul = ll,lr,ur ll,ul, topColor ZfilterList,fileName needed dll linkDLL "tb30DLG. STRING saveAsDlg ( , INT) i = "Textdatei (*.txt),*. rtf),*. SaveAsDlg(" v"exportieren", jrichtext ,fileLimit X"tb30dos.dll" LONG getFileSize( X"tb30dlg. openFileDlg ( | = 64*1024 rtf,Textdateien (*. txt,Alle (*.*),*.*" OpenFileDlg(" fileSize = fref = && " zu gro Importieren. Die Gr #ist" && &"; maximal" && "Warnung: diese # ersetzt Inhalt Felds." f"OK" "Abbrechen" x"OK" oldCursor = se = se ss = = "{\ 1= ss setStartup tbk_linkIniFileFuncs section = " ( Preferences" = getToolBookIniItem( m=gettoolBookIniItem( s","0,100,0") ","0,0,0") u",10) y",30),30) }","0,0,0") ",720) ","Left") searchandreplace 31,38 selectChars sysSuspend searchString strChecked folder mytabheight myNumTabs myTabMode myTabSpace Folder tbk_wid_Name tabHeight numTabs tabMode tabSpace tbk_wid_props list,1,2,3,4,5,6 tbk_wid_values strChecked obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked obtype strChecked strChecked tabHighlight 0 J strChecked tabLabel strChecked obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked obtype strChecked strChecked tabHighlight strChecked tabLabel Drawing goPage strChecked obtype strChecked strChecked tabHighlight strChecked tabLabel goPage strChecked &Ersetzen obtype strChecked strChecked tabHighlight strChecked tabLabel system goPage strChecked &Suchen strChecked strChecked highlight strChecked strChecked strChecked Suchen &nach: in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked findString &updateStartButton keychar updateStartButton &updateStartButton keyup enterField &updateStartButton paste &updateStartButton &updateStartButton clear updateStartButton bref = B"ok" allowSearch = ( enabled notifyAfter strChecked Start replaceWith strChecked strChecked E&rsetzen durch: 6 F ~ X h J in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked ReplaceString enterField strChecked matchword strChecked &Ganzes Wort firstfind strChecked &Am ersten Auftreten des Suchbegriffs anhalten prompt strChecked An&frage vor dem ndern anzeigen ^%n%J strChecked Such&bereich: range strChecked Skripten aller Objektearchysipts Skripten aller Objekte Seiten-/Hintergrund-/Buchskripten Skripten in der Objekthierarchie buttonclick buttonclick strChecked cancel cancel buttonclick buttonclick strChecked Schlie instructions strChecked Skripten durchsuchen und ersetzennnnnnnnnnnn paste clear showwidgetsprops notifyBefore 4s_anim_CurrentObject, s_anim_PathObject ZDDItems odropDownItems isOpen onBackground objList = 0) > 0 currentObject "selectionHandles" currentPage A <> -- 4 tabs should the unique {out sight combobox dropdown -- we need store ID numbers incase }named dsame thing. && QUOTE & TAB& &CRLF && " " && selectChange newObj objRef = fillAnimationList "animations" "selectObject" 4sftsSetFile, sftsMainBk tabmode "folder" 7 <> NULL updateSettings = keyEnter buttonClick B"ok" B"help" updates the DB match settings file , sftsContexts, sftsKeywords Zkfields,sections,keywords,contexts k" = list books incBooks = ftsGetIniVar("Options","includeBooks", "included `" = ftsListToTextline( excluded excWordFile = CREATE","CWDFILE", ftsFileExists( ?) > 0 i" = num = KEYFIELDS", kfNum = kfieldData = KF"&(i+3), kfielddata selectedtextlines " = 1 dataType = initType "type" named ONC_SECTION", default location titles titleLoc = ns","TitleLoc", K" = TRUE {" = FALSE enabled {reference" = K" = {" = comboBox "obType" = "obName" = continues' textFlow = ns"," xisType(LOGICAL, B"textContinues" = incOptions = " includeObj = ns","includedObjects", = itemNumber( ^) > 0 excOptions = " /,hidden" ns"," opt = ) > 0 numLines = DWORD, kwLine = ","kw"&i, contextLine = flag determines whether has been -- opened newSettings = ns","NewSet", "<> " [addBooks [valCnt [updBooks handler saves current saveSettings sftsHwtags, sftsBooks ktypes, vwrRef = "dialog" tbk_bookRef() ) = TextlineToList( snamed > = ftsTextlineToList( exclusion options ftsSetIniVar(" have added, updateFile -- numKF = tagName = sftsHWtags ?&&"C" -- indicate that these used textlineCount( num+3, fieldName = ,"#"& excess numKW = [currLine lineCnt = 0 currKW E) > 128 ","kw"& ","kw"& numcontext = currcontext ) > 128 should be updated, updateBooks ftsSetPage }based on which 9was pressed tabPressed tabNum "fileTab" = ( "pageTab" = ( "objTab" = ( "hwTab" = ( "kwTab" = ( adjustcontrols ssm = syssuspendmessages e= TRUE buttonSize = 25* syspageunitsperpixel parentBounds = whatStage() myObjs = numberButtons = 0 obj = oldb hasSlider "slider" sliderBounds = 9+ 5 * l- 5 * + 7 * - 7 * sized B"thumb" moved e= FALSE = ssm adjustcontrols ssm = syssuspendmessages e= TRUE buttonSize = 25* syspageunitsperpixel parentBounds = whatStage() myObjs = numberButtons = 0 obj = oldb hasSlider "slider" sliderBounds = 9+ 5 * l- 5 * + 7 * - 7 * sized B"thumb" moved e= FALSE = ssm Event handlers 4LockOut, CreditsViewer = targetWindow = = False endAnim 4lastTrans "logo" Main animation AnimateCredits 4creditsviewer,lockout <> True transition "fade "names" midiReady makeTrans hook = hook2 = headhole = cannon = boom = isobject(" rip") ship = "poke" tink = pgSz = cx = pgsz / 2 cy = fx = fx = (fx+1) k5 + 1 fx = 1 < -360 H360,0 H-360,0 rx = slide Sout fx = 2 ),cy-600 hideAnchor + 720) < H180,0 dropAnchor (cx-360),-( < -360 H0,360 H0,-360 spiral speed 200" $= 90 cannonstop = endPos "down" rip = mybounds startPos <= cannonStop tear = fx 0,0,0,0 scrollToNext a kludge Zthey fix media path delimiter, needs be removed 4shipping swapChar oldChar, newChar, txt -- Tim Pearson, Asymetrix 6/94 packageClips 8 stbk_thisBook Z stack clips, hdPaths, cdPaths, otherSearchPaths, affectedFiles Z logical hdHasPlaceHolder, cdHasPlaceHolder, interrupted, inComplete, inHdPath, inCdPath, searchHd, searchCd, skipped Z bookPath, curClip, clipRef, src, newSrc, allCmd, dir, newFile, srcPath linkDLL "tb30dlg.dll" STRING ListToTextline ( OpenFileDlg ( 3,INT) =SortList ( # CopyFile ( ; FileExists ( R MoveFile ( j RemoveFile ( mediaPath( (";",",",HDMediaPath (":",",",CDMediaPath = resourceList(" the <BookPath> place holder Ftemporily substitute :real = TRUE files mark %searchHD searchCD <> NULL statusBar -- build UI description " && " && QUOTE & src = mmSource "CDaudio,VideoDisc,VCR,overlay" -- these don't have references, so them -- see explicit should `mmSearchHD mmSearhcCD -- try find under mediaPaths, fthere , otherwise well findClip( ) <> ) <> findFile(shortFileName(src), ) -- we didn't , so look paths already helped us -- found -- can't , so ("Mediendatei suchen", & "," & = FALSE -- mmSearchCD so we -- update -- now that we changed a relative , lets through loop we're <> 1 ) -- , so & "," & = inPaths( directory either prompt haven't chosen moveAll CopyAll, pkgPrompt( copyAll rest -- since a hardDisk , we can assume want a cdRom , we = dir & "\" & ) <> 1 -- moveError( t) -- error, option bailing = "Ja" list /copied c , so we -- remember so we updated below mmSearchHd mmSearchCd ) <> 1 = "Ja" ) <> 1 copyError() = "Ja" ) <> 1 CopyError() = "Ja" = "Add" (",",";", "clipPkgPrompt" -- 've added , we disk (",",";", -- , we ) + 2 -- finally, placeHolder = minimalPaths( lowest common denominator directories = insertPlaceHolder( -- msgBox("","Dieses Buch enth , die auf -Dateien Festplatte verweisen, +sich relativen Verzeichnissen zu diesem kbefinden. Wollen Sie <Buchpfad> zum -Pfad qhinzuf gen?","Question","YesNo") may be child , so just ) clean (",",";", ) -- CD-ROM = "Yes" (",",";", (",",";", (",",";", unlinkDLL " tk30dos. %Paket wurde zusammengestellt, es wurden jedoch ein oder mehrere bergangen.","Exclamation") Paketerstellung ynicht vollst ndig abgeschlossen."," erfolgreich /Information") -- returns without fName i - 1 -- looks full finds pathList Z retValue & "\" & ;) = 1 fileName, & "\" & ) = 1 whether -- prompts each Z init[] 1] = #2] = " " && ?2] = Z3] = f4] = tbkToolsDlg( -Option ausw hlen", -- gives efailed continuing quiting Beim Kopieren Problem aufgetreten" && upperCase( & ". M glicherweise steht gend Plattenspeicher zur Verf gung noch ge ffnet. fortfahren?"," . If because destination are on different drives, a attempted, followed Ha delete successful errNum, = -17 -- moving accross Verschieben " && & ". filename a fully ( partially) qualified cnt - 1 Vi+1 -- removes redundancy updates mmSources appropriately. ex) passing C:\FOO\BAR,C:\ \BOB would yield C:\ `!, curPath = removeDuplicateItems( replaceRelativePath !) + 2 & "\" sortList( duplicate ms lst Z curItem + <> -- walks replaces every occurance oldSrc, Z oldDirOnly, = directoryOnly( /" -- asure & "\" & replaceExplicitPath oldPath, newPath \#src 0$ = # = newpath & letter ~(":", 7#existance itemExists itemTxt, % lst -- displays #Windows messageBox #response &, @icon, @buttons, defaultButton, modality \ @style -- defaults: a single OK appliciationModal % "USER" INT MessageBox (WORD, = "OkCancel" = 0x0001 = "AbortRetryIgnore" = 0x0002 = "YesNoCancel" = 0x0003 = 0x0004 = "RetryCancel" = 0x0005 = "Stop" H0x0010 H0x0020 H0x0030 H0x0040 H0x0100 H0x200 H0x1000 = "task" H0x2000 = "" K= "" (windowHandle targetWindow,@ = "OK" = "No" KERNEL" thumbwidth sysPageUnitsPerPixel) * 7 labelWidth 0el) * 30 sized > 2*thumbWidth() syssuspendmessages = osliderPos osliderMin onumTics adjustNumbers -- sets the location specifed value Zscale sliderMax = mysliderPos xpix = sliderBounds = "bar" x1 = nearestPupp( x2 = b = oldP = nearestPUPP( w = percentage = ( newP = x1 + (x2-x1-w)* xsysSuspendMessages sliderMove -- renumbers labels tallTicSpacing adjustSize sls = curfield = %"0" & sysDecimal & "00" xCenter U"0" %"0" & curField -- centers {horizontally on w = maximum && "ist ung ltig." mySliderMax minimum && " mySliderMin frequency tic marks on high = U"0" low = U"0" myTallTicSpacing tics on > 50 einen Wert zwischen 1 und 50 haben." x1 = x2 = U"base" inc = (x2 - x1) / leftMost = x1 curLine = curline myNumTics gets above. ^ = x1 = x2 = b = w = b-x1)* )/(x2-x1-w)+ -- notify handlers Mthese aren't handled. notifyBefore startSliderMove (endSliderMove -- returns whole pixel, pageunits k val, X"user" getsystemmetrics( notifyAfter primary mouse primaryMouseButton s23) >0 procedure, updates the settings file include stored )current books updateFile -- declare 4sftsSetFile 4sftsValidObs 4sftsContexts, sftsKeywords, sftsSections 4sftsBooks, sftsVRef, sftsMainBk, sftsHwtags 4booksLeft,bookCount Zcontexts,keywords,hwtags reference "dialog" tbk_bookRef() oldPageRef = defaultPage oldRSB = readerStatusBar = TRUE updateStatus "Die Einstellungen werden gelesen" -- initialize -- these used throughout -- list = ftsGetIniVar("Options","includeBooks", = NULL numLines = ","lines", isType(DWORD, kwLine = ","kw"&i, itemNumber(kw,pgKeywords) = 0 = ftsListToTextline( available contextLine = num = CREATE","KEYFIELDS", kfNum = kfieldData = VF"&(i+3), kfielddata named sections CONC_SECTION", B,comboBox" non-existant clean = FALSE ftsFileExists( ) <= 0 %modal -- walk each ) > 0 nextBook im Begriff, das Buch zu durchsuchen"&& &&"("& <&")" ssm = sysSuspendMessages walkAllObjects ( Fertig." -- close -- These two handlers 8specified. -- How routine works: G walks every 8. Since aren't necessarily consecutive, -- checks has been backgrounds array. If added -- sent walkObjects be walked. -- What's fuss about recordFields? Hotwords recordfields , which lives on . The returned , however, does hotwords. So whenever -- a passed adds found fone row , like [i][1] [i][2] [i][n] ... JReference 1> ... < -- When comes enumerate living their ZbackID, \backIndex {curPage -- ] <> -- = ftsInsertLine( -- kw = -- xappear -- -- we have previously -- dimensions( [j][1] -- -- so we don't visit ) + 1 ][1] = -- iterate ,backindex, -- objecttoWalk. -- On entry either a . Note: [][] only -- a [][] 4sftsLpMsg, Zstack tlist,objList recFieldCount {curObj objectToWalk = -- replace obRef = ) > 0 -- {owns other -- curObjType = = getObjectList( ) > 0 count iterating Jcondition below) recfieldCount = 0 ) > 0 located )[n][2] recIndex = 2 3]&&\ we're enumerating +2] = \ we're ) > 0 ) > 0 ) > 0 ) > 0 = ftsTag ) = 0 ) > 0 -- puts status -- process tatusbar message isOpen statusbar -- returns a friendly obName obj nm = ob = updateSettings 4sftsTitle,sftsCntxt = keyEnter buttonClick B"ok" B"help" 4sftsSetFile,sftsKeywords,sftsContexts, Zkeywords,contexts reference the current pgRef = -- display ,<> NULL `" = "Page"&& title #" = ( ftsTitleValue S" = ( -- store initial , so later we can changed see whether override default location titleInObj = (ftsTitleOverride setting enabled B"property" = w" = titleLoc = ftsGetIniVar("Options"," -- there {defined {" = TRUE {" = obType = " = " -- so disable those options {" = FALSE {" = exluded B"exclude" = (ftsIgnore comboBox " " = ( ftsContextValue " = ( " = "<STANDARD>" so we pgKeywords = ftsListToTextline( global list numLines = n","lines", isType(DWORD, kwLine = ","kw"&i, itemNumber(kw, ) = 0 "index available contextLine = dropdownitems combobox " " = "< [newContext [newKW saveSettings overrides qvalue. " <> -- stroe should be excluded " <> "< -- does xuse -- " <> -- juses -- other more X were added these qvalues = dropDownItems = ftsTextlineToList( numcontext = [currLine lineCnt = 0 currcontext P) > 128 ftsSetIniVar(" = ftsInsertLine( numKW = currKW ) > 128 ","kw"& ","kw"& -- handles sizing the browser sized -- ignore 'code viewed -- (normally 's seen pRef = currentPage 4stbk_lastWinSize ZINT xpix,ypix ZOBJECT fheader,propFields,propButtons,splitter,\ bScript,bUprops,bDialog syspageunitsperpixel -- optimization: store frequently used {references clientSz = clientSize "propGroup" "propButtonGroup" propFieldBounds = we need zsome -- side }six pixels rightEdge = "labelGroup" combobox "cheader" "obtype" -- more : these same distance -- , but -aren't stretched B"uprops" B"dialog" bscript bdialog -- - 3* has changed: -- radio buttons 2 ottom: radioButtonVPos = - 2* property fields above }- 2 * cache ^, modify them, splitVert = "propValue" "valueLabel" addSysMenuItem itemText,wHandle, asure isn't too large 61440 "must use a lower MF_SEPARATOR = 2048 MF_STRING = 0 X"user" appendMenu( ggetSystemMenu( = "<separator>" wflag : note, stored ToolBook.ini pageUnits based -- on . To find out how big -- getSystemMetrics. Refer openWindow Zsm_cxframe,sm_cyframe,sm_cycaption,defaultSize,defaultPosition {winRef 4metric indexes: 32 -- width sizable 33 -- height 4 -- sm_cxscreen 0 -- sm_cyscreen 1 -- 3000,3000 "0,0" (INT) getToolBookIniItem("Browser"," pos = 's on upper- E> getsystemmetrics( splitterPlacement = ",.5) mode = pageUnitsToClient( orders captions extraWidth extraHeight )*2+\ winref -- calculate maximimum maxSize tbk_bookRef()) maximumSize chandling about box: translatewindowmessage windowHandle on 274 WM_SYSCOMMAND ,100 "Info ber Eigenschafts bersicht...", ,101 placement currentpage "propbuttongroup" closeWindow statusbar setToolBookIniItem(" Mode", Splitter", translated . wParam selected. one we added. hwnd,msg,wparam,lpLow,lpHigh Zinit[] e= 101 tbktoolsdlg( -- stubs prevent navigation -- doubleclicking on a allows you -- change the values property selected. 4stbk_curOb,stbk_propTypes ZinitString[] tl = selectedtextlines "propValue" tl = 1 bookRef = tbk_bookRef() propName = curList = uprop = Buprops curType = " -- quserProp/ 4var dialog box "<Neu>" pageRef = "upropsdlg" bookref stbk_CurOb cp = "Systemvariable hinzuf 1] = "< cp = "Benutzereigenschaft 1] = " dlgString = tbkToolsDlg( propname = propvalue = setprop updateBrowser focusWindow = "browser" -- 's a font, let choose common linkDLL "tb30dlg.dll" STRING ChooseFontDlg( <win. /HLStoRGB(DOUBLE, rgbtohls( -- up default ssc = P = hlstoRgb( fsize = fstyle = fface = = rgbstroke setupstring = _&","& &","& T&","& retval = chooseFontDlg(setupString,"") "regular" test = -- fcolor, use a colortype = DLG.DLL" colorPaletteDlg (WORD, BYTE, X"tb30win. hlstorgb( colorType retcolor = (windowhandle setProp -- -- 's a widget, custom, call function -- -- lastWin() &"("& &")"&& " " && -- 's a list, doubleClicking will toggle through its tv = nextValue( -- 's boolean, between fales -- otherwise, display/ "multiLine" "propEdit" lastwin() 1] = sysVarValue( "Matrixwerte k nnen nicht bearbeitet werden." 2] = 3] = TRUE 1] = leader = "@" 1] = k && " " && 1])>32000 "Eigenschaften l nger als 32000 Zeichen k 2] = -- flag enabling disabling fields" 3] = " 3] = " bearbeiten", -- r<> " ecancelled" x"na" starts typing propGroup, where they're supposed tl = ansitoChar( "abcdefghijklmnopqrstuvwxyz_0123456789" fheader handler passed a like following: -- <sourceItem>,< 1>,...,< -- note that < also one finds Freturns itmPos = itemOffset( M) + 1) -- updates combobox/ updateHeader href = tl = tl = 1 curProp displayVal = "<Array>" headerType curtype "multiline" message sent the user clicks OK on -- "Create Search Index" dialog createIndex -- Prepare index generation -- declare 4sftsSetFile, sftsLogFile, sftsIndexHandle, indexName 4sftsTextFlow, sftsValidObs, sftsExclude, sftsContextList 4sftsTitleLoc, sftsContexts, sftsKeywords, sftsSections 4sftsBooks, sftsVRef, sftsMainBk, sftsHwtags 4booksLeft tbk_bookRef() P = "Suchindex erstellen" -- Added HHiroka on 8/22 oldPageRef = defaultPage modifyMTB30ini -- error bwill be handled -- rather than ftsSetErrorNotify( FALSE) -- store current setting readerStatusBar status bar oldRSB = TRUE -- initialize -- these used throughout creation process updateStatus "Die Einstellungen werden gelesen" location titles = ftsGetIniVar("Options","titleLoc", organization untitled sections = NULL -- list includeBooks", contexts , initially -- be CREATE","FIRST_CHAP", -- generate keyword -- lines keywords numLines = isType(DWORD, -- each kwLine = ","kw"&i, -- one global itemNumber(kw,pgKeywords) = 0 = ftsListToTextline( available -- contextLine = defined num = KEYFIELDS", kfNum = kfieldData = KF"&(i+3), kfielddata named CONC_SECTION", build = stripExtension( ns","includedObjects", -- exclusion rules ns","excluded", logFile report errors )&".OUT" Log-Datei wird ge ffnet:"&& [file existing files Alte Indexdateien entfernt" ftsRemoveIndex( errorState "Vorhandene initialisiert" I = ftsInitIndex( z windowHandle w = 0 -- walk asure they -- (stepping backwards so that removing doesn't change numbers 2haven't been Zyet) ftsFileExists( ) <= 0 creationLog "***Das Buch wurde nicht gefunden"&& %modal ) > 0 nextBook ssm = sysSuspendMessages durchgesucht"&& Durchsuchen beginnen"&& walkAllObjects ( 9enden"&& ftsIndexName splitPath( -- erstellt." ftsBuildIndex( Indexerstellung ` abgeschlossen." Fertig." -- clean up _, etc. cleanUp -- These two handlers 8specified. -- How routine works: G walks every 8. Since aren't necessarily consecutive, -- checks a reference stored backgrounds array. If added walkObjects be walked. -- What's fuss about recordFields? Hotwords recordfields , which lives on . The returned , however, hotwords. So whenever -- a passed adds found , like [i][1] [i][2] [i][n] ... JReference 1> ... < -- When comes enumerate living their ZbackID, \backIndex {curPage -- can't be navigated -- skip (ftsIgnore (skipNavigation Ausgeschlossen:"&& -- associated ftsContextValue -- curContext = getContextNum( -- wasn't predefined, issue a warning ftsFindLine( ) = 0 Neuer Kontext:"&& &&"auf"&& -- -- pgTitle = getTitle( -- Unbenannte Seite -"&& -- kw = -- was kw) = 0 : Neues Schl sselwort:"&& kw&& " -- ftsAddPage( cleanRef( ,kw,curcontext) hinzugef -- -- previously -- dimensions( [j][1] -- -- so we don't visit ) + 1 ][1] = -- iterate ,backindex, -- objecttoWalk. -- On entry either a . Note: [][] -- a [][] TextAdded Zstack tlist,objList, rfList recFieldCount {curObj objectToWalk = -- replace obRef = ) > 0 -- {owns other -- curObjType = ) > 0 /should be -- on obNum main count iterating Jcondition below) recfieldCount = 0 ) > 0 located )[n][2] recIndex = 2 3]&&\ correct order additional addObjectText( we're enumerating +2] = \ ) > 0 ) > 0 ) > 0 hwtag = ftsTag ) = 0 Unbekanntes Kennzeichen:"&& ) > 0 {isn't covered above -- cases, indexed. Add continues accumulated sftsTextAdded <> ftsAddSectionsToPage( -- puts statusbar isOpen -- returns a friendly form: obName obj nm = ob = expression textExp retVal = "richText c"comboBox" Fdropdownitems lftsAdditionalText pgRef contextNum = 1 contextName = -- already -- tot he ftsAddContext( -- names e! = -- writes a outStr ftsTitleOverride property ," <> there -- obType = -- t# a titleRef = " -- {exists, -- isObject( -- otherwise -- function = ftsTitleValue() S! = -- -- , instead ) removes %path a pageReference bkName = -- inform occured gracefully errMsg "Fehler"&& k&ftsGetErrorString( _, close viewers %ds, & <> "standard" assosciated xa valid type <> " ') <= 0 hidden <> " tmpObj = ftsExcludeValue -- ignore ( <> )) = 0 Unbekannter Abschnitt:"&& ,)&&" ftsAddTextToSection( directly Abschnitte ^' = "STSPATH" tempDir = ftsDosString(" 2sysToolBookDirectory ftsSetIniVar( ',"TMPDIR", u,"mtb30.ini") charSet = ,"CHARSET"," yry & "CHARGER. N( = "STSPARMS" d(,"DFE",1," notifyBefore clipRef <> NULL showWidgetsProps >,windowhandle moved adjustControls "mmwidget_controls" sized ~<> AUTHOR mmWidgetSysBook -- HACK: Should use mmYield linkDLL "TB30WIN. mmYieldApp() (preLoadMedia = TRUE) ) <> openClip (autoShowMedia showClip (autoPlayMedia playClip setClipControls notifyAfter (autoCloseMedia ) <> closeClip myClip = ( mmPlayable stageObj = whatStage checkStageSize mmOpen wait ) <> mmClose pauseClip ) <> mmPause stopClip ) <> mmRewind mmShow seekClip argPos isReady( mmSeek seekClipFromEnd stepClip stepDist stepSize = Q(mmLength / 20) mmPosition mmStep stepClipBack / 20) mmNotify argMedia, argCommand, argResult oldLock = lockScreen enabled = FALSE clipStat = mmStatus "stopped" normalGraphic = InvertGraphic "paused" "seeking" "playing" = CheckedGraphic "closed" "Nicht verarbeitet:" && getObjectList( whatClip "playingpausedstopped" stageSizing stretchStage newClip chooseResource( setMySize mediaSizing value () = myStage = r <> mediaSize 1mmVisualSize N160,100 -- initializes dialog that prompts a 3D style -- value[1] holds the "threeDeeStyle" userProperty selectedGroup, initDlg border "borderbuttons" "stylebuttons" "sample" useWindowsColors updateSample updatesample inorout = threedeestyle "borderButtons" threeDeeRect sized keyEnter close returnstring -- update the startup preference asure selected. tbk_linkIniFileFuncs tabmode( folder initpage tbk_bookRef() "drawing" -- converts pageUnits putoInches pu retval = pu/1440 metric *2.54 %"0"&sysdecimal&"000" inchestoPu /2.54 (1440* roundtoNearestN( (1440* sysPageUnitsPerPixel) -- returns multiple n nearest ^ x,n (x/n)*n -- handlers tfields on ftype akey = t = "0123456789" sysDecimal t = "0.00" -- diplays the combobox, depending on type property -- that displayed. headertype value cref = U "cheader" fref = "textheader" "list" "boolean" enabled B"dialog" "color" "font" "multiLine" "custom" -- puts selected propGroup either Zdlist maxlines = 10 "fheader" -- 's a stuff, so box. temp = (Value) lc = scrollable 6- 1 > lc linecount b(1,lc) dropdownitems buttonClick dataType cbox = comboBox "formats" >= "U" enabled cBox = notifybefore initType dateFormats = "mm:dd:[yy]yy" & "dd:mm:[yy]yy" & "[yy]yy:mm:dd" = "U" B"U" dropDownItems combobox " = "D" B"U" = "S" B"U" &"/" "/R/I/T/C/" = "R" {loc, isShift, isControl 4s_anim_lastLoc, s_anim_sizing = FALSE 4s_anim_CurrentObject, ZdxResize, dyResize = TRUE "selectionHandles" ls = lockScreen >= "NW_handle" >= "NE_handle" >= "SW_handle" >= "SE_handle" >= "N_handle" >= "S_handle" oldName = switchRect = crossPartner O EWPartner NSPartner = loc e= ls , s_anim_dx, s_anim_dy, t, s_anim_selectedVertex, nim_animationSettings[] showHandles t DIV 2 j = 1 s_anim_animationSettings[15] = 6] = do_enddrag /"editorScripts" ~("NE_", ~("NW_", ~("SE_", ~("SW_", ~("E_", ~("W_", ~("S", ~("N", objBounds = xMidPt = yMidPt = xHandleMidPt = sysPageUnitsPerPixel * 3 yHandleMidPt = +el * 3 --This handler translates the messages editor openWindow translateWindowMessage oclienthandle on 0x0020 setCursor on 0x0201 WM_LBUTTONDOWN /"editorScripts" "bottomBar" buttonClick shown setSize closeWindow 4s_anim_idleAnimations, s_anim_selectedTool, s_anim_CurrentObject 4s_anim_PathObject, s_anim_curvedVertices, s_anim_selectedVertex 4s_anim_dragging, s_anim_dx, s_anim_dy, s_anim_segLengthList, s_anim_pathdx, s_anim_pathdy 4s_anim_Objectdx, s_anim_objectdy, s_anim_lastLoc 4s_anim_animationSettings sets cursor either ,mode arrow cross hairs --depending on value sysTool. It also updates ToolPalette has been toggled hWnd, msg, hWndmsg, hitTest, mouseMessage = 0x0200 theTarget isObject( modeCursor( ocurrentPage) isOpen statusBar ) = "down" ) = " ) = " "vertex" 39 -- "lineVertex" "selectionHandles" "N_handle" "s_anim_handle" "NE_handle" "SW_handle" "SE_handle" "NW_handle" pathObjectID <> initDialog ) = 1 selectedObject = onBackground && QUOTE & &TAB& combobox " "SelectObject" selectChange "selectObject" --automatically there only 1 textlineCount(dropDownItems animations" s) <= 2 B"OK" %modal updateSettings 4s_anim_animationSettings[], s_anim_currentAnimation, s_anim_CurrentObject enabled "integer" "duration" "steps" B"ShowAllSteps" B"FixedPath" 13] = FALSE) B"forever" "reps" t = " B"CelAnimation" "StepsPerCel" buttonClick "stepsPerCel" keyEnter B"close" isOpen --stub keep sysbook looking animations notifyBefore lastTickCount "mmGetTickCount" dllFunctions("USER.EXE") function myParent = sliderUpdate !TRUE DWORD = getTickCount () whatTick = + 500 myClip = clipRef <> NULL status = mmStatus "playing" mmTF = mmTimeFormat pmilliseconds pos = mmPosition len = mmLength setPos B"thumb" "paused" noop() "stopped" "closed" s_tmp_bnds = s_tmp_wid1 = ( s_tmp_wid2 = ( ) = down newX = newY = updateMedia b(0,( 6frame myStage = whatStage() newPos = a*len) seekClip notifyBefore lastTickCount "mmGetTickCount" dllFunctions("USER.EXE") function myParent = sliderUpdate !TRUE DWORD = getTickCount () whatTick = + 500 myClip = clipRef <> NULL status = mmStatus "playing" mmTF = mmTimeFormat pmilliseconds pos = mmPosition len = mmLength setPos B"thumb" "paused" noop() "stopped" "closed" s_tmp_bnds = s_tmp_wid1 = ( s_tmp_wid2 = ( ) = down newX = newY = updateMedia b(0,( 6frame myStage = whatStage() newPos = a*len) seekClip notifyBefore lastTickCount "mmGetTickCount" dllFunctions("USER.EXE") function myParent = sliderUpdate !TRUE DWORD = getTickCount () whatTick = + 500 myClip = clipRef <> NULL status = mmStatus "playing" mmTF = mmTimeFormat pmilliseconds pos = mmPosition len = mmLength setPos B"thumb" "paused" noop() "stopped" "closed" s_tmp_bnds = s_tmp_wid1 = ( s_tmp_wid2 = ( ) = down newX = newY = updateMedia b(0,( 6frame myStage = whatStage() newPos = a*len) seekClip buttonclick myParent = myViewer = shownBy whatStage = currentStage whatWin = currentWin obj = currentObj windowRefFromHandle( clipRef mediaSizing VmyMode "stageSizing" preLoadMedia hecked autoPlayMedia autoShowMedia autoCloseMedia sliderUpdate openClip close bookref = tbk_bookRef() 4stbk_oldCursor = cursor "resize" section code calls GDI ~the splitter user drags ZstartPos,endPos,sm_swapButton = 23 tbk_linkDrawFuncs a device context aa pen hDC = tbk_getDC(ClientHandle hPen = tbk_createPen(0,2,0) J, storing selected hOldObject = tbk_selectobject( drawing mode R2_NOTXORPEN, _old oldROP2 = tbk_setROP2( gRef = "propGroup" bpn = "propName" bpv = "propValue" leftbound = E+ 180 rightBound = E- 360 getsystemmetrics( has swapped mouse buttons. leftMouseButton = oldP <> -- erase drawLine hDC, ,leftBound), -- oldp = -- -- fields x = sysPageUnitsPerPixel "nameLabel" "valueLabel" -- delete pen, release DC tbk_deleteObject( tbk_releaseDC(clientHandle e,hDC) -- draws a specified DC fromPoint = PageUnitstoClient( toPoint = tbk_moveto( tbk_lineto( placement b = "propgroup" myX = ,.01),.99) pref = b = ls = sized ssm = syssuspendmessages oldb moved adjustcontrols e= TRUE myObjs = parentbounds = whatStage() syspageunitsperpixel objRef = e= FALSE = ssm adjustcontrols ssm = syssuspendmessages e= TRUE buttonSize = 25* syspageunitsperpixel parentBounds = whatStage() myObjs = numberButtons = 0 obj = oldb hasSlider "slider" sliderBounds = 9+ 5 * l- 5 * "sliderline" + 7 * - 7 * sized B"thumb" moved e= FALSE = ssm dropAnchor anchor = ship = chain = chainStart = 9+360, H+1260 i+1080 chainEnd = H180,0 H0,120 hideAnchor openWindow 4CreditsViewer, dlgViewer X"User" gSetTimer( KillTimer( gGetActiveWindow() ] = getActiveWindow() translateWindowMessage on 0x113 skipDlgAnim X"KERNEL" WORD getSystemDirectory (POINTER, %GlobalAlloc ( 6,DWORD) ( GlobalLock ( X GlobalUnlock ( o GlobalFree ( linkDLL X"mmsystem.dll" midiOutOpen ( MidiOutShortMsg ( MidiOutReset ( MidiOutClose ( MidiOutGetNumDevs () MidiOutGetDevCaps ( --If we were unable a timer Fclose the st = k32768) creditsViewer = targetWindow closeWindow endAnim closeMidi untranslateWindowMessage 0 -- stub prevent messages going dialog initDialog {mousePos, isShift, isControl 4s_anim_PathObject do_buttonDown /"editorScripts" isObject( do_dragging o<> default do_endDrag do_curveVertice key, do_keyDown I >= S <= keyDownArrow theTarget setCursor (0, 0, 0, 0, 0x0200) 6, 0, 0 -- handlers called manipulate {'s path dialog UI -- vertexPosition verticeNumber newPosition moveVertex ZOBJECT sysPageUnitsPerPixel) -- returns the a given pathObject theVertices ZverticeList verticeCount spinUp 4s_anim_animationSettings[] 8] = "integer" spinDown isType("REAL", 8] = sliderMax "BottomBar" = 8] = startSliderMove pos 4s_anim_PathObject, s_anim_CurrentObject, s_anim_dx, s_anim_dy, s_anim_animationSettings[], s_anim_idleAnimations stopAnimation "aborted", "selectionHandles" isObject( vertexPosition(1) 6] = y2), 10]) = 0 1] = offsetPathBy(theVertices "selectObject" 10] = compilePath( 9] = 10])/4 - 1 sliderMove pos 10]) > 0 %"0.00" "currentTime" StepNumber = jumpToStep 10], 11], 10], 11], whichStep, compiledPath, totalSteps, startPosition, CelAnimation, StepsPerCel, theTarget q < 0 { = 0 ls = lockScreen +1)*4-3 +1)*4 updateCel ZCelNumberToShow,CelNumberToHide,CelCount so that 0 shows -- ( 0 corresponds -- calculate fregards setting -- so always starts ) -- Cels -- i.e. n kn = 0 Mwe want --stub keep sysbook looking animations pageSlider pos 4slider_mode x"on" xpix = sysPageUnitsPerPixel sliderMin = sliderMax = scale = sliderBounds = x1 = nearestPupp( x2 = b = B"thumb" w = nearestPUPP( pos-x1+w )/(x2-x1+w)+ thumbBounds = curPos = sliderPos sps = sliderPageSize pos - = "on" = "on" -- moves the slider xpix = sysPageUnitsPerPixel sliderMin = sliderMax = scale = sliderBounds = x1 = nearestPupp( x2 = b = oldP = nearestPUPP( w = s_anim_dx = pos - oldMouseX = sliderPos = mysliderPos startSliderMove leftMButton = primaryMouseButton() newMouseX = newP = b(x1, ),x2-w) `-x1)* )/(x2-x1-w)+ sliderMove endSliderMove buttonClick 4s_anim_PathObject, s_anim_CurrentObject 4s_anim_animationSettings[], s_anim_animationCache[][], s_anim_idleAnimations "selectionHandles" anything already being animated on Fstop p) - 1 stopAnimation "aborted" isObject( startAnimTimer he[1][7] = times through path he[1][8] = 8] -- 10]) = 0 vertexPosition(1) 6] = y2), 1] = offsetPathBy(theVertices "selectObject" 10] = compilePath( 9] = ( 10]) / 4) - 1 he[1][6] = he[1][10] = he[1][11] = he[1][12] = he[1][9] = 9] --Total Steps he[1][2] = 0 --CurrentStep he[1][3] = --Notify he[1][4] = 4] --Use Cel he[1][5] = 5] --Force -- the starting point lockScreen he[1][6] he[1][4] FALSE he[1][1] = a_timeGetTime() --StartTime doneAnimatingNotify s_anim_selectedVertex, s_anim_dx, s_anim_dy, ls = newVertice = r= -1 error sizeTarget /"editorScripts" moveTarget stopAnimTimer objectFromPoint( isChild( toggleInvert obuttonPressed buttonClick FALSE toggleObject ls = lockScreen LockScreen oinvertedButton b <> objectInQuestion, parentInQuestion $ <> initDialog {mousePos, isShift, isControl 4s_anim_PathObject do_buttonDown /"editorScripts" isObject( do_dragging o<> default do_endDrag do_curveVertice key, do_keyDown I >= S <= keyDownArrow theTarget setCursor (0, 0, 0, 0, 0x0200) 6, 0, 0 -- handlers called manipulate {'s path dialog UI -- vertexPosition verticeNumber newPosition moveVertex ZOBJECT sysPageUnitsPerPixel) -- returns the a given pathObject theVertices ZverticeList verticeCount -- these handlers keep "propname" sync textscrolled adjustscroll adjustScroll pressing delete [a userProperty 4stbk_curOb tl = selectedtextlines tl = 1 propName = B"uprops" x"<Neu>" setprop updateBrowser headerUpdate otherField = selectedTextLines updateHeader buttonClick 4s_anim_CurrentObject, s_anim_animationSettings[] k1 > 0 newVal = 212]* :8])/ #<= 0 "Die Einzelbild-Frequenz sollte auf folgenden Wert ge ndert werden:"&& "so da die Animation <Endpunkt genau bei folgendem Sekundenwert erreicht:"\ && 8]&&" f"&OK" "&Aktuelle Einstellung beibehalten" = "OK" 12] = -- verify qrate animations "Variable" -- asure the frames per Usegment a whole z& >= 1 lineSegs = ( 1])/2-1) smooth = newRate = uft glatter, wenn Einzelbildfrequenz festgelegt wird"&& W&"." f"&OK" = "OK" 12] = close fillAnimationList newObj ZsettingsTable[][] [dropDownItems ss = = FALSE L = anim_AnimationSettings dimensions( i&CRLF "<neu>"& drowDownItems textlineCount( ) > 1 notifyAfter 4s_anim_animationSettings[], s_anim_CurrentObject isOpen combobox " }" <> selectedObject = ~(TAB, ) > 0 ct = 14] > ) - 1 buttonClick 4sftsMainBk,sftsKwNum Zpath,fname filterList = "ToolBook-B cher (*.TBK),*.tbk, Systemb SBK),*.sbk" bkName = pathAndName = splitPath( files = ftsGetFileListDlg(" Dateien hinzuf gen", =<> NULL fileList = "included books" tlc = ~) = 1 fullName = upperCase( &"\"& addBooks ftsSetPage() = TRUE buttonClick 4sftsTitleLoc ZpgList,pgNums,pgText tl = selectedTextlines "keywords" ftsSetPage() kw = P = "< Schl sselwort"&&"'"&kw&"'"&&"wird momentan nicht verwendet. >" comboBox "obType" <> NULL "obName" <> openWaitDlg "Seitenliste erstellt", " , bitte warten..." incBooks = ftsTextlineToList( "included books") hitCount = 0 bkRef = pgCount = pgRef = pgKeywords = ftsKeywords itemNumber(kw, ,) > 0 vwrRef = "dialog" tbk_bookRef() mit '"&kw&"'" currentpage "where used" = getTitle( = niceRef( reference" closeWaitDlg %modal isOpen notifybefore oenabled = x( selectedtextlines ,sftsSetFile Ztitle ftsTitleOverride titleLoc = obRef = titleRef = " isObject( = ftsTitleValue bkName = splitPath( writescripts handler the "f_" found . They are hard -- coded speed. It also sets Bp_" "lst_" -- note ; reviewers: -- Once 8ships, no longer needed. writeScripts fn = "tmp.txt" writeLine("-- Diese Skripten wurden von einer anderen Behandlungsroutine geschrieben.",fn) [",fn) f",fn) Zt,curOb,curProps,scr,curLists t = "props" textlineCount(t) stepline = -- cleanup executionBuffer = " && " && " (txt)",fn) -1) ",fn) stepLine curObType = liefert die Werte &" Eigenschaften. Wurde der Geschwindigkeit halber im Programmcode f_"& && "obj",fn) j = 0 stp1 = "richText" "dropDownItems" q = " "systemProps" ofob = obj)" " && q&& u&& "& B" && j && " " &q&& && " && " V(cnt-1) k,fn) t,fn cleanString s quotes i = 1 ci <= CRLF's CRLFoffset = """ & + & """ *+1) & s & -- initializes property-editing dialog box -- value[1] holds the be edited, ;3] tells us whether v can be initdlg fref = "propEdit" propName = upperCase( Y&& "(Nicht ver nderbar):" "&Bearbeiten" && & ":" scrollbars, necessary textoverFlow -- close eon escape. -- sent used Hstandard utton returnString initDlg value[] Bnamelabel "&Name der Systemvariablen:" Bvaluelabel "&Wert PEigenschaft:" "upropname" "upropvalue" close -- sent used Hstandard dialog ZretString returnString -- puts the -on-applications specified ini file /listbox initDlg X"tb30DOS.dll" fileExists( -- extInfo[n][1] holds title o made filename, helpText appList ZappsTxt numApps = dimensions( there helptext beyond edge i][1]& i][2] fref = selectedTextLines buttonclick updates icon image -- shows another imports hasn't displayed already. showIcon bookname buttonRef = B"iconDisplay" -- store reference thisBook = tbk_bookRef() xisObject(" 8" && -- user normalGraphic "exe "default -- need a unique resource, which limited -- 32 ) <= 32 shortName = shortname = nameFromPath( -- we've imported " && " && -- newIcon = -- has no special newResource = resourceList( runApp appRef tabloc = appStuff = VtabLoc + 1 appName = 8" && & appname & fileIsThere = ( D)=1) "Das Buch wurde nicht gefunden" && upperCase( ) & "." r= "File xfound." cleanup close ss = -- 8, but 's a sysToolBookDirectory & "mtb30.exe" && "In der `.ini-Datei sind keine Anwendungen eingerichtet." old icons lst = curIcon iconName = itemoffset( ,Property browser, ,wait,info")=0 -- pulls a path fullName slash = "\" fullname curChar = Vloc+1 -- load array, described above ? ][] tbk_linkIniFileFuncs linkDLL "KERNEL" WORD tbk_GlobalAlloc= ,DWORD) "Free=GlobalFree( 9Handle=GlobalHandle(INT) POINTER tbk_GlobalLock= vUnlock=GlobalUnlock( ? tbk_GetIniInfo=GetPrivateProfileString(STRING, Add on Tools section toolbook.ini pMem = tbk_getWinPointer(4096) G",NULL,"", /,4096,iniFile()) index = 0 extinfo[i][1]= ) + 1) tbk_freeWinPointer( u,"", ,4096, i][2] = keyEnter itemOffset itm, selectChange txt dir = dest = "" pt = % = "split" F = " R = "slide" r = "rain" = "turnPage" = "spiral" pt = = "wipe" = "zoom" <,lowerLeft,lowerRight,upperLeft,upperRight" pt = "dir" ftsLinkPage() = enabled comboBox " [dropdownitems combobox " dropDownitems iDest" "destlabel" = 0,50,0 initPage curObj 4sftsSetFile 4sftsSections ZinitVal secName = = "[Kein]" ; = ftsGetIniVar("CREATE","CONC_SECTION", itemNumber( y) > 0 = ftsListToTextline( dropdownitems combobox "choice" comboBox " B"exclude" = (ftsExclude = TRUE) objNm = <> NULL [newSec = keyEnter buttonClick B"ok" B"help" -- initializes Preferences dialog initpage section = "Startup selectedtextlines puToInches( "pageHeight" "pageWidth" getToolBookIniItem( B"showRulers" 8","startupReaderRightClick"," B"readerRightClick" B"recordHistory" sBooks = sBooksWithPath = bookCount = -- split their paths bookcount fileAndDir( "metric" "units" "Zoll" updatePath initEnabled handler removes beginning 9delimiter. This way -- we can store information invisibly Jsame fn = ](fn) slashLoc = 0 U(fn) Vslashloc+1 U(fn) fn & -- returns made pathinfo txt,tabloc filename fileinfo -- updates toolbook.ini updateIni b= inchesToPu( setToolBookIniItem( sbt = t = bookname = U(t) -- initializes drawing Preferences dialog initpage section = "Startup getToolBookIniItem( B"snapToGrid" B"showGrid" puToInches( y","30")) "gridSpacing" ","4") "polygonShape" startupDrawdirect B"drawDirect" pttrn "patternGroup" s","0,100,0") "fcolor" ","0,0,0") "scolor" "metric" "units" "Zoll" -- updates toolbook.ini updateIni setToolBookIniItem( y",inchesToPu( -- initializes Preferences dialog initpage section = "Startup getToolBookIniItem( t","System") u","10") sfsi v","Bold") sfst }","0,0,0") puToInches( "firstLine" "fromLeft" "fromRight" = "Links" = "Rechts" "Center" = "Zentrieren" "Justify" = "Blocksatz" combobox "alignment" ",1) = "Einzeilig" = "1 1/2" = "Zweizeilig" "metric" "units" "Zoll" lineSpacing" ttype "tabbuttons" ",720)) -- updates toolbook.ini updateIni setToolBookIniItem( Ztlist inchesToPu( "1 1/2" = 1.5 "tabButtons" = keyEnter buttonClick B"ok" -- initialize initlink selOb ( values dialog B"transition" combobox "fx" = "slide" dest" "dir" "speed" B"Normal" spd there {selected... <> "newHW" -- {'s current = ftsLink -- tgtPg {links too -- Brepresenting B"other -- used = ftsTrans selectChange ( ,out" dir = = extSz = nrmlSz savelink s = 1440,360 = "&Hyperlink" = linkButtonScript() s = s = " s = selectedHotwords s = " tp = &&\ &&\ = "" bookScr = ftsHyperLink" k&linkBookScript() "-- verarbeitet die -Verkn pfung" & "-- gibt *Zielseite der " & "-- 0den bergangstyp ftsHyperlink " & " " )= "" " " ^= "" "" " & " " " " "-- sendet eine Botschaft das Buch, um Seitenwechsel zu verarbeiten" & " -- sind Benutzereigenschaften" & " -- " & ftsLinkPage buttonClick Zkfields "tags" numLines = valName = tagEntry("Neues Aktionswortkennzeichen"," Kennzeichen eingeben:","","") c"," j) > 1 rfen nur einzelne W rter ohne Kommas enthalten." currLine = 1 "Ein mit diesem Namen existiert bereits." dataType = "value entry" tbk_bookRef() typeString = "Datum" Ganze Zahl" :Reelle OZeichen" selectedtextlines initType buttonClick Zkfields cBox = combobox "Choice" & = dropdownitems numLines = valName = tagEntry("Neues Aktionswortkennzeichen"," Kennzeichen eingeben:","","") c"," j) > 1 rfen nur einzelne W rter ohne Kommas enthalten." dataType = "value entry" tbk_bookRef() typeString = "Datum" Ganze Zahl" :Reelle OZeichen" currLine = 1 "Ein mit diesem Namen existiert bereits." newVal = &&"("& newKF initPage valName 4sftsSetFile Zkfields,ktypes, initVal = "[Kein]" num = ftsGetIniVar("CREATE","KEYFIELDS", xisType(DWORD, kfNum = kfieldData = jTE","KF"&(i+3), kfieldName = kfieldType = typeString = "Datum" Ganze Zahl" 8Reelle LZeichen" kfieldname &&"("& :&&"("& dropdownitems combobox "choice" comboBox " [newKF = keyEnter buttonClick B"ok" B"help" "Choice" = c" = = keyEnter buttonClick B"ok" B"help" procedure walks through the books included index modifies their scripts allow level searches modifyBooks 4sftsSetFile ZincBooks ZLOGICAL addMenus ( = ftsGetIniVar("Options","includeBooks", \ = NULL ) > 1 "Diese Prozedur ndert die Skripten aller einbezogenen B cher."&&\ "Um diese nderungen r ngig zu machen, m ssen hdieser B Q bearbeitet werden." f"Fortfahren" "Abbrechen" nimmt von folgendem Buch vor."&&\ das dieses Buchs bookRef = handlerList = getHandlerList( "fullTextSearch" myHandler = getHandlerScript( "keywordSearch" "addIndexMenuItems" "removeIndexMenuItems" )ms") "enterApplication" numLines = textlineCount( ~ = " setHandlerScript( "leaveApplication" removeMenuItems" { = " linkDLL "fts30mtb.dll" STRING ftsSearch , WORD ) -- ftsIndexName a userProperty placed Tools sysBook builds indexName = "Sie m einen Suchindex erstellen." path = <> "\" pgRef = ,windowHandle -- reference may have had its removed -- insert current isObject( a valid was found... -- otherwise... "Zu diesem Objekt kann nicht gewechselt unlinkDLL " ll" Keyword ( <> "\" ftsSearchKeyword( -- ZoldSuspend = FALSE -- store value can be restored Page available menuEnabled(" )Reader) -- menus are already present menuItemEnabled(" = TRUE "Volltextsuche..." alias "Schl sselw rter suchen..." = keyEnter buttonClick B"OK" B"Cancel" editPath theTarget, whichAnimation 4s_anim_CurrentObject, s_anim_selectedVertex,s_anim_dx,s_anim_dy,s_anim_PathObject, s_anim_animationSettings[] reset % = objectAnimation( dimensions( R) = 0 createPath ct = sliderMax "BottomBar" sliderPos -- difference between startPos = -- ~path fhandles editing keep reference = showPath(offsetPathBy( vertexPosition( showHandles "selectionHandles" updateSettings -- forces Uends ~, they don't always grouped ex, s_anim_CurvedVertices, sls = = TRUE 6] = 15] = 16] = 7] = 1 3] = "constant" 12] = 15 8] = 5 5] = FALSE 4] = 11] = 1 13] = 14] = ex = 2 2] = "," (2880 + By("0,0,2880,0", ),",") + 2880), By("0,0,-2880,0", ),",") - 2880), BLACK "settings" = sls savePath 4s_anim_sourcePage, ssm = sysSuspendMessages -- edited ls = LockScreen lockScreen sc = 1] = theVertices 15] DIV 2), 6] = 10] = compilePath( 9] = 10]) 4 - 1 t = " sourceObject = 6 t && " " && ^ t && " " && w t = ~ t &&" anim_startPosition(1) anim_startSize(1) o= sc t&& QUOTE & "Der Pfad des Objekts wurde als 14]&&"gespeichert." -- To play specify"&& 14]&&" c animationNumber parameter playAnimation message." = ssm -- used display angled/curved fellipses over -- also displays curves curvedVertices exist -- returns pathObject ( }created) so can be referred -- The lines are named "1","2","3", etc. vertice fall on -- :"3", -- M"3", thePath, 4s_anim_segLengthList ZlineList,verticeList,curveList,i,animationString,verticeCount ZsavedStates r= -1 sysLockscreen -- i incremented point1 i = 2 ) > 0 point2 drawLine( ), i-1) /"editorScripts" drawCurve(previousPoint, , i-1) drawHandle( , i-1, & "," , i-1, elements hypotenuseFromVertices( /"compiler" passed --stub sysbook looking animations -- allows user specify startup Soptions buttonclick pageref = linkDLL "tb30dlg.dll" STRING ChooseFontDlg( 7win. *HLStoRGB(DOUBLE, rgbtohls( sfsi = sfst = "regular" sff = pageRef ssc = initcol = hlstorgb( setupstring = W&","& &","&initCol&","& retval = chooseFontDlg(setupString,"") scolor "drawing" -- -- -- initializes dialog that prompts user replace -- value[1] has the starting found 4ending Mwhole fwhich initDlg "scriptDisplay" selectChars "findString" "replaceString" "objectRef" values various buttons returnString "Yes" yestoAll close notifyBefore clipRef <> NULL showWidgetsProps >, windowhandle moved adjustControls "mmwidget_controls" sized ~<> AUTHOR mmWidgetSysBook -- HACK: Should use mmYield linkDLL "TB30WIN. mmYieldApp() (preLoadMedia = TRUE) ) <> openClip (autoShowMedia showClip (autoPlayMedia playClip setClipControls notifyAfter (autoCloseMedia ) <> closeClip myClip = ( mmPlayable stageObj = whatStage checkStageSize mmOpen wait ) <> mmClose pauseClip ) <> mmPause stopClip ) <> mmRewind mmShow seekClip argPos isReady( mmSeek seekClipFromEnd stepClip stepDist stepSize = Q(mmLength / 20) mmPosition mmStep stepClipBack / 20) mmNotify argMedia, argCommand, argResult oldLock = lockScreen enabled = FALSE clipStat = mmStatus "stopped" "paused" "seeking" "playing" "closed" "Nicht verarbeitet:" && getObjectList( whatClip "playingpausedstopped" stageSizing stretchStage newClip chooseResource( setMySize mediaSizing value () = myStage = mediaSize 1mmVisualSize N160,100 buttonClick clipRef <> NULL status = mmStatus "playing" stopClip playClip notifyBefore showWidgetsProps >,windowhandle ~<> AUTHOR mmWidgetSysBook -- HACK: Should use mmYield linkDLL "TB30WIN. mmYieldApp() (preLoadMedia = TRUE) ) <> openClip (autoShowMedia showClip (autoPlayMedia notifyAfter (autoCloseMedia ) <> closeClip myClip = ( mmPlayable mmOpen rwait ) <> mmClose pauseClip ) <> mmPause ) <> mmRewind mmShow seekClip argPos isReady( mmSeek seekClipFromEnd stepClip stepDist stepSize = Q(mmLength / 20) mmPosition mmStep stepClipBack / 20) whatClip "playingpausedstopped" FALSE newClip chooseResource( setMySize mediaSizing value stageSizing = stretchStage mediaSize = mmVisualSize = 160,100 OpenMedia sysOperatingSystem sysOptimizedSave sysPageUnitsPerPixel sysReaderRightClick sysRGBFill sysRGBStroke sysRuntime sysShortDate sysShowMRUfiles sysSupportedMedia sysSuspendMessages sysThousand sysTimeChar sysTool sysTransparent sysUseWindowsColors sysVersion targetWindow Y/widget f_widget obj N0stage f_stage borderWidth innerBevelWidth mediaOpen mediaSize outerBevelWidth outline overlayOpen postEffect preEffect readerVisible roundedCorners stageAnchor stageSizing lastWin() currentPage -- checks the selections checkSelection refresh 4stbk_curOb ZcurrSel -- update state toolbar buttons " " handler. checkingSelection ) <> 1 -- nothing selected, ) = 0 enabled -- {toggles }updates -- "obType" "(No -- more than one . Punt. "propGroup" [display headerType "(Mehrfachauswahl)" -- . Update browser. updateBrowser -- central place setting , sysvars setProp obj,propname,propval,firstLineOnly ZexecutionBuffer,firstLineSpec = " B"props" 's a 4property | = " && " 's a setSysVar B"uprops" && " " && obj && ss = 1= ss -- test failed: syserrornumber sysE = "Error compiling" part U("Fehler beim Kompilieren des Skipts: ")+1 -- sets _. Moved its own so that ^names will xconflict varName,varValue 4" && varname && "= -- returns value sysVarValue 4" && obj. If homebase P, selects vRef = tbk_bookRef() isOpen ls = -- currently browsed "Eigenschafts bersicht"&& "["& P)&"]" -- change radio we're examining ystem "&Systemvariablen" &temeigenschaften" "&Benutzereigenschaften" "&Objekteigenschaften" -- sysProps/sysVars) showProps showUserProps vref -- displays values. Note. _have -- convoluted fanyone's ZvNames,vValues,vlist,i = "< -- systemVars % = obj curProp ss = val = ("@"& G && " " && "<Array>" & "propName" "propValue" "<Neu>" 5-- Added HHirokaM homeBase -- selectedTextLines "propvalue" obref(obj) lists updateHeader Zloc_vNames,loc_vValues,loc_vlist,loc_i -- weed out _used -- declare 4" && -- KLUDGE -- need find array. loc_ss = -- END a widget, "published" -- along fa standard w_propNames obj bookref = != tbk_wid_props p_widget w_propValues {pRef " && f_widget( w_propListText obj ZpropText = tbk_wid_values lst_widget given -- a couple notes on 8beginning f"p_" contain valid each type -- function f"f_" hard coded -- a }. These -- correspond returned H"p_". " hold information on the stored v "p_" -- "f_" functions written ,stbk_propTypes ,propValus Zw_wid we've somehow got invalid isObject( -- what kind {we've obtype = -- widgets tbk_wid_name -- we've " (Widget)" -- we want = f_systemProps( = p_systemProps = lst_systemProps = f_page( = p_page = lst_page = f_background( = p_background = lst_background = f_book( = p_book = lst_book = f_field( = p_field = lst_field = f_recordField( = p_recordField = lst_recordField = f_button( = p_button = lst_button = f_paintObject( = p_paintObject = lst_paintObject picture = f_twoDGraphics( = p_twoDGraphics = lst_twoDGraphics = f_oneDgraphics( [ = p_oneDgraphics = lst_oneDgraphics = f_group( = p_group = lst_group combobox i = f_combobox( = p_combobox = lst_combobox = f_hotword( = p_hotword = lst_hotword = f_oleObject( = p_oleObject = lst_oleObject = f_window( = p_window = lst_window stage = f_stage( = p_stage = lst_stage itemOffset itm, =-- unlink the DLLs used removeLinks -- unlinkDLL "tb30win.dll" %dlg. 1KERNEL" >fts30mtb. OUSER" required initlinks 4sftsIndexingAvailable functions work finitialization files STRING ftsGetIniVar = getIniVar( WORD ftsSetIniVar = setIniVar( { management INT ftsFileExists = fileExists( $ ftsRemoveFile = removeFile( JCopyFile = copyFile( ftsDosString = getDosEnvironmentString( dialog related ChooseDirectoryDlg = chooseDirectoryDlg( OpenFileDlg = openFileDlg( ,INT) SaveAsDlg = saveAsDlg( FileListDlg = getFileListDlg( ListToTextline = listToTextline( TextlineToList = textlineToList( memort GlobalAlloc= ,DWORD) GlobalFree= GlobalHandle= POINTER ftsGlobalLock= GlobalUnlock= oldSuspend = = FALSE full- indexing -- Author level ftsRemoveIndex ftsInitIndex LONG ftsAddContext ftsAddPage ftsAddTextToSection ftsAddSectionsToPage ftsBuildIndex -- Reader ftsOpenIndex ftsCloseIndex ftsTagEntries ftsNamedSections ftsTags ftsContextCount ftsContextTitle ftsAllContextTitles ftsQuery ftsReQuery ftsSetContextScope ftsAllMatchingTitles ftsAllMatchingRefs ftsMatchTitle ftsMatchRef ftsGetOffsets -- Error Handling ftsSetErrorNotify ftsGetErrorNotify ftsGetErrorNumber ftsGetErrorString -- DialogBox ftsSearch ftsSearchKeyword le = ( r= NULL) access Help ftsWinHelp= ftsWinHelpNum= a hyperlink ftsAddlink -- initialize be displayed tbk_bookRef() -- identify vwrRef = "standard" values 2"Hyperlink-Schaltfl che hinzuf currentpage modally -- close isOpen ftsCreatelink "newHW" Aktionswort a selected ftsEditlink bearbeiten" ftsModifylink s=selectedHotwords -- returns a locked nSize ftsGetWinPointer memFlag = 66 ZretValue -- allocate memory : = ftsGlobalAlloc( "Failed allocating retval = -- unlocks frees supplied. ftsFreeWinPointer pMem = ftsGlobalHandle( ftsGlobalUnlock( ftsGlobalFree( entry textEntry dbCaption,dbPrompt,initVal,dType entryDlg = entryPg = "title" dataType retrieve entered Bhides Cancel Bcloses point user clicked OK Iancelled trailing tagEntry -- datatype identifies message handled Ha notifybefore handler -- a radio buttons on initType up a multiline multiEntry dbType validation: will xallow fcommas blank entries textlineCount( itemTxt = ftsTextlineToList( checks itemnumber that itemNumber xitem,xlist settings associated given xassigned) getSetFile 4sftsInfoVal ensure 8has a infoDlg "","Dieses Buch mu gespeichert werden, bevor diese Operation durchgef * kann." -property filename setFile = ftsSetFile + exists... <) < 0 -- a default Hreplaing 8's extension -- f"SST" fileName = stripExtension( -- Settings Not Found = "Sucheinstellungen nicht gefunden" xfound" -- was chosen -- otherwise ) removes three letter without c = offSet(".", c <> 0 -- splitPath() separates a path Ipart scond actual ,fname cc= c = cc cc > 1 <> "\" c > 0 c < cc V(c+1) writes writeDefaultSST 4sftsMainBk -- create Datei definiert globale Optionen zum Erstellen eines Suchindexes."& sectionName = "CREATE" ,"MANAGER","aapi", -- estimate textbase ( 1 unit = 256 bytes) r,"TXFSIZE",1000, -- location common wordFile = sysToolBookDirectory & "COMMWORD.TXT" 4) > 0 ,"CWDFILE", special treat ,"SPECIALS","", named be included concordance ,"TITLE_SECTION","TITEL,YES", -- names concordable ssections ,"CONC_SECTION","", ,"NON_CONC_SECTION","", whether be concorded ,"DEFAULT_SECTION","OTHER, -- maximum paragraphs per ,"MAXP_PER_SECT",500, contexts ,"MAXCHP",65534, articles ,"MAXART",65534, ,"MAXPAR",65534, ,"MAXWRD",65534, -- total keyfields (minimum 2) ,"KEYFIELDS",3, -- compulsory ,"KF1","#HANDLE C", ,"KF2","#ARTREF A", ,"KF3","#KEYWORD C", ,"FIRST_CHAP"," books B!("Options","includeBooks", {types incOptions = " OdObjects", -- excluded ","", continues through textFlow","TRUE", -- keywords #"("Keywords","Lines",0, L"("Contexts"," -- build based on ftsCreateIndex 4sftsSetFile, 3) < 0 ` <> -- erstellen" "main" ftsSearchIndex indexName = ftsIndexName pgRef = Q,windowHandle bkName = -- insert reference isObject( "Zu diesem Objekt wechselt Volltextsuche","Sie m ssen zuerst einen r dieses , um Suchoperationen durchf hren zu k nnen." ftsKwSearch sselw rter suchen"," , um ftsIndexSettings ) < 0 "Indexeinstellungen" stepBack ftsReaderSettings ) < 0 ( "Einstellungen f r Leserebene" ftsPageSettings ) < 0 !"Seiteneinstellungen" ftsHWSet ZvalName ) < 0 -- determine currently s = selHW = -- disallow multiple hotwords 4) > 1 Aktionsworteinstellungen","Es sind mehrere ausgew hlt. Bitte w hlen einzeln -- ) = 1 -- -- flags B" = -- initPage -- -- what comboBox "choice" = "[None]" = "[Kein]" -- should be created... only hotwordstyle -- pops up ftsObjectSet ) < 0 -- selOb = obJect [&"Objekteinstellungen" -- xcanceld -- secName = -- ftsSection -- ftsExclude S1wait openWaitDlg .",dbMsg "msg" -dlg" closeWaitDlg -- use inserting a single U. Will maintain sorted order. No duplicates ftsInsertLine txt,newLine ending ZinsertSpot midPoint middleLine looking U) less than ) greater already > tlc removing a ftsRemoveLine matching ftsFindLine num = -- calls winHelp 7specified callWinHelp contextName [contextNum $ = "MM_CMD_Build_Index" O = "MM_CMD_Hotword_Settings" = "MM_CMD_Index_Settings" = "MM_CMD_Object_Settings" = 62603 = "MM_CMD_Page_Settings" = 62606 = "MM_CMD_Reader_Level_Settings" = "MM_CMD_Search_Settings_Not_Found" = 62612 = "MM_CMD_New_Context" = 62618 = 62594 = "MM_CMD_New_Section" = 62620 = 62596 = "MM_CMD_New_Tag" = 62622 = "MM_CMD_New_Keywords" -- ,"MTB30.HLP",257, -- -- bring up help doHelp +Message infoPg = -- resize msgField = dbMessage maxSize = "frame" - 180 `> 0 centerLine = 90 + ( ) / 2 currentPage -- Sent Hstandard dialog handler, initializes the -- value[], required xused initDlg 4stbk_searchString,stbk_replaceString "findString" bref = B"ok" "Start" enabled -- sent user presses " 4stbk_lpMsg,stbk_vRef 4stbk_foundList,stbk_searchOnly, ,stbk_asWord,stbk_promptChange,stbk_firstFind,\ stbk_canceled,stbk_searchRange,stbk_cnt statusbar -- link needed DLL functions tbk_linkMemFuncs tbk_linkMessageFuncs _. Most these are replaceScript below sMode = searchmode throughout handlers B"matchword" combobox range -- allocate a block memory will be peek message -- has pressed stop running. = tbk_getWinPointer(32) --** international -- change "Stop" (try "Anhalten") B"ok" "findstring" -- "Skripten aller Objekte" "Seiten-/Hintergrund-/Buchskripten" walkallobjects der Objekthierarchie" walkHierarchy statusBar -- still up, focuswindow "Nicht gefunden:" && & "." searchOb = nameOffset = ~("(", '-1) editScript 1] = 2] = -- bring up chooser tbkToolsDlg( "foundScripts" tbk_bookRef(),"Gefundene close tbk_freeWinPointer( B"ok" Close iterates {hierarchy, -- starting selected curSel = notifyObs = notifyObjects curSysBook = -- These two 8specified. -- How routine works: H walkAllObjects } walks every 8. Since aren't necessarily consecutive, -- checks a reference each been stored backgrounds array. If added walkObjects be walked. -- What's fuss about recordFields? Hotwords recordfields , which lives on . The list returned , however, does xinclude hotwords. So whenever -- a passed adds fone row , like [i][1] [i][2] [i][n] ... JReference 1> ... < -- When comes enumerate living their ZbackID, \backIndex {curPage -- just -- -- we have previously -- dimensions( -- j -- -- so we don't visit ) + 1 -- -- objecttoWalk. -- On entry either a Zstack tlist,objList {curObj curObjType = objectToWalk windows = getObjectList( ) > 0 -- updateStatus involves obRef tried process 20th k20 = 0 stbk_SearchOnly checkForPendingStuff( focusWindow) itemOffset( B"ok" ) > 0 ) > 0 ) > 0 curScript = curScriptChanged = runningtotal = 1 totalChars = searchLen = replaceLen = Tthat serve gdelimiters: wordDelimit = " " & k& "-+*/<>,()[];^=&.?':" & -- remaining chunk, 's got txt = curOffset = -- startPos = ( endPos = ( 's a g- 1) s+ 1 -- changing Bcontaining display tstartPos = seekEnd = tEndPos = seekend-2+ initialization 1] = tendPos 2] = - tstartpos+1 3] = 2] + 4] = 5] = 6] = promptValue = "changePrompt" Ersetzen?", prompting says so "Yes " -- HHirokaM -- insert " -- -- ss = se = wird gespeichert:" && nderungen konnten nicht [ werden:" && && "." && f"OK" "Suche abbrechen" 1= ss -- puts {being examined buttonRef = B"ok" xitem,xlist Hfolder widget tabPressed tabNum -- sets "instructions" durchsuchen" "replacewith" h und ersetzen" what current searchMode "replaceWith" -- brings up editor, -- enters searched- , hits obj, searchText X"tb30win.dll" sendkeys( }",0) keyenter returns a }clicked on keystrokes -- It clears them queue -- Parameters: a locked 32 bytes -- viewerRef whose \you want . If g= targetWindow wm_lButtonDown = 0x0201 wm_keyDown = 0x0100 pm_Remove = 1 -- mouse clicks ctbk_PeekMessage( windowHandle ,pm_remove) <> 0 lparam = -- extract high x = k65536 y = y65536 u = clienttoPageUnits( objectFromPoint( -- ctbk_peekMessage( wparam = foundlist friendly nm = " ("& &")" foundScripts foundScripts U"searchString initDlg foundScripts cancel cancel keychar tb30win.dll {keyF5} Cssendkeys {keyEscape}+{keyF5} sendkeys editScript -- initializes dialog that shows the user found strings. -- value[1] has Dcontaining )cript initDlg "foundScripts" searchString close keyEnter -- edits editScript obj, searchText X"tb30win.dll" sendkeys( }",0) focusWindow yes to all searchString strChecked instructions strChecked Objektskripten bearbeiten: in,ms ThreeDeeRect strChecked bottomLine strChecked topLine F V J strChecked foundScripts .&+ + nameOffset stbk_searchString nameOffset stbk_searchString buttondoubleclick -- edits the found 4stbk_searchString selectedTextlines obj = nameOffset = ~("(", $-1) editScript strChecked Book "C:\JX\SRC\EXE\MTB30.SBK" Button id 5 of Page id 48 ("add") Background id 39 ("widgets") Group id 55 of Page id 51 ("mmPlayer") Group id 22 of Page id 52 ("mmPlayer") Group id 85 of Page id 53 ("mmPlayer") Group id 11 of Page id 54 ("mmPlayer") Stage id 0 of Page id 55 ("mmPlayer")f Background id 11 ("folder") Button id 6 of Page id 12Field id 18 of Page id 28 ("Entry") Field id 18 of Page id 29 ("Entry") Field id 6 of Page id 32 ("pages") Page id 33 ("page settings") Page id 34 ("index settings") Page id 35 ("reader settings") Page id 3 ("propEdit") Field id 0 of Page id 3 ("Propedit") Page id 4 ("upropsdlg") Field id 3 of Page id 4 ("upropvalue") Page id 5 ("searchandreplace") Background id 9 Button id 36 of Page id 14 Button id 35 of Page id 14 Button id 24 of Page id 14 Button id 23 of Page id 14 Field id 33 of Page id 48 ("number") Group id 30 of Page id 49 ("frame") Field id 12 of Page id 49 ("frame") Group id 3 of Page id 49 ("frame") Group id 45 of Page id 63 ("frame") Group id 52 of Page id 51 ("slider") Group id 55 of Page id 51 ("mmPlayer") Group id 20 of Page id 52 ("slider") Group id 22 of Page id 52 ("mmPlayer") Group id 83 of Page id 53 ("slider") Group id 85 of Page id 53 ("mmPlayer") Group id 11 of Page id 54 ("mmPlayer") Stage id 0 of Page id 55 ("mmPlayer") Page id 72 ("credits")d 5 of Page id 6 Button id 6 of Page id 6 Page id 7 ("foundScripts") Field id 0 of Page id 7 ("foundScripts") Button id 6 of Page id 7 Button id 7 of Page id 7 Page id 8 ("TabOrder") Field id 5 of Page id 8 ("LayerNum") Button id 1 of Page id 8 Button id 2 of Page id 8 Page id 9 ("ThreeDee") Group id 12 of Page id 9 ("stylebuttons") Button id 14 of Page id 9 ("sculpted") Button id 17 of Page id 9 Button id 18 of Page id 9 Page id 10 ("extra scripts") Page id 11 ("about") Button id 3 of Page id 11 Background id 11 ("Startup Preferences") Group id 36 of Background id 11 ("folder") Button id 47 of Background id 11 Button id 48 of Background id 11 Page id 12 ("system") Group id 21 of Page id 12 Field id 4 of Page id 12 ("sysbooks") Button id 6 of Page id 12 Button id 7 of Page id 12 ("remove") Page id 13 ("text") Button id 26 of Page id 13 Button id 24 of Page id 13 ("character") Group id 25 of Page id 13 ("tabbuttons") Page id 14 ("drawing") Field id 8 of Page id 14 ("gridspacing") Button id 23 of Page id 14 Button id 24 of Page id 14 Field id 22 of Page id 14 ("polygonShape") Group id 43 of Page id 14 Group id 40 of Page id 14 ("patternGroup") Button id 37 of Page id 14 ("solidFill") Button id 38 of Page id 14 ("solidStroke") Button id 33 of Page id 14 ("custom") Group id 39 of Page id 14 ("patternFlipper") Button id 35 of Page id 14 Button id 36 of Page id 14 Page id 15 ("AddOnApps") Field id 1 of Page id 15 ("appList") Button id 3 of Page id 15 Button id 4 of Page id 15 strChecked buttonclick buttonclick strChecked Bearbeiten cancel buttonclick buttonclick strChecked Schlie strChecked strChecked strChecked showwidgetsprops setMySize mediaSizing value () = myStage = mediaSize 1mmVisualSize N160,100 B2[oM** f_background f_Book f_button f_comboBox f_field f_oneDgraphics f_twoDgraphics f_group f_hotword f_oleObject f_page f_paintObject f_recordField f_window f_systemProps f_widget f_stage ]0*%Y4 g=+1XA removeLinks tb30dos.dll tb30win.dll GlobalAlloc ftsGlobalAlloc GlobalFree ftsGlobalFree GlobalHandle ftsGlobalHandle GlobalLock ftsGlobalLock GlobalUnlock ftsGlobalUnlock tb30dlg.dll getIniVar ftsGetIniVar setIniVar ftsSetIniVar WinHelp ftsWinHelp WinHelp ftsWinHelpNum sftsIndexingAvailable fts30mtb.dll ftsRemoveIndex ftsInitIndex ftsAddContext ftsAddPage ftsAddTextToSection ftsAddSectionsToPage ftsBuildIndex ftsOpenIndex ftsCloseIndex ftsTagEntries ftsNamedSections ftsTags ftsContextCount ftsContextTitle ftsAllContextTitles ftsQuery ftsReQuery ftsSetContextScope ftsAllMatchingTitles ftsAllMatchingRefs ftsMatchTitle ftsMatchRef ftsGetOffsets ftsSetErrorNotify ftsGetErrorNotify ftsGetErrorNumber ftsGetErrorString ftsSearch ftsSearchKeyword ,#U~% fileExists ftsFileExists removeFile ftsRemoveFile copyFile ftsCopyFile getDosEnvironmentString ftsDosString chooseDirectoryDlg ftsChooseDirectoryDlg openFileDlg ftsOpenFileDlg saveAsDlg ftsSaveAsDlg getFileListDlg ftsGetFileListDlg listToTextline ftsListToTextline textlineToList ftsTextlineToList KERNEL initlinks standard ninitlink Hyperlink-Schaltfl che hinzuf tbk_bookRef vwrRef hyperlink ftsAddlink standard ninitlink newHW tbk_bookRef Hyperlink-Aktionswort hinzuf vwrRef hyperlink ftsCreatelink standard Hyperlink-Schaltfl che bearbeiten tbk_bookRef ninitlink vwrRef hyperlink ftsEditlink standard Hyperlink-Aktionswort bearbeiten tbk_bookRef ninitlink vwrRef hyperlink ftsModifylink .&, " fftsGlobalAlloc Failed allocating memory. memFlag retval @ftsGlobalLock ftsGetWinPointer ftsGlobalUnlock ftsGlobalHandle :ftsGlobalFree ftsFreeWinPointer retVal entryPg kdataType entry tbk_bookRef dialog text entry entryDlg title textEntry initType retVal entryPg entry tbk_bookRef dialog value entry dataType entryDlg title tagEntry dialog `/ftsTextlineToList retVal entryPg kdataType entry tbk_bookRef itemTxt multi entry entryDlg title multiEntry ,%H.% itemNumber fileName tbk_bookRef stripExtension aftsFileExists sftsInfoVal +1infoDlg infoDlg setFile dialog ftsSetFile Sucheinstellungen nicht gefunden Dieses Buch mu gespeichert werden, bevor diese Operation durchgef hrt werden kann. settings not found getSetFile retVal stripExtension splitPath ;Diese Datei definiert globale Optionen zum Erstellen eines Suchindexes. #HANDLE C Options textFlow CONC_SECTION Lines TXFSIZE ?4ftsSetIniVar aftsFileExists TITEL,YES includedObjects SPECIALS sftsMainBk MAXWRD CWDFILE MAXPAR FIRST_CHAP COMMWORD.TXT DEFAULT_SECTION #ARTREF A MAXCHP sectionName MAXART #KEYWORD C wordFile Keywords MAXP_PER_SECT MANAGER CREATE excluded OTHER,YES recordField,field incOptions default includeBooks NON_CONC_SECTION Contexts KEYFIELDS TITLE_SECTION writeDefaultSST sftsSetFile ftsSetFile getSetFile Suchindex erstellen standard aftsFileExists sftsMainBk tbk_bookRef vwrRef ftsCreateIndex Sie m ssen zuerst einen Suchindex f r dieses Buch erstellen, um Suchoperationen durchf hren zu k nnen. pgRef Volltextsuche ftsSearch Zu diesem Objekt kann nicht gewechselt werden: indexName bkName ftsIndexName splitPath +1infoDlg ftsSearchIndex Sie m ssen zuerst einen Suchindex f r dieses Buch erstellen, um Suchoperationen durchf hren zu k nnen. pgRef sselw rter suchen Zu diesem Objekt kann nicht gewechselt werden: indexName ftsSearchKeyword bkName ftsIndexName splitPath +1infoDlg ftsKwSearch sftsSetFile ftsSetFile getSetFile index settings standard [^stepBack aftsFileExists sftsMainBk Indexeinstellungen tbk_bookRef vwrRef ftsIndexSettings sftsSetFile ftsSetFile getSetFile standard aftsFileExists Einstellungen f r Leserebene sftsMainBk reader settings tbk_bookRef vwrRef ftsReaderSettings sftsSetFile ftsSetFile getSetFile standard aftsFileExists Seiteneinstellungen sftsMainBk page settings tbk_bookRef vwrRef ftsPageSettings sftsSetFile ftsSetFile pgRef getSetFile [None] standard FALSE aftsFileExists choice [Kein] Es sind mehrere Aktionsw rter ausgew hlt. Bitte w hlen Sie Aktionsw rter einzeln aus. sftsMainBk +1infoDlg newHW Aktionsworteinstellungen tbk_bookRef ainitPage selHW ftsTag ftsTag vwrRef assign value ftsHWSet sftsSetFile secName hotword pgRef getSetFile [None] standard selOb aftsFileExists choice sftsMainBk Objekteinstellungen assign section ftsSetFile tbk_bookRef ainitPage ftsSection ftsExclude [Kein] exclude vwrRef ftsObjectSet .&+ +E wait dlg tbk_bookRef vwrRef openWaitDlg .&+ +E wait dlg tbk_bookRef closeWaitDlg middleLine ftsInsertLine middleLine ftsRemoveLine middleLine ftsFindLine MM_CMD_Object_Settings MM_CMD_New_Keywords MM_CMD_Build_Index MM_CMD_New_Section Reader Level Settings (indexing) Index Settings keyword MM_CMD_Index_Settings MTB30.HLP MM_CMD_Hotword_Settings MM_CMD_Page_Settings MM_CMD_New_Tag MM_CMD_Reader_Level_Settings MM_CMD_New_Sections Keyword Settings (indexing) MM_CMD_New_Context MM_CMD_Search_Settings_Not_Found ftsWinHelp MM_CMD_New_Contexts SfftsWinHelpNum contextNum Hotword Settings (indexing) Build Index callWinHelp .&, 7 1,!JZY info dialog msgField frame message infoDlg infoPg tbk_bookRef dialog infoDlg sftsSetFile folder updateSettings J,tabmode enterPage cancel keyDown .&+ +E V, #> 1, #> .&+ + ,%H.% ,%H.% .&+ +E sftsSetFile NewSet caption kwLine Options CONC_SECTION `/ftsListToTextline newSettings CWDFILE lines includeBooks sftsMainBk keywords includeObj background,hidden recordField,field,button,comboBox supdBooks dataType CREATE textContinues excluded words sftsContexts sections YaddBooks incBooks KEYFIELDS contextLine obType valCnt kfieldData titleLoc included books excWordFile textFlow object itemNumber aftsFileExists Contexts sftsKeywords excOptions includedObjects obName excluded Keywords settings file contexts *ftsGetIniVar incOptions TitleLoc context numLines initType object reference updateSettings .&+ +E ,%H.% .&+ +E sftsSetFile NewSet Options textContinues updateBooks contexts FALSE background,hidden update books `/ftsTextlineToList CWDFILE sftsBooks CONC_SECTION includeBooks sftsMainBk keywords *ftsGetIniVar supdBooks recordField,field,button,comboBox tbk_bookRef currcontext dataType CREATE currLine sftsHwtags incOptions excluded words sftsContexts sections YaddBooks incBooks KEYFIELDS obType ftsSetFile valCnt YaddBooks tagName ?4ftsSetIniVar TitleLoc includedObjects included books updateFile textFlow object Contexts sftsKeywords fieldName supdBooks excOptions update settings obName valCnt valCnt excluded Keywords currKW dialog lineCnt kfNum titleLoc context vwrRef numLines excWordFile lines saveSettings ftsSetPage hwTab kwTab objTab pageTab fileTab tabPressed .&, #? SelectObject page,background Vertex |.verticeCount aborted WM_LBUTTONDOWN s_anim_dy s_anim_idleAnimations background s_anim_selectedVertex s_anim_dx ZstopAnimation theTarget addVertice objects s_anim_animationSettings moveTarget s_anim_dragging s_anim_CurrentObject mousePos selectionHandles s_anim_selectedTool whatLayer selectObject s_anim_PathObject vertexPosition WM_LBUTTONDOWN .&, " )VremoveVertice changeSelectedVertex select s_anim_PathObject vertex FALSE button s_anim_dy }dclearAnimation Das L schen von einem der letzten zwei Scheitelpunkte erzeugt eine Null-Animation. Das Bearbeiten einer Null-Animation ist dem Erstellen einer neuen Animation gleich, mit der Ausnahme, da der f r die Null-Animation zugeordnete Speicher wiederverwendet wird, statt da der Speicher neu zugeordnet wird. Wollen Sie die Animation l schen? vertexPosition s_anim_Objectdy s_anim_dx sizeTarget s_anim_dragging error BottomBar addVertice s_anim_Pathdx Vertex s_anim_animationSettings moveTarget &Abbrechen s_anim_Objectdx s_anim_CurrentObject selectionHandles s_anim_Pathdy s_anim_selectedVertex s_anim_selectedTool vertexPosition do_buttonDown s_anim_dy s_anim_Pathdy s_anim_dx s_anim_dragging s_anim_Pathdx s_anim_Objectdx s_anim_animationSettings moveTarget s_anim_CurrentObject s_anim_Objectdy s_anim_PathObject vertexPosition do_dragging s_anim_Objectdy showHandles sizeTarget |.verticeCount s_anim_Pathdy SelectionHandles s_anim_dragging s_anim_Pathdx compiler s_anim_Objectdx s_anim_CurrentObject hypotenuseFromVertices selectionHandles s_anim_selectedVertex s_anim_PathObject s_anim_segLengthList do_endDrag .&+ +E newCurveID snextLine middleCurve normal FALSE oder f r einen Scheitelpunkt, der neben einem vorhandenen Kurven-Scheitelpunkt steht. oldCursor s_anim_CurrentObject objectColor r den ersten oder letzten Scheitelpunkt kann kein Kurven-Scheitelpunkt festgelegt werden s_anim_dy firstCurve firstCurve drawCurve s_anim_animationSettings moveTarget Dieser Scheitelpunkt kann nicht in einen Kurven-Scheitelpunkt verwandelt werden. lastCurve 6previousLine middleCurve s_anim_selectedVertex s_anim_PathObject lastCurve s_anim_dx do_curveVertice # ,!Y )VremoveVertice select }dclearAnimation Vertex |.verticeCount s_anim_dy Das L schen von einem der letzten zwei Scheitelpunkte erzeugt eine Null-Animation. Das Bearbeiten einer Null-Animation ist dem Erstellen einer neuen Animation gleich, mit der Ausnahme, da der f r die Null-Animation zugeordnete Speicher wiederverwendet wird, statt da der Speicher neu zugeordnet wird. Wollen Sie die Animation l schen? vertexPosition s_anim_dx sizeTarget s_anim_dragging bottomBar addVertice s_anim_animationSettings moveTarget &Abbrechen s_anim_selectedTool s_anim_CurrentObject s_anim_selectedVertex s_anim_PathObject vertexPosition do_keyDown snextLine firstCurve s_anim_animationSettings lastCurve 6previousLine middleCurve moveVertex |.verticeCount tempPos showHandles selectionHandles CurveTopVertice SelectionHandles middleCurve moveTarget s_anim_dy s_anim_dx s_anim_animationSettings s_anim_segLengthList sizeTarget 6previousLine middleCurve firstCurve snextLine lastCurve drawHandle normal objectColor drawLine normal objectColor CurveColor drawCurve newRectangleID 6previousLine middleCurve FALSE snextLine vertexPosition drawHandle lastCurve edrawLine 6previousLine middleCurve newLineID lastCurve addVertice snextLine 6previousLine middleCurve normal FALSE 6previousLine objectColor firstCurve firstCurve snextLine lastCurve middleCurve lastCurve removeVertice ghostColor normal 0,100,0 0,50,100 curveColor objectColor CurveTopVertice ,%H.% objectAnimation s_anim_animationSettings selectionHandles s_anim_PathObject anim_animationSettings ClearAnimation Cancel keyDown sliderMax yshowPath s_anim_dy BottomBar sliderPos vertexPosition objectAnimation updateSettings s_anim_dx startPos Settings slider s_anim_animationSettings $offsetPathBy s_anim_CurrentObject selectionHandles showHandles s_anim_selectedVertex s_anim_PathObject createPath editPath 0,0,-2880,0 FALSE sliderMax showHandles s_anim_dy BottomBar sliderPos updateSettings s_anim_dx startPos settings slider s_anim_animationSettings $offsetPathBy s_anim_CurrentObject constant selectionHandles s_anim_selectedVertex s_anim_PathObject 0,0,2880,0 yshowPath createPath .&+ +E sourceObject BottomBar gespeichert. Der Pfad des Objekts wurde als Animation $offsetPathBy theVertices vertexPosition Canim_startPosition s_anim_dx objectAnimation startPos s_anim_sourcePage s_anim_animationSettings compilePath s_anim_CurrentObject anim_startSize selectionHandles s_anim_selectedVertex s_anim_dy s_anim_PathObject s_anim_CurvedVertices savePath .&+ +E drawCurve |.verticeCount point2 previousPoint point1 drawHandle compiler editorScripts edrawLine hypotenuseFromVertices s_anim_segLengthList showPath offsetPathBy enterPage leavePage leaveBackground (V@6, .&+ +E V, #> -#s>\ 1, #? sftsSetFile contextLine contexts sftsExclude stripExtension oldRSB Options pgKeywords FALSE kfieldData `/ftsListToTextline Log-Datei wird ge ffnet: sftsTitleLoc kwLine sftsBooks booksLeft lines sftsTextFlow sftsMainBk keywords ftsRemoveIndex tbk_bookRef creationLog FIRST_CHAP CREATE ***Das Buch wurde nicht gefunden oldPageRef sftsHwtags sftsVRef sftsContexts includeBooks sftsIndexHandle KEYFIELDS sftsLogFile _9updateStatus Der Index wird initialisiert sftsSections CONC_SECTION Suchindex erstellen Contexts 2ftsSetErrorNotify aftsFileExists TextFlow errorState itemNumber sftsValidObs sftsKeywords R,ftsInitIndex Keywords includedObjects sftsContextList excluded Vorhandene Indexdateien werden entfernt dialog Die Einstellungen werden gelesen *ftsGetIniVar titleLoc context numLines indexName 3modifyMTB30ini Alte Indexdateien werden entfernt createIndex _9updateStatus nwalkAllObjects MftsBuildIndex Der Index wird erstellt Die Indexerstellung ist abgeschlossen. Durchsuchen beenden Das Buch wird durchgesucht errorState Durchsuchen beginnen ftsIndexName Fertig. creationLog booksLeft sftsVRef 06cleanUp sftsIndexHandle splitPath indexName Der Index wird erstellt. nextBook w, #? 1, #? ,%H.% .&, " ,%H.% pgTitle ftsContext walkObjects ***Neues Schl sselwort: RcleanRef uogetTitle ftsFindLine ftsContextValue curContext sftsKeywords ftsKeywords sftsContexts errorState Seite wird hinzugef ftsAddPage Ausgeschlossen: creationLog ***Unbenannte Seite - ***Neuer Kontext: ftsIgnore sftsIndexHandle ggetContextNum walkAllObjects -#, 7 RecordField hwtag obRef ftsAddSectionsToPage ***Unbekanntes Kennzeichen: Durchsuchen sftsExclude Background hwtag obRef obNum curObjType sftsContexts objList sftsHwtags sftsExclude bookRef backgrounds sftsTextFlow sftsKeywords recFieldCount backIndex sftsVRef recIndex sftsTextAdded sftsIndexHandle tlist curObj objecttoWalk sftsSections sftsValidObs rfList recordField Group itemNumber background sftsValidObs Field sftsTextFlow creationLog recIndex Hotword obNum curObjType ftsTag sftsHwtags V@addObjectText _9updateStatus sftsIndexHandle sftsTextAdded walkObjects statusbar sftsVRef updateStatus obName richText of button caption of retVal field ftsAdditionalText of text of comboBox dropdownitems of textExp ftsContext itemNumber RftsAddContext ftsContextValue Kontext wird hinzugef sftsContextList errorState contextName contextNum sftsIndexHandle getContextNum sftsLogFile creationLog obType obRef xzftsTitle sftsTitleLoc `ftsTitleValue ftsTitleOverride text of titleRef titleLoc obType obRef pgRef titleRef sftsSetFile sftsTitleLoc titleLoc title getTitle 1, #> bkName splitPath cleanRef .&+ +E w, #> Fehler %ftsGetErrorString 06cleanUp sftsIndexHandle errorState .&+ +E sftsLogFile sftsSections sftsExclude sftsHwtags sftsTitleLoc sftsValidObs oldRSB sftsTextFlow sftsBooks sftsKeywords oldPageRef sftsContextList standard tbk_bookRef sftsIndexHandle booksLeft oldPageRef oldRSB sftsVRef sftsContexts indexName cleanUp ftsAddSectionsToPage sftsSections sftsExclude zrftsAddTextToSection FALSE sftsValidObs ftsExclude itemNumber ***Unbekannter Abschnitt: sftsTextFlow ftsExcludeValue SZtextExp Abschnitte werden hinzugef ftsSection creationLog ftsSection tmpObj hidden sftsIndexHandle page,background sftsTextAdded addObjectText STSPARMS {:ftsDosString mtb30.ini ?4ftsSetIniVar CHARSET STSPATH section tempDir TMPDIR *ftsGetIniVar CHARGER.STS charSet modifyMTB30ini index settings ftskeywords strChecked in,none ThreeDeeRect strChecked strChecked bottomLine strChecked topLine strChecked folder mytabheight myNumTabs myTabMode myTabSpace tbk_wid_name numTabs tabHeight tabMode tabSpace tbk_wid_props strChecked obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked S&chl sselw obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked &Aktionsw obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked &Objekte obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked &Seiten obtype strChecked strChecked tabHighlight strChecked tabLabel strChecked &Dateien strChecked strChecked highlight strChecked strChecked strChecked Einstellungsdatei: settings file strChecked C:\MTB30\FTS.SSTE2.SST strChecked Optionen festlegen f fileTab strChecked strChecked strChecked strChecked *!:!J strChecked included books strChecked C:\HOOKZIP\INDEXME2.TBK C:\MTB30\FTS.TBK add book strChecked &Hinzuf gen... remove book included books lines sftsKwNum buttonClick included books buttonClick 4sftsKwNum lines = selectedtextlines "included books" lc = clc > 0 notifybefore oenabled Z%j%J strChecked En&tfernen strChecked strChecked strChecked strChecked excluded words aftsFileExists leaveField <> NULL ftsFileExists( ) < 0 $)4)J strChecked C:\HOOK\COMMWORD.TXT choose excluded words fileName KpftsOpenFileDlg Wortausschlu dateien (*.TXT),*.TXT filterList Datei f r auszuschlie ende W rter ausw wrdFile excluded words commword.txt buttonClick buttonClick fileName = "commword.txt" filterList = "Wortausschlu dateien (*.TXT),*. wrdFile = ftsOpenFileDlg("Datei f r auszuschlie ende W rter ausw hlen",filename,"", `<> NULL "excluded i" = &,6,J strChecked A&usw hlen... edit excluded words notepad.exe excluded words buttonClick buttonClick "notepad.exe"&& "excluded strChecked &Bearbeiten... ..>.J strChecked Einbezogene B cherr strChecked rter ausschlie en pageTab strChecked strChecked strChecked strChecked ,2<2J strChecked strChecked N3^3J strChecked strChecked b4r4J strChecked object object reference buttonClick buttonClick enabled {reference" = TRUE strChecked O&bjekttext verwenden 6/"686 object reference `6p6J strChecked *7:7J in,ms ThreeDeeRect strChecked bottomLine strChecked 6H8T8 topLine strChecked obType 29B9J strChecked recordField field button in,ms ThreeDeeRect strChecked obName strChecked bottomLine R;b;J strChecked topLine strChecked strChecked Name:t: @=P=J strChecked Objekttyp:e: caption object reference buttonClick buttonClick enabled {reference" = FALSE strChecked Tite&l verwenden 6/*?8? contexts `?p?J strChecked New Context Neue Kontexte eingeben: contexts ]ftsInsertLine Kontexte contextName Neue Kontexte multiEntry buttonClick buttonClick ZcontextList contexts = numLines = 2 = multiEntry("Neue Kontexte"," eingeben:"," i <> contextName <> NULL ftsInsertLine( <BLBJ strChecked &Neu... Remove topic ftsSetPage contexts lines supdBooks buttonClick contexts buttonClick lines = selectedtextlines "contexts" '<> NULL updBooks ftsSetPage() = TRUE numLines = lc = clc > 0 notifybefore oenabled = lE|EJ strChecked En&tfernen strChecked Seitenkennzeichnungn strChecked Seitenkontexte objTab strChecked strChecked *I:IJ strChecked strChecked >JNJJ strChecked in,ms ThreeDeeRect strChecked nJhKxK bottomLine strChecked topLine >LNLJ strChecked sections strChecked G:MdO new section secName ]ftsInsertLine Abschnitte Neue Abschnitte sections Neue Abschnitte eingeben: multiEntry secNameList buttonClick buttonClick Zsections secNameList = multiEntry("Neue Abschnitte"," eingeben:"," l = ftsInsertLine( strChecked &Neu... remove section ftsSetPage lines sections supdBooks buttonClick sections buttonClick lines = selectedtextlines "sections" '<> NULL updBooks ftsSetPage() = TRUE lc = clc > 0 notifybefore oenabled strChecked En&tfernen textContinues S0SJ strChecked Te&xt erstreckt sich ber alle Objekte strChecked ^TnTJ strChecked strChecked strChecked recordfield strChecked Datensat&zfelder GlVvV field strChecked &Felder button ,W<WJ strChecked Scha<fl combobox strChecked &Kombinationsfelder XXhXJ strChecked strChecked strChecked strChecked G`ZpZ background strChecked Hin&tergrundobjekte hidden 2[B[J strChecked Verbor&gene Objekte strChecked Abschnitte strChecked In den Index einbeziehennnnnnnnnnnnnnnnnnn b]r]J strChecked Aus Index ausschlie hwTab dataType formats remove value notifybefore tl = selectedtextlines "tags" enabled value" = x(tl = NULL) "type" = x(tl = tl = comboBox "formats" = dataType = "UDS" M = TRUE strChecked $ .eh new value strChecked &Neu... remove value ftsSetPage lines valCnt valCnt supdBooks buttonClick buttonClick lines = selectedtextlines "tags" #<> NULL updBooks ftsSetPage() = TRUE numLines = valCnt lc = clc > 0 strChecked En&tfernen in,none ThreeDeeRect strChecked DfTfJ strChecked bottomLine strChecked .e@gLg topLine strChecked "h2hJ in,ms ThreeDeeRect strChecked bottomLine strChecked g@iLi topLine strChecked ftsSetPage initType keyRef dataType buttonUp ftsSetPage initType keyRef dataType keyDown tl = oselectedtextlines tl <> y -- Added HHirokaM keyRef = dataType = initType "type" ftsSetPage() tl = strChecked Foo C chte C strChecked strChecked strChecked $o4oJ strChecked strChecked To4p:p bprpJ strChecked &Reelle Zahl strChecked &Ganze Zahl ToNqXs [yy]yy:mm:dd dateFormats dataTypes dd:mm:[yy]yy U,D,S mm:dd:[yy]yy formats buttonClick buttonClick dateFormats = "mm:dd:[yy]yy" & "dd:mm:[yy]yy" & "[yy]yy:mm:dd" cBox = combobox "formats" dropDownItems dataTypes cbox = "U,D,S" strChecked Dat&um strChecked &Zeichen strChecked (u8uJ strChecked strChecked <vLvJ strChecked in,ms ThreeDeeRect strChecked lvfwvw bottomLine strChecked topLine <xLxJ strChecked formats w, /E dataTypes keyRef dataType myFormats selectChange selectChange newText myFormats = odropdownitems i = 1 numFormats = ci <= dataType = odataTypes tl = selectedTextlines "tags" keyRef = \{l{e U,D,S dataTypes strChecked mm:dd:[yy]yy dd:mm:[yy]yy [yy]yy:mm:dd B|R|J strChecked Aktionswortkennzeichen: strChecked Datentype strChecked Format kwTab ,foo,bar,bob,a,fd,gdg e,g,foo,,,,bar,,,,bob,,foo,bar,bob,sue,sob,,foo newKW strChecked in,none ThreeDeeRect strChecked strChecked bottomLine strChecked topLine strChecked in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked keywords strChecked Diagramm Dinosaurier Tech-Support Warnunguit generate Globe Tech Support Warning Warning New Keyword newKWList Neue Schl sselw sselw ]ftsInsertLine newKW keywords newKW Neue Schl sselw rter eingeben: multiEntry newKW buttonClick buttonClick Zkeywords, valName newKWList = multiEntry("Neue Schl sselw rter"," eingeben:"," j<> NULL = ftsInsertLine( strChecked &Neu... Remove Keyword ftsSetPage lines keywords supdBooks buttonClick keywords buttonClick lines = selectedtextlines "keywords" numLines = lc = L<> NULL updBooks ftsSetPage() = TRUE clc > 0 notifybefore oenabled = strChecked En&tfernen where strChecked Ver&wendung strChecked Im Index verwendete Schl sselw rter: V, #? .&+ +E .&+ +E cher einbezogen. Bitte entfernen Sie B cher, bevor Sie forfahren. standard [^stepBack included books +1infoDlg ftsscripts tbk_bookRef In einen Index k nnen maximal 20 B cher einbezogen werden. 2saveSettings Sie haben Warnung Z^stepBack buttonClick buttonClick numBooks = "included books") #> 20 infoDlg "Warnung","In einen Index k nnen maximal 20 B cher einbezogen werden."&&\ "Sie haben"&& &&" B 3. Bitte entfernen M, bevor 7forfahren."\ "ftsscripts" tbk_bookRef() settings saveSettings stepBack = "main" isOpen "standard" close strChecked Cancel standard [^stepBack Z^stepBack buttonClick buttonClick stepBack = "main" isOpen "standard" close strChecked Abbrechen load settings sftsSetFile fileName stripExtension fname Einstellungsdatei ausw pathAndName updateSettings filterList sftsMainBk setFile Einstellungsdatei (*.SST),*.sst splitPath KpftsOpenFileDlg buttonClick buttonClick 4sftsSetFile, sftsMainBk fileName = stripExtension( &)&".SST" filterList = "Einstellungsdatei (*. &),*.sst" pathAndName = splitPath( fname = setFile = ftsOpenFileDlg(" uausw hlen", 4<> NULL updateSettings strChecked &Einstellungen laden... save settings sftsSetFile fname ftsCopyFile Einstellungsdatei speichern unter pathAndName filterList settings file ftsSaveAsDlg 2saveSettings `QftsRemoveFile Einstellungsdatei (*.SST),*.sst splitPath newFile buttonClick buttonClick 4sftsSetFile filterList = "Einstellungsdatei (*.SST),*.sst" pathAndName = splitPath( fname = newFile = ftsSaveAsDlg(" sspeichern unter", 6<> NULL ftsRemoveFile( ftsCopyFile( saveSettings "settings file" = strChecked E&instellungen speichern... Defaults .&+ +E .&+ +E sftsSetFile ftsSetPage writeDefaultSST updateSettings Abbrechen Fortfahren Diese Operation setzt alle Einstellungen auf die Standardwerte und berschreibt Ihre Einstellungsdatei. supdBooks buttonClick buttonClick 4sftsSetFile "Diese Operation setzt alle Einstellungen auf die Standardwerte und berschreibt Ihre Einstellungsdatei." f"Fortfahren" "Abbrechen" writeDefaultSST updateSettings updBooks ftsSetPage() = TRUE strChecked &Vorgaben verwenden callWinHelp MM_CMD_Index_Settings buttonClick buttonClick callWinHelp "MM_CMD_Index_Settings" strChecked Hilfe .&+ + p$p_field 1pf_twoDGraphics lst_oneDgraphics RoundedRectangle B lst_hotword Background cp_oneDgraphics xp_twoDGraphics RecordField f_combobox m[f_oneDgraphics Button system obType p_oleObject PaintObject >f_group 4f_paintObject h!lst_combobox AngledLine Blst_oleObject Rectangle unlst_background f_background wp_button **f_stage ComboBox tbk_bookRef lst_twoDGraphics w_propListText <system> Viewer lst_group Gp_group #=p_paintObject propvalue tbk_wid_name updateHeader p_combobox f_field lst_window p_hotword (9w_propValues propValue obtype K/p_recordField Polygon w_propNames lst_stage lst_paintObject IrregularPolygon Group 2p_stage stbk_propTypes lst_systemProps propValues of_systemProps p_page 1LlastWin lst_recordField Field Picture f_oleObject klst_book `lst_page Ellipse lst_button bookref %xp_systemProps stbk_curOb p_book Hotword (Widget) propGroup Stage Curve obref f_hotword hof_button jtp_window f_book f_page lst_field p_background lf_window &f_recordField propName showProps ,%H.% itemOffset sizeToPage showWidgetsProps ,3clipRef mmwidget_controls adjustControls moved mmwidget_controls adjustControls sized EushowClip mmYieldApp preLoadMedia mmWidgetSysBook (hopenClip HautoPlayMedia llplayClip kQautoShowMedia ,3clipRef setClipControls TB30WIN.DLL AUTHOR enterPage mmWidgetSysBook kautoCloseMedia closeClip ,3clipRef AUTHOR leavePage myClip _jcheckStageSize ,3clipRef setClipControls whatStage stageObj playClip .&+ +E .&+ +E myClip _jcheckStageSize ,3clipRef openClip ,3clipRef closeClip ,3clipRef pauseClip ,3clipRef stopClip myClip ,3clipRef whatStage stageObj showClip ,3clipRef Z>isReady seekClip ,3clipRef Z>isReady seekClipFromEnd myClip stepSize ,3clipRef m{stepDist Z>isReady stepClip myClip stepSize ,3clipRef m{stepDist Z>isReady stepClipBack setClipControls mmNotify mmYieldApp Nicht verarbeitet: step forward pause clipStat seeking step backward rewind paused ,3clipRef stopped playing fast forward closed setClipControls stage whatStage FALSE playingpausedstopped isReady mmwidget_controls adjustControls stretchStage whatStage stageObj checkStageSize myClip setMySize newClip mediaSizing whatStage setMySize mediaSizing myStage mmwidget_controls adjustControls stretchStage ,3clipRef whatStage setMySize showWidgetsProps ,3clipRef mmwidget_controls adjustControls moved mmwidget_controls adjustControls sized EushowClip mmYieldApp preLoadMedia mmWidgetSysBook (hopenClip HautoPlayMedia llplayClip kQautoShowMedia ,3clipRef setClipControls TB30WIN.DLL AUTHOR enterPage mmWidgetSysBook kautoCloseMedia closeClip ,3clipRef AUTHOR leavePage myClip _jcheckStageSize ,3clipRef setClipControls whatStage stageObj playClip .&+ +E .&+ +E myClip _jcheckStageSize ,3clipRef openClip ,3clipRef closeClip ,3clipRef pauseClip ,3clipRef stopClip myClip ,3clipRef whatStage stageObj showClip ,3clipRef Z>isReady seekClip ,3clipRef Z>isReady seekClipFromEnd myClip stepSize ,3clipRef m{stepDist Z>isReady stepClip myClip stepSize ,3clipRef m{stepDist Z>isReady stepClipBack setClipControls mmNotify mmYieldApp pause clipStat seeking Nicht verarbeitet: paused ,3clipRef stopped playing closed setClipControls stage whatStage FALSE playingpausedstopped isReady mmwidget_controls adjustControls stretchStage whatStage stageObj checkStageSize myClip setMySize newClip mediaSizing whatStage setMySize mediaSizing myStage mmwidget_controls adjustControls stretchStage ,3clipRef whatStage setMySize .&, #? objList selectionHandles s_anim_PathObject currentObject enterPage selectObject fillAnimationList objRef animations selectChange select WM_LBUTTONDOWN setCursor bottomBar editorScripts openWindow bottomBar PsetSize shown s_anim_lastLoc s_anim_objectdy s_anim_dy s_anim_idleAnimations s_anim_pathdy s_anim_dx s_anim_curvedVertices s_anim_PathObject s_anim_pathdx s_anim_Objectdx s_anim_animationSettings s_anim_dragging s_anim_CurrentObject s_anim_selectedVertex s_anim_selectedTool s_anim_segLengthList closeWindow modeCursor setCursor theTarget setCursor Vertex W_handle NE_handle button lineVertex vertex pathObjectID SW_handle s_anim_PathObject E_handle remove N_handle s_anim_handle selectionHandles statusBar SE_handle NW_handle s_anim_selectedTool modeCursor .&, #? SelectObject vertex animations selectObject bottomBar objects selectedObject s_anim_PathObject initDialog ,%H.% button parentBounds sliderBounds hasSlider myObjs slider thumb whatStage adjustcontrols ,%H.% thumb button parentBounds sliderBounds hasSlider myObjs slider sliderline whatStage adjustcontrols mKw EP swapChar 1, "V 1, "V <+U!8 .&, #? w, #> w, #> w, #> w, #> <+U!! copyError Dieses Buch enth lt Clips, die auf Media-Dateien auf der Festplatte verweisen, die sich in relativen Verzeichnissen zu diesem Buch befinden. Wollen Sie <Buchpfad> zum Media-Pfad der Festplatte hinzuf 9hdPaths Dieses Buch enth lt Clips, die auf Media-Dateien auf der CD-ROM verweisen, die sich in Verzeichnissen relativ zu diesem Buch befinden. Wollen Sie <Buchpfad> zum Media-Pfad der CD-ROM hinzuf Die Paketerstellung wurde erfolgreich abgeschlossen. msgBox minimalPaths stbk_thisBook pkgPrompt Information mediaPath FileExists ListToTextline OpenFileDlg SortList eMoveFile OpenFileDlg CDaudio,VideoDisc,VCR,overlay CopyFile FileExists MoveFile RemoveFile copyAll statusBar Mediendatei suchen HshortFileName clipPkgPrompt iCopyFile CopyError tb30dos.dll YesNo (SfindFile tb30dlg.dll Die Paketerstellung wurde nicht vollst ndig abgeschlossen. moveAll YfindClip hswapChar moveError 5cdPaths tk30dos.dll Exclamation clip id <BookPath> Das Paket wurde zusammengestellt, es wurden jedoch ein oder mehrere Clips bergangen. Question BinPaths insertPlaceHolder packageClips mediaPath FileExists findClip FileExists findFile FALSE mediaPath inPaths .&, #? tbkToolsDlg Paket-Option ausw clipPkgPrompt pkgPrompt YesNo msgBox Exclamation Beim Kopieren der Datei ist ein Problem aufgetreten glicherweise steht nicht gen gend Plattenspeicher zur Verf gung oder die Datei ist noch ge ffnet. Wollen Sie mit der Paketerstellung fortfahren? copyError RemoveFile YesNo msgBox Exclamation iCopyFile Beim Verschieben der Datei ist ein Problem aufgetreten glicherweise ist die Datei noch ge ffnet. Wollen Sie mit der Paketerstellung fortfahren? moveError shortFileName removeDuplicateItems mKreplaceRelativePath sortList minimalPaths sortList removeDuplicateItems w, #> FileExists stbk_thisBook mediaPath HshortFileName idirectoryOnly replaceRelativePath w, #> stbk_thisBook mediaPath HshortFileName replaceExplicitPath directoryOnly <BookPath> insertPlaceHolder FALSE itemExists Cancel Abort MessageBox YesNo Ignore Exclamation KERNEL system Information AbortRetryIgnore OkCancel MessageBox Question YesNoCancel RetryCancel Retry msgBox thumbwidth labelWidth sliderMin sliderPos LnumTics W\adjustNumbers thumbWidth thumb LnumTics sized sliderMove sliderMax sliderMin mysliderPos sliderMax sliderBounds sliderMin nearestPupp thumb nearestPUPP sliderPos sliderMax labelWidth curfield sliderMin DxCenter LnumTics adjustNumbers xCenter mySliderMax sliderMin W\adjustNumbers sliderMin ist ung ltig. sliderMax sliderMax sliderMax mySliderMin W\adjustNumbers ist ung ltig. sliderMin ,%H.% myTallTicSpacing W\adjustNumbers tallTicSpacing numTics mu einen Wert zwischen 1 und 50 haben. curLine sliderMax sliderMin thumb sliderMax sliderBounds W\adjustNumbers sliderMin myNumTics nearestPupp nearestPUPP leftMost numTics myTallTicSpacing tallTicSpacing mySliderMin sliderMin myNumTics numTics mySliderMax sliderMax sliderMax sliderMin thumb sliderMax sliderBounds sliderMin nearestPupp nearestPUPP sliderPos startSliderMove sliderMove endSliderMove nearestPUPP getsystemmetrics enterpage getsystemmetrics primaryMouseButton V, #> sftsSetFile _9updateStatus contextLine Options `/ftsListToTextline booksLeft pgKeywords kfieldData oldRSB CREATE itemNumber kwLine sftsValidObs sftsBooks sftsKeywords lines includeBooks sftsMainBk Keywords sftsHwtags sftsContexts aftsFileExists sftsSections field,recordField,button,comboBox tbk_bookRef dialog Die Einstellungen werden gelesen oldPageRef CONC_SECTION *ftsGetIniVar sftsVRef context sections numLines Contexts KEYFIELDS updateBooks _9updateStatus nwalkAllObjects Durchsuchen sftsValidObs oldRSB sftsBooks sftsKeywords oldPageRef Fertig. booksLeft oldPageRef oldRSB sftsVRef sftsContexts nextBook .&, " ,%H.% ftsContext walkObjects ftsFindLine ftsKeywords sftsKeywords ftsKeywords ftsContext sftsContexts walkAllObjects -#, 7 RecordField hwtag obRef sftsSections Durchsuchen Background sftsValidObs ftsFindLine itemNumber Field recIndex Hotword hwtag obRef curObjType sftsContexts objList sftsHwtags bookRef backgrounds sftsKeywords recFieldCount backIndex sftsVRef recIndex tlist curObj objecttoWalk ftsSection sftsSections sftsValidObs sftsLpMsg ftsSection curObjType ftsSection ftsTag ftsTag sftsHwtags ftsSection recordField _9updateStatus field walkObjects statusbar sftsVRef updateStatus obName updateSettings enterPage sftsCntxt sftsTitle leavePage cancel keyDown obType itemNumber contextLine Options ftsContext pgRef sftsTitle property pgKeywords <STANDARD> newContext `/ftsListToTextline page keywords sftsSetFile object ftsContextValue kwLine `ftsTitleValue sftsKeywords lines ftsKeywords newKW exclude *ftsGetIniVar ftsTitleOverride sftsContexts text of sftsCntxt Keywords reference index keywords xzftsTitle ftsIgnore Contexts titleLoc context object reference numLines contexts title updateSettings w, "V sftsSetFile Contexts pgRef `/ftsTextlineToList contexts <STANDARD> ftsTitleOverride newContext newContext ?4ftsSetIniVar ftsKeywords ]ftsInsertLine currKW lines yzftsTitle newKW currcontext *ftsGetIniVar context page keywords sftsCntxt newKW sftsTitle newKW property ftsContext sftsKeywords currLine lineCnt Keywords exclude sftsContexts numLines title ftsIgnore saveSettings tabPressed tabPressed tabname J,tabMode obtype tabNum buttonclick etabLimit tabPressed myTabMode Tabulator kann nicht gesetzt werden tabMode tabLimit myTabMode tabMode mytabheight tabHeight myTabHeight tabHeight arrangeTabs myTabSpace tabSpace myTabSpace tabSpace w, #? manual false myNumTabs etabLimit arrangeTabs kann maximal Mindestens ein Tabulator mu vorhanden sein Tabulatoren haben numTabs mynumtabs numTabs manual tabRef mynumTabs tabLabel tabHighlight tabHeight arrangeTabs myNumTabs obtype highlight mytabheight sized w, #> myTabMode tname myNumTabs mytabspace anchor arrangeTabs V, #> sftsSetFile choice kfieldData Datum Ganze Zahl Zeichen Reelle Zahl typeString newKF CREATE [Kein] *ftsGetIniVar kfieldName kfieldType KEYFIELDS initPage cancel keyDown Choice enterPage cancel keyDown .&+ +E ,%H.% .&+ +E sftsSetFile enterApplication Diese Prozedur nimmt nderungen am Skript von folgendem Buch vor. enterApp send removeIndexMenuItems Um diese nderungen r ngig zu machen, mu das Skript dieses Buchs bearbeitet werden. to handle removeIndexMenuItems handle handlerList removeIndexMenuItems send addIndexMenuItems to handle addIndexMenuItems leaveApp fullTextSearch keywordSearch bookRef myHandler includeBooks Abbrechen Fortfahren to handle leaveApplication Diese Prozedur ndert die Skripten aller einbezogenen B cher. addIndexMenuItems end enterApplication to handle fullTextSearch to handle keywordSearch leaveApplication addIndexMenuItems end leaveApplication *ftsGetIniVar to handle enterApplication send removeMenuItems Um diese nderungen r ngig zu machen, m ssen die Skripten dieser B cher bearbeitet werden. Options modifyBooks pgRef ftsSearch Zu diesem Objekt kann nicht gewechselt werden: indexName fts30mtb.dll ftsSearch ftsIndexName Sie m ssen f r dieses Buch einen Suchindex erstellen. fullTextSearch pgRef ftsSearchKeyword Zu diesem Objekt kann nicht gewechselt werden: indexName ftsSearchKeyword fts30mtb.dll ftsIndexName Sie m ssen f r dieses Buch einen Suchindex erstellen. keywordSearch sselw rter suchen... Volltextsuche... fullTextSearch keywordSearch addIndexMenuItems fullTextSearch keywordSearch removeIndexMenuItems addIndexMenuItems enterApplication removeIndexMenuItems leaveApplication d D:Z!~ ftsKeywordSearch mm_media Verteilt die ausgew hlten Objekte anhand des Abstands zwischen den zwei am weitesten links stehenden Objekte. tbk_startPref ftsReaderLevelSettings &Horizontal tbk_centerBoth Media Werkzeuge f r Hyperlink-Verkn pfungen, ohne Skripten zu schreiben EditHyperlinkHotword Legt die Seitenoptionen f r Volltextsuchen fest tbk_spreadvert &3D-Stil hinzuf gen... Erstellt oder modifiziert Pfadanimationen. ftsIndexSettings hrt eine Schl sselwortsuche durch Eige&nschafts bersicht &Einstellungen f r Leserebene... Start&einstellungen... Hyperlink-Schalt&fl che bearbeiten... Hyperlink-&Aktionswort erstellen... Legt die ausgew hlten Objekte auf eine einheitliche Gr e fest. ftsBuildIndex &Seiteneinstellungen... Erstellt ein Hyperlink-Aktionswort, ohne Skripten zu schreiben CreateHyperlinkHotword Zwischen dem &oberen und unteren Rand mm_WidgetProps Stellt Clip-Media-Dateien zu einem Paket zusammen. &Aktionsworteinstellungen... hyperLinking tbk_Tools &Anwendungen... ftsObjectSettings AddHyperlinkButton gt Media-Widgets zur aktuellen Seite hinzu. Me&dia mm_MediaWidgets Bearbeitet ein Hyperlink-Aktionswort, ohne in das Skript einzugreifen tbk_TabOrder Zentriert die ausgew hlten Objekte Verteilt die ausgew hlten Objekte anhand des Abstands zwischen den zwei am weitesten obenstehenden Objekte. Exportiert Text oder RTF-Text aus einem Feld oder Datensatzfeld in eine Datei. tbk_grow tbk_tools mediaPackager Text e&xportieren... In &beiden Richtungen In&dex erstellen... ftsPageSettings Eigenschaften von Media-Widgets bearbeiten. Anzeige-/Bearbeitungswerkzeug f r Eigenschaften und Benutzereigenschaften. ftsFullTextSearch Pfadani&mation... &Hyperlink Hinzuf gen oder Bearbeiten des 3D-Stils von Rechtecken und Feldern. spread Legt die Tabulatorreihenfolge der ausgew hlten Objekte nach Position fest. Widget-&Eigenschaften... &Kleinstes Objekt Text &importieren... hrt die in der MTB30.INI-Datei angegebenen Anwendungen aus. center &Tabulatorreihenfolge festlegen... tbk_AddOnApps Positioniert die Objekte mit einem einheitlichen Abstand. Legt die Werte f r Systemvariablen beim Start fest. &Suchen/Ersetzen... Werkzeuge zum Arbeiten mit Media-Widgets gt Text oder RTF-Text aus einer Datei in ein Feld oder Datensatzfeld ein. indexing Hyperlink-A&ktionswort bearbeiten... &Objekteinstellungen... I&ndexeinstellungen... Optionen zum Erstellen eines Indexes f r eine Volltextsuche festlegen. Erstellen oder bearbeiten eines Aktionswortkennzeichens Zwischen den &Seiten EditHyperlinkButton Legt die Indexoptionen f r das ausgew hlte Objekt fest tbk_3D &Zentrieren &Vertikal Legt die Optionen f r Volltextsuchen auf Leserebene fest tbk_shrink tbk_spreadhorz tes Objekt Erstellt einen Index f r eine Volltextsuche S&chl sselw rter suchen... &Volltextsuche... Media-&Widgets Media-&Pakete... &Verteilen PathAnimation tbk_centerHorz tbk_importText hrt eine Volltextsuche durch tbk_exportText hrt Suchen/Ersetzen-Operationen an allen Skripten im Buch durch. customEdit Hyperlink-Schaltfl che bearbeiten, ohne in das Skript einzugreifen Hyperlink-&Schaltfl che hinzuf gen... ftsHotwordSettings tbk_replaceScripts tbk_centerVert Hyperlink-Schaltfl che hinzuf gen, ohne Skripten zu schreiben loadMenus .&, " Sie m ssen zuerst zwei oder mehrere Elemente ausw hlen. sortbyposition spread objList Sie m ssen zuerst 2 oder mehrere Objekte ausw sortbysize smallest shrinkgrow minlayer lowestlayer newpos curob objList horz,both Sie m ssen zuerst ein Objekt ausw hlen. vert,both bkSize center ,%H.% curOb stwoDquicksort sortbyposition ,%H.% curOb stwoDquicksort sortbysize stbk_noSwap |CtwoDquicksrt twoDquicksort stbk_noSwap |CtwoDquicksrt twoDquicksrt requestArray ,%H.% objList group bottomLine topline rectangle ThreeDeeRect curObj paintObject threeDeeRect field combobox curObjType topLine bottomline threeDeeRect ,%H.% threeDeeRect Group Sie m ssen zuerst ein Rechteck oder ein Feld ausw topcolor objList group bottomLine topline rectangle ThreeDeeRect curObj topLine sculpted field rectangle,scrolling rectangle,field,recordfield curObjType bottomColor bottomline xThreeDeeRect Textdatei (*.txt),*.txt,RTF-Textdatei (*.rtf),*.rtf Text exportieren tb30DLG.DLL SaveAsDlg saveAsDlg exportText V, #? .&+ +E tb30dos.dll ist zu gro zum Importieren. Die Gr e der Datei ist tb30dlg.dll fileSize ; maximal Text importieren openFileDlg :!9g oldCursor OpenFileDlg RTF-Dateien (*.rtf),*.rtf,Textdateien (*.txt),*.txt,Alle Dateien(*.*),*.* getFileSize Warnung: diese Operation ersetzt den aktuellen Inhalt des Felds. getFileSize {\rtf Abbrechen importText sysHistoryRecord sysTabSpacing sysFillColor ttbk_linkIniFileFuncs sysAlignment sysPolygonShape solidFill sysFontFace false author 6getToolBookIniItem System sysCentered sysLineSpacing sysGridSnap sysRuler 0,100,0 sysStrokeColor 0,0,0 sysTabType sysPattern sysIndents section sysFontStyle 6gettoolBookIniItem sysHotwordsShown sysGridSpacing Startup Preferences sysLineStyle sysFontSize sysGrid setStartup keyRef dataType formats buttonClick /R/I/T/C/ [yy]yy:mm:dd dateFormats dd:mm:[yy]yy mm:dd:[yy]yy formats initType FALSE s_anim_sizing s_anim_lastLoc buttonDown NSPartner W_handle NE_handle S_handle switchRect SW_handle EWPartner E_handle s_anim_sizing N_handle s_anim_CurrentObject selectionHandles oldName SE_handle NW_handle s_anim_lastLoc w7crossPartner buttonStillDown do_enddrag FALSE showHandles s_anim_dy s_anim_dx s_anim_animationSettings s_anim_sizing editorScripts s_anim_CurrentObject s_anim_selectedVertex s_anim_lastLoc buttonUp crossPartner EWPartner NSPartner W_handle NE_handle S_handle SW_handle E_handle objBounds N_handle s_anim_CurrentObject selectionHandles SE_handle NW_handle showHandles \lastTickCount enterpage USER.EXE mmGetTickCount leavePage myClip milliseconds $setPos \lastTickCount sliderUpdate mmGetTickCount closed getTickCount mmGetTickCount myParent whatTick mmGetTickCount ,3clipRef stopped thumb playing USER.EXE paused \lastTickCount status s_tmp_bnds thumb updateMedia buttonDown newPos myStage myClip milliseconds ,3clipRef _seekClip whatStage updateMedia \lastTickCount enterpage USER.EXE mmGetTickCount leavePage myClip milliseconds $setPos \lastTickCount sliderUpdate mmGetTickCount closed getTickCount mmGetTickCount myParent whatTick mmGetTickCount ,3clipRef stopped thumb playing USER.EXE paused \lastTickCount status s_tmp_bnds thumb updateMedia buttonDown newPos myStage myClip milliseconds ,3clipRef _seekClip whatStage updateMedia ,%H.% button parentBounds sliderBounds hasSlider myObjs slider thumb whatStage adjustcontrols 1,!Kh 1,!K8 1,"!# 1,!JxY 1,"!# chain break chainStart chainEnd anchor dropAnchor chain break anchor hideAnchor CreditsViewer getSystemDirectory GlobalAlloc GlobalLock GlobalUnlock GlobalFree mmsystem.dll KERNEL getActiveWindow midiOutOpen MidiOutShortMsg MidiOutReset MidiOutClose MidiOutGetNumDevs MidiOutGetDevCaps dlgViewer skipDlgAnim seconds SetTimer KillTimer GetActiveWindow openWindow closeMidi credits dlgViewer +endAnim closeWindow skipDlgAnim False CreditsViewer LockOut enterPage CreditsViewer leavePage lastTrans endAnim midiReady False creditsviewer names makeTrans lockout fade fast AnimateCredits ,%H.% spiral in speed 200 |mybounds names fade speed 200 paintobject rip hideAnchor headhole tear in fast startPos slide right out fast slide in fast slide out bottom fast lastTrans hook2 endPos cannon spiral out speed 200 slide out fast @scrollToNext slide left out fast dropAnchor makeTrans sliderMove startSliderMove sliderMax sliderMin nearestPUPP mysliderPos HendSliderMove sliderMax sliderBounds sliderMin mysliderPos nearestPupp leftMButton sliderPos s_anim_dx `primaryMouseButton newMouseX oldMouseX buttondown .&s>V 1+U!8 selectObject s_anim_animationCache aborted $offsetPathBy s_anim_idleAnimations vertexPosition ZstopAnimation theVertices s_anim_animationSettings 9a_timeGetTime compilePath s_anim_CurrentObject startAnimTimer selectionHandles s_anim_PathObject buttonClick _stopAnimTimer s_anim_dy sizeTarget vertexPosition s_anim_dx newVertice error moveTarget editorScripts s_anim_CurrentObject s_anim_selectedVertex s_anim_PathObject doneAnimatingNotify hdrowDownItems hdrowDownItems anim_AnimationSettings <neu> fillAnimationList objects s_anim_animationSettings s_anim_CurrentObject selectedObject enterPage ,%H.% ,%H.% obType itemNumber Seitenliste wird erstellt pgRef ftsSetPage bkRef where used `/ftsTextlineToList Seitenliste wird erstellt, bitte warten... object uogetTitle +niceRef sftsTitleLoc included books pgKeywords tbk_bookRef ftsKeywords closeWaitDlg keywords obName < Schl sselwort Seiten mit Schl sselwort ' openWaitDlg dialog page reference wird momentan nicht verwendet. > vwrRef pages incBooks buttonClick keywords obType obRef xzftsTitle sftsTitleLoc `ftsTitleValue ftsTitleOverride text of titleRef titleLoc obType obRef pgRef titleRef sftsSetFile sftsTitleLoc titleLoc title getTitle -#, #? 1, #> Page number niceRef of book bkName splitPath niceRef 1, #b 1, #> (Nicht ver nderbar): false propEdit &Bearbeiten propName initdlg cancel keychar propEdit sEreturnString cancel propEdit enterpage &Name der Systemvariablen: upropname &Wert der Systemvariablen: &Name der Eigenschaft: namelabel <system> &Wert der Eigenschaft: upropvalue valuelabel initDlg upropname enterpage keychar upropname sEreturnString upropvalue cancel .&, " .&, " ?Center firstLine Rechts sysalignment Right sysFontFace 6getToolBookIniItem System Zweizeilig sysLineSpacing Einzeilig sysFontStyle tabSpacing alignment tabbuttons sysFontSize 1 1/2 Blocksatz 0,0,0 sysTabType Zentrieren sysIndents section puToInches lineSpacing ttype sysTabSpacing Justify Startup Preferences fromLeft fromRight metric Links sysStrokeColor units initpage ?Center firstLine Rechts sysalignment sysFontFace sysStrokeColor Right Zweizeilig sysLineSpacing Einzeilig tabSpacing =@setToolBookIniItem alignment tabButtons sysFontSize 1 1/2 Blocksatz sysTabType sysIndents section inchesToPu lineSpacing sysFontStyle sysTabSpacing Justify Startup Preferences fromRight fromLeft ttype Zentrieren Links updateIni Ein Kennzeichen mit diesem Namen existiert bereits. initType Datum eztagEntry Zeichen Kennzeichen d rfen nur einzelne W rter ohne Kommas enthalten. valName Neues Kennzeichen eingeben: Neues Aktionswortkennzeichen kdataType Reelle Zahl typeString tbk_bookRef value entry dataType Ganze Zahl buttonClick Ein Kennzeichen mit diesem Namen existiert bereits. Kennzeichen d rfen nur einzelne W rter ohne Kommas enthalten. newKF newKF Choice Datum eztagEntry Zeichen valName Neues Kennzeichen eingeben: Neues Aktionswortkennzeichen kdataType Reelle Zahl typeString tbk_bookRef value entry dataType newVal Ganze Zahl buttonClick obtype script cheader rightEdge propFieldBounds propGroup splitter valueLabel uprops splitVert stbk_lastWinSize clientSz propButtonGroup fheader dialog labelGroup propValue sized MF_SEPARATOR MF_STRING wflag appendMenu <separator> appendMenu getSystemMenu /lgetSystemMenu must use a lower id number addSysMenuItem ?properties 6getToolBookIniItem addSysMenuItem maxSize Position Browser Info ber Eigenschafts bersicht... sm_cyscreen splitter browser splitterPlacement clientSz propbuttongroup tbk_bookRef getsystemmetrics getSystemMetrics placement sm_cxscreen WM_SYSCOMMAND getSystemMetrics openWindow <+U!! Position =@setToolBookIniItem Browser splitter propbuttongroup Splitter statusbar placement closeWindow tbktoolsdlg about WWM_SYSCOMMAND WM_SYSCOMMAND previous first background .&+ h TsetProp tbkToolsDlg multiLine rgbtohls hlstorgb fsize retval fface curType uprops propVal bookRef initString pageRef curList colortype fstyle uprop leader false setupstring stbk_curOb retcolor dlgString stbk_propTypes propvalue propName FchooseFontDlg propEdit upropsdlg Eigenschaften l nger als 32000 Zeichen k nnen nicht bearbeitet werden. \updateBrowser bookRef retcolor custom Tsetprop Eigenschaft bearbeiten tb30DLG.DLL fstyle tbk_bookRef sysVarValue <system> ChooseFontDlg script Matrixwerte k nnen nicht bearbeitet werden. Benutzereigenschaft hinzuf qhlstoRgb propVal bold italic curType 1Llastwin tb30win.dll propValue boolean color retval fface qrgbtohls false regular stbk_propTypes tb30dlg.dll 1LlastWin Systemvariable hinzuf uprops fsize browser bold,italic colortype pageRef HLStoRGB rgbtohls qhlstorgb stbk_curOb uprop leader <Neu> colorPaletteDlg setupstring window cancelled nextValue dlgString props curList propvalue colorPaletteDlg propName buttonDoubleClick stbk_propTypes abcdefghijklmnopqrstuvwxyz_0123456789 uprops fheader <Neu> curType propValue propName keydown .&, " itemOffset itmPos nextValue .&+ h color script mScurProp true,false stbk_propTypes <Array> boolean uprops custom curList multiline headerType <Neu> displayVal NBdisplay curType propName header propValue updateHeader findString stbk_searchString stbk_replaceString replaceString Start initDlg <+U!8 <+U!! search tbkToolsDlg replace matchword nameOffset stbk_searchString stbk_asWord stbk_promptChange findString stbk_vRef r1tbk_freeWinPointer tbk_bookRef Gefundene Skripten Skripten in der Objekthierarchie statusBar sMode GwalkHierarchy findstring Seiten-/Hintergrund-/Buchskripten stbk_canceled range nwalkallobjects prompt searchOb false ytbk_linkMessageFuncs Skripten aller Objekte firstFind stbk_foundList foundScripts replaceString statusbar tbk_getWinPointer Nicht gefunden: stbk_searchOnly stbk_searchRange Anhalten searchmode stbk_cnt stbk_firstFind stbk_replaceString stbk_lpMsg range searchOb false stbk_vRef nameOffset stbk_canceled stbk_searchString stbk_replaceString stbk_foundList stbk_lpMsg stbk_promptChange stbk_searchRange stbk_searchOnly stbk_cnt stbk_asWord sMode stbk_firstFind value Start tbk_linkMemFuncs cancel curSel gIreplaceScript Seite,Hintergrund notifyObs curSysBook walkHierarchy .&, " .&, " ,%H.% walkObjects gIreplaceScript false Skripten aller Objekte stbk_searchRange stbk_canceled walkAllObjects _9updateStatus Background gIreplaceScript curObjType walkObjects 1, "j .&, " , /Ep w, #? cancel _9updateStatus promptValue Ersetzen? -+*/<>,()[];^=&.?': itemOffset false stbk_asWord stbk_searchString stbk_foundList wordDelimit stbk_promptChange Skript wird gespeichert: obRef Yes to all stbk_searchOnly stbk_canceled changePrompt Suche abbrechen curScript tbk_bookRef stbk_firstFind stbk_cnt xcheckForPendingStuff stbk_replaceString stbk_lpMsg tbkToolsDlg nderungen konnten nicht gespeichert werden: curScriptChanged replaceScript stbk_vRef statusbar updateStatus stbk_canceled buttonRef Start ,%H.% itemOffset searchmode tabPressed .&, " .&, " prompt instructions Skripten durchsuchen replacewith firstFind Skripten durchsuchen und ersetzen searchmode search replace replaceWith searchmode tb30win.dll {keyF5} Cssendkeys {keyEscape}+{keyF5} sendkeys editScript keychar wm_keyDown pm_Remove wparam tbk_PeekMessage tbk_peekMessage wm_lButtonDown checkForPendingStuff of Book obRef findString enterpage showWidgetsProps ,3clipRef mmwidget_controls adjustControls moved mmwidget_controls adjustControls sized EushowClip mmYieldApp preLoadMedia mmWidgetSysBook (hopenClip HautoPlayMedia llplayClip kQautoShowMedia ,3clipRef setClipControls TB30WIN.DLL AUTHOR enterPage mmWidgetSysBook kautoCloseMedia closeClip ,3clipRef AUTHOR leavePage myClip _jcheckStageSize ,3clipRef setClipControls whatStage stageObj playClip .&+ +E .&+ +E myClip _jcheckStageSize ,3clipRef openClip ,3clipRef closeClip ,3clipRef pauseClip ,3clipRef stopClip myClip ,3clipRef whatStage stageObj showClip ,3clipRef Z>isReady seekClip ,3clipRef Z>isReady seekClipFromEnd myClip stepSize ,3clipRef m{stepDist Z>isReady stepClip myClip stepSize ,3clipRef m{stepDist Z>isReady stepClipBack setClipControls mmNotify mmYieldApp clipStat seeking Nicht verarbeitet: paused ,3clipRef stopped playing closed setClipControls stage whatStage FALSE playingpausedstopped isReady mmwidget_controls adjustControls stretchStage whatStage stageObj checkStageSize myClip setMySize newClip mediaSizing whatStage setMySize mediaSizing myStage mmwidget_controls stretchStage ,3clipRef whatStage setMySize G walks everref dialog headertype cheader textheader fheader maxlines display kdataType formats buttonClick /R/I/T/C/ [yy]yy:mm:dd dateFormats kdataType dd:mm:[yy]yy mm:dd:[yy]yy formats initType CelAnimation stepsPerCel forever FALSE FixedPath group StepsPerCel integer ShowAllSteps s_anim_animationSettings s_anim_CurrentObject duration steps updateSettings close keyDown updateSettings enterPage leavePage leaveBackground \lastTickCount enterpage USER.EXE mmGetTickCount leavePage myClip milliseconds $setPos \lastTickCount sliderUpdate mmGetTickCount closed getTickCount mmGetTickCount myParent whatTick mmGetTickCount ,3clipRef stopped thumb playing USER.EXE paused \lastTickCount status s_tmp_bnds thumb updateMedia buttonDown newPos myStage myClip milliseconds ,3clipRef _seekClip whatStage updateMedia autoPlayMedia currentWin sliderUpdate preLoadMedia -3clipRef autoCloseMedia lQautoShowMedia stageSizing HautoPlayMedia (hopenClip whatStage myParent <+currentStage autoShowMedia myMode preLoadMedia myViewer mediaSizing whatWin kautoCloseMedia preLoadMedia sliderUpdate currentObj buttonclick bookref stbk_oldCursor tbk_bookRef resize mouseenter stbk_oldCursor mouseleave tbk_selectobject tbk_deleteObject tbk_setROP2 <4tbk_createPen B}tbk_getDC propGroup nameLabel getsystemmetrics tbk_linkDrawFuncs getsystemmetrics 'tbk_releaseDC oldROP2 hOldObject leftbound rightBound valueLabel edrawLine propValue propName buttondown fromPoint tbk_lineto toPoint tbk_moveto drawLine propgroup placement propgroup valueLabel nameLabel ?propValue propName placement sized moved ,%H.% objRef parentbounds myObjs whatStage adjustcontrols initDialog enterPage [do_buttonDown editorScripts s_anim_PathObject buttonDown do_dragging editorScripts default s_anim_PathObject buttonStillDown do_endDrag editorScripts s_anim_PathObject buttonUp do_curveVertice editorScripts s_anim_PathObject buttonDoubleClick do_keyDown editorScripts s_anim_PathObject keyDown ,!J(" keyUp theTarget setCursor mouseEnter theTarget setCursor mouseLeave reader editorScripts moveVertex vertexPosition vertexPosition |.verticeCount theVertices verticeCount integer s_anim_animationSettings spinUp integer s_anim_animationSettings spinDown sliderMax button integer BottomBar slider s_anim_animationSettings buttonUp sliderMax BottomBar slider s_anim_animationSettings leaveField selectObject aborted $offsetPathBy s_anim_idleAnimations vertexPosition ZstopAnimation theVertices s_anim_animationSettings compilePath selectionHandles s_anim_PathObject startSliderMove currentTime jumpToStep s_anim_animationSettings s_anim_CurrentObject sliderMove updateCel jumpToStep .&, " 1+U!8 updateCel enterPage leavePage leaveBackground sliderMax sliderMin curPos thumb sliderPos usliderPageSize sliderMax thumbBounds sliderBounds sliderMin sliderPos slider slider_mode nearestPupp nearestPUPP pageSlider pageSlider slider_mode buttondown pageSlider buttonstilldown pageSlider slider_mode buttondoubleclick slider_mode buttonup .isChild ,toggleInvert [ebuttonPressed buttonUp \ebuttonPressed ,toggleInvert buttonDown .isChild ,toggleInvert buttonStillDown invertedButton invertedButton toggleInvert FALSE group isChild initDialog enterPage [do_buttonDown editorScripts s_anim_PathObject buttonDown do_dragging editorScripts default s_anim_PathObject buttonStillDown do_endDrag editorScripts s_anim_PathObject buttonUp do_curveVertice editorScripts s_anim_PathObject buttonDoubleClick do_keyDown editorScripts s_anim_PathObject keyDown ,!J(" keyUp theTarget setCursor mouseEnter theTarget setCursor mouseLeave reader editorScripts moveVertex vertexPosition vertexPosition |.verticeCount theVertices verticeCount propname textscrolled false ^-adjustscroll buttondown false ^-adjustScroll buttonstilldown ^-adjustScroll buttonup false ^-adjustScroll keyDown false uprops \updateBrowser ^-adjustScroll Tsetprop stbk_curOb <Neu> propName keyup .&, " .&+ + false otherField updateHeader propname adjustScroll .&, " Die Einzelbild-Frequenz sollte auf folgenden Wert ge ndert werden: newRate Variable smooth s_anim_animationSettings Sekunden. so da die Animation den Endpunkt genau bei folgendem Sekundenwert erreicht: &Aktuelle Einstellung beibehalten Die Animation l uft glatter, wenn die Einzelbildfrequenz auf folgenden Wert festgelegt wird buttonClick V, #> sftsSetFile _9updateStatus contextLine Options `/ftsListToTextline booksLeft pgKeywords clean kfieldData oldRSB CREATE itemNumber kwLine sftsValidObs bookCount sftsBooks sftsKeywords lines includeBooks sftsMainBk Keywords sftsHwtags sftsContexts aftsFileExists sftsSections field,recordField,button,comboBox tbk_bookRef dialog Die Einstellungen werden gelesen oldPageRef CONC_SECTION FALSE *ftsGetIniVar sftsVRef context sections numLines Contexts KEYFIELDS updateFile _9updateStatus nwalkAllObjects Durchsuchen sftsValidObs oldRSB oldPageRef ist im Begriff, das Buch zu durchsuchen bookCount Fertig. booksLeft oldPageRef oldRSB sftsVRef nextBook ,%H.% .&, " ,%H.% ftsContext walkObjects ]ftsInsertLine sftsKeywords ftsKeywords sftsContexts walkAllObjects -#, 7 RecordField hwtag obRef sftsSections Durchsuchen Background sftsValidObs itemNumber hwtag obRef curObjType sftsContexts objList sftsHwtags bookRef backgrounds sftsKeywords recFieldCount backIndex sftsVRef recIndex tlist curObj objecttoWalk ftsSection sftsSections sftsValidObs sftsLpMsg Field ]ftsInsertLine recIndex Hotword ftsSection curObjType ftsTag sftsHwtags ftsSection recordField _9updateStatus field walkObjects statusbar sftsVRef updateStatus obName 1, #> ,%H.% fileList fullName included books ftsSetPage ToolBook-Dateien hinzuf ToolBook-B cher (*.TBK),*.tbk,ToolBook-Systemb cher (*.SBK),*.sbk pathAndName sftsKwNum filterList sftsMainBk ftsGetFileListDlg bkName splitPath YaddBooks files buttonClick Bwritescripts buttonup 1, #? ,%H.% of obj set p_ -- Diese Skripten wurden von einer anderen Behandlungsroutine geschrieben. dropDownItems script customColors stepline recordField set lst_ clear chars (cnt-1) to cnt of txt of this book to commandWindow return txt writeLine -- liefert die Werte von curObType set cnt to charCount(txt) local txt stepline curOb curLists curObType executionBuffer curProps systemProps &crlf after txt executionBuffer to get f_ Eigenschaften. Wurde der Geschwindigkeit halber im Programmcode geschrieben. tmp.txt of (words 1 to 3 of obj) textline 1 of richText props writeScripts writeLine " & CRLF & " cleanString .&+ + GappList tb30DOS.dll fileExists appList initDlg shortName iconDisplay exe icon fileExists thisBook newResource newIcon nameFromPath default icon tbk_bookRef buttonRef showIcon appList fileExists mtb30.exe appStuff Das Buch wurde nicht gefunden In der ToolBook.ini-Datei sind keine Anwendungen eingerichtet. File not found. appName 06cleanup runApp 06cleanup cancel iconDisplay itemoffset thisBook default icon,Property browser,exe icon,wait,info curIcon buttonRef iconName cleanup .&, " slash curChar nameFromPath +!GlobalAlloc tbk_GlobalAlloc GlobalFree tbk_GlobalFree GlobalHandle tbk_GlobalHandle ,"T, #?-# GlobalLock tbk_GlobalLock , #.B GlobalUnlock tbk_GlobalUnlock GetPrivateProfileString tbk_GetIniInfo , Ticon-" ttbk_linkIniFileFuncs KERNEL .iniFile r1tbk_freeWinPointer Add on Tools ihtbk_GetIniInfo tbk_getWinPointer appList cancel keychar ,%H.% itemOffset ,%H.% false turnPage ftsLinkPage slide left,right,top,bottom left,right left,right,top,bottom,lowerLeft,lowerRight,upperLeft,upperRight spiral horizontal,vertical destlabel split selectChange sftsSetFile secName sftsSections CONC_SECTION choice `/ftsListToTextline object itemNumber newSec ftsSection CREATE objNm [Kein] *ftsGetIniVar exclude ftsExclude initPage cancel keyDown .&+ + sysHistoryRecord pageHeight 6getToolBookIniItem sBooksWithPath readerRightClick ToolBook section fileAndDir sysRuler initEnabled false sysbooks sBooks puToInches updatePath metric sysHotwordsShown startupReaderRightClick showHotwords recordHistory Startup Preferences remove showRulers pageWidth units initpage 1, #> fileAndDir .&, " pathinfo .&, " fileinfo w, #> .&, " 1, #> sysHistoryRecord pageHeight readerRightClick ToolBook Startup Preferences =@setToolBookIniItem sysRuler 9\fileinfo gpathinfo sysbooks section inchesToPu showHotwords startupReaderRightClick recordHistory sysHotwordsShown tabloc showRulers pageWidth bookname updateIni sysPolygonShape patternGroup sysStrokeColor sysFillColor showGrid drawDirect solidFill false 6getToolBookIniItem sysGridSnap 0,100,0 sysGridSpacing 0,0,0 sysPattern section puToInches metric fcolor polygonShape Startup Preferences snapToGrid gridSpacing pttrn scolor units sysGrid initpage sysPolygonShape patternGroup sysFillColor showGrid =@setToolBookIniItem drawDirect sysStrokeColor sysGridSnap sysGridSpacing pttrn section inchesToPu fcolor polygonShape Startup Preferences snapToGrid gridSpacing scolor sysGrid sysPattern updateIni cancel keyDown extSz speed other page previous in,out selOb slide page id tgtPg |EftsLink newHW Normal trans +nrmlSz target page fast,slow,normal ftsTrans transition initlink w, #? w, #? w, #> next page linkButtonScript speed &Hyperlink previous previous page to handle ftsHyperLink new page page id newHW transition linkBookScript }EftsLink bookScr trans ftsTrans selOb other page savelink -- link gibt die Zielseite der Verkn pfung an end when link = "previous page" link = next page when link = "next page" else transition trans to link -- trans gibt den bergangstyp an -- verarbeitet die Hyperlink-Verkn pfung link = previous page end ftsHyperlink go to link conditions if trans <> null to handle ftsHyperlink link,trans linkBookScript end buttonClick -- Zielseite und bergangstyp send ftsHyperLink my ftsLink,my ftsTrans to handle buttonClick -- ftsLink und ftsTrans sind Benutzereigenschaften -- sendet eine Botschaft an das Buch, um den Seitenwechsel zu verarbeiten linkButtonScript ftsLinkPage C Z>{ llplayClip DystopClip ,3clipRef playing status buttonClick showWidgetsProps ,3clipRef EushowClip mmYieldApp preLoadMedia mmWidgetSysBook (hopenClip HautoPlayMedia llplayClip kQautoShowMedia ,3clipRef TB30WIN.DLL AUTHOR enterPage mmWidgetSysBook kautoCloseMedia closeClip ,3clipRef AUTHOR leavePage myClip ,3clipRef playClip .&+ +E .&+ +E myClip ,3clipRef openClip ,3clipRef closeClip ,3clipRef pauseClip ,3clipRef stopClip myClip ,3clipRef showClip ,3clipRef Z>isReady seekClip ,3clipRef Z>isReady seekClipFromEnd myClip stepSize ,3clipRef m{stepDist Z>isReady stepClip myClip stepSize ,3clipRef m{stepDist Z>isReady stepClipBack FALSE playingpausedstopped isReady myClip setMySize newClip mediaSizing setMySize mediaSizing stretchStage ,3clipRef setMySize tb30win.dll qhlstorgb regular tb30dlg.dll bold,italic ChooseFontDlg pageref HLStoRGB rgbtohls bold italic initcol FchooseFontDlg setupstring retval scolor qrgbtohls drawing buttonclick MySize BREAKS C&File &Open... Ctrl+O &Save Ctrl+S Save &As... saveas &Import... import &Export... export Print Set&up... printsetup &Print Pages... Ctrl+P printpages Prin&t Report... printreport Send &Mail... sendmail &Run... E&xit Alt+F4 &Edit &Undo Ctrl+Z Cu&t Ctrl+X &Copy Ctrl+C &Paste Ctrl+V paste C&lear Del clear Select &All Shift+F9 selectall Select Pa&ge Shift+F12 selectpage &Size to Page F11 sizetopage F&ind... F5 search Re&place... replace Aut&hor F3 author &Text &Character... F6 character &Paragraph... F7 paragraph &Regular Ctrl+Space regular &Bold Ctrl+B &Italic Ctrl+I italic &Underline Ctrl+U underline Stri&keout Ctrl+K strikeout Superscrip&t/Subscript super/subscript &Normal Script normalscript Su&bscript Ctrl+L subscript Su&perscript Ctrl+Shift+L superscript &Show Hotwords F9 showhotwords &Page &Next Alt+Right &Previous Alt+Left previous &First Alt+Up first &Last Alt+Down &Back Shift+F2 &History... Ctrl+F2 history N&ew Page Ctrl+N newpage &Help &Contents F1 contents Status &Bar F12 statusbar wwwwwwwwwwwp wpwwwwwwwwwwwp wpwwwwwwwwwwwp wpwwwwwwwwwwwp wwwwwwwwwwwp wwwwwwwwwwwwwp fffffffffff` fffffffffff` fffffffffff` wwwwp xxxpx wwwwwpp wwwwwwp pwwwwwwp wwwwwwp wwwwwwwwwwwwww wwwwwwwwwwwwww wwwwwwwwwwwwww wwwwwwwwwwwwww wwwwwwwwwwwwww wwwwwwwwwwwwww wwwwwwwwwwwwww wwwwwwwwwwwwww wwwwwwwwwwwwww wwwwwwwwwwwwww wwwwwwwwwwwwww wwwwwwwwwwwwww wwwwwwwwwwwwww wwwwwwwwwwwwww wwwwwwwwwwwwww ffffffffffffff ffffffffffffff ffffffffffffff DDDDDD@ DDDDDDDD@ DDDDD DDDD@ DDDDD DDDD@ DDDDDD DDDDD DDDDDD DDDDD DDDDDD DDDDD DDDDDD DDDDD@ DDDDDD DDDDD@ DDDDDD DDDDD@ DDDDDD DDDDD@ DDDDDD DDDDD@ DDDDDD DDDDD@ DDDDDD DDDDD@ DDDDO DDDDD@ DDDDO DDDDD DDDDDDDDDDDDDD DDDDDDDDDDDDDD DDDDD DDDDD@ DDDDO DDDD@ property browser default icon exe icon wwwwwwp wwwwwwp wwwwwwwww wwwwwwwwww wwwwwwwwww wwwwwwwwp wwwwwwwwp wwwwwwwwp wwwwwwwwp wwwwwpx wpwwwwwx pxxxxxp wrwww w"'ww r'"ww "wr'w 'ww"w wwwr' wwww" wwwwr wxwww wwwwx wwwww wwwww wwwww wwwww wwwww wwwww wwwww wwwww wwwww wwwww wwwww wwwww wwwww wwwww wwwww wpwwww pwpww wpwwww wwwww wwwwwp wwwwp wwwwp wwwwp wwwwwwwwww ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffgwww` gsww` b"""` eUUU` c333` ffff` c133` gwwwffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff` wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww 333wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww 33Dwp wwwwx wwwwwwx wwwwwwwwwwwwwwwwwwwwx wwwwwww wwwwwwwwwwwwwwwww wwwwp wwwwx wwwwwp wwwwx wwwwwp wwwwx wwwwwp wwwwx wwwwwp wwwwwwwwwx wwwwwwwww wwwwwwwwwx wwwwwwwwwwwp wwwwwwwwwwwp wwwwwwwwwwwp wwwwwwwwwwwp ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffgwww` gsww` b"""` eUUU` c333` ffff` c133` gwwwffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff` 333wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww w333w 333wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww 333wp 333wwwwx wwwwwwx wwwwwwwwwwwwwwwwwwwwx wwwwwww333 wwwwwwwwwwwwwwwww wwwwp wwwwx wwwwwp wwwwx wwwwwp wwwwx wwwwwp wwwwx wwwwwp wwwwwwwww wwwwwwwww wwwwwwwww wwwwwwwwwwwp wwwwwwwwwwwp wwwwwwwwwwwp wwwwwwwwwwwp wwwwp wwwww wwwwwp wwwwwwwwwwwwwwwww wwwwwww wwwwww wwwww wwwww wwwwww wwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwww wwwwww wwwww wwwww wwwwww wwwwwwwwwwwwwwwwwwwwww wwwwwwwwww wwwwwp wwpwwwpwww wwwwwwwwww wwwww wwpwywpwww wwwywwwwww wwxwwwxwww wwwww wwwwwwwww ywwwwwwwww wwwwwwww wwwwwww wwywwwwwww wwwwww wwwwww wwwww wwwwy wwwww wwwwwyw wwwwww wwwwww wwwwwwwww wwwwwwww wwwwwww wwwwwww wwwwww wwwwww wwwww wwwwx wwwww wwwwwx wwwwww wwwwwwx wwwwwwwwww wwwwwwwwww wwwwwwwwww wwwwwwwwww wwwwwwwwww wwwwwwww xxwwwwwwww xxwwwwwwww wxwwwwwwww wwwwwwwwww wwwww wwwww wwwwww wwwwww wwwww wwwww wwwww wwwwwy wwwwww wwwwww wwwwwp wwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwww wwwwww wwwww wwwww wwwwww wwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwww wwwwww wwwww wwwww wwwwww wwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwxwwxwwww wwwwxwwxwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwxx wwwwxp wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwww wwwwww wwwww wwwww wwwwww wwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwww wwwwww wwwww wwwww wwwwww wwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwxwwxwwww wwwwxwwxwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwxx wwwwxp wwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwww mmc_pause mmc_pause_d mmc_stop mmc_stop_d mmc_play mmc_play_d mmc_ff mmc_ff_d mmc_step_f mmc_stepf_d mmc_rw mmc_rw_d mmc_stepb mmc_stepb_d mmc_play mmc_play_d mmc_pause mmc_pause_d mmc_stop mmc_stop_d mmc_ff mmc_ff_d mmc_step_f mmc_stepf_d mmc_rw mmc_rw_d mmc_stepb mmc_stepb_d skull flourish 1 flourish 2 resize vertex linevertex remove activeWindowHandle caretLocation focus focusWindow mainWindow selectedText selectedTextState selection startup3DInterface startupAutoScriptFile startupBook startupDrawDirect startupHeight startupReaderRightClick startupSysBooks startupUnits startupWidth sys3DInterface sysAlignment sysAutoScriptFile sysBooks sysCentered sysChangesDB sysClientHandle sysCountry sysCurrency sysCursor sysDate sysDateFormat sysDrawDirect sysError sysErrorNumber sysEvening sysFillColor sysFontFace sysFontSize sysFontStyle sysGrid sysGridSnap sysGridSpacing sysHistory sysHistoryRecord sysHotwordsShown sysICountry sysICurrDigits sysICurrency sysIDate sysIDigits sysILZero sysIMeasure sysIndents sysINegCurr sysITime sysITLZero sysLanguage sysLevel sysLineEndSize sysLineEndStyle sysLineSpacing sysLineStyle sysList sysLongDate sysMagnification sysMediaBreakKey sysMediaSuspend sysMMEngineVersion sysMorning sysMousePosition sysNumberFormat sysOpenMedia sysOperatingSystem sysOptimizedSave sysPageScroll sysPageUnitsPerPixel sysPasswords sysPattern sysPolygonShape sysReaderRightClick sysRGBFill sysRGBStroke sysRuler sysRuntime sysShortDate sysShowMRUfiles sysStrokeColor sysSupportedMedia sysSuspend sysSuspendMessages sysTabType sysTabSpacing sysThousand sysTime sysTimeChar sysTimeFormat sysTool sysTransparent sysUnits sysUseWindowsColors sysVersion sysWindowHandle target targetWindow 0,2,2,25,0 0,2,1,32,0 0,2,0,56,0 0,0,0,62,90 0,0,9,36,50 0,0,1,31,100 19,1,0,62,90 20,0,9,51,30 20,0,0,62,90 27,1,0,62,90 30,0,0,62,90 30,0,9,51,30 30,1,1,31,100 37,1,0,62,90 38,0,2,55,50 39,0,2,58,50 40,0,9,42,50 40,0,2,62,50 40,0,1,38,100 47,1,0,62,90 60,0,9,51,30 60,0,0,62,90 67,1,0,62,90 70,0,0,62,90 70,1,1,38,100 70,0,9,51,30 77,1,0,62,90 80,0,1,31,100 80,0,9,36,50 80,0,0,62,90 88,1,0,62,90 100,0,9,51,30 100,0,0,55,90 105,1,1,31,100 109,1,0,55,90 110,0,9,51,30 119,0,2,62,25 120,0,2,55,25 120,0,9,42,50 120,0,1,38,100 120,0,0,58,90 121,0,2,58,25 131,1,0,58,90 140,0,9,51,30 140,0,0,62,90 145,1,1,38,100 150,1,0,62,90 150,0,9,51,30 160,0,9,36,50 160,0,1,29,100 160,0,0,60,90 175,1,0,60,90 180,0,0,60,90 180,0,9,51,30 185,1,1,29,100 187,1,0,60,90 190,0,0,60,90 190,0,9,51,30 197,1,0,60,90 198,0,2,53,25 199,0,2,57,25 200,0,0,60,90 200,0,1,36,100 200,0,2,60,25 200,0,9,42,50 210,1,0,60,90 220,0,9,51,30 220,0,0,60,90 225,1,1,36,100 226,1,0,60,90 230,0,0,60,90 230,0,9,51,30 235,1,0,60,90 240,0,1,29,100 240,0,0,60,90 240,0,9,36,50 250,1,0,60,90 260,0,0,53,90 260,0,9,51,30 265,1,1,29,100 269,1,0,53,90 270,0,9,51,30 278,0,2,53,25 279,0,2,57,25 280,0,9,42,50 280,0,2,60,25 280,0,1,26,100 280,0,0,57,90 291,1,0,57,90 300,0,9,51,30 300,0,0,60,90 305,1,1,26,100 310,1,0,60,90 310,0,9,51,30 320,0,1,31,100 320,0,9,36,50 320,0,0,62,90 335,1,0,62,90 340,0,0,62,90 340,0,9,51,30 345,1,1,31,100 346,1,0,62,90 350,0,9,51,30 350,0,0,62,90 357,1,0,62,90 358,0,2,55,25 359,0,2,58,25 360,0,1,38,100 360,0,0,62,90 360,0,2,62,25 360,0,9,42,50 369,1,0,62,90 380,0,0,62,90 380,0,9,51,30 385,1,1,38,100 385,1,0,62,90 390,0,0,62,90 390,0,9,51,30 396,1,0,62,90 400,0,0,62,90 400,0,1,31,100 400,0,9,36,50 415,1,0,62,90 420,0,0,64,90 420,0,9,51,30 425,1,1,31,100 430,0,9,51,30 435,1,0,64,90 438,0,2,55,25 439,0,2,58,25 440,0,0,65,96 440,0,2,62,25 440,0,9,42,50 440,0,1,38,100 455,1,0,65,90 455,1,1,38,100 460,0,0,67,100 460,0,9,51,30 470,0,9,51,30 475,1,0,67,90 480,0,0,65,90 480,0,1,29,100 480,0,9,36,50 495,1,0,65,90 500,0,9,51,30 500,0,0,62,90 510,0,9,51,30 510,1,1,29,100 514,1,0,62,90 518,0,2,50,25 519,0,2,53,25 520,0,9,42,50 520,0,2,57,25 520,0,0,60,90 520,0,1,26,100 533,1,1,26,100 534,1,0,60,90 540,0,1,29,100 540,0,0,57,90 540,0,9,51,30 550,0,9,51,30 553,1,1,29,100 554,1,0,57,90 557,1,9,51,30 560,0,2,55,25 560,0,9,36,50 560,0,0,55,90 560,0,2,50,25 560,0,9,49,45 560,0,9,46,50 560,0,1,31,100 560,0,2,43,25 590,1,1,31,100 594,1,0,55,90 598,0,2,43,25 599,0,2,55,25 600,0,0,55,90 600,0,9,46,50 600,0,9,36,50 600,0,9,49,45 600,0,2,50,25 600,0,1,31,100 630,1,9,46,50 630,1,1,31,100 630,1,2,55,25 630,1,2,43,25 630,1,2,50,25 630,1,9,49,45 634,1,0,55,90 stuff 120,25.125,100 0,0,0 0,0,0 strChecked strChecked strChecked character buttonclick buttonclick strChecked Zei&chen: character strChecked strChecked E&rste Zeile: in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked firstLine decimal ftype strChecked 0.000002333333333e-002 strChecked Von &links: in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked fromLeft decimal ftype strChecked 0.000002333333333e-002 strChecked &Von rechts: in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked fromRight decimal ftype strChecked 0.000002333333333e-002 strChecked &Ausrichtung: alignment strChecked Linkss Links Rechts strChecked Ze&ilenabstand: linespacing strChecked Einzeiligg Einzeilig 1 1/2 Zweizeilig strChecked &Tabulatoren tabbuttons decimalTabs leftTabs tType Decimal leftTabs tType tType value B"leftTabs" B"decimalTabs" "Left" "Decimal" strChecked leftTabs strChecked Linke Ta&bulatoren decimalTabs strChecked &Dezimaltabulatoren strChecked Ab&stand: units strChecked strChecked strChecked strChecked strChecked in,ms ThreeDeeRect strChecked bottomLine strChecked topLine strChecked tabSpacing decimal ftype strChecked 0.5001 Einzug System stylebuttons borderbuttons NthreeDeeStyle updateSample sample border initDlg stylebuttons border borderButtons threeDeeRect inorout Nthreedeestyle border sample updatesample cancel keychar cancel stylebuttons border borderButtons sEreturnstring inorout Nthreedeestyle border ttbk_linkIniFileFuncs false folder system tbk_bookRef ainitpage J,tabmode drawing enterBackground metric retval putoInches roundtoNearestN metric inchestoPu roundtoNearestN decimal ftype 0123456789 keychar decimal ftype leavefield color script cheader boolean textheader custom multiLine dialog headertype cheader textheader fheader maxlines display kdataType formats buttonClick /R/I/T/C/ [yy]yy:mm:dd dateFormats kdataType dd:mm:[yy]yy mm:dd:[yy]yy formats initType CelAnimation stepsPerCel forever FALSE FixedPath group StepsPerCel integer ShowAllSteps s_anim_animationSettings s_anim_CurrentObject duration steps updateSettings close keyDown updateSettings enterPage leavePage leaveBackground \lastTickCount enterpage USER.EXE mmGetTickCount leavePage myClip milliseconds $setPos \lastTickCount sliderUpdate mmGetTickCount closed getTickCount mmGetTickCount myParent whatTick mmGetTickCount ,3clipRef stopped thumb playing USER.EXE paused \lastTickCount status s_tmp_bnds thumb updateMedia buttonDown newPos myStage myClip milliseconds ,3clipRef _seekClip whatStage updateMedia autoPlayMedia currentWin sliderUpdate preLoadMedia -3clipRef autoCloseMedia lQautoShowMedia stageSizing HautoPlayMedia (hopenClip whatStage myParent <+currentStage autoShowMedia myMode preLoadMedia myViewer mediaSizing whatWin kautoCloseMedia preLoadMedia sliderUpdate currentObj buttonclick bookref stbk_oldCursor tbk_bookRef resize mouseenter stbk_oldCursor mouseleave tbk_selectobject tbk_deleteObject tbk_setROP2 <4tbk_createPen B}tbk_getDC propGroup nameLabel getsystemmetrics tbk_linkDrawFuncs getsystemmetrics 'tbk_releaseDC oldROP2 hOldObject leftbound rightBound valueLabel edrawLine propValue propName buttondown fromPoint tbk_lineto toPoint tbk_moveto drawLine propgroup placement propgroup valueLabel nameLabel ?propValue propName placement sized moved ,%H.% objRef parentbounds myObjs whatStage adjustcontrols initDialog enterPage [do_buttonDown editorScripts s_anim_PathObject buttonDown do_dragging editorScripts default s_anim_PathObject buttonStillDown do_endDrag editorScripts s_anim_PathObject buttonUp do_curveVertice editorScripts s_anim_PathObject buttonDoubleClick do_keyDown editorScripts s_anim_PathObject keyDown ,!J(" keyUp theTarget setCursor mouseEnter theTarget setCursor mouseLeave reader editorScripts moveVertex vertexPosition vertexPosition |.verticeCount theVertices verticeCount integer s_anim_animationSettings spinUp integer s_anim_animationSettings spinDown sliderMax button integer BottomBar slider s_anim_animationSettings buttonUp sliderMax BottomBar slider s_anim_animationSettings leaveField selectObject aborted $offsetPathBy s_anim_idleAnimations vertexPosition ZstopAnimation theVertices s_anim_animationSettings compilePath selectionHandles s_anim_PathObject startSliderMove currentTime jumpToStep s_anim_animationSettings s_anim_CurrentObject sliderMove updateCel jumpToStep .&, " 1+U!8 updateCel enterPage leavePage leaveBackground sliderMax sliderMin curPos thumb sliderPos usliderPageSize sliderMax thumbBounds sliderBounds sliderMin sliderPos slider slider_mode nearestPupp nearestPUPP pageSlider pageSlider slider_mode buttondown pageSlider buttonstilldown pageSlider slider_mode buttondoubleclick slider_mode buttonup .isChild ,toggleInvert [ebuttonPressed buttonUp \ebuttonPressed ,toggleInvert buttonDown .isChild ,toggleInvert buttonStillDown invertedButton invertedButton toggleInvert FALSE group isChild initDialog enterPage [do_buttonDown editorScripts s_anim_PathObject buttonDown do_dragging editorScripts default s_anim_PathObject buttonStillDown do_endDrag editorScripts s_anim_PathObject buttonUp do_curveVertice editorScripts s_anim_PathObject buttonDoubleClick do_keyDown editorScripts s_anim_PathObject keyDown ,!J(" keyUp theTarget setCursor mouseEnter theTarget setCursor mouseLeave reader editorScripts moveVertex vertexPosition vertexPosition |.verticeCount theVertices verticeCount propname textscrolled false ^-adjustscroll buttondown false ^-adjustScroll buttonstilldown ^-adjustScroll buttonup false ^-adjustScroll keyDown false uprops \updateBrowser ^-adjustScroll Tsetprop stbk_curOb <Neu> propName keyup .&, " .&+ + false otherField updateHeader propname adjustScroll .&, " Die Einzelbild-Frequenz sollte auf folgenden Wert ge ndert werden: newRate Variable smooth s_anim_animationSettings Sekunden. so da die Animation den Endpunkt genau bei folgendem Sekundenwert erreicht: &Aktuelle Einstellung beibehalten Die Animation l uft glatter, wenn die Einzelbildfrequenz auf folgenden Wert festgelegt wird buttonClick V, #> sftsSetFile _9updateStatus contextLine Options `/ftsListToTextline booksLeft pgKeywords clean kfieldData oldRSB CREATE itemNumber kwLine sftsValidObs bookCount sftsBooks sftsKeywords lines includeBooks sftsMainBk Keywords sftsHwtags sftsContexts aftsFileExists sftsSections field,recordField,button,comboBox tbk_bookRef dialog Die Einstellungen werden gelesen oldPageRef CONC_SECTION FALSE *ftsGetIniVar sftsVRef context sections numLines Contexts KEYFIELDS updateFile _9updateStatus nwalkAllObjects Durchsuchen sftsValidObs oldRSB oldPageRef ist im Begriff, das Buch zu durchsuchen bookCount Fertig. booksLeft oldPageRef oldRSB sftsVRef nextBook ,%H.% .&, " ,%H.% ftsContext walkObjects ]ftsInsertLine sftsKeywords ftsKeywords sftsContexts walkAllObjects -#, 7 RecordField hwtag obRef sftsSections Durchsuchen Background sftsValidObs itemNumber hwtag obRef curObjType sftsContexts objList sftsHwtags bookRef backgrounds sftsKeywords recFieldCount backIndex sftsVRef recIndex tlist curObj objecttoWalk ftsSection sftsSections sftsValidObs sftsLpMsg Field ]ftsInsertLine recIndex Hotword ftsSection curObjType ftsTag sftsHwtags ftsSection recordField _9updateStatus field walkObjects statusbar sftsVRef updateStatus obName 1, #> ,%H.% fileList fullName included books ftsSetPage ToolBook-Dateien hinzuf ToolBook-B cher (*.TBK),*.tbk,ToolBook-Systemb cher (*.SBK),*.sbk pathAndName sftsKwNum filterList sftsMainBk ftsGetFileListDlg bkName splitPath YaddBooks files buttonClick Bwritescripts buttonup 1, #? ,%H.% of obj set p_ -- Diese Skripten wurden von einer anderen Behandlungsroutine geschrieben. dropDownItems script customColors stepline recordField set lst_ clear chars (cnt-1) to cnt of txt of this book to commandWindow return txt writeLine -- liefert die Werte von curObType set cnt to charCount(txt) local txt stepline curOb curLists curObType executionBuffer curProps systemProps &crlf after txt executionBuffer to get f_ Eigenschaften. Wurde der Geschwindigkeit halber im Programmcode geschrieben. tmp.txt of (words 1 to 3 of obj) textline 1 of richText props writeScripts writeLine " & CRLF & " cleanString .&+ + GappList tb30DOS.dll fileExists appList initDlg shortName iconDisplay exe icon fileExists thisBook newResource newIcon nameFromPath default icon tbk_bookRef buttonRef showIcon appList fileExists mtb30.exe appStuff Das Buch wurde nicht gefunden In der ToolBook.ini-Datei sind keine Anwendungen eingerichtet. File not found. appName 06cleanup runApp 06cleanup cancel iconDisplay itemoffset thisBook default icon,Property browser,exe icon,wait,info curIcon buttonRef iconName cleanup .&, " slash curChar nameFromPath +!GlobalAlloc tbk_GlobalAlloc GlobalFree tbk_GlobalFree GlobalHandle tbk_GlobalHandle ,"T, #?-# GlobalLock tbk_GlobalLock , #.B GlobalUnlock tbk_GlobalUnlock GetPrivateProfileString tbk_GetIniInfo , Ticon-" ttbk_linkIniFileFuncs KERNEL .iniFile r1tbk_freeWinPointer Add on Tools ihtbk_GetIniInfo tbk_getWinPointer appList cancel keychar ,%H.% itemOffset ,%H.% false turnPage ftsLinkPage slide left,right,top,bottom left,right left,right,top,bottom,lowerLeft,lowerRight,upperLeft,upperRight spiral horizontal,vertical destlabel split selectChange sftsSetFile secName sftsSections CONC_SECTION choice `/ftsListToTextline object itemNumber newSec ftsSection CREATE objNm [Kein] *ftsGetIniVar exclude ftsExclude initPage cancel keyDown .&+ + sysHistoryRecord pageHeight 6getToolBookIniItem sBooksWithPath readerRightClick ToolBook section fileAndDir sysRuler initEnabled false sysbooks sBooks puToInches updatePath metric sysHotwordsShown startupReaderRightClick showHotwords recordHistory Startup Preferences remove showRulers pageWidth units initpage 1, #> fileAndDir .&, " pathinfo .&, " fileinfo w, #> .&, " 1, #> sysHistoryRecord pageHeight readerRightClick ToolBook Startup Preferences =@setToolBookIniItem sysRuler 9\fileinfo gpathinfo sysbooks section inchesToPu showHotwords startupReaderRightClick recordHistory sysHotwordsShown tabloc showRulers pageWidth bookname updateIni sysPolygonShape patternGroup sysStrokeColor sysFillColor showGrid drawDirect solidFill false 6getToolBookIniItem sysGridSnap 0,100,0 sysGridSpacing 0,0,0 sysPattern section puToInches metric fcolor polygonShape Startup Preferences snapToGrid gridSpacing pttrn scolor units sysGrid initpage sysPolygonShape patternGroup sysFillColor showGrid =@setToolBookIniItem drawDirect sysStrokeColor sysGridSnap sysGridSpacing pttrn section inchesToPu fcolor polygonShape Startup Preferences snapToGrid gridSpacing scolor sysGrid sysPattern updateIni cancel keyDown extSz speed other page previous in,out selOb slide page id tgtPg |EftsLink newHW Normal trans +nrmlSz target page fast,slow,normal ftsTrans transition initlink w, #? w, #? w, #> next page linkButtonScript speed &Hyperlink previous previous page to handle ftsHyperLink new page page id newHW transition linkBookScript }EftsLink bookScr trans ftsTrans selOb other page savelink -- link gibt die Zielseite der Verkn pfung an end when link = "previous page" link = next page when link = "next page" else transition trans to link -- trans gibt den bergangstyp an -- verarbeitet die Hyperlink-Verkn pfung link = previous page end ftsHyperlink go to link conditions if trans <> null to handle ftsHyperlink link,trans linkBookScript end buttonClick -- Zielseite und bergangstyp send ftsHyperLink my ftsLink,my ftsTrans to handle buttonClick -- ftsLink und ftsTrans sind Benutzereigenschaften -- sendet eine Botschaft an das Buch, um den Seitenwechsel zu verarbeiten linkButtonScript ftsLinkPage tb30win.dll qhlstorgb regular tb30dlg.dll bold,italic ChooseFontDlg pageref HLStoRGB rgbtohls bold italic initcol FchooseFontDlg setupstring retval scolor qrgbtohls drawing buttonclick findString scriptDisplay <null> objectRef selectChars replaceString initDlg sEreturnString sEreturnString Yes to All yestoAll sEreturnString cancel showWidgetsProps ,3clipRef mmwidget_controls adjustControls moved mmwidget_controls adjustControls sized EushowClip mmYieldApp preLoadMedia mmWidgetSysBook (hopenClip HautoPlayMedia llplayClip kQautoShowMedia ,3clipRef setClipControls TB30WIN.DLL AUTHOR enterPage mmWidgetSysBook kautoCloseMedia closeClip ,3clipRef AUTHOR leavePage myClip _jcheckStageSize ,3clipRef setClipControls whatStage stageObj playClip .&+ +E .&+ +E myClip _jcheckStageSize ,3clipRef openClip ,3clipRef closeClip ,3clipRef pauseClip ,3clipRef stopClip myClip ,3clipRef whatStage stageObj showClip ,3clipRef Z>isReady seekClip ,3clipRef Z>isReady seekClipFromEnd myClip stepSize ,3clipRef m{stepDist Z>isReady stepClip myClip stepSize ,3clipRef m{stepDist Z>isReady stepClipBack setClipControls mmNotify mmYieldApp pause clipStat seeking Nicht verarbeitet: paused ,3clipRef stopped playing closed setClipControls stage whatStage FALSE playingpausedstopped isReady mmwidget_controls adjustControls stretchStage whatStage stageObj checkStageSize myClip setMySize newClip mediaSizing whatStage setMySize mediaSizing myStage mmwidget_controls adjustControls stretchStage ,3clipRef whatStage setMySize llplayClip DystopClip ,3clipRef playing status buttonClick showWidgetsProps ,3clipRef EushowClip mmYieldApp preLoadMedia mmWidgetSysBook (hopenClip HautoPlayMedia llplayClip kQautoShowMedia ,3clipRef TB30WIN.DLL AUTHOR enterPage mmWidgetSysBook kautoCloseMedia closeClip ,3clipRef AUTHOR leavePage myClip ,3clipRef playClip .&+ +E .&+ +E myClip ,3clipRef openClip ,3clipRef closeClip ,3clipRef pauseClip ,3clipRef stopClip myClip ,3clipRef showClip ,3clipRef Z>isReady seekClip ,3clipRef Z>isReady seekClipFromEnd myClip stepSize ,3clipRef m{stepDist Z>isReady stepClip myClip stepSize ,3clipRef m{stepDist Z>isReady stepClipBack FALSE playingpausedstopped isReady myClip setMySize newClip mediaSizing setMySize mediaSizing stretchStage ,3clipRef setMySize = loc e= ls , s_anim_dx, s_anim_dy, t, s_anim_selectedVertex, nim_animationSettings[] showHandles t DIV 2 j = 1 s_anim_animationSettings[15] = 6] = do_enddrag /"editorScripts" ~("NE_", ~("NW_", ~("SE_", ~("SW_", ~("E_", ~("W_", ~("S", ~("N", objBounds = xMidPt = yMidPt = xHandleMidPt = sysPageUnitsPerPixel * 3 yHandleMidPt = +el * 3 --This handler translates the messages editor openWindow translateWindowMessage oclienthandle on 0x0020 setCursor on 0x0201 WM_LBUTTONDOWN /"editorScripts" "bottomBar" buttonClick shown setSize closeWindow 4s_anim_idleAnimations, s_anim_selectedTool, s_anim_CurrentObject 4s_anim_PathObject, s_anim_curvedVertices, s_anim_selectedVertex 4s_anim_dragging, s_anim_dx, s_anim_dy, s_anim_segLengthList, s_anim_pathdx, s_anim_pathdy 4s_anim_Objectdx, s_anim_objectdy, s_anim_lastLoc 4s_anim_animationSettings sets cursor either ,mode arrow cross hairs --depending on value sysTool. It also updates ToolPalette has been toggled hWnd, msg, hWndmsg, hitTest, mouseMessage = 0x0200 theTarget isObject( modeCursor( ocurrentPage) isOpen statusBar ) = "down" ) = " ) = " "vertex" 39 -- "lineVertex" "selectionHandles" "N_handle" "s_anim_handle" "NE_handle" "SW_handle" "SE_handle" "NW_handle" pathObjectID <> initDialog packDword s_hMidiOut s_stop MidiOutShortMsg noteOn playMIDI packDword s_hMidiOut s_stop MidiOutShortMsg chngProg changeProgram packDword s_hMidiOut s_stop noteOff MidiOutShortMsg stopMIDI s_device globalAlloc MidiOutOpen closeMIDI s_hMidiOut globalLock globalUnlock MidiOutGetNumDevs globalFree openMIDI s_device B%MidiOutClose s_hMidiOut u0MidiOutReset closeMIDI packDWord XuinitMidiMapper GlobalAlloc GlobalFree GlobalHandle GlobalLock GlobalUnlock startSong timeGetTime credits copenMidi skipDlgAnim uvinitSong mmSystem.dll KERNEL enterBackground ]stopMidiTimer closeMidi credits s_hMidiOut s_stop kernel mmSystem.DLL u0MidiOutReset s_songPointer leaveBackground globalUnlock globalAlloc globalFree globalLock s_chanOffset s_drumOffset \midimap.cfg TgetSystemDirectory midiMapper sysDir sysSize initMidiMapper s_lastSongPointer s_iPointer s_chanOffset s_song s_drumOffset s_aPointer initSong startSong midiReady w,!J2Y s_startTime FALSE s_stop startMIDITimer s_songPointer s_iPointer s_song ;getTime s_aPointer startSong stopMIDITimer midiTimer creditClient credits midiTimerID Gmidi_setTimer tbk_bookRef SetTimer midi_setTimer KillTimer midi_killTimer midiTimer startMidiTimer creditClient njmidi_killTimer midiTimerID midiTimer stopMidiTimer timerNotify midiTimer midiTimer s_startTime 9changeProgram s_lastSongPointer ianimateCredits 0,1,2,3,6,7,11,12,15,24,25,26,27,45,46 startSong ;getTime hplayMIDI l_songPointer aList credits s_stop Credits tbk_bookRef tstopMIDI s_iPointer |36|37|38|39|43|47|52|53|54|55|58|62|63|77| ]stopMIDITimer s_song s_songPointer s_aPointer timerNotify timeGetTime getTime .&+ +E , /E8 , /E8 , /E8 , /E8 , /E8 , /E8 , /E8 false Variable ,"lineVertices 1_curveVertices $<timedCurveVertices default 0.0000 hypotenuseFromVertices Constant curveLength compilePath 1,!Fl 1,!F: .&, " theDistance curveVertices timedCurveVertices 0.0000 lineVertices 1,!Fr curveLength hypotenuseFromVertices pathLength pntFromDistanceOnLine hypotenuseFromVertices tabPressed tabPressed tabname J,tabMode obtype tabNum buttonclick false etabLimit tabPressed myTabMode Tabulator kann nicht gesetzt werden tabMode tabLimit myTabMode tabMode mytabheight tabHeight myTabHeight tabHeight arrangeTabs myTabSpace tabSpace myTabSpace tabSpace w, #? manual false myNumTabs etabLimit arrangeTabs kann maximal Mindestens ein Tabulator mu vorhanden sein Tabulatoren haben numTabs mynumtabs numTabs manual tabRef mynumTabs tabLabel tabHighlight tabHeight arrangeTabs myNumTabs obtype highlight mytabheight sized w, #> myTabMode tname myNumTabs mytabspace anchor arrangeTabs goPage tablabel tabPressed tabname J,tabMode obtype tabNum buttonclick false etabLimit Cannot set tab tabPressed myTabMode tabMode tabLimit myTabMode tabMode mytabheight tabHeight myTabHeight tabHeight arrangeTabs myTabSpace tabSpace myTabSpace tabSpace w, #? manual false myNumTabs etabLimit Can only have Must have at least 1 tab arrangeTabs Tabulatoren haben numTabs mynumtabs numTabs manual tabRef mynumTabs tabLabel tabHighlight tabHeight arrangeTabs myNumTabs obtype highlight mytabheight sized w, #> myTabMode tname myNumTabs mytabspace anchor arrangeTabs 1LlastWin 1LlastWin previous 1LlastWin first 1LlastWin 1LlastWin background 1LlastWin newPage 1LlastWin obType script (Mehrfachauswahl) checkingSelection false 1LlastWin propGroup \updateBrowser buttons stbk_curOb headerType checkingSelection NBdisplay selection header checkSelection .&, " to propval 1LlastWin uprops firstLineOnly propval executionBuffer firstLineSpec propname textline 1 of Fehler beim Kompilieren des Skipts: <system> props setSysVar setProp varValue varName system = varValue setSysVar system varName sysVarValue w, #> showUserProps showProps Eigenschafts bersicht 1LlastWin uprops browser &Systemvariablen &Objekteigenschaften Sys&temeigenschaften tbk_bookRef &Benutzereigenschaften <system> props updateBrowser ,%H.% .&+ + propGroup false systemVars <Array> 1LlastWin curProp stbk_curOb obref <system> updateHeader obType <Neu> lists propvalue homebase vlist vValues false curProp stbk_curOb vNames propValue propName showUserProps ,%H.% system loc_i loc_vlist loc_vNames loc_vValues loc_ss <Array> 1LlastWin loc_ss propValue propName systemVars POtbk_wid_props cp_widget bookref tbk_bookRef w_propNames ,%H.% POtbk_wid_props propValues 2[f_widget bookref propNames propValues bookref tbk_bookRef w_propValues rptbk_wid_values tbk_bookRef lst_widget w_propListText .&+ + p$p_field 1pf_twoDGraphics lst_oneDgraphics RoundedRectangle B lst_hotword Background cp_oneDgraphics xp_twoDGraphics RecordField f_combobox m[f_oneDgraphics Button system obType p_oleObject PaintObject >f_group 4f_paintObject h!lst_combobox AngledLine Blst_oleObject Rectangle unlst_background f_background wp_button **f_stage ComboBox tbk_bookRef lst_twoDGraphics w_propListText <system> Viewer lst_group Gp_group #=p_paintObject propvalue tbk_wid_name updateHeader p_combobox f_field lst_window p_hotword (9w_propValues propValue obtype K/p_recordField Polygon w_propNames lst_stage lst_paintObject IrregularPolygon Group 2p_stage stbk_propTypes lst_systemProps propValues of_systemProps p_page 1LlastWin lst_recordField Field Picture f_oleObject klst_book `lst_page Ellipse lst_button bookref %xp_systemProps stbk_curOb p_book Hotword (Widget) propGroup Stage Curve obref f_hotword hof_button jtp_window f_book f_page lst_field p_background lf_window &f_recordField propName showProps ,%H.% itemOffset sizeToPage showWidgetsProps ,3clipRef mmwidget_controls adjustControls moved mmwidget_controls adjustControls sized EushowClip mmYieldApp preLoadMedia mmWidgetSysBook (hopenClip HautoPlayMedia llplayClip kQautoShowMedia ,3clipRef setClipControls TB30WIN.DLL AUTHOR enterPage mmWidgetSysBook kautoCloseMedia closeClip ,3clipRef AUTHOR leavePage myClip _jcheckStageSize ,3clipRef setClipControls whatStage stageObj playClip .&+ +E .&+ +E myClip _jcheckStageSize ,3clipRef openClip ,3clipRef closeClip ,3clipRef pauseClip ,3clipRef stopClip myClip ,3clipRef whatStage stageObj showClip ,3clipRef Z>isReady seekClip ,3clipRef Z>isReady seekClipFromEnd myClip stepSize ,3clipRef m{stepDist Z>isReady stepClip myClip stepSize ,3clipRef m{stepDist Z>isReady stepClipBack setClipControls mmNotify mmYieldApp pause clipStat seeking Nicht verarbeitet: paused ,3clipRef stopped playing closed setClipControls stage whatStage FALSE playingpausedstopped isReady mmwidget_controls adjustControls stretchStage whatStage stageObj checkStageSize myClip setMySize newClip mediaSizing whatStage setMySize mediaSizing myStage mmwidget_controls adjustControls stretchStage ,3clipRef whatStage setMySize showWidgetsProps ,3clipRef mmwidget_controls adjustControls moved mmwidget_controls adjustControls sized EushowClip mmYieldApp preLoadMedia mmWidgetSysBook (hopenClip HautoPlayMedia llplayClip kQautoShowMedia ,3clipRef setClipControls TB30WIN.DLL AUTHOR enterPage mmWidgetSysBook kautoCloseMedia closeClip ,3clipRef AUTHOR leavePage myClip _jcheckStageSize ,3clipRef setClipControls whatStage stageObj playClip .&+ +E .&+ +E myClip _jcheckStageSize ,3clipRef openClip ,3clipRef closeClip ,3clipRef pauseClip ,3clipRef stopClip myClip ,3clipRef whatStage stageObj showClip ,3clipRef Z>isReady seekClip ,3clipRef Z>isReady seekClipFromEnd myClip stepSize ,3clipRef m{stepDist Z>isReady stepClip myClip stepSize ,3clipRef m{stepDist Z>isReady stepClipBack setClipControls mmNotify mmYieldApp Nicht verarbeitet: step forward pause clipStat seeking step backward rewind paused ,3clipRef stopped playing fast forward closed setClipControls stage whatStage FALSE playingpausedstopped isReady mmwidget_controls adjustControls stretchStage whatStage stageObj checkStageSize myClip setMySize newClip mediaSizing whatStage setMySize mediaSizing myStage mmwidget_controls adjustControls stretchStage ,3clipRef whatStage setMySize FALSE pause ^ t && " " && w t = ~ t &&" anim_startPosition(1) anim_startSize(1) o= sc t&& QUOTE & "Der Pfad des Objekts wurde als 14]&&"gespeichert." -- To play specify"&& 14]&&" c animationNumber parameter playAnimation message." = ssm -- used display angled/curved fellipses over -- also displays curves curvedVertices exist -- returns pathObject ( }created) so can be referred -- The lines are named "1","2","3", etc. vertice fall on -- :"3", -- M"3", thePath, 4s_anim_segLengthList ZlineList,verticeList,curveList,i,animationString,verticeCount ZsavedStates r= -1 sysLockscreen -- i incremented point1 i = 2 ) > 0 point2 drawLine( ), i-1) /"editorScripts" drawCurve(previousPoint, , i-1) drawHandle( , i-1, & "," , i-1, elements hypotenuseFromVertices( /"compiler" passed --stub sysbook looking animations buttonClick dataType = cbox = comboBox "formats" >= "U" enabled cBox = tl = selectedTextlines "tags" keyRef = initType dateFormats = "mm:dd:[yy]yy" & "dd:mm:[yy]yy" & "[yy]yy:mm:dd" B"U" dropDownItems combobox " B"U" B"U" &"/" "/R/I/T/C/" B"R" 3-- Diese Skripten wurden von einer anderen Behandlungsroutine geschrieben. -- liefert die Werte /Eigenschaften. Wurde W Geschwindigkeit halber im Programmcode f_background obj imageInvalid notifyObjects percentFreeSpace rgbFill obj & rgbStroke storedImages storeImage useWindowsColors Book e der f_Book obj activeCacheFile buildCacheFile cacheFileType CDMediaPath HDMediaPath hotwordColor hotwordStyle keepMenuBar palette saveOnClose windows V(cnt-1) f_button obj CaptionPosition checkedGraphic defaultAllowDrag defaultAllowDrop disabledGraphic dragImage drawDirect enabled excludeTab invertGraphic noDropImage normalGraphic notifyAfterMessages notifyBeforeMessages stretchGraphic textUnderflow comboBox f_comboBox obj dropDownItems editable lineCount scrollable selectedItem sortItems f_field obj drawTextDirect fieldType richText selectedTextLines oneDgraphics f_oneDgraphics obj lineEndSize lineEndStyle twoDgraphics f_twoDgraphics obj f_group obj autoRadioButtons f_hotword obj textOffset oleObject f_oleObject obj action reference trackSize updateType upToDate (txt) f_page obj skipNavigation f_paintObject obj useChromakey f_recordField obj obj) & selectedTextlines f_window obj alwaysOnTop alwaysReader authorStatusBar autoClose autoShow autoSize captionBar centerClient clientHandle clientSize currentPage defaultClientSize defaultPage defaultPosition defaultState defaultType hideOnDeactivate icon imageBuffers isOpen matcolor maximumSize minimumSize mousePosition onBackground pageScroll parentHandle parentWindow readerStatusBar revertFocus selectedHotwords selectedTextState state style tile tileOrder type windowHandle 'systemProps f_systemProps obj activeWindowHandle caretLocation focusWindow startup3DInterface startupDrawDirect startupReaderRightClick sys3DInterface sysClientHandle sysCountry sysCurrency sysDrawDirect sysErrorNumber sysEvening sysICountry sysICurrDigits sysICurrency sysIDate sysIDigits sysILZero sysIMeasure sysINegCurr sysITime sysITLZero sysLanguage sysLineEndSize sysLineEndStyle sysList sysLongDate sysMagnification sysMediaBreakKey sysMediaSuspend sysMMEngineVersion sysMorning sysOpenMedia sysOperatingSystem sysOptimizedSave sysPageUnitsPerPixel sysReaderRightClick sysRGBFill sysRGBStroke sysRuntime sysShortDate sysShowMRUfiles sysSupportedMedia sysSuspendMessages sysThousand sysTimeChar sysTool sysTransparent sysUseWindowsColors sysVersion targetWindow Y/widget f_widget obj N0stage f_stage borderWidth innerBevelWidth mediaOpen mediaSize outerBevelWidth outline overlayOpen postEffect preEffect readerVisible roundedCorners stageAnchor stageSizing lastWin() currentPage -- checks the selections checkSelection refresh 4stbk_curOb ZcurrSel -- update state toolbar buttons " " handler. checkingSelection ) <> 1 -- nothing selected, ) = 0 enabled -- {toggles }updates -- "obType" "(No -- more than one . Punt. "propGroup" [display headerType "(Mehrfachauswahl)" -- . Update browser. updateBrowser -- central place setting , sysvars setProp obj,propname,propval,firstLineOnly ZexecutionBuffer,firstLineSpec = " B"props" 's a 4property | = " && " 's a setSysVar B"uprops" && " " && obj && ss = 1= ss -- test failed: syserrornumber sysE = "Error compiling" part U("Fehler beim Kompilieren des Skipts: ")+1 -- sets _. Moved its own so that ^names will xconflict varName,varValue 4" && varname && "= -- returns value sysVarValue 4" && obj. If homebase P, selects vRef = tbk_bookRef() isOpen ls = -- currently browsed "Eigenschafts bersicht"&& "["& P)&"]" -- change radio we're examining ystem "&Systemvariablen" &temeigenschaften" "&Benutzereigenschaften" "&Objekteigenschaften" -- sysProps/sysVars) showProps showUserProps vref -- displays values. Note. _have -- convoluted fanyone's ZvNames,vValues,vlist,i = "< -- systemVars % = obj curProp ss = val = ("@"& G && " " && "<Array>" & "propName" "propValue" "<Neu>" 5-- Added HHirokaM homeBase -- selectedTextLines "propvalue" obref(obj) lists updateHeader Zloc_vNames,loc_vValues,loc_vlist,loc_i -- weed out _used -- declare 4" && -- KLUDGE -- need find array. loc_ss = -- END a widget, "published" -- along fa standard w_propNames obj bookref = != tbk_wid_props p_widget w_propValues {pRef " && f_widget( w_propListText obj ZpropText = tbk_wid_values lst_widget given -- a couple notes on 8beginning f"p_" contain valid each type -- function f"f_" hard coded -- a }. These -- correspond returned H"p_". " hold information on the stored v "p_" -- "f_" functions written ,stbk_propTypes ,propValus Zw_wid we've somehow got invalid isObject( -- what kind {we've obtype = -- widgets tbk_wid_name -- we've " (Widget)" -- we want = f_systemProps( = p_systemProps = lst_systemProps = f_page( = p_page = lst_page = f_background( = p_background = lst_background = f_book( = p_book = lst_book = f_field( = p_field = lst_field = f_recordField( = p_recordField = lst_recordField = f_button( = p_button = lst_button = f_paintObject( = p_paintObject = lst_paintObject picture = f_twoDGraphics( = p_twoDGraphics = lst_twoDGraphics = f_oneDgraphics( [ = p_oneDgraphics = lst_oneDgraphics = f_group( = p_group = lst_group combobox i = f_combobox( = p_combobox = lst_combobox = f_hotword( = p_hotword = lst_hotword = f_oleObject( = p_oleObject = lst_oleObject = f_window( = p_window = lst_window stage = f_stage( = p_stage = lst_stage itemOffset itm, =-- unlink the DLLs used removeLinks -- unlinkDLL "tb30win.dll" %dlg. 1KERNEL" >fts30mtb. OUSER" required initlinks 4sftsIndexingAvailable functions work finitialization files STRING ftsGetIniVar = getIniVar( WORD ftsSetIniVar = setIniVar( { management INT ftsFileExists = fileExists( $ ftsRemoveFile = removeFile( JCopyFile = copyFile( ftsDosString = getDosEnvironmentString( dialog related ChooseDirectoryDlg = chooseDirectoryDlg( OpenFileDlg = openFileDlg( ,INT) SaveAsDlg = saveAsDlg( FileListDlg = getFileListDlg( ListToTextline = listToTextline( TextlineToList = textlineToList( memort GlobalAlloc= ,DWORD) GlobalFree= GlobalHandle= POINTER ftsGlobalLock= GlobalUnlock= oldSuspend = = FALSE full- indexing -- Author level ftsRemoveIndex ftsInitIndex LONG ftsAddContext ftsAddPage ftsAddTextToSection ftsAddSectionsToPage ftsBuildIndex -- Reader ftsOpenIndex ftsCloseIndex ftsTagEntries ftsNamedSections ftsTags ftsContextCount ftsContextTitle ftsAllContextTitles ftsQuery ftsReQuery ftsSetContextScope ftsAllMatchingTitles ftsAllMatchingRefs ftsMatchTitle ftsMatchRef ftsGetOffsets -- Error Handling ftsSetErrorNotify ftsGetErrorNotify ftsGetErrorNumber ftsGetErrorString -- DialogBox ftsSearch ftsSearchKeyword le = ( r= NULL) access Help ftsWinHelp= ftsWinHelpNum= a hyperlink ftsAddlink -- initialize be displayed tbk_bookRef() -- identify vwrRef = "standard" values 2"Hyperlink-Schaltfl che hinzuf currentpage modally -- close isOpen ftsCreatelink "newHW" Aktionswort a selected ftsEditlink bearbeiten" ftsModifylink s=selectedHotwords -- returns a locked nSize ftsGetWinPointer memFlag = 66 ZretValue -- allocate memory : = ftsGlobalAlloc( "Failed allocating retval = -- unlocks frees supplied. ftsFreeWinPointer pMem = ftsGlobalHandle( ftsGlobalUnlock( ftsGlobalFree( entry textEntry dbCaption,dbPrompt,initVal,dType entryDlg = entryPg = "title" dataType retrieve entered Bhides Cancel Bcloses point user clicked OK Iancelled trailing tagEntry -- datatype identifies message handled Ha notifybefore handler -- a radio buttons on initType up a multiline multiEntry dbType validation: will xallow fcommas blank entries textlineCount( itemTxt = ftsTextlineToList( checks itemnumber that itemNumber xitem,xlist settings associated given xassigned) getSetFile 4sftsInfoVal ensure 8has a infoDlg "","Dieses Buch mu gespeichert werden, bevor diese Operation durchgef * kann." -property filename setFile = ftsSetFile + exists... <) < 0 -- a default Hreplaing 8's extension -- f"SST" fileName = stripExtension( -- Settings Not Found = "Sucheinstellungen nicht gefunden" xfound" -- was chosen -- otherwise ) removes three letter without c = offSet(".", c <> 0 -- splitPath() separates a path Ipart scond actual ,fname cc= c = cc cc > 1 <> "\" c > 0 c < cc V(c+1) writes writeDefaultSST 4sftsMainBk -- create Datei definiert globale Optionen zum Erstellen eines Suchindexes."& sectionName = "CREATE" ,"MANAGER","aapi", -- estimate textbase ( 1 unit = 256 bytes) r,"TXFSIZE",1000, -- location common wordFile = sysToolBookDirectory & "COMMWORD.TXT" 4) > 0 ,"CWDFILE", special treat ,"SPECIALS","", named be included concordance ,"TITLE_SECTION","TITEL,YES", -- names concordable ssections ,"CONC_SECTION","", ,"NON_CONC_SECTION","", whether be concorded ,"DEFAULT_SECTION","OTHER, -- maximum paragraphs per ,"MAXP_PER_SECT",500, contexts ,"MAXCHP",65534, articles ,"MAXART",65534, ,"MAXPAR",65534, ,"MAXWRD",65534, -- total keyfields (minimum 2) ,"KEYFIELDS",3, -- compulsory ,"KF1","#HANDLE C", ,"KF2","#ARTREF A", ,"KF3","#KEYWORD C", ,"FIRST_CHAP"," books B!("Options","includeBooks", {types incOptions = " OdObjects", -- excluded ","", continues through textFlow","TRUE", -- keywords #"("Keywords","Lines",0, L"("Contexts"," -- build based on ftsCreateIndex 4sftsSetFile, 3) < 0 ` <> -- erstellen" "main" ftsSearchIndex indexName = ftsIndexName pgRef = Q,windowHandle bkName = -- insert reference isObject( "Zu diesem Objekt wechselt Volltextsuche","Sie m ssen zuerst einen r dieses , um Suchoperationen durchf hren zu k nnen." ftsKwSearch sselw rter suchen"," , um ftsIndexSettings ) < 0 "Indexeinstellungen" stepBack ftsReaderSettings ) < 0 ( "Einstellungen f r Leserebene" ftsPageSettings ) < 0 !"Seiteneinstellungen" ftsHWSet ZvalName ) < 0 -- determine currently s = selHW = -- disallow multiple hotwords 4) > 1 Aktionsworteinstellungen","Es sind mehrere ausgew hlt. Bitte w hlen einzeln -- ) = 1 -- -- flags B" = -- initPage -- -- what comboBox "choice" = "[None]" = "[Kein]" -- should be created... only hotwordstyle -- pops up ftsObjectSet ) < 0 -- selOb = obJect [&"Objekteinstellungen" -- xcanceld -- secName = -- ftsSection -- ftsExclude S1wait openWaitDlg .",dbMsg "msg" -dlg" closeWaitDlg -- use inserting a single U. Will maintain sorted order. No duplicates ftsInsertLine txt,newLine ending ZinsertSpot midPoint middleLine looking U) less than ) greater already > tlc removing a ftsRemoveLine matching ftsFindLine num = -- calls winHelp 7specified callWinHelp contextName [contextNum $ = "MM_CMD_Build_Index" O = "MM_CMD_Hotword_Settings" = "MM_CMD_Index_Settings" = "MM_CMD_Object_Settings" = 62603 = "MM_CMD_Page_Settings" = 62606 = "MM_CMD_Reader_Level_Settings" = "MM_CMD_Search_Settings_Not_Found" = 62612 = "MM_CMD_New_Context" = 62618 = 62594 = "MM_CMD_New_Section" = 62620 = 62596 = "MM_CMD_New_Tag" = 62622 = "MM_CMD_New_Keywords" -- ,"MTB30.HLP",257, -- -- bring up help doHelp +Message infoPg = -- resize msgField = dbMessage maxSize = "frame" - 180 `> 0 centerLine = 90 + ( ) / 2 currentPage -- Sent Hstandard dialog handler, initializes the -- value[], required xused initDlg 4stbk_searchString,stbk_replaceString "findString" bref = B"ok" "Start" enabled -- sent user presses " 4stbk_lpMsg,stbk_vRef 4stbk_foundList,stbk_searchOnly, ,stbk_asWord,stbk_promptChange,stbk_firstFind,\ stbk_canceled,stbk_searchRange,stbk_cnt statusbar -- link needed DLL functions tbk_linkMemFuncs tbk_linkMessageFuncs _. Most these are replaceScript below sMode = searchmode throughout handlers B"matchword" combobox range -- allocate a block memory will be peek message -- has pressed stop running. = tbk_getWinPointer(32) --** international -- change "Stop" (try "Anhalten") B"ok" "findstring" -- "Skripten aller Objekte" "Seiten-/Hintergrund-/Buchskripten" walkallobjects der Objekthierarchie" walkHierarchy statusBar -- still up, focuswindow "Nicht gefunden:" && & "." searchOb = nameOffset = ~("(", '-1) editScript 1] = 2] = -- bring up chooser tbkToolsDlg( "foundScripts" tbk_bookRef(),"Gefundene close tbk_freeWinPointer( B"ok" Close iterates {hierarchy, -- starting selected curSel = notifyObs = notifyObjects curSysBook = -- These two 8specified. -- How routine works: H walkAllObjects } walks every 8. Since aren't necessarily consecutive, -- checks a reference each been stored backgrounds array. If added walkObjects be walked. -- What's fuss about recordFields? Hotwords recordfields , which lives on . The list returned , however, does xinclude hotwords. So whenever -- a passed adds fone row , like [i][1] [i][2] [i][n] ... JReference 1> ... < -- When comes enumerate living their ZbackID, \backIndex {curPage -- just -- -- we have previously -- dimensions( -- j -- -- so we don't visit ) + 1 -- -- objecttoWalk. -- On entry either a Zstack tlist,objList {curObj curObjType = objectToWalk windows = getObjectList( ) > 0 -- updateStatus involves obRef tried process 20th k20 = 0 stbk_SearchOnly checkForPendingStuff( focusWindow) itemOffset( B"ok" ) > 0 ) > 0 ) > 0 curScript = curScriptChanged = runningtotal = 1 totalChars = searchLen = replaceLen = Tthat serve gdelimiters: wordDelimit = " " & k& "-+*/<>,()[];^=&.?':" & -- remaining chunk, 's got txt = curOffset = -- startPos = ( endPos = ( 's a g- 1) s+ 1 -- changing Bcontaining display tstartPos = seekEnd = tEndPos = seekend-2+ initialization 1] = tendPos 2] = - tstartpos+1 3] = 2] + 4] = 5] = 6] = promptValue = "changePrompt" Ersetzen?", prompting says so "Yes " -- HHirokaM -- insert " -- -- ss = se = wird gespeichert:" && nderungen konnten nicht [ werden:" && && "." && f"OK" "Suche abbrechen" 1= ss -- puts {being examined buttonRef = B"ok" xitem,xlist Hfolder widget tabPressed tabNum -- sets "instructions" durchsuchen" "replacewith" h und ersetzen" what current searchMode "replaceWith" -- brings up editor, -- enters searched- , hits obj, searchText X"tb30win.dll" sendkeys( }",0) keyenter returns a }clicked on keystrokes -- It clears them queue -- Parameters: a locked 32 bytes -- viewerRef whose \you want . If g= targetWindow wm_lButtonDown = 0x0201 wm_keyDown = 0x0100 pm_Remove = 1 -- mouse clicks ctbk_PeekMessage( windowHandle ,pm_remove) <> 0 lparam = -- extract high x = k65536 y = y65536 u = clienttoPageUnits( objectFromPoint( -- ctbk_peekMessage( wparam = foundlist friendly nm = " ("& &")" notifyBefore clipRef <> NULL showWidgetsProps >,windowhandle moved adjustControls "mmwidget_controls" sized ~<> AUTHOR mmWidgetSysBook -- HACK: Should use mmYield linkDLL "TB30WIN. mmYieldApp() (preLoadMedia = TRUE) ) <> openClip (autoShowMedia showClip (autoPlayMedia playClip setClipControls notifyAfter (autoCloseMedia ) <> closeClip myClip = ( mmPlayable stageObj = whatStage checkStageSize mmOpen wait ) <> mmClose pauseClip ) <> mmPause stopClip ) <> mmRewind mmShow seekClip argPos isReady( mmSeek seekClipFromEnd stepClip stepDist stepSize = Q(mmLength / 20) mmPosition mmStep stepClipBack / 20) mmNotify argMedia, argCommand, argResult oldLock = lockScreen enabled = FALSE clipStat = mmStatus "stopped" "paused" "seeking" "playing" "closed" "Nicht verarbeitet:" && getObjectList( whatClip "playingpausedstopped" stageSizing stretchStage newClip chooseResource( setMySize mediaSizing value () = myStage = mediaSize 1mmVisualSize N160,100 notifyBefore clipRef <> NULL showWidgetsProps >,windowhandle moved adjustControls "mmwidget_controls" sized ~<> AUTHOR mmWidgetSysBook -- HACK: Should use mmYield linkDLL "TB30WIN. mmYieldApp() (preLoadMedia = TRUE) ) <> openClip (autoShowMedia showClip (autoPlayMedia playClip setClipControls notifyAfter (autoCloseMedia ) <> closeClip myClip = ( mmPlayable stageObj = whatStage checkStageSize mmOpen wait ) <> mmClose pauseClip ) <> mmPause stopClip ) <> mmRewind mmShow seekClip argPos isReady( mmSeek seekClipFromEnd stepClip stepDist stepSize = Q(mmLength / 20) mmPosition mmStep stepClipBack / 20) mmNotify argMedia, argCommand, argResult oldLock = lockScreen enabled = FALSE backward" B"rewind" clipStat = mmStatus "stopped" "paused" "seeking" "playing" "closed" "Nicht verarbeitet:" && getObjectList( whatClip "playingpausedstopped" stageSizing stretchStage newClip chooseResource( setMySize mediaSizing value () = myStage = mediaSize 1mmVisualSize N160,100 myClip stepSize ,3clipRef m{stepDist Z>isReady stepClip myClip stepSize ,3clipRef m{stepDist Z>isReady stepClipBack setClipControls mmNotify mmYieldApp pause clipStat seeking Nicht verarbeitet: paused ,3clipRef stopped playing closed setClipControls stage whatStage FALSE playingpausedstopped isReady mmwidget_controls adjustControls stretchStage whatStage stageObj checkStageSize myClip setMySize newClip mediaSizing whatStage setMySize mediaSizing myStage mmwidget_controls adjustControls stretchStage ,3clipRef whatStage setMySize findString stbk_searchString stbk_replaceString replaceString Start initDlg <+U!8 <+U!! search tbkToolsDlg replace matchword nameOffset stbk_searchString stbk_asWord stbk_promptChange findString stbk_vRef r1tbk_freeWinPointer tbk_bookRef Gefundene Skripten Skripten in der Objekthierarchie statusBar sMode GwalkHierarchy findstring Seiten-/Hintergrund-/Buchskripten stbk_canceled range nwalkallobjects prompt searchOb false ytbk_linkMessageFuncs Skripten aller Objekte firstFind stbk_foundList foundScripts replaceString statusbar tbk_getWinPointer Nicht gefunden: stbk_searchOnly stbk_searchRange Anhalten searchmode stbk_cnt stbk_firstFind stbk_replaceString stbk_lpMsg range searchOb false stbk_vRef nameOffset stbk_canceled stbk_searchString stbk_replaceString stbk_foundList stbk_lpMsg stbk_promptChange stbk_searchRange stbk_searchOnly stbk_cnt stbk_asWord sMode stbk_firstFind value Start tbk_linkMemFuncs cancel curSel gIreplaceScript Seite,Hintergrund notifyObs curSysBook walkHierarchy .&, " .&, " ,%H.% walkObjects gIreplaceScript false Skripten aller Objekte stbk_searchRange stbk_canceled walkAllObjects _9updateStatus Background gIreplaceScript curObjType walkObjects 1, "j .&, " , /Ep w, #? cancel _9updateStatus promptValue Ersetzen? -+*/<>,()[];^=&.?': itemOffset false stbk_asWord stbk_searchString stbk_foundList wordDelimit stbk_promptChange Skript wird gespeichert: obRef Yes to all stbk_searchOnly stbk_canceled changePrompt Suche abbrechen curScript tbk_bookRef stbk_firstFind stbk_cnt xcheckForPendingStuff stbk_replaceString stbk_lpMsg tbkToolsDlg nderungen konnten nicht gespeichert werden: abbrechen curScriptChanged replaceScript stbk_vRef statusbar updateStatus stbk_canceled buttonRef Start ,%H.% itemOffset searchmode tabPressed .&, " .&, " prompt instructions Skripten durchsuchen replacewith firstFind Skripten durchsuchen und ersetzen searchmode search replace replaceWith searchmode tb30win.dll {keyF5} Cssendkeys {keyEscape}+{keyF5} sendkeys editScript keychar wm_keyDown pm_Remove wparam tbk_PeekMessage tbk_peekMessage wm_lButtonDown checkForPendingStuff of Book obRef findString enterpage keyRef dataType formats buttonClick /R/I/T/C/ [yy]yy:mm:dd dateFormats dd:mm:[yy]yy mm:dd:[yy]yy formats initType FALSE s_anim_sizing s_anim_lastLoc buttonDown NSPartner W_handle NE_handle S_handle switchRect SW_handle EWPartner E_handle s_anim_sizing N_handle s_anim_CurrentObject selectionHandles oldName SE_handle NW_handle s_anim_lastLoc w7crossPartner buttonStillDown do_enddrag FALSE showHandles s_anim_dy s_anim_dx s_anim_animationSettings s_anim_sizing editorScripts s_anim_CurrentObject s_anim_selectedVertex s_anim_lastLoc buttonUp crossPartner EWPartner NSPartner W_handle NE_handle S_handle SW_handle E_handle objBounds N_handle s_anim_CurrentObject selectionHandles SE_handle NW_handle showHandles \lastTickCount enterpage USER.EXE mmGetTickCount leavePage myClip milliseconds $setPos \lastTickCount sliderUpdate mmGetTickCount closed getTickCount mmGetTickCount myParent whatTick mmGetTickCount ,3clipRef stopped thumb playing USER.EXE paused \lastTickCount status s_tmp_bnds thumb updateMedia buttonDown newPos myStage myClip milliseconds ,3clipRef _seekClip whatStage updateMedia \lastTickCount enterpage USER.EXE mmGetTickCount leavePage myClip milliseconds $setPos \lastTickCount sliderUpdate mmGetTickCount closed getTickCount mmGetTickCount myParent whatTick mmGetTickCount ,3clipRef stopped thumb playing USER.EXE paused \lastTickCount status s_tmp_bnds thumb updateMedia buttonDown newPos myStage myClip milliseconds ,3clipRef _seekClip whatStage updateMedia ,%H.% button parentBounds sliderBounds hasSlider myObjs slider thumb whatStage adjustcontrols 1,!Kh 1,!K8 1,"!# 1,!JxY 1,"!# chain break chainStart chainEnd anchor dropAnchor chain break anchor hideAnchor CreditsViewer getSystemDirectory GlobalAlloc GlobalLock GlobalUnlock GlobalFree mmsystem.dll KERNEL getActiveWindow midiOutOpen MidiOutShortMsg MidiOutReset MidiOutClose MidiOutGetNumDevs MidiOutGetDevCaps dlgViewer skipDlgAnim seconds SetTimer KillTimer GetActiveWindow openWindow closeMidi credits dlgViewer +endAnim closeWindow skipDlgAnim False CreditsViewer LockOut enterPage CreditsViewer leavePage lastTrans endAnim midiReady False creditsviewer names makeTrans lockout fade fast AnimateCredits ,%H.% spiral in speed 200 |mybounds names fade speed 200 paintobject rip hideAnchor headhole tear in fast startPos slide right out fast slide in fast slide out bottom fast lastTrans hook2 endPos cannon spiral out speed 200 slide out fast @scrollToNext slide left out fast dropAnchor makeTrans sliderMove startSliderMove sliderMax sliderMin nearestPUPP mysliderPos HendSliderMove sliderMax sliderBounds sliderMin mysliderPos nearestPupp leftMButton sliderPos s_anim_dx `primaryMouseButton newMouseX oldMouseX buttondown .&s>V 1+U!8 selectObject s_anim_animationCache aborted $offsetPathBy s_anim_idleAnimations vertexPosition ZstopAnimation theVertices s_anim_animationSettings 9a_timeGetTime compilePath s_anim_CurrentObject startAnimTimer selectionHandles s_anim_PathObject buttonClick _stopAnimTimer s_anim_dy sizeTarget vertexPosition s_anim_dx newVertice error moveTarget editorScripts s_anim_CurrentObject s_anim_selectedVertex s_anim_PathObject doneAnimatingNotify hdrowDownItems hdrowDownItems anim_AnimationSettings <neu> fillAnimationList objects s_anim_animationSettings s_anim_CurrentObject selectedObject enterPage ,%H.% ,%H.% obType itemNumber Seitenliste wird erstellt pgRef ftsSetPage bkRef where used `/ftsTextlineToList Seitenliste wird erstellt, bitte warten... object uogetTitle +niceRef sftsTitleLoc included books pgKeywords tbk_bookRef ftsKeywords closeWaitDlg keywords obName < Schl sselwort Seiten mit Schl sselwort ' openWaitDlg dialog page reference wird momentan nicht verwendet. > vwrRef pages incBooks buttonClick keywords obType obRef xzftsTitle sftsTitleLoc `ftsTitleValue ftsTitleOverride text of titleRef titleLoc obType obRef pgRef titleRef sftsSetFile sftsTitleLoc titleLoc title getTitle -#, #? 1, #> Page number niceRef of book bkName splitPath niceRef 1, #b 1, #> (Nicht ver nderbar): false propEdit &Bearbeiten propName initdlg cancel keychar propEdit sEreturnString cancel propEdit enterpage &Name der Systemvariablen: upropname &Wert der Systemvariablen: &Name der Eigenschaft: namelabel <system> &Wert der Eigenschaft: upropvalue valuelabel initDlg upropname enterpage keychar upropname sEreturnString upropvalue cancel .&, " .&, " ?Center firstLine Rechts sysalignment Right sysFontFace 6getToolBookIniItem System Zweizeilig sysLineSpacing Einzeilig sysFontStyle tabSpacing alignment tabbuttons sysFontSize 1 1/2 Blocksatz 0,0,0 sysTabType Zentrieren sysIndents section puToInches lineSpacing ttype sysTabSpacing Justify Startup Preferences fromLeft fromRight metric Links sysStrokeColor units initpage ?Center firstLine Rechts sysalignment sysFontFace sysStrokeColor Right Zweizeilig sysLineSpacing Einzeilig tabSpacing =@setToolBookIniItem alignment tabButtons sysFontSize 1 1/2 Blocksatz sysTabType sysIndents section inchesToPu lineSpacing sysFontStyle sysTabSpacing Justify Startup Preferences fromRight fromLeft ttype Zentrieren Links updateIni Ein Kennzeichen mit diesem Namen existiert bereits. initType Datum eztagEntry Zeichen Kennzeichen d rfen nur einzelne W rter ohne Kommas enthalten. valName Neues Kennzeichen eingeben: Neues Aktionswortkennzeichen kdataType Reelle Zahl typeString tbk_bookRef value entry dataType Ganze Zahl buttonClick Ein Kennzeichen mit diesem Namen existiert bereits. Kennzeichen d rfen nur einzelne W rter ohne Kommas enthalten. newKF newKF Choice Datum eztagEntry Zeichen valName Neues Kennzeichen eingeben: Neues Aktionswortkennzeichen kdataType Reelle Zahl typeString tbk_bookRef value entry dataType newVal Ganze Zahl buttonClick obtype script cheader rightEdge propFieldBounds propGroup splitter valueLabel uprops splitVert stbk_lastWinSize clientSz propButtonGroup fheader dialog labelGroup propValue sized MF_SEPARATOR MF_STRING wflag appendMenu <separator> appendMenu getSystemMenu /lgetSystemMenu must use a lower id number addSysMenuItem ?properties 6getToolBookIniItem addSysMenuItem maxSize Position Browser Info ber Eigenschafts bersicht... sm_cyscreen splitter browser splitterPlacement clientSz propbuttongroup tbk_bookRef getsystemmetrics getSystemMetrics placement sm_cxscreen WM_SYSCOMMAND getSystemMetrics openWindow <+U!! Position =@setToolBookIniItem Browser splitter propbuttongroup Splitter statusbar placement closeWindow tbktoolsdlg about WWM_SYSCOMMAND WM_SYSCOMMAND previous first background .&+ h TsetProp tbkToolsDlg multiLine rgbtohls hlstorgb fsize retval fface curType uprops propVal bookRef initString pageRef curList colortype fstyle uprop leader false setupstring stbk_curOb retcolor dlgString stbk_propTypes propvalue propName FchooseFontDlg propEdit upropsdlg Eigenschaften l nger als 32000 Zeichen k nnen nicht bearbeitet werden. \updateBrowser bookRef retcolor custom Tsetprop Eigenschaft bearbeiten tb30DLG.DLL fstyle tbk_bookRef sysVarValue <system> ChooseFontDlg script Matrixwerte k nnen nicht bearbeitet werden. Benutzereigenschaft hinzuf qhlstoRgb propVal bold italic curType 1Llastwin tb30win.dll propValue boolean color retval fface qrgbtohls false regular stbk_propTypes tb30dlg.dll 1LlastWin Systemvariable hinzuf uprops fsize browser bold,italic colortype pageRef HLStoRGB rgbtohls qhlstorgb stbk_curOb uprop leader <Neu> colorPaletteDlg setupstring window cancelled nextValue dlgString props curList propvalue colorPaletteDlg propName buttonDoubleClick stbk_propTypes abcdefghijklmnopqrstuvwxyz_0123456789 uprops fheader <Neu> curType propValue propName keydown .&, " itemOffset itmPos nextValue .&+ h color script mScurProp true,false stbk_propTypes <Array> boolean uprops custom curList multiline headerType <Neu> displayVal NBdisplay curType propName header propValue updateHeader showWidgetsProps ,3clipRef mmwidget_controls adjustControls moved mmwidget_controls adjustControls sized EushowClip mmYieldApp preLoadMedia mmWidgetSysBook (hopenClip HautoPlayMedia llplayClip kQautoShowMedia ,3clipRef setClipControls TB30WIN.DLL AUTHOR enterPage mmWidgetSysBook kautoCloseMedia closeClip ,3clipRef AUTHOR leavePage myClip _jcheckStageSize ,3clipRef setClipControls whatStage stageObj playClip .&+ +E .&+ +E myClip _jcheckStageSize ,3clipRef openClip ,3clipRef closeClip ,3clipRef pauseClip ,3clipRef stopClip myClip ,3clipRef whatStage stageObj showClip ,3clipRef Z>isReady seekClip ,3clipRef Z>isReady seekClipFromEnd myClip stepSize ,3clipRef m{stepDist Z>isReady stepClip myClip stepSize ,3clipRef m{stepDist Z>isReady stepClipBack setClipControls mmNotify mmYieldApp pause clipStat seeking Nicht verarbeitet: paused ,3clipRef stopped playing closed setClipControls stage whatStage FALSE playingpausedstopped isReady mmwidget_controls adjustControls stretchStage whatStage stageObj checkStageSize myClip setMySize newClip mediaSizing whatStage setMySize mediaSizing myStage mmwidget_controls adjustControls stretchStage ,3clipRef whatStage setMySize showWidgetsProps ,3clipRef mmwidget_controls adjustControls moved mmwidget_controls adjustControls sized EushowClip mmYieldApp preLoadMedia mmWidgetSysBook (hopenClip HautoPlayMedia llplayClip kQautoShowMedia ,3clipRef setClipControls TB30WIN.DLL AUTHOR enterPage mmWidgetSysBook kautoCloseMedia closeClip ,3clipRef AUTHOR leavePage myClip _jcheckStageSize ,3clipRef setClipControls whatStage stageObj playClip .&+ +E .&+ +E myClip _jcheckStageSize ,3clipRef openClip ,3clipRef closeClip ,3clipRef pauseClip ,3clipRef stopClip myClip ,3clipRef whatStage stageObj showClip ,3clipRef Z>isReady seekClip ,3clipRef Z>isReady seekClipFromEnd myClip stepSize ,3clipRef m{stepDist Z>isReady stepClip myClip stepSize ,3clipRef m{stepDist Z>isReady stepClipBack setClipControls mmNotify mmYieldApp clipStat seeking Nicht verarbeitet: paused ,3clipRef stopped playing closed setClipControls stage whatStage FALSE playingpausedstopped isReady mmwidget_controls adjustControls stretchStage whatStage stageObj checkStageSize myClip setMySize newClip mediaSizing whatStage setMySize mediaSizing myStage mmwidget_controls stretchStage ,3clipRef whatStage setMySize findString stbk_searchString stbk_replaceString replaceString Start initDlg <+U!8 <+U!! search tbkToolsDlg replace matchword nameOffset stbk_searchString stbk_asWord stbk_promptChange findString stbk_vRef r1tbk_freeWinPointer tbk_bookRef Gefundene Skripten Skripten in der Objekthierarchie statusBar sMode GwalkHierarchy findstring Seiten-/Hintergrund-/Buchskripten stbk_canceled range nwalkallobjects prompt searchOb false ytbk_linkMessageFuncs Skripten aller Objekte firstFind stbk_foundList foundScripts replaceString statusbar tbk_getWinPointer Nicht gefunden: stbk_searchOnly stbk_searchRange Anhalten searchmode stbk_cnt stbk_firstFind stbk_replaceString stbk_lpMsg range searchOb false stbk_vRef nameOffset stbk_canceled stbk_searchString stbk_replaceString stbk_foundList stbk_lpMsg stbk_promptChange stbk_searchRange stbk_searchOnly stbk_cnt stbk_asWord sMode stbk_firstFind value Start tbk_linkMemFuncs cancel curSel gIreplaceScript Seite,Hintergrund notifyObs curSysBook walkHierarchy .&, " .&, " ,%H.% walkObjects gIreplaceScript false Skripten aller Objekte stbk_searchRange stbk_canceled walkAllObjects _9updateStatus Background gIreplaceScript curObjType walkObjects 1, "j .&, " , /Ep w, #? cancel _9updateStatus promptValue Ersetzen? -+*/<>,()[];^=&.?': itemOffset false stbk_asWord stbk_searchString stbk_foundList wordDelimit stbk_promptChange Skript wird gespeichert: obRef Yes to all stbk_searchOnly stbk_canceled changePrompt Suche abbrechen curScript tbk_bookRef stbk_firstFind stbk_cnt xcheckForPendingStuff stbk_replaceString stbk_lpMsg tbkToolsDlg nderungen konnten nicht gespeichert werden: curScriptChanged replaceScript stbk_vRef statusbar updateStatus stbk_canceled buttonRef Start ,%H.% itemOffset searchmode tabPressed .&, " .&, " prompt instructions Skripten durchsuchen replacewith firstFind Skripten durchsuchen und ersetzen searchmode search replace replaceWith searchmode tb30win.dll {keyF5} Cssendkeys {keyEscape}+{keyF5} sendkeys editScript keychar wm_keyDown pm_Remove wparam tbk_PeekMessage tbk_peekMessage wm_lButtonDown checkForPendingStuff of Book obRef findString enterpage he[][] IT <> 0 *A", he[IT][8] = W) > 0 W[8] = anim_NumSteps " he[][] IT = 0 ,X = DX) > 0 RX[9] he[IT][9] he[][] IT <> 0 xB", he[IT][9] = Y) > 0 Y[9] = anim_StepsPerCell t!he[][] IT = 0 ~Y = Y) > 0 Y[11] !he[IT][11] "he[][] IT <> 0 I"he[IT][11] = AZ = XZ) > 0 cZ[11] = Z) > 0 [) > 0 [[6] = 3b Only (persistent) anim_StartSize [) > 0 [[15] anim_EndSize [) > 0 \[16] anim_StartTim }d$2| *7r1]8 index _stopAnimTimer removeLinks ftsScripts tbk_tools unlinksysbook &Werkzeuge indexing Werkzeuge zum Erstellen und Durchsuchen von B chern mit Volltextsuch- und Indexfunktionalit Angepa te Autorenwerkzeuge. Erweiterungen des Systembuchs MTB30.SBK ytbk_linkMessageFuncs &Index tbk_setStartup bookloc setUpDlls tbk_sysInfo sysBookLoc Zeigt Informationen ber Ihr System an. S&ystem-Info... tbk_tools linkSysbook .&+ +E tbk_linkConvert oldCursor 1LlastWin \updateBrowser browser stbk_lastWinSize acheckSelection selection customEdit browser acheckSelection selectionChanged 1LlastWin \updateBrowser browser enterPage browser acheckSelection activateInstance author 1LlastWin browser acheckSelection stbk_lastActiveWindow enterWindow browser L$closeAllAnimations author browser reader .&, " .&, " 1,!Ex threeDStyle topline s_anim_idleAnimations group topLine sculpted threeDeeRect AngledLine Canim_StartPosition threeDeeRect anim_animationSettings inOut Canim_StartPosition Canim_startPosition bottomLine anim_animationSettings Author sized Center tbk_importText field initLinks OLE id indexing ftsObjectSettings mm_media group Extra scripts rectangle CreateHyperlinkHotword loadMenus tbk_exportText field,recordfield ftsIndexSettings browser lmmWidget false sftsMainBk mm_mediaWidgets EditHyperlinkHotword ftsFullTextSearch ftsKeywordSearch recordField,field,button,comboBox combobox tbk_taborder Spread ftsIndexName ftsScripts customEdit selHW tbk_tabOrder author mm_WidgetProps |EftsLink paintobject ftsHotwordSettings EditHyperlinkButton hyperLinking tbk_3D tbk_tools ,rectangle entermenu tbkToolsDlg msgBox Media-Pakete stbk_thisBook Dieses Buch mu zuerst gespeichert werden. clipPkg mediaPackager tbkToolsDlg system Starteinstellungen tbk_startPref tbkToolsDlg Anwendungen AddOnApps tbk_AddOnApps extra scripts exportText tbk_exportText extra scripts importText tbk_importText tbkToolsDlg searchAndReplace Suchen und Ersetzen in Skripten tbk_replaceScripts .&+ +E sysinfo.exe SYSINFO.EXE wurde in Ihrem ToolBook-Verzeichnis nicht gefunden. tbk_sysinfo extra scripts spread tbk_spreadHorz extra scripts spread tbk_spreadVert shrinkgrow extra scripts smallest tbk_shrink shrinkgrow extra scripts largest tbk_grow extra scripts center tbk_centerHorz extra scripts center tbk_centerVert extra scripts center tbk_centerBoth .&, " .&, " window cancelled tbkToolsdlg 3D-Stil festlegen extra scripts Group angledLine threeDeeRect retval threeDee threeDeeRect tbk_3D ,%H.% horzOrVert tbkToolsdlg lowestlayer Sie m ssen zuerst 2 oder mehrere Objekte ausw extra scripts window cancelled retval Tabulatorreihenfolge festlegen taborder sortbyposition tbk_tabOrder fileName .iniFile getIniVar getToolBookIniItem extra scripts setStartup tbk_setStartup KERNEL GlobalAlloc tbk_GlobalAlloc GlobalFree tbk_GlobalFree GlobalHandle tbk_GlobalHandle GlobalLock tbk_GlobalLock GlobalUnlock tbk_GlobalUnlock tbk_linkMemFuncs tb30Dlg.dll listtoTextline tbk_listtoTextline 63Kg tbk_linkConvert tb30win.dll KERNEL getIniVar GetPrivateProfileString tbk_GetIniInfo , T_Glo-" GetPrivateProfileString tbk_GetIniInfo , TalLo-" WritePrivateProfileString tbk_SetIniInfo ,#T-" tbk_linkIniFileFuncs moveto tbk_moveto lineto tbk_lineto ,"TProf-" setROP2 tbk_setRop2 createPen tbk_createPen tbk-# deleteObject tbk_deleteObject ,#TTalL-" selectobject tbk_selectobject getDC tbk_getDC releaseDC tbk_releaseDC tbk_linkDrawFuncs peekMessage tbk_peekMessage registerWindowMessage tbk_registerWindowMessage postMessage tbk_postMessage tbk_linkMessageFuncs .iniFile rtbk_SetIniInfo setToolBookIniItem false Ansichtsobjekt stbk_lastActiveWindow Hauptfenster lastWin Systemvariablen browser Systemeigenschaften <system> props obRef 9a_timeGetTime s_start startTime 9a_timeGetTime s_start endTime tbk_bookRef .&, " Ytbk_GlobalLock Speicherzuordnung fehlgeschlagen. memFlag retval tbk_GlobalAlloc tbk_getWinPointer tbk_GlobalUnlock tbk_GlobalHandle Ttbk_GlobalFree tbk_freeWinPointer 8initDlg false nnen nicht mehr als 3 Dialogfelder verschachtelt werden! sEreturnString dialog rEreturnString window cancelled tbkToolsDlg initDlg shortFileName ,%H.% HshortFileName testName sysBookLoc mtb30.ini toolbook.ini iniFile initLinks ftsScripts enterApplication sftsSetFile leaveBook ftsSbk ftsScripts ftsAddLink AddHyperlinkButton GftsCreateLink ftsScripts CreateHyperlinkHotword ftsScripts ftsEditLink EditHyperlinkButton WftsModifyLink ftsScripts EditHyperlinkHotword ftsGetWinPointer ftsScripts ftsGetWinPointer ftsFreeWinPointer ftsScripts ftsFreeWinPointer textEntry ftsScripts textEntry eztagEntry ftsScripts tagEntry ftsScripts multiEntry multiEntry itemNumber ftsScripts itemNumber getSetFile ftsScripts getSetFile stripExtension ftsScripts stripExtension ftsScripts splitPath splitPath writeDefaultSST ftsScripts writeDefaultSST ftsScripts ktftsCreateIndex ftsBuildIndex uftsSearchIndex ftsScripts ftsFullTextSearch ftsScripts ftsKwSearch ftsKeywordSearch ftsScripts ftsIndexSettings ftsIndexSettings ftsScripts ftsReaderSettings ftsReaderLevelSettings ftsScripts ftsPageSettings ftsPageSettings ftsHWSet ftsScripts ftsHotwordSettings *%ftsObjectSet ftsScripts ftsObjectSettings openWaitDlg ftsScripts openWaitDlg closeWaitDlg ftsScripts closeWaitDlg ]ftsInsertLine ftsScripts ftsInsertLine XftsRemoveLine ftsScripts ftsRemoveLine ftsFindLine ftsScripts ftsFindLine callWinHelp ftsScripts callWinHelp .&+ +E .&+ +E ,%H.% slestyle s_anim_sourcePage objList slesize button s_anim_idleAnimations field newPage Es sind keine Objekte zum Animieren vorhanden. Sie m ssen zuerst Objekte anlegen. ZstopAnimation stage aborted by edit SelectionHandles field,recordField newBackground solidHead PathAnimation Author s_anim_idleAnimations Canim_StartPosition anim_animationSettings Canim_StartPosition Canim_startPosition anim_animationSettings moved timeGetTime a_timeGetTime Animationen k nnen nicht abgespielt werden, weil mmSYSTEM.DLL nicht ordnungsgem verkn pft wurde mmSystem.dll setUpDlls ,%H.% ,%H.% 1+U!8 ,%H.% ,%H.% s_anim_animationCache }gyieldApp ZstopAnimation s_anim_idleAnimations }playStep objectAnimation Reset by play command YdoneAnimatingNotify theTarget 9a_timeGetTime _stopAnimTimer startAnimTimer aborted by the user playAnimation 1, "V s_anim_animationCache _stopAnimTimer s_anim_idleAnimations YdoneAnimatingNotify notifyObj stopAnimation 1+U!8 Author objectAnimation updateCel jumpToStep whichStep Author objectAnimation updateCel jumpToPercent s_anim_animationCache successful ZstopAnimation 9a_timeGetTime updateCel playStep .&, " .&, " .&, " 1+U!! 1+U!8 updateCel doneAnimatingNotify jumpToStep currentAnimation currentObject restoreAnimation .&+ +E ,%H.% s_anim_animationCache _stopAnimTimer s_anim_idleAnimations ZstopAnimation restoreAnimation aborted by the user default closeAllAnimations anim_animationSettings objectAnimation anim_animationSettings anim_animationSettings objectAnimation 1, "V s_anim_idleAnimations animationCacheEntry s_anim_animationCache ULanimationCacheEntry anim_Offset s_anim_animationCache ULanimationCacheEntry anim_Offset s_anim_animationCache ULanimationCacheEntry anim_CurrentStep s_anim_animationCache ULanimationCacheEntry anim_CurrentStep s_anim_animationCache objectAnimation ULanimationCacheEntry whichAnimation anim_NumRepetitions s_anim_animationCache objectAnimation ULanimationCacheEntry whichAnimation objectAnimation anim_NumRepetitions s_anim_animationCache objectAnimation ULanimationCacheEntry whichAnimation anim_CelAnimation s_anim_animationCache objectAnimation ULanimationCacheEntry whichAnimation objectAnimation anim_CelAnimation s_anim_animationCache objectAnimation ULanimationCacheEntry anim_ShowAllSteps s_anim_animationCache objectAnimation ULanimationCacheEntry objectAnimation anim_ShowAllSteps s_anim_animationCache objectAnimation ULanimationCacheEntry anim_Duration s_anim_animationCache objectAnimation ULanimationCacheEntry objectAnimation anim_Duration s_anim_animationCache objectAnimation ULanimationCacheEntry anim_NumSteps s_anim_animationCache objectAnimation ULanimationCacheEntry objectAnimation anim_NumSteps s_anim_animationCache objectAnimation ULanimationCacheEntry anim_StepsPerCell s_anim_animationCache objectAnimation ULanimationCacheEntry objectAnimation anim_StepsPerCell objectAnimation anim_StartPosition objectAnimation objectAnimation anim_StartPosition objectAnimation anim_StartSize objectAnimation anim_EndSize s_anim_animationCache ULanimationCacheEntry anim_StartTime s_anim_animationCache ULanimationCacheEntry 9a_timeGetTime anim_elapsedTime 9a_timeGetTime anim_currentTime ,%H.% ,%H.% s_anim_animationCache ZstopAnimation s_anim_idleAnimations whatAnim }playStep _stopAnimTimer aborted by the user updateAnimations updateAnimations animTimerID animTimer zIanim_setTimer animTimer animTimer closeAllAnimations animTimerID Animation k nnte nicht eingerichtet werden; es k nnen keine Animationen abgespielt werden. SetTimer anim_setTimer KillTimer anim_killTimer startAnimTimer Rlanim_killTimer animTimer animTimerID stopAnimTimer mm_mediaWidgets whatWin mm_mediaWidgets showWidgetsProps whatWin mm_WidgetProps myWin autoPlayMedia myStage preloadMedia kautoCloseMedia stageSizing sliderUpdate preloadMedia hasSlider autoCloseMedia kQautoShowMedia sliderUpdate =+currentStage myPage chooseClip stage HautoPlayMedia mm_MediaDialog currentWin currentObj mm_WidgetProps ,3clipRef autoShowMedia showWidgetsProps zIanim_setTimer SetTimer anim_setTimer KillTimer anim_killTimer animTimer animTimer closeAllAnimations animTimerID Animation k nnte nicht eingerichtet werden; es k nnen keine Animationen abgespielt werden. startAnimTimer Rlanim_killTimer animTimer animTimerID stopAnimTimer mm_mediaWidgets whatWin mm_mediaWidgets showWidgetsProps whatWin mm_WidgetProps myWin autoPlayMedia myStage preloadMedia kautoCloseMedia stageSizing sliderUpdate preloadMedia hasSlider autoCloseMedia kQautoShowMedia sliderUpdate =+currentStage myPage chooseClip stage HautoPlayMedia mm_MediaDialog currentWin currentObj mm_WidgetProps ,3clipRef autoShowMedia showWidgetsProps (txt) f_page obj skipNavigation f_paintObject obj useChromakey f_recordField obj obj) & selectedTextlines f_window obj alwaysOnTop alwaysReader authorStatusBar autoClose autoShow autoSize captionBar centerClient clientHandle clientSize currentPage defaultClientSize defaultPage defaultPosition defaultState defaultType hideOnDeactivate icon imageBuffers isOpen matcolor maximumSize minimumSize mousePosition onBackground pageScroll parentHandle parentWindow readerStatusBar revertFocus selectedHotwords selectedTextState state style tile tileOrder type windowHandle 'systemProps f_systemProps obj activeWindowHandle caretLocation focusWindow startup3DInterface startupDrawDirect startupReaderRightClick sys3DInterface sysClientHandle sysCountry sysCurrency sysDrawDirect sysErrorNumber sysEvening sysICountry sysICurrDigits sysICurrency sysIDate sysIDigits sysILZero sysIMeasure sysINegCurr sysITime sysITLZero sysLanguage sysLineEndSize sysLineEndStyle sysList sysLongDate sysMagnification sysMediaBreakKey sysMediaSuspend sysMMEngineVersion sysMorning sysOpenMedia sysOperatingSystem sysOptimizedSave sysPageUnitsPerPixel sysReaderRightClick sysRGBFill sysRGBStroke sysRuntime sysShortDate sysShowMRUfiles sysSupportedMedia sysSuspendMessages sysThousand sysTimeChar sysTool sysTransparent sysUseWindowsColors sysVersion targetWindow Y/widget f_widget obj N0stage f_stage borderWidth innerBevelWidth mediaOpen mediaSize outerBevelWidth outline overlayOpen postEffect preEffect readerVisible roundedCorners stageAnchor stageSizing lastWin() currentPage -- checks the selections checkSelection refresh 4stbk_curOb ZcurrSel -- update state toolbar buttons " " handler. checkingSelection ) <> 1 -- nothing selected, ) = 0 enabled -- {toggles }updates -- "obType" "(No -- more than one . Punt. "propGroup" [display headerType "(Mehrfachauswahl)" -- . Update browser. updateBrowser -- central place setting , sysvars setProp obj,propname,propval,firstLineOnly ZexecutionBuffer,firstLineSpec = " B"props" 's a 4property | = " && " 's a setSysVar B"uprops" && " " && obj && ss = 1= ss -- test failed: syserrornumber sysE = "Error compiling" part U("Fehler beim Kompilieren des Skipts: ")+1 -- sets _. Moved its own so that ^names will xconflict varName,varValue 4" && varname && "= -- returns value sysVarValue 4" && obj. If homebase P, selects vRef = tbk_bookRef() isOpen ls = -- currently browsed "Eigenschafts bersicht"&& "["& P)&"]" -- change radio we're examining ystem "&Systemvariablen" &temeigenschaften" "&Benutzereigenschaften" "&Objekteigenschaften" -- sysProps/sysVars) showProps showUserProps vref -- displays values. Note. _have -- convoluted fanyone's ZvNames,vValues,vlist,i = "< -- systemVars % = obj curProp ss = val = ("@"& G && " " && "<Array>" & "propName" "propValue" "<Neu>" 5-- Added HHirokaM homeBase -- selectedTextLines "propvalue" obref(obj) lists updateHeader Zloc_vNames,loc_vValues,loc_vlist,loc_i -- weed out _used -- declare 4" && -- KLUDGE -- need find array. loc_ss = -- END a widget, "published" -- along fa standard w_propNames obj bookref = != tbk_wid_props p_widget w_propValues {pRef " && f_widget( w_propListText obj ZpropText = tbk_wid_values lst_widget given -- a couple notes on 8beginning f"p_" contain valid each type -- function f"f_" hard coded -- a }. These -- correspond returned H"p_". " hold information on the stored v "p_" -- "f_" functions written ,stbk_propTypes ,propValus Zw_wid we've somehow got invalid isObject( -- what kind {we've obtype = -- widgets tbk_wid_name -- we've " (Widget)" -- we want = f_systemProps( = p_systemProps = lst_systemProps = f_page( = p_page = lst_page = f_background( = p_background = lst_background = f_book( = p_book = lst_book = f_field( = p_field = lst_field = f_recordField( = p_recordField = lst_recordField = f_button( = p_button = lst_button = f_paintObject( = p_paintObject = lst_paintObject picture = f_twoDGraphics( = p_twoDGraphics = lst_twoDGraphics = f_oneDgraphics( [ = p_oneDgraphics = lst_oneDgraphics = f_group( = p_group = lst_group combobox i = f_combobox( = p_combobox = lst_combobox = f_hotword( = p_hotword = lst_hotword = f_oleObject( = p_oleObject = lst_oleObject = f_window( = p_window = lst_window stage = f_stage( = p_stage = lst_stage itemOffset itm, =-- unlink the DLLs used removeLinks -- unlinkDLL "tb30win.dll" %dlg. 1KERNEL" >fts30mtb. OUSER" required initlinks 4sftsIndexingAvailable functions work finitialization files STRING ftsGetIniVar = getIniVar( WORD ftsSetIniVar = setIniVar( { management INT ftsFileExists = fileExists( $ ftsRemoveFile = removeFile( JCopyFile = copyFile( ftsDosString = getDosEnvironmentString( dialog related ChooseDirectoryDlg = chooseDirectoryDlg( OpenFileDlg = openFileDlg( ,INT) SaveAsDlg = saveAsDlg( FileListDlg = getFileListDlg( ListToTextline = listToTextline( TextlineToList = textlineToList( memort GlobalAlloc= ,DWORD) GlobalFree= GlobalHandle= POINTER ftsGlobalLock= GlobalUnlock= oldSuspend = = FALSE full- indexing -- Author level ftsRemoveIndex ftsInitIndex LONG ftsAddContext ftsAddPage ftsAddTextToSection ftsAddSectionsToPage ftsBuildIndex -- Reader ftsOpenIndex ftsCloseIndex ftsTagEntries ftsNamedSections ftsTags ftsContextCount ftsContextTitle ftsAllContextTitles ftsQuery ftsReQuery ftsSetContextScope ftsAllMatchingTitles ftsAllMatchingRefs ftsMatchTitle ftsMatchRef ftsGetOffsets -- Error Handling ftsSetErrorNotify ftsGetErrorNotify ftsGetErrorNumber ftsGetErrorString -- DialogBox ftsSearch ftsSearchKeyword le = ( r= NULL) access Help ftsWinHelp= ftsWinHelpNum= a hyperlink ftsAddlink -- initialize be displayed tbk_bookRef() -- identify vwrRef = "standard" values 2"Hyperlink-Schaltfl che hinzuf currentpage modally -- close isOpen ftsCreatelink "newHW" Aktionswort a selected ftsEditlink bearbeiten" ftsModifylink s=selectedHotwords -- returns a locked nSize ftsGetWinPointer memFlag = 66 ZretValue -- allocate memory : = ftsGlobalAlloc( "Failed allocating retval = -- unlocks frees supplied. ftsFreeWinPointer pMem = ftsGlobalHandle( ftsGlobalUnlock( ftsGlobalFree( entry textEntry dbCaption,dbPrompt,initVal,dType entryDlg = entryPg = "title" dataType uMjBj 
(.txt)