Neat, Closeout | Amstrad DDI-1 guide

10 DIM colour(2)

20 MODE 1:ORIGIN 0,0,0,640,0,400 : REM reset screen

30 dumpfile$="flagdump.srn"

40 FOR i=0 TO 2

50 READ colour(i): REM Get colours from DATA statement

60 INK i,colour(i)

70 NEAT

80 OPENOUT "Param.dat"

90 WRITE #9,dumpfile$,1: REM save filename and mode 100 FOR i=0 TO 2

110 WRITE #9,colour(i): REM save colours

120 NEXT i

130 CLOSEOUT

140 BORDER 0

150 FOR x=-65 TO 60 STEP 2

160 MOVE x,400:DRAWR 24,-150,1

170 MOVE x,O:DRAWR 240,150

180 NEXT x

190 FOR x=575 TO 700 STEP 2

200 MOVE x,400:DRAWR -240,-150

210 MOVE x,O:DRAWR -240,150

220 NEXT x

230 FOR x=-40 TO 0 STEP 2

240 MOVE x,400:DRAWR 240,-150,2

250 NEXT x

260 FOR x=0 TO 40 STEP 2

270 MOVE x,O:DRAWR 240,150

280 NEXT x

290 FOR x=640 TO 680 STEP 2

300 MOVE x,O:DRAWR -240,150

310 NEXT x

320 FOR x=600 TO 640 STEP 2

330 MOVE x,400:DRAWR -240,-150

340 NEXT x

350 ORIGIN 0,0,260,372,0,400:CLG 1

360 ORIGIN 0,0,0,640,150,250:CLG 1

370 ORIGIN 0,0,284,348,0,400:CLG 2

380 ORIGIN 0,0,0,640,169,231:CLG 2

390 SAVE dumpfile$,b,&C000,&4000

400 DATA 2,26,6

Chapter 2.5

AMSTRAD Disc Drive & Interface DDI-1 Manual

Image 39

Amstrad DDI-1 manual Neat, Closeout

Contents

Page Amstrad Disc Drive & Interface DDI-1 Amstrad Contents Contents Page Connecting the Mains Lead Foundations 1 Setting Up Connecting the DDI-1 to the Computer Computer Interface Unit Main Disc Drive Drive a Computer Write Protection Foundations 2 About Discs Open Closed When Your Disc Is Eject Button Indicator Lamp ROLCAVE. not found Drive a disc missing Retry, Ignore or Cancel?Foundations Loading Software/Games Run rolcave Type mismatch Bad commandSyntax error Drive a read fail Retry, Ignore or Cancel? Foundations Introducing Amsdos and CP/M Tape.in Drive B disc missing Retry, Ignore or CancelLoad filename Disc First Steps Using The CP/M Disc Storing Data Onto DiscCpm CLS? Back to Amsdos BewareSaving a Program in Memory onto Disc Catalog Loading From DiscEXAMPLE.BAS Copying Programs From Disc to Disc Copying Programs From Cassette to DiscCopying Programs From Disc to Cassette Copying Using Disccopy Copying Using the CP/M System Disc Do you want to copy another disc Y/N Copying Using CopydiscCopying started Reading track 0 to Writing track 0 to Chkdisc Checking DiscsAborting Discchk Installation Amstrad Disc Drive & Interface DDI-1 Manual Making Working Discs Backup Master Disc DISCCOPY.COM Working SYSTEM/UTILITY discBasic only disc Turnkey Amstrad Basic discs Creating a Turnkey CP/M System disc Turnkey Basic using disc suppliedTurnkey CP/M Discs Turnkey Basic onto your Working disc Configuring a CP/M Program Configuring the Output from the packageAmbiguous filename Confirm individual files Y/N ? Configuring the Input to the package Starting a Turnkey CP/M PackagePayroll Autostarting a Turnkey CP/M Package Introduction Amsdos Primer Disc Directory Amsdos filenames and filetypesConstruction of Filenames Amsdos headers Filenames on two drivesSave PROG.BAS a Save Bprog .BAS BERT.BAS FRED1.BAS FRED2.BAS FRED3.BAK FRED3.BAS FINISH.BAS Examples of Using Amsdos Commands in a programWild cards Saving variables and performing a Screen Dump Closeout Neat Wend Closein Reference guide to Amsdos commandsPre-empting a Garbage Collection While not EOF CAT Summary of Basic commandsSummary of Amsdos external commands Save OPENOUT, Print #9, Write #9, List #9, Closeout DISC.IN CPMDIR Disc TAPE.IN ERAREN Tape Ascii files File Copying proceduresCopying Files Amsdos files with headers File has a header Amstrad Reference guide to Amsdos Error Messages Drive Drive write fail Drive Drive disc missingDrive Drive disc is write protected Drive Drive read fail CP/M Primer Operating with CP/MCP/M system tracks Configuration Sector Console control codesLogging in a disc ERA command Direct Console CommandsSwitching default drives DIR command Peripheral Management Transient commandsREN command Type command Cassette files File and disc copyingSingle file copying Whole disc copiers and checkers Stat System Management Is this correct Y/N SetupDo you want to update your system disc Y/N Stat SECRET.BAS $DIR Format D Format I Format Disc GenerationAmsdos Format Sysgen BootgenAdvanced programming Movcpm Amstrad Disc Drive & Interface DDI-1 Manual Introduction to Logo What is Logo Getting Started Dr. Logo To squareanysize side repeat 4 fd side rt 90 end Procedures with parametersRepeat 4 fd 60 rt To square Repeat 4 fd 60 rt 90 end To triangle Repeat 3 fd edge rt 120 end Using Variables to remember valuesEditing programs and procedures Cs squareanysize 100 rt 45 squareanysize Summary of Dr. Logo primitives Operating hints Count Word and List ProcessingAscii Char List EmptypFirst Fput Arithmetic Operations Logical Operations ?= Logo Logo Not Variables Procedures Show EditingText Screen Setsplit Dot CleanGraphic Screen Type Pal SetpalWindow Wrap Turtle Graphics Setpc Seth Nodes Workspace ManagementSetpos Ern Plist RecycleGlist Gprop KEYBOARD, Joystick buttonp Disc Files DirLoad Save ?key Paddle?paddle 0 ?make key rc Release SoundEnv Ent Stop LabelRepeat Run Throw ErrorCatch Pause System Properties Headers Technical information for the user Firmware Store requirements Changing Discs Error Messages Bios messagesAmsdos messages Failed to load boot sector Common to ALL Formats Disc Organisation Jump Block Interception by Amsdos Jump Block Re-Interception by the UserReturn Parameters Intercepted Firmware Calls 132 #BC8C 133 #BC8F 134 #BC92 135 #BC95 #BC98137 #BC9B Page Appendix Glossary of Terms CP/M Dr.Logo Primitives TPA Amstrad Disc Drive & Interface DDI-1 Manual Appendix Term Limitations of Remedies Amstrad Disc Drive & Interface DDI-1 Manual Appendix Index ERA Setpos