WORD.DOC

FILE INFORMATION

FILENAME(S): WORD.DOC

FILE TYPE(S): PRG

FILE SIZE: 1.2K

FIRST SEEN: 2025-11-30 21:11:34

APPEARS ON: 1 disk(s)

FILE HASH

cfb44fe9a75102149585832e3e2c8d9a8228e3ad07fd13787f546aec6b233801

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
NOG UITZOEKEN	WORD.DOC	PRG	DuncanTwain	3	0	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 20 20 20 20 20 20 57 4F  52 44 2E 44 4F 43 0D 2E  |      WORD.DOC..|
00000010: 0D 20 20 20 20 20 54 48  45 20 57 4F 52 44 20 46  |.     THE WORD F|
00000020: 49 4C 45 20 43 4F 4E 54  41 49 4E 53 0D 20 54 48  |ILE CONTAINS. TH|
00000030: 45 20 46 4F 4C 4C 4F 57  49 4E 47 20 57 4F 52 44  |E FOLLOWING WORD|
00000040: 20 28 31 36 2D 42 49 54  29 0D 20 41 52 49 54 48  | (16-BIT). ARITH|
00000050: 45 4D 41 54 49 43 20 52  4F 55 54 49 4E 45 53 2E  |EMATIC ROUTINES.|
00000060: 20 20 54 48 45 59 20 55  53 45 0D 20 55 4E 53 49  |  THEY USE. UNSI|
00000070: 47 4E 45 44 2C 20 31 36  2D 42 49 54 20 49 4E 54  |GNED, 16-BIT INT|
00000080: 45 47 45 52 53 2C 20 57  49 54 48 0D 20 4E 4F 20  |EGERS, WITH. NO |
00000090: 45 52 52 4F 52 53 20 47  45 4E 45 52 41 54 45 44  |ERRORS GENERATED|
000000A0: 20 4F 4E 20 4F 56 45 52  46 4C 4F 57 2E 0D 20 54  | ON OVERFLOW.. T|
000000B0: 48 45 20 57 4F 52 44 53  20 41 52 45 20 53 54 4F  |HE WORDS ARE STO|
000000C0: 52 45 44 20 49 4E 20 53  54 41 4E 44 41 52 44 2C  |RED IN STANDARD,|
000000D0: 0D 20 4C 4F 57 20 4F 52  44 45 52 20 46 49 52 53  |. LOW ORDER FIRS|
000000E0: 54 20 46 4F 52 4D 41 54  2E 0D 2E 0D 2E 0D 20 57  |T FORMAT...... W|
000000F0: 41 44 44 20 53 52 43 31  25 20 2C 20 53 52 43 32  |ADD SRC1% , SRC2|
00000100: 25 20 2C 20 2E 44 53 54  0D 2E 0D 20 41 44 44 53  |% , .DST... ADDS|
00000110: 20 53 52 43 31 20 54 4F  20 53 52 43 32 20 41 4E  | SRC1 TO SRC2 AN|
00000120: 44 20 53 54 4F 52 45 53  0D 20 54 48 45 20 52 45  |D STORES. THE RE|
00000130: 53 55 4C 54 20 54 4F 20  44 53 54 2E 0D 2E 0D 2E  |SULT TO DST.....|
00000140: 0D 20 57 53 55 42 20 53  52 43 31 25 20 2C 20 53  |. WSUB SRC1% , S|
00000150: 52 43 32 25 20 2C 20 2E  44 53 54 0D 2E 0D 20 53  |RC2% , .DST... S|
00000160: 55 42 52 54 41 43 54 53  20 53 52 43 32 20 46 52  |UBRTACTS SRC2 FR|
00000170: 4F 4D 20 53 52 43 31 20  41 4E 44 0D 20 53 54 4F  |OM SRC1 AND. STO|
00000180: 52 45 53 20 54 48 45 20  52 45 53 55 4C 54 20 54  |RES THE RESULT T|
00000190: 4F 20 44 53 54 2E 0D 2E  0D 2E 0D 20 57 49 4E 43  |O DST...... WINC|
000001A0: 20 2E 56 41 52 0D 2E 0D  20 41 44 44 53 20 31 20  | .VAR... ADDS 1 |
000001B0: 54 4F 20 54 48 45 20 56  41 52 49 41 42 4C 45 20  |TO THE VARIABLE |
000001C0: 56 41 52 2E 0D 2E 0D 2E  0D 20 57 44 45 43 20 2E  |VAR...... WDEC .|
000001D0: 56 41 52 0D 2E 0D 20 53  55 42 54 52 41 43 54 53  |VAR... SUBTRACTS|
000001E0: 20 31 20 46 52 4F 4D 20  56 41 52 2E 0D 2E 0D 2E  | 1 FROM VAR.....|
000001F0: 0D 20 57 50 52 49 4E 54  20 53 52 43 25 0D 2E 0D  |. WPRINT SRC%...|
00000200: 20 43 4F 4E 56 45 52 54  53 20 53 52 43 20 54 4F  | CONVERTS SRC TO|
00000210: 20 41 53 43 49 49 20 44  45 43 49 4D 41 4C 0D 20  | ASCII DECIMAL. |
00000220: 28 4E 4F 20 4C 45 41 44  49 4E 47 20 30 27 53 20  |(NO LEADING 0'S |
00000230: 4F 52 20 53 50 41 43 45  53 29 0D 20 41 4E 44 20  |OR SPACES). AND |
00000240: 50 52 49 4E 54 53 20 49  54 20 54 4F 20 54 48 45  |PRINTS IT TO THE|
00000250: 20 43 55 52 52 45 4E 54  0D 20 49 2F 4F 20 43 48  | CURRENT. I/O CH|
00000260: 41 4E 4E 45 4C 2E 20 20  44 4F 45 53 20 4E 4F 54  |ANNEL.  DOES NOT|
00000270: 20 41 50 50 45 4E 44 0D  20 41 4E 44 20 45 4F 4C  | APPEND. AND EOL|
00000280: 2E 0D 2E 0D 2E 0D 20 57  49 4E 50 55 54 20 2E 44  |...... WINPUT .D|
00000290: 53 54 0D 2E 0D 20 49 4E  50 55 54 53 20 31 20 4C  |ST... INPUTS 1 L|
000002A0: 49 4E 45 20 46 52 4F 4D  20 54 48 45 20 43 55 52  |INE FROM THE CUR|
000002B0: 52 45 4E 54 0D 20 49 2F  4F 20 43 48 41 4E 4E 45  |RENT. I/O CHANNE|
000002C0: 4C 2C 20 43 4F 4E 56 45  52 54 53 20 49 54 20 46  |L, CONVERTS IT F|
000002D0: 52 4F 4D 0D 20 41 53 43  49 49 20 44 45 43 49 4D  |ROM. ASCII DECIM|
000002E0: 41 4C 20 54 4F 20 31 36  2D 42 49 54 20 42 49 4E  |AL TO 16-BIT BIN|
000002F0: 41 52 59 2C 0D 20 41 4E  44 20 53 54 4F 52 45 53  |ARY,. AND STORES|
00000300: 20 54 48 45 20 52 45 53  55 4C 54 20 54 4F 20 44  | THE RESULT TO D|
00000310: 53 54 0D 2E 0D 2E 0D 2E  0D 20 57 4D 55 4C 20 53  |ST....... WMUL S|
00000320: 52 43 31 25 20 2C 20 53  52 43 32 25 20 2C 20 2E  |RC1% , SRC2% , .|
00000330: 44 53 54 0D 2E 0D 20 43  4F 4E 54 41 49 4E 45 44  |DST... CONTAINED|
00000340: 20 49 4E 20 54 48 45 20  46 49 4C 45 20 57 4D 55  | IN THE FILE WMU|
00000350: 4C 2E 0D 20 4D 55 4C 54  49 50 4C 49 45 53 20 53  |L.. MULTIPLIES S|
00000360: 52 43 31 20 42 59 20 53  52 43 32 20 41 4E 44 0D  |RC1 BY SRC2 AND.|
00000370: 20 53 54 4F 52 45 53 20  54 48 45 20 52 45 53 55  | STORES THE RESU|
00000380: 4C 54 20 49 4E 20 44 53  54 0D 2E 0D 2E 0D 20 57  |LT IN DST..... W|
00000390: 44 49 56 20 53 52 43 31  25 20 2C 20 53 52 43 32  |DIV SRC1% , SRC2|
000003A0: 25 20 2C 20 2E 44 53 54  0D 2E 0D 20 43 4F 4E 54  |% , .DST... CONT|
000003B0: 41 49 4E 45 44 20 49 4E  20 54 48 45 20 46 49 4C  |AINED IN THE FIL|
000003C0: 45 20 57 44 49 56 2E 0D  20 44 49 56 49 44 45 53  |E WDIV.. DIVIDES|
000003D0: 20 53 52 43 31 20 42 59  20 53 52 43 32 20 41 4E  | SRC1 BY SRC2 AN|
000003E0: 44 0D 20 50 55 54 53 20  54 48 45 20 52 45 53 55  |D. PUTS THE RESU|
000003F0: 4C 54 20 49 4E 20 44 53  54 0D 20 44 49 56 49 53  |LT IN DST. DIVIS|
00000400: 49 4F 4E 20 42 59 20 30  20 43 41 55 53 45 53 20  |ION BY 0 CAUSES |
00000410: 24 46 46 46 46 20 54 4F  20 42 45 0D 20 53 54 4F  |$FFFF TO BE. STO|
00000420: 52 45 44 20 54 4F 20 44  53 54 0D 2E 0D 2E 0D 20  |RED TO DST..... |
00000430: 57 4D 4F 44 20 53 52 43  31 25 20 2C 20 53 52 43  |WMOD SRC1% , SRC|
00000440: 32 25 20 2C 20 2E 44 53  54 0D 2E 0D 20 43 4F 4E  |2% , .DST... CON|
00000450: 54 41 49 4E 45 44 20 49  4E 20 54 48 45 20 46 49  |TAINED IN THE FI|
00000460: 4C 45 20 57 4D 4F 44 2E  0D 20 44 49 56 49 44 45  |LE WMOD.. DIVIDE|
00000470: 53 20 53 52 43 31 20 42  59 20 53 52 43 32 20 41  |S SRC1 BY SRC2 A|
00000480: 4E 44 20 53 54 4F 52 45  53 0D 20 54 48 45 20 52  |ND STORES. THE R|
00000490: 45 4D 41 49 4E 44 45 52  20 28 4D 4F 44 55 4C 4F  |EMAINDER (MODULO|
000004A0: 29 20 49 4E 20 44 53 54  0D 20 44 49 56 49 53 49  |) IN DST. DIVISI|
000004B0: 4F 4E 20 42 59 20 30 20  43 41 55 53 45 53 20 24  |ON BY 0 CAUSES $|
000004C0: 46 46 46 46 20 54 4F 20  42 45 0D 20 53 54 4F 52  |FFFF TO BE. STOR|
000004D0: 45 44 20 54 4F 20 44 53  54 0D 00 00 00 71        |ED TO DST....q  |

      WORD.DOC...     THE WORD FILE CONT
AINS. THE FOLLOWING WORD (16-BIT). ARITH
EMATIC ROUTINES.  THEY USE. UNSIGNED, 16
-BIT INTEGERS, WITH. NO ERRORS GENERATED
 ON OVERFLOW.. THE WORDS ARE STORED IN S
TANDARD,. LOW ORDER FIRST FORMAT...... W
ADD SRC1% , SRC2% , .DST... ADDS SRC1 TO
 SRC2 AND STORES. THE RESULT TO DST.....
. WSUB SRC1% , SRC2% , .DST... SUBRTACTS
 SRC2 FROM SRC1 AND. STORES THE RESULT T
O DST...... WINC .VAR... ADDS 1 TO THE V
ARIABLE VAR...... WDEC .VAR... SUBTRACTS
 1 FROM VAR...... WPRINT SRC%... CONVERT
S SRC TO ASCII DECIMAL. (NO LEADING 0'S 
OR SPACES). AND PRINTS IT TO THE CURRENT
. I/O CHANNEL.  DOES NOT APPEND. AND EOL
...... WINPUT .DST... INPUTS 1 LINE FROM
 THE CURRENT. I/O CHANNEL, CONVERTS IT F
ROM. ASCII DECIMAL TO 16-BIT BINARY,. AN
D STORES THE RESULT TO DST....... WMUL S
RC1% , SRC2% , .DST... CONTAINED IN THE 
FILE WMUL.. MULTIPLIES SRC1 BY SRC2 AND.
 STORES THE RESULT IN DST..... WDIV SRC1
% , SRC2% , .DST... CONTAINED IN THE FIL
E WDIV.. DIVIDES SRC1 BY SRC2 AND. PUTS 
THE RESULT IN DST. DIVISION BY 0 CAUSES 
$FFFF TO BE. STORED TO DST..... WMOD SRC
1% , SRC2% , .DST... CONTAINED IN THE FI
LE WMOD.. DIVIDES SRC1 BY SRC2 AND STORE
S. THE REMAINDER (MODULO) IN DST. DIVISI
ON BY 0 CAUSES $FFFF TO BE. STORED TO DS
T....Q

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL