Compucolor.org – Virtual Media

Listing of file='DATES.SRC;01' on disk='vmedia/home_video_library-sector.ccvf'

;	SAMPLE DATA FILE FOR "CALENDAR"
;
;
;	FILE SPECIFICATIONS:
;
;
;	COMMENT LINES, LIKE THESE, MUST HAVE A SEMICOLON AS
;	THE FIRST CHARACTER.  LENGTH OF LINE DOES NOT MAKE
;	ANY DIFFERENCE.
;
;
;	EMPTY RECORDS, USED FOR FUTURE EXPANSION, SHOULD HAVE
;	EITHER A SEMICOLON OR ASTERISK AS THE FIRST CHARACTER
;	OF THE LINE.  AGAIN, THE LENGTH OF THE LINE AT THAT
;	POINT DOES NOT MAKE ANY DIFFERENCE.  (IF UTILIZING
;	THE DATABASE, THE FIRST CHARACTER MUST BE AN ASTERISK.)
;
;
;	DATA FILES MAY BE CONSTRUCTED UTILIZING EITHER THE CCII
;	SCREEN EDITOR OR THE PERSONAL DATA BASE PROGRAM.  WHEN
;	UTILIZING THE DATA BASE, INSURE THE TOTAL RECORD LENGTH
;	IS AT LEAST 18 CHARACTERS LONG  (NOT INCLUDING CR/LF).
;
;
;	NOTE:	"DATA BASE" AS USED HERE REFERS TO THE ASSEMBLY
;	LANGUAGE PROGRAM, NOT THE ORIGINAL WRITTEN IN BASIC.
;
;
;	DATA FILE ENTRIES:
;
;
;	CHARACTER POSITIONS 1 TO 12 CONTAIN THE EVENT NAME.  UP
;	TO 400 SEPERATE EVENTS MAY BE LISTED, AND UP TO 7 LINES
;	PER DAY ARE ALLOWED.
;
;
;	CHARACTER POSITIONS 13-14 SPECIFY THE MONTH OF THE
;	EVENT, AND MUST BE TWO (2) DIGITS.
;
;
;	CHARACTER POSITIONS 15-16 SPECIFY THE DATE OF THE
;	MONTH OF THE EVENT, AND MUST BE TWO (2) DIGITS.
;
;
;	CHARACTER POSITIONS 17-18 SPECIFY THE FREQUENCY THE
;	EVENT WILL BE PRINTED; IE, WEEKLY, MONTHLY, ETC.
;	USE THE FOLLOWING CHART FOR FREQUENCY CODES.
;
;	CODE	FREQUENCY
;
;	01-90	EVERY 'N' DAYS WHERE 'N' IS IN RANGE OF 1 TO 90
;	91	ANNUALLY
;	92	TWICE A YEAR
;	93	QUARTERLY
;	94	MONTHLY
;	95	MONTHLY - MILITARY 15TH/30TH.  AUTOMATICALLY
;		  RESET TO FRIDAY IF IT WOULD OTHERWISE FALL
;		  ON SATURDAY OR SUNDAY.
;	96	TWICE A MONTH
;	97	EVERY OTHER WEEK
;	98	WEEKLY
;	99	NOT USED
;
;
;	CHARACTER POSITIONS 19-20 MAY SPECIFY THE STOP MONTH
;	OF THE EVENT IF DESIRED.  USE OF A STOP MONTH IS
;	OPTIONAL....DEFAULT IS DECEMBER.
;
;
;	CHARACTER POSITIONS 21-22 MAY SPECIFY THE STOP DATE
;	OF THE EVENT IF DESIRED.  USE OF A STOP DATE IS
;	OPTIONAL....DEFAULT IS THE 31ST OF THE MONTH.
;
;
;	THE NEXT TWO CHARACTER POSITIONS MUST BE A RETURN/
;	LINE FEED COMBINATION, INDICATED UNDER THE SCREEN
;	EDITOR AS A PINK CURSOR.
;
;
;	ENTRIES WITHIN THE FILE MUST BE SORTED ACCORDING TO
;	THE FREQUENCY CODES, IN ASCENDING ORDER.  A FREQUENCY
;	CODE OF "01" THAT FOLLOWS A "91", FOR INSTANCE, MAY
;	DROP OUT DURING THE PRINT PROCESS.  INSURE THEY ARE
;	SORTED PROPERLY.
;
;
;	THE LAST RECORD ON FILE MUST BE 12 SPACES FOLLOWED BY
;	"000000", AND A RETURN/LINE FEED.
;
;
;	PROGRAM ENTRIES:
;
;
;	THE PROGRAM WILL INITIALLY ASK FOR A NAME....THIS IS
;	THE FILE NAME OF THE DATA FILE.  THE DRIVE MAY BE
;	SPECIFIED BY 0:SAMPLE OR 1:SAMPLE IF DESIRED, OTHERWISE
;	THE DEFAULT DRIVE WILL BE ASSUMED.
;
;
;	THE PROGRAM WILL THEN ASK FOR THE YEAR, MONTH, AND
;	NUMBER OF MONTHS.  THE USER SHOULD ENTER THESE IN THE
;	FORMAT OF YRMN##, WITHOUT COMMAS OR SPACES.  SIX DIGITS
;	MUST BE ENTERED, TWO FOR EACH ITEM.  THE PROGRAM WILL
;	ACCEPT YEARS FROM 1981 TO 1999, AND UP TO 24 MONTHS MAY
;	BE PRINTED AT ANY GIVEN TIME.  THE PROGRAM WILL RETURN
;	TO THE COMMAND INPUT ROUTINE AFTER THE LAST MONTH
;	SPECIFIED OR DECEMBER 1999 IS PRINTED, WHICHEVER OCCURS
;	FIRST.
;
;
;
;	THE DATES LISTED BELOW REPRESENT THE MORE COMMON
;	HOLIDAYS FOR 1982.
;
;	ADJUSTMENTS WILL NEED TO BE MADE FOR YEARS BEYOND THIS.
;
;
NEW YEAR DAY010191
LINCOLN BD  021291
VALENTINE DY021491
WASHINGTON  022291
BIRTHDAY    022291
ST. PATS DAY031791
APRIL FOOLS 040191
GOOD FRIDAY 040291
EASTER      040491
MOTHER'S DAY050991
ARMED FORCES051791
  DAY       051791
MEMORIAL DAY053191
FLAG DAY    060191
FATHER'S DAY061391
INDEPENDENCE070491
  DAY       070491
LABOR DAY   090691
COLUMBUS DAY101191
HOLLOWEEN   103191
VETERAN DAY 111191
THANKSGIVING112591
CHRISTMAS   122591
;
;	THE FOLLOWING TWO ENTRIES MAY BE USED FOR MILITARY OR
;	OTHER 15TH/30TH PAYDAY ENTRIES.  CALENDAR PRINTING WILL
;	AUTOMATICALLY ADJUST THESE TO THE PREVIOUS FRIDAY IF
;	THEY WOULD OTHERWISE FALL ON SAT OR SUN.
;
PAYDAY      011595
PAYDAY      013095
;
;	THE FOLLOWING ENTRY MUST BE USED AS THE LAST ENTRY IN
;	THE FILE.
;
            000000