APPLICATIONSBUREAUTIQUE ★ Computerised Address Book ★

Computerised Address Book (The Amstrad User)Applications Bureautique
★ Ce texte vous est présenté dans sa version originale ★ 
 ★ This text is presented to you in its original version ★ 
 ★ Este texto se presenta en su versión original ★ 
 ★ Dieser Text wird in seiner Originalfassung präsentiert ★ 

Andrew Ferguson of Ayr in Queensland has converted this program to run on the Amstrad CPC464. It is in the type of program that can form the basis of a more complex system. Full marks to Andrew for supplying some comprehensive documentation..

Program Commentary

On run the title page is displayed Program asks if you wish to use old or new data- If electing to use data from tape, type "old" and program will ask for filename. Enter filename, and data will load from your data tape. First-time users will need to create files. Type "new" and you will be presented with menu choices.

To Add a record, enter 4. Program asks for name, which should be entered as: christian name surname (e.g. Bill Smith), with other requested details. When record is complete, program returns to menu.

To List All Records, enter 3. Each record will be displayed, and program will return to menu.

To Change a Record, enter 5. Name of record should be entered as christian name surname. Menu prompts for item to be changed. When change is entered, changed record is displayed.

To Delete a Record, enter 6. Record should be entered as christian name surname.

Entering 7 gives instructions to Save, or Return to Menu.

Saving, program asks for filename. When entered, usual prompt for saving comes up. N.B. While saving, write filename on cassette index.

To Find Record by Town, enter 2. Program prompts for name of towa

Entering town name gives list of all records from that particular town.

To Find Record by Name, enter 1. Enter name as christian name surname. Press spacebar to return to menu.

How It Works

  • Line Effect
  • 10- 100 Main loop
  • 1000- 1090 Initialisation sub-routine
  • 1100- 1300 create arrays
  • 1400- 1403 checks old/new data
  • 1410- 1550 load data from tape
  • 3000- 3150 title page sub-routine
  • 3500- 3850 menu
  • 4000- 4140 sub-routines to menu choices
  • 5000- 5190 find record/name sub-routine
  • 6000- 6110 find record/town sub-routine
  • 7000- 7040 list all records sub-routine
  • 7100- 7560 edit record sub-routine
  • 8000- 8160 delete a record sub-routine
  • 10000-10150 add a record sub-routine
  • 10200-10510 modifying name sub-routine
  • 12000-12150 save record to tape

    Variables Used

  • choi = menu choice
  • size — number of records in memory
  • namfld$ = name of person
  • modfld$ = name held as surname/christian name
  • strfld$ = street
  • twnfld$ = town
  • subfld$ = suburb
  • telfld$ = telephone no.
  • posfld$ = postcode
  • fin$ = filename for saving/loading files to tape
  • cnam$ holds christian name
  • snam$ holds surname
  • a,c,i,ls,tz,contv,a$,p$,n$ control variables nrc$,frn$,dwr$,temp$,crna$ control variables
TAU #3

★ PUBLISHER: The Amstrad User (Australia)
★ YEAR: 1984
★ CONFIG: 64K + AMSDOS
★ LANGUAGE:
★ LICENCE: LISTING
★ AUTHOR: Andrew Ferguson

★ AMSTRAD CPC ★ DOWNLOAD ★

Je participe au site:
» Newfile(s) upload/Envoye de fichier(s)
★ AMSTRAD CPC ★ A voir aussi sur CPCrulez , les sujets suivants pourront vous intéresser...

Lien(s):

CPCrulez[Content Management System] v8.7-desktop/cache
Page créée en 108 millisecondes et consultée 863 fois

L'Amstrad CPC est une machine 8 bits à base d'un Z80 à 4MHz. Le premier de la gamme fut le CPC 464 en 1984, équipé d'un lecteur de cassettes intégré il se plaçait en concurrent  du Commodore C64 beaucoup plus compliqué à utiliser et plus cher. Ce fut un réel succès et sorti cette même années le CPC 664 équipé d'un lecteur de disquettes trois pouces intégré. Sa vie fut de courte durée puisqu'en 1985 il fut remplacé par le CPC 6128 qui était plus compact, plus soigné et surtout qui avait 128Ko de RAM au lieu de 64Ko.