Amstrad DDI-1 manual Emptyp, First, Fput, List, True

Page 65

emptyp

Outputs TRUE if the input object is an empty word or an empty list; otherwise outputs

FALSE.

?emptyp "

TRUE ?emptyp []

TRUE ?emptyp [x]

FALSE ?make "x [] ?emptyp :x

TRUE

first

Outputs the first element of the input object.

?first "zebra z

?first [1 2 3] 1

fput

(firstput) Outputs a new object formed by making the first input object the first element in the second object.

?fput "s "milessmiles smilessmiles

?fput 1 [2 3] [1 2 3]

item

Outputs the specified element of the input object.

?item 4 "dwarf r

list

Outputs a list made up of the input objects, retains lists' outer brackets (compare with s e).

?(list 1 2 3 4) [l 2 3 4]

?List "big [feet] [big [feet]] ?(list)

[]

Chapter 4.7

AMSTRAD Disc Drive & Interface DDI-1 Manual

Image 65

Contents Page Amstrad Disc Drive & Interface DDI-1 Amstrad Contents Contents Page Connecting the Mains Lead Foundations 1 Setting UpConnecting the DDI-1 to the Computer Computer Interface Unit Main Disc Drive Drive a Computer Write Protection Foundations 2 About DiscsOpen Closed When Your Disc Is Eject Button Indicator LampFoundations Loading Software/Games Drive a disc missing Retry, Ignore or Cancel?Run rolcave ROLCAVE. not foundSyntax error Bad commandDrive a read fail Retry, Ignore or Cancel? Type mismatchFoundations Introducing Amsdos and CP/M Load filename Drive B disc missing Retry, Ignore or CancelDisc Tape.inCpm First Steps Using The CP/M DiscStoring Data Onto Disc CLS? Saving a Program in Memory onto Disc Back to AmsdosBeware EXAMPLE.BAS CatalogLoading From Disc Copying Programs From Disc to Cassette Copying Programs From Disc to DiscCopying Programs From Cassette to Disc Copying Using Disccopy Copying Using the CP/M System DiscCopying started Reading track 0 to Copying Using CopydiscWriting track 0 to Do you want to copy another disc Y/NAborting Checking DiscsDiscchk ChkdiscInstallation Amstrad Disc Drive & Interface DDI-1 Manual Making Working Discs Backup Master DiscBasic only disc Working SYSTEM/UTILITY discTurnkey Amstrad Basic discs DISCCOPY.COMTurnkey CP/M Discs Turnkey Basic using disc suppliedTurnkey Basic onto your Working disc Creating a Turnkey CP/M System discAmbiguous filename Confirm individual files Y/N ? Configuring a CP/M ProgramConfiguring the Output from the package Payroll Configuring the Input to the packageStarting a Turnkey CP/M Package Autostarting a Turnkey CP/M Package Introduction Amsdos PrimerConstruction of Filenames Disc DirectoryAmsdos filenames and filetypes Save PROG.BAS a Save Bprog .BAS Amsdos headersFilenames on two drives Wild cards Examples of Using Amsdos Commands in a programSaving variables and performing a Screen Dump BERT.BAS FRED1.BAS FRED2.BAS FRED3.BAK FRED3.BAS FINISH.BASCloseout NeatPre-empting a Garbage Collection Reference guide to Amsdos commandsWhile not EOF Wend CloseinSummary of Amsdos external commands Summary of Basic commandsSave OPENOUT, Print #9, Write #9, List #9, Closeout CATDIR CPMDisc DISC.INREN ERATape TAPE.INCopying Files File Copying proceduresAmsdos files with headers Ascii filesFile has a header Amstrad Reference guide to Amsdos Error Messages Drive Drive disc is write protected Drive Drive disc missingDrive Drive read fail Drive Drive write failCP/M system tracks CP/M PrimerOperating with CP/M Logging in a disc Configuration SectorConsole control codes Switching default drives Direct Console CommandsDIR command ERA commandREN command Transient commandsType command Peripheral ManagementSingle file copying File and disc copyingWhole disc copiers and checkers Cassette filesStat System ManagementDo you want to update your system disc Y/N SetupStat SECRET.BAS $DIR Is this correct Y/NAmsdos Disc GenerationFormat Format D Format I FormatAdvanced programming BootgenMovcpm SysgenAmstrad Disc Drive & Interface DDI-1 Manual Introduction to Logo What is LogoGetting Started Dr. LogoRepeat 4 fd 60 rt Procedures with parametersTo square Repeat 4 fd 60 rt 90 end To squareanysize side repeat 4 fd side rt 90 endEditing programs and procedures Using Variables to remember valuesCs squareanysize 100 rt 45 squareanysize To triangle Repeat 3 fd edge rt 120 endSummary of Dr. Logo primitives Operating hintsAscii Word and List ProcessingChar CountFirst EmptypFput ListArithmetic Operations Logical Operations ?= Logo Logo NotVariables ProceduresText Screen EditingSetsplit ShowGraphic Screen CleanType DotWindow PalSetpal Wrap Turtle GraphicsSetpc SethSetpos Workspace ManagementErn NodesGlist RecycleGprop PlistLoad Disc Files DirSave KEYBOARD, Joystick buttonp?paddle 0 Paddle?make key rc ?keyEnv SoundEnt ReleaseRepeat LabelRun StopCatch ErrorPause ThrowSystem Properties Headers Technical information for the user FirmwareStore requirements Changing DiscsAmsdos messages Error MessagesBios messages Failed to load boot sector Common to ALL Formats Disc OrganisationReturn Parameters Jump Block Interception by AmsdosJump Block Re-Interception by the User 137 #BC9B Intercepted Firmware Calls132 #BC8C 133 #BC8F 134 #BC92 135 #BC95 #BC98 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