DataMuseum.dk

Presents historical artifacts from the history of:

Christian Rovsing CR7, CR8 & CR16 CP/M

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Christian Rovsing CR7, CR8 & CR16 CP/M

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download

⟦e40389f93⟧ TextFile

    Length: 1152 (0x480)
    Types: TextFile
    Names: »EDITCARD.FMT«

Derivation

└─⟦96695c514⟧ Bits:30005859 DBase II og SuperCalc2
    └─⟦this⟧ »EDITCARD.FMT«

TextFile

* EDITCARD.FMT
@  1,10 SAY "Tickle File Control Screen"
@  3, 0 SAY "Contact " GET contact
@  4, 0 SAY "Company " GET company
@  5, 0 SAY "Address " GET address
@  6, 0 SAY "City    " GET city
@  7, 0 SAY "State   " GET state
@  7,16 SAY "Zip " GET zip PICT '99999-9999'
@  8, 0 SAY "Phone   " GET phone PICT '999/999-9999'
@  3,54 SAY "Your Initials  "
@  3,69 GET initials PICT '!!!'
@  4,54 SAY "Entry Date"
@  4,67 GET e:date PICT '99/99/99'
@  5,54 SAY "Tickle Date"
@  5,67 GET tkl:date PICT '99/99/99'
@  6,54 SAY 'Keyword  ' GET keyword
@ 10, 2 SAY "Comment   " GET line1
@ 11,12 GET line2
@ 14, 0 SAY "--------------------------------------------------"
@ 14,50 SAY "------------------------------"
@ 15,08 SAY "     ^ ^E  fields               ^R  back cards(records)"
@ 16,08 SAY "^S < @ > ^D characters          ^C  forward cards"
@ 17,08 SAY "     v ^X  fields           ^ - Press 'CONTROL' key and CHARACTER"
@ 19, 3 SAY "Press cntrl Y to Erase a field"
@ 20, 9 SAY "cntrl W to exit EDIT mode"
«eof»