home *** CD-ROM | disk | FTP | other *** search
- ;; Script for smx Demo Disk
-
- DefineVariables
- Directory [InstalDir] := C:\SMXDEMO
- EndDefineVariables
-
- Do Setup
-
- :Main
- If FileExists [InstallFromDrive]:\continue.x
- DeleteFiles from [InstallFromDrive]:\ Quietly
- continue.x
- EndDeleteFiles
- GoTo SkipOpeningMsgs
- EndIf
-
- Dialog 1800
- Welcome to the smx Demos!
- EndDialog
-
- Dialog 4400
- smx is a Registered Trademark of Micro Digital Inc.
-
- 286smx, smx++, smxDLM, smxEMS, smxFile, smxProbe,
- and smxWindows are Trademarks of Micro Digital Inc.
- EndDialog
-
- Dialog PressAKey
- .cNotice to CD Users
-
- The smx demos are designed to be run from a
- diskette. This is due to the need to reboot
- in a controlled manner. If running from a CD,
- please stop now (Ctrl-X), and perform the
- following steps:
-
- .i1. Format a High Density, bootable diskette:
-
- .cformat a:/s
-
- .i2. Copy all Demo files to it, preserving
- .i subdirectories. Example:
-
- .cxcopy /s/v e:\smxdir\*.* a:\
- EndDialog
-
- Dialog PressAKey
- Please observe the following instructions for
- running these demos:
-
- .i1. THE DEMO DISK MUST BE RUN FROM DRIVE A:.
-
- .i2. LEAVE THE DISK IN DRIVE A: FOR THE ENTIRE
- .i TIME YOU ARE RUNNING THE DEMOS.
-
- .i3. DO NOT WRITE-PROTECT THE DISK.
-
- Some of the demos require rebooting the computer,
- and, in some cases, a file is written onto the
- Demo Disk to control rebooting. If your A: drive
- is 3 1/2", exit (Ctrl-X) and follow the instruc-
- tions in the read.me file on the Demo Disk.
- EndDialog
-
- Dialog PressAKey
- Select the demos you wish to run from the menu
- which will appear shortly.
-
- Before running, each demo is decompressed onto
- your hard disk. You can run the demos directly
- from your hard disk, once installed, if you wish.
-
- .cNOTE
- Do not try to run the .exe files on the floppy.
- These are self-decompressing files, not the
- actual demos.
- EndDialog
-
- Dialog PressAKey
- Demo files are copied into C:\SMXDEMO.
-
- If you lack space on C: or want files placed
- somewhere else, exit now (Ctrl-X). Then
- change demo.inf and autoexec.bat on the demo
- disk to use a different disk or directory.
- EndDialog
- :SkipOpeningMsgs
- CreateDirectoryIfNecessary [InstalDir]
- ChangeDirectoryTo [InstalDir]
- Do DemoMenu
-
-
- Procedure DemoMenu
- SetBottomLineTo " Copyright (c) 1992-93 Micro Digital, Inc. "
-
- :Beginning
- TextBox @XY(Center, 18)
- Use to select, Enter to start demo.
- .cPgDn to see all choices.
- EndTextBox
-
- GetMenuChoice @xy(Center,6) UseHeader " smx Demos "
- Multitasking Example (PCdemo)
- Debugger & Text Windowing Package (smxProbe & smxWindows)
- File Manager (smxFile)
- smx Class Library (smx++)
- Dynamic Load Modules (smxDLM)
- 16-bit Protected Mode (286smx)
- Extended Memory Services (smxEMS)
- Slide Show (smx)
- Exit
- EndGetMenuChoice
-
- InCase Choice is
- =1: Do PCdemo
- =2: Do WinDemo
- =3: Do smxFILE
- =4: Do smxPP
- =5: Do DLM
- =6: Do 286demo
- =7: Do EMS
- =8: Do Slideshow
- =9: Do Quit
- EndInCase
-
- ClearScreen
- GoTo Beginning
- EndProcedure
-
-
-
- Procedure PCdemo
- ClearScreen
- Do Root
- If DirectoryExists [InstalDir]\pcdemo
- Else
- Do LeadIn
- OSCommand [InstallFromDrive]:\pcdemo\pcdemo -d Quietly
- EndIf
- ChangeDirectoryTo [InstalDir]\pcdemo
- ClearScreen
- BrowseFile pcdemo.doc WhiteOnMagenta UseHeader ".L Press Esc to Start Demo "
- Run pcdemolt.exe NoFrame NoPrompt
- Do Trailer
- EndProcedure
-
-
- Procedure WinDemo
- ClearScreen
- Do Root
- If DirectoryExists [InstalDir]\windemo
- Else
- Do LeadIn
- OSCommand [InstallFromDrive]:\windemo\windemo -d Quietly
- EndIf
- ChangeDirectoryTo [InstalDir]\windemo
- ClearScreen
- BrowseFile windemo.doc WhiteOnMagenta UseHeader ".L Press Esc to Start Demo "
- Run windemo.exe NoFrame NoPrompt
- Do Trailer
- EndProcedure
-
- Procedure smxPP
- ClearScreen
- Do Root
- If DirectoryExists [InstalDir]\smxpp
- Else
- Do LeadIn
- OSCommand [InstallFromDrive]:\smxpp\smxpp -d Quietly
- EndIf
- ChangeDirectoryTo [InstalDir]\smxpp
- ClearScreen
- BrowseFile smxpp.doc WhiteOnMagenta UseHeader ".L Press Esc to Start Demo "
- ChangeDirectoryTo [InstalDir]\smxpp\ddemopp
- Run ddemolt.exe NoFrame NoPrompt
- Do Trailer
- EndProcedure
-
- Procedure smxFILE
- ClearScreen
- Do Root
- If DirectoryExists [InstalDir]\file
- Else
- Do LeadIn
- OSCommand [InstallFromDrive]:\file\file -d Quietly
- EndIf
- ChangeDirectoryTo [InstalDir]\file
- ClearScreen
- BrowseFile file.doc WhiteOnMagenta UseHeader ".L Press Esc to Start Demo "
-
- GetMenuChoice
- Run with BIOS Drivers
- Run with Our IDE and Floppy Drivers
- ; Do NOT select this option unless you have an IDE drive!
- EndGetMenuChoice
- InCase Choice is
- =1: GoTo BIOS
- =2: GoTo OurDriver
- EndInCase
-
- :BIOS
- CreateFile [InstallFromDrive]:\file.x
- Dialog PressAKey
- In order for the File Manager demo to run, it is nec-
- essary to reboot your computer. The demo will begin
- automatically after booting from the Demo Disk.
- EndDialog
- GoTo EndOurDriver
-
- :OurDriver
- CreateFile [InstallFromDrive]:\filed.x
- Dialog PressAKey
- In order for the File Manager demo to run, it is nec-
- essary to reboot your computer. The demo will begin
- automatically after booting from the Demo Disk.
-
- AFTER YOU ARE DONE RUNNING THE FILE MANAGER DEMO WITH
- OUR DRIVERS, REBOOT AGAIN. This is necessary because
- our drivers bypass the BIOS. When the demo completes,
- the BIOS takes over, but it gets confused about what
- has happened in the interim.
- EndDialog
- :EndOurDriver
- Dialog 30000
- .cReboot Your Computer Now.
-
- The File Manager demo will begin automatically
- after rebooting.
- EndDialog
- Do Trailer
- EndProcedure
-
-
- Procedure DLM
- ClearScreen
- Do Root
- If DirectoryExists [InstalDir]\dlm
- Else
- Do LeadIn
- OSCommand [InstallFromDrive]:\dlm\dlm -d Quietly
- EndIf
- ChangeDirectoryTo [InstalDir]\dlm
- ClearScreen
- BrowseFile dlm.doc WhiteOnMagenta UseHeader ".L Press Esc to Start Demo "
- Dialog PressAKey
- You can load and run the following DLM's
- while running this demo:
-
- .i 1. msg
- .i 2. prempt
- .i 3. sleep
-
- You can also unload and reload these DLM's.
- EndDialog
- Run dlm.exe NoFrame NoPrompt
- Do Trailer
- EndProcedure
-
- Procedure 286demo
- ClearScreen
- Do Root
- If DirectoryExists [InstalDir]\286
- Else
- Do LeadIn
- OSCommand [InstallFromDrive]:\286\286 -d Quietly
- EndIf
- ChangeDirectoryTo [InstalDir]\286
- ClearScreen
- BrowseFile 286.doc WhiteOnMagenta UseHeader ".L Press Esc to Start Demo "
- CreateFile [InstallFromDrive]:\286.x
- Dialog 60000
- 286Demo cannot be run from within this instal
- utility. If you reboot your computer from the
- Demo Disk, 286Demo will begin automatically.
-
- Before you reboot, though, you must make sure
- that the Phar Lap 286|DOS Extender is installed
- on your system.
-
- Exit now, using Ctrl-X, to add the path to run286
- to the path statement in autoexec.bat on the Demo
- Disk. Then reboot.
- EndDialog
- Do Trailer
- EndProcedure
-
- Procedure EMS
- ClearScreen
- Do Root
- If DirectoryExists [InstalDir]\ems
- Else
- Do LeadIn
- OSCommand [InstallFromDrive]:\ems\ems -d Quietly
- EndIf
- ChangeDirectoryTo [InstalDir]\ems
- ClearScreen
- BrowseFile ems.doc WhiteOnMagenta UseHeader ".L Press Esc to Start Demo "
- CreateFile [InstallFromDrive]:\ems.x
- Dialog PressAKey
- Memory Managers such as DPMI servers and HIMEM.SYS
- conflict with smxEMS. When running an smxEMS
- application, it is necessary to remove all other
- memory managers. In order to accomplish this for
- the demo, just reboot your computer from the Demo
- Disk. This will ensure that none of the memory
- managers you normally use will be running.
- EndDialog
- Dialog 30000
- Reboot Your Computer Now. Leave Demo Disk in Drive.
-
- The Extended Memory Services demo will then begin.
- EndDialog
- Do Trailer
-
- EndProcedure
-
-
- Procedure Slideshow
- ClearScreen
- Do Root
- If DirectoryExists [InstalDir]\slshow
- Else
- Do LeadIn
- OSCommand [InstallFromDrive]:\slshow\slshow -d Quietly
- EndIf
- ChangeDirectoryTo [InstalDir]\slshow
- ClearScreen
- BrowseFile slshow.doc WhiteOnMagenta UseHeader ".L Press Esc to Start Demo "
- CreateFile [InstallFromDrive]:\slshow.x
- Dialog PressAKey
- The Slide Show demo cannot be run from within
- rundemos. If you reboot your computer from the
- Demo Disk, the demo will begin automatically.
- EndDialog
- Dialog 30000
- Reboot Your Computer Now. Leave Demo Disk in Drive.
-
- The Slide Show demo will then begin.
- EndDialog
- Do Trailer
- EndProcedure
-
-
- Procedure Root
- ;; Copy root files if necessary
- If FileExists [InstalDir]\test.dat
- Else
- Do LeadIn
- OSCommand [InstallFromDrive]:\root -d Quietly
- OSCommand copy [InstallFromDrive]:\read.me [InstalDir]\read.me Quietly
- EndIf
- EndProcedure
-
-
- Procedure LeadIn
- ClearScreen
- Dialog 1000
- Copying / Uncompressing Files
- EndDialog
-
- SetTopLineAttrTo WhiteOnBlack
- SetTopLineTo BlankString
- SetBottomLineAttrTo WhiteOnBlack
- SetBottomLineTo BlankString
- SetScreenAttrTo WhiteOnBlack
- SetBackgroundCharTo 0
- ClearScreen
- EndProcedure
-
-
- Procedure Trailer
- ChangeDirectoryTo [InstalDir]
- SetScreenAttrTo WhiteOnMagenta
- SetBackgroundCharTo B2
- SetTopLineAttrTo WhiteOnMagenta
- SetTopLineTo " smx Demo Disk "
- SetBottomLineAttrTo WhiteOnMagenta
- ;; SetBottomLineTo " Copyright (c) 1992-93 Micro Digital, Inc. <Ctrl-X> - Exit "
- SetBottomLineTo " Copyright (c) 1992-93 Micro Digital, Inc. "
- ClearScreen
- EndProcedure
-
- Procedure Setup
- ;; LetButton <Esc> Do Terminate
- LetButton <CtrlX> Do Terminate
-
- SetScreenAttrTo WhiteOnMagenta
- SetBackgroundCharTo B2
- SetShadowAttrTo BlackOnBlack
- SetAttentionAttrTo WhiteOnMagenta
- SetPopUpAttrTo WhiteOnMagenta
- SetTopLineAttrTo WhiteOnMagenta
- SetTopLineTo " smx Demo Disk "
- SetBottomLineAttrTo WhiteOnMagenta
- SetBottomLineTo " Copyright (c) 1992-93 Micro Digital, Inc. <Ctrl-X> - Exit "
- SetCheckmarks off
- EndProcedure
-
-
- Procedure Quit
- ClearScreen
- Dialog PressAKey WhiteOnMagenta
- If you did not see the demo or information you
- need, please try our bulletin board.
-
- .c(714) 893-5118
-
- or call
-
- .c1-800-366-2491
-
- .c(714) 373-6862 FAX (714) 891-2363
- EndDialog
- ChangeDirectoryTo [InstalDir]
- Do Terminate
- EndProcedure
-
-
- Procedure Terminate
- Dialog 600 MagentaOnWhite
- Exiting
- EndDialog
- SoLong
- EndProcedure
-
- EndScript