| > !Boot 13-Nov-2008
| !Boot for !Z80Tube (Assembler version)
| (C) Copyright 1993-2008 J.G.Harston
|
| Set paths to Z80Tube:
Set Z80Tube$Dir <Obey$Dir>
Set Z80Tube$Path <Z80Tube$Dir>.
|
| File containing Z80 emulator:
Set Z80Tube$Code Z80Tube:Z80Tube
|
| Where is Basic?
Set Z80Tube$Basic Z80Tube:BBCBasic
|
| What to run if nothing given:
Set Z80Tube$Null <Z80Tube$Basic>
|Set Z80Tube$Null Z80Tube:CPM
|
| Set up pointers to disk images:
|Set Z80Tube$Drive0 ADFS::JGH.$.DiskImages.CPM0
|Set Z80Tube$Drive1 ADFS::JGH.$.DiskImages.CPM1
|
| Set up *Z80 command to start and enter module:
Set Alias$Z80 Run Z80Tube:!Run %%*0
|Set Alias$CPM Run Z80Tube:!Run -cmd CPM
|
| Set runtypes for various Z80 files:
Set Alias$@RunType_201 Z80 -mos Z80Tube:MOS %%*0
Set Alias$@RunType_280 Z80 %%*0
Set Alias$@RunType_2F0 Z80 -mos %%*0
Set Alias$@RunType_2F8 Z80 -mos %%*0
Set Alias$@RunType_2FC Z80 -mos %%*0
Set Alias$@RunType_2FF Z80 -mos %%*0
|
| Set filetype names:
Set File$Type_201 CPMCom
Set File$Type_280 Z80
Set File$Type_2F0 MOS4k
Set File$Type_2F8 Z80MOS
Set File$Type_2FC MOS1k
|
| Get the desktop sprites:
IconSprites Z80Tube:!Sprites
|
| Override with any local choices:
/Z80Tube:X /Choices:Z80Tube.Choices