home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Interplanetary Explorer
/
EXPLORER.ISO
/
tbkmm.sbk
(
.txt
)
< prev
next >
Wrap
Asymetrix ToolBook File
|
1994-09-04
|
32KB
|
460 lines
<BookPath>
:HDMEDIAPATH
jwJpISimPjmIeAEos
Tms Rmn
Tms Rmn
CDBSE&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
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
superscriptSubscript
&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
BOOK SCRIPT FOR THE MULTIMEDIA SYSTEM
tbkMCIchk cmd,notif,req,brk
ZretVal
sysErrorNumber
tbkmci(
syserrornumber<>0
tbkmmerrorstring(
tbkBitmapChk
-- When
]TBKBMP.DLL standalone, you should
modify
-- function
use the bitmap
reporter
tbkbmperrorstring(
brk<>
--Cover functions
--These allow authors
pass
device alias instead
tbkMCIPositionWindow devAlias,windowPos,flags
Zhwnd
9("status" &&
3 && "
","")
tbkPositionWindow(
tbkMCICenterWindow
&& "
","")
tbkCenterWindow(
tbkBitmapPositionWindow
&& "
tbkBitmapCenterWindow
&& "
tbkMCIGetWindowRect
&& "
","")
tbkGetWindowRect(
tbkBitmapGetWindowRect
&& "
4s_mminit
tbkMMInitializeSystem
-- guard against
4having been restored!
{ <>
stuff used
Hwidgets
X"tbkwin.dll"
YieldApp()
<> 0
"TBKWIN.
xfound. Some
X may
xwork"
X"tbkdlg.
OpenDlg(
<> 0
"TBKDLG.
readdmm
multimedia
"winhelp.exe
.hlp"
tbkmmdevices
4s_mmdevices
f("Multimedia")
c"Help"
-- stub so some
will
without ES boxes
checkdevice
-- General utility
-- Someday, ToolBook
Thave built-
data type checking
isNumber x
x + 0
--repair 3D
resizing them
sized
Zsnap, txCN, hi, lo
txClassName
; <>
"Repair 3D
f"&Yes"
"&No"
c"No"
sysSuspendMessages
recessed
c"3DFrame"
+ 15,
+ 15,\
+ 15,
"3DField"
"3DRect"
znothing
- 15,
- 15,\
- 15,
+ 15,
+ 15,\
+ 15,
-- Slider control
begins here
-- NOTES ABOUT IDENTIFIERS
-- s___ prefix ->
handler
only
c"Thumb"
___setSliderLimits
4s___v, s___min, s___max, s___p
down\
prevent updating
mouse
xmoved
"HSliderThumb"
loc -
___slidePos(
"VSliderThumb"
sliderPosition
___snapSlider\
(1 -
glide
width
height
p, s1, s2
b(0,(p - s1) /(s2 - s1))
thumb
-- Another
controlling
OldMin
OldMax
j(1,(
b(0,p)))
"vSliderThumb"
pOffset
) * (1-p)
newPos
"hSliderThumb"
) * p
-- Restore state
detentList
detents
catchRange
0 <>
ends
-- This initialization usually
runs ONCE, unless
app calls
tbkmmInitializeSystem
asure MME
loaded
X"mmsystem.
killtbkmmsbk
--
private (exported, but undocumented)
tbkmmloadextensions( )
-- The
these are
standard
L entry points
tbkmmversion()
-- MCI central interface
-- parallel
MMSYSTEM
tbkTimerStart(
tbkTimerStop(
tbkTimerCapability()
-- Utility
\ MilliSecFromMSF(
\ MilliSecFromHMS(
\ MilliSecFromSMPTE(
MSFFromMilliSec(
HMSFromMilliSec(
SMPTEFromMilliSec(
-- Translation
tbkMMTranslate(
<> 0
"TBKMM.
link failed"
support
<> 0
-- End
Script
.&+ +E
tbkmmerrorstring
tbkmci
tbkMCIchk
.&+ +E
tbkmmerrorstring
tbkBitmap
tbkBitmapChk
tbkMCI
%tbkPositionWindow
window handle
status
tbkMCIPositionWindow
tbkCenterWindow
tbkMCI
window handle
status
tbkMCICenterWindow
tbkBitmap
window
%tbkPositionWindow
status
tbkBitmapPositionWindow
tbkBitmap
tbkCenterWindow
window
status
tbkBitmapCenterWindow
tbkMCI
tbkGetWindowRect
window handle
status
tbkMCIGetWindowRect
tbkBitmap
window
tbkGetWindowRect
status
tbkBitmapGetWindowRect
tbkMMInitializeSystem
s_mminit
enterSystem
tbkdlg.dll
P*readdmm
OpenDlg
TBKWIN.DLL not found. Some widgets may not work
TBKDLG.DLL not found. Some widgets may not work
s_mminit
tbkwin.dll
YieldApp
enterbook
winhelp.exe tbkmm.hlp
multimedia
s_mmdevices
tbkmmdevices
P*readdmm
author
author
Multimedia
&Multimedia
readdmm
checkdevice
isNumber
^recessed
3DFrame
author
3DField
Repair 3D object after resizing?
txClassName
3DRect
recessed
sized
"___setSliderLimits
false
txClassName
Thumb
buttonDown
1,"!#
s___p
false
s___v
HSliderThumb
___slidePos
s___max
VSliderThumb
txClassName
s___min
buttonStillDown
s___v
false
s___p
HSliderThumb
___slidePos
s___max
VSliderThumb
txClassName
s___min
i0___snapSlider
sliderPosition
buttonUp
s___v
HSliderThumb
s___max
VSliderThumb
txClassName
s___min
glide
___setSliderLimits
___slidePos
sliderPosition
"___setSliderLimits
newPos
OldMax
hSliderThumb
pOffset
group
SliderThumb
s___max
OldMin
vSliderThumb
txClassName
s___min
thumb
sliderPosition
sliderPosition
detents
detentList
___snapSlider
TBKMM.DLL link failed
tbkmmloadextensions
tbkmmversion
tbkmmerrorstring
,&Ub5
tbkMCI
tbkTimerStart
tbkTimerStop
tbkTimerCapability
MilliSecFromMSF
, UN+
MilliSecFromHMS
MilliSecFromSMPTE
MSFFromMilliSec
HMSFromMilliSec
SMPTEFromMilliSec
tbkMMTranslate
tbkGetWindowRect
tbkPositionWindow
tbkCenterWindow
, Uroupg
mmsystem.dll
killtbkmmsbk
P*readdmm
tbkmm.dll
tbkmmerrorstring
s_mmdevices
jtbkmmloadextensions
tbkmmInitializeSystem
s_mminit
mmsystem
tbkmmInitializeSystem
Iitemnum
Microsoft Windows with Multimedia is not present. No multimedia devices or widgets will work.
killtbkmmsbk
tbkmm.sbk
itemnum
Cancel
Warning! Altering the script for this system book may cause multimedia applications to break!
Proceed
author
killtbkmmsbk
"Microsoft Windows
fMultimedia
xpresent. No multimedia devices
widgets will work."
itemnum(
I tmplist
"Warning! Altering the
8may cause
applications
f"Proceed"
"Cancel"
DlgTitle
tbkmmversion
Multimedia System Book
DlgTitle
Multimedia System Book
author
emnum
Microsoft Windows with Multimedia is n
tering the script for this system book may cause multimedia applications to break!
Proceed
Cancel
Proceed