Radio Shack TRS-80 Voxbox - Page 16

Running
the
Application Programs
Inventory
Demo
Program
(Continued)
7130 WD*
(13)
="5"
7140
WD*<14)="6"
7150 WD*(15)="7"
7160 WD*<16)="8"
7170 WD*<17)="9"
7180 WD*
(18)="-"
7190 WD* ( 19)="
A"
7200 WD*(20)="B"
7220
WD* (21 )="PART
7230 WD* (22)=" OK"
7240 WD*
(23)="
5'
7250 WD*
(24)="
9'
7260 WD*(25)="1
7270
WD*
(26)
="2
7280 WD$<27)="6"
7290 WD*
(28)
="7"
7300 WD*
(29)
=
"
BACKSPACES"
73 10
WD*
(
30
)
=
" PART
"
9000 PR I NTS) 1 CHR* (3D?
CHR* ( 28 ) 5 CHR* ( 23 )
:
REITURN
10000 CLS
14