Texas Instruments TI-99/4A - Making Backup Copies

Graphics Match
These six subroutines print each of the six pictures. The RETURN
!>tatement!> are used !>o that only one picture will be printed for each
call to a subroutine.
User's Reference Guide
Examples:
>840 REM PRINT HEART
>850 CALL HCHARC12,C,96l
>860 CALL HCHARC12,C+1,97l
>870 CALL HCHARC13~C,98l
>880 CALL HCHARC13,C+1,99l
>890 RETURN
>900 REM PRINT CHERRY
>910 CALL HCHAR(1~,C,100)
>920 CALL HCHAR(12,C+1,104)
>930 CALL HCHAR{13,C,101)
>940 CALL HCHAR(13,C+1,102)
>950 RtlUflN
>960 REM PRINT BEll
>970 CALL HCHAR(12~C,112)
>980 CALL HCHAR{12~C+l,113l
~990 CALL HCHAR(13,C,120)
>1000 CALL HCHAR(13,C+1,121)
>1010 RETURN
>1020 REM PRINT LEMON
>1030 CALL HCHAR(12,C,126)
>1040 CALL HCHAR(12,C+1,129)
>1050 CALL HCHARC13,C,130l
>1060 CALL HCHARC13,C+1~131)
;.1070 RETURN
>1080 REM PRINT DIAMOND
>1090 CALL HCHARC12,C,105)
>1100 CALL HCHARC12,C+1,106)
~1110 CALL HCHAR(13,C,107)
>1120 CALL HCHAR(13,C+l~108)
>1130 RETURN
>1140 REM PRINT BAR
>1150 CALL HCHAR(12,C~136)
>1160 CALL HCHAR(12,C+1~137)
>1170 CALL HCHAR(13~C~13B)
>1180 CALL HCHAR(13,C+1~139)
>1190 RETURN
1II-33