Untitled - The Sharp MZ-Series

Untitled - The Sharp MZ-Series Untitled - The Sharp MZ-Series

20.02.2014 Aufrufe

SEITE 100 BASIC 1Z-013B V1_0A BASIC 1Z Drucker auf RUckmeldewert abfragen Text (OE) und gelesenen F 5787 5788 5789 5790 1698 169C 57 01 00 00 LD LD D.A BC. 0000 RüCKMELDEWERT I VORGABE FüR ANZAHL I DURCHLÄUFE 5791 169F lE 20 LD E. 20 ZÄHLER SETZEN 5792 5837 16Al OB FE IN A. (FE) WERT VOM DRUCKERPORT HOLEN 5793 5794 5795 16A3 E6 00 AND A. OD RüCKMELDEBIT'S MASKIEREN 5796 5797 16A5 BA CP D GLEICH RüCKMELDEWERT ? 5842 5798 16A6 C8 RET Z DRUCKER OK 5843 5844 16D3 16 10 LD D. 5799 16A7 10 DEC E ZÄHLER MINUS EINS 16A8 20 F7 JR NZ. F7 + 16A1H WEITER ABFRAGEN 5800 5801 5802 16AA 5803 5804 16AB 16AC 5805 5806 OB 78 BI DEC BC LD OR A.B C 5832 5833 5834 5835 5836 5838 5839 5840 5841 5845 5846 5847 16CB 16CB 16CE 16CF 16DO 1605 1606 CD CD 09 51 00 00 E5 23 CD E9 16 7E FE OD CALL CALL PUSH INC H CALL RESTANZAHL DURCHLÄUFE I GLEICH NULL? 5848 5849 16D8 28 07 JR Z. 16AD 20 FO JR NZ. FO + 169FH WEITER ABFRAGEN 5850 5851 Drucker nicht ansprechbar 5852 LD CP 16DA CD 12 00 CALL 5807 16AF AF XOR A ACCU AUF NULL 5808 1680 32 4D 00 LD (004D).A IPARALLELAUSGABE üBER 5857 5809 I DRUCKER ABSCHALTEN 5858 16El CD E9 16 CALL 58 10 5859 1683 3E 41 LD A. 41 16E4 CO 09 00 CALL 0 5811 5812 5813 5814 5815 16B5 C3 lF 18 JP 181F I FEHLER 65 I DRUCKER NICHT BEREIT FEHLER BEHANDELN 5853 5854 5855 5856 5860 5861 5862 5863 5864 16DD 16DE 16DF 16E7 16E8 23 15 20 F4 E1 C9 A. O INC H DEC D JR NZ POP HL RET Drucker auf nächste 10er Tabulator setzen Anführungszeichen ausgeben 5816 16B8 3E 20 LO A. 20 Space 5865 16E9 3E 22 LD A. 5817 5866 16E9 3E 22 5818 16BA CD 78 16 CALL 1678 I ZEICHEN IM ACCU AN 5867 5868 16EB C3 12 00 JP 001 5819 I DRUCKER AUSGEBEN 5820 5869 5821 16BD 3E 00 LD A. 00 I SPALTE DRUCKER 5822 I (wird eingetragen) 5823 16BF D6 OA SUB A. OA 10 ABZIEHEN Vorgegebenen Dateinamen m 5824 5825 5826 5827 5828 5829 5830 5831 16Cl 16C3 16C5 16C6 30 C6 C8 18 FC OA FO JR NC. FC + 16BFH ADD A. OA RET Z JR FO + 16B8H WEITER ABZIEHEN ERGEBNIS CORRIGIEREN STEHT AUF TABULATORPOSITION NÄCHSTES Space AUSGEBEN 5870 5871 5872 5873 5874 5875 5876 5877 5878 5879 5880 5881 5882 5883 16EE 16EF 16FO 16Fl 16F4 16F5 16F6 16F8 16FA D5 E5 23 11 13 lA FE 28 06 FC 00 13 11 OF PUSH D PUSH H INC HL LD OE. INC DE LO A. < CP OD JR LO Z. B. I

SEITE 100<br />

BASIC 1Z-013B V1_0A BASIC 1Z<br />

Drucker auf RUckmeldewert abfragen Text (OE) und gelesenen F<br />

5787<br />

5788<br />

5789<br />

5790<br />

1698<br />

169C<br />

57<br />

01<br />

00<br />

00<br />

LD<br />

LD<br />

D.A<br />

BC. 0000<br />

RüCKMELDEWERT<br />

I VORGABE FüR ANZAHL<br />

I DURCHLÄUFE<br />

5791 169F lE 20<br />

LD E. 20<br />

ZÄHLER SETZEN<br />

5792 5837<br />

16Al OB FE<br />

IN A. (FE)<br />

WERT VOM DRUCKERPORT HOLEN<br />

5793<br />

5794<br />

5795<br />

16A3 E6 00<br />

AND A. OD<br />

RüCKMELDEBIT'S MASKIEREN<br />

5796<br />

5797 16A5 BA CP D GLEICH RüCKMELDEWERT ? 5842<br />

5798 16A6 C8<br />

RET Z<br />

DRUCKER OK<br />

5843<br />

5844 16D3 16 10 LD D.<br />

5799 16A7 10<br />

DEC E<br />

ZÄHLER MINUS EINS<br />

16A8 20 F7 JR NZ. F7 + 16A1H WEITER ABFRAGEN<br />

5800<br />

5801<br />

5802 16AA<br />

5803<br />

5804 16AB<br />

16AC<br />

5805<br />

5806<br />

OB<br />

78<br />

BI<br />

DEC BC<br />

LD<br />

OR<br />

A.B<br />

C<br />

5832<br />

5833<br />

5834<br />

5835<br />

5836<br />

5838<br />

5839<br />

5840<br />

5841<br />

5845<br />

5846<br />

5847<br />

16CB<br />

16CB<br />

16CE<br />

16CF<br />

16DO<br />

1605<br />

1606<br />

CD<br />

CD<br />

09<br />

51<br />

00<br />

00<br />

E5<br />

23<br />

CD E9 16<br />

7E<br />

FE OD<br />

CALL<br />

CALL<br />

PUSH<br />

INC H<br />

CALL<br />

RESTANZAHL DURCHLÄUFE<br />

I GLEICH NULL? 5848<br />

5849 16D8 28 07 JR Z.<br />

16AD 20 FO JR NZ. FO + 169FH WEITER ABFRAGEN 5850<br />

5851<br />

Drucker nicht<br />

ansprechbar<br />

5852<br />

LD<br />

CP<br />

16DA CD 12 00 CALL<br />

5807 16AF AF<br />

XOR A ACCU AUF NULL<br />

5808 1680 32 4D 00 LD (004D).A IPARALLELAUSGABE üBER<br />

5857<br />

5809<br />

I DRUCKER ABSCHALTEN<br />

5858 16El CD E9 16 CALL<br />

58 10 5859<br />

1683 3E 41<br />

LD A. 41<br />

16E4 CO 09 00 CALL 0<br />

5811<br />

5812<br />

5813<br />

5814<br />

5815<br />

16B5<br />

C3<br />

lF 18<br />

JP<br />

181F<br />

I FEHLER 65<br />

I DRUCKER NICHT BEREIT<br />

FEHLER BEHANDELN<br />

5853<br />

5854<br />

5855<br />

5856<br />

5860<br />

5861<br />

5862<br />

5863<br />

5864<br />

16DD<br />

16DE<br />

16DF<br />

16E7<br />

16E8<br />

23<br />

15<br />

20 F4<br />

E1<br />

C9<br />

A.<br />

O<br />

INC H<br />

DEC D<br />

JR NZ<br />

POP HL<br />

RET<br />

Drucker auf nächste 10er Tabulator setzen Anführungszeichen ausgeben<br />

5816 16B8 3E 20 LO A. 20 Space 5865<br />

16E9 3E 22 LD A.<br />

5817<br />

5866 16E9 3E 22 5818 16BA CD 78 16 CALL 1678 I ZEICHEN IM ACCU AN<br />

5867<br />

5868 16EB C3 12 00 JP 001<br />

5819<br />

I DRUCKER AUSGEBEN<br />

5820 5869<br />

5821 16BD 3E 00 LD A. 00 I SPALTE DRUCKER<br />

5822 I (wird eingetragen)<br />

5823 16BF D6 OA SUB A. OA 10 ABZIEHEN Vorgegebenen Dateinamen m<br />

5824<br />

5825<br />

5826<br />

5827<br />

5828<br />

5829<br />

5830<br />

5831<br />

16Cl<br />

16C3<br />

16C5<br />

16C6<br />

30<br />

C6<br />

C8<br />

18<br />

FC<br />

OA<br />

FO<br />

JR NC. FC + 16BFH<br />

ADD A. OA<br />

RET Z<br />

JR FO + 16B8H<br />

WEITER ABZIEHEN<br />

ERGEBNIS CORRIGIEREN<br />

STEHT AUF TABULATORPOSITION<br />

NÄCHSTES Space AUSGEBEN<br />

5870<br />

5871<br />

5872<br />

5873<br />

5874<br />

5875<br />

5876<br />

5877<br />

5878<br />

5879<br />

5880<br />

5881<br />

5882<br />

5883<br />

16EE<br />

16EF<br />

16FO<br />

16Fl<br />

16F4<br />

16F5<br />

16F6<br />

16F8<br />

16FA<br />

D5<br />

E5<br />

23<br />

11<br />

13<br />

lA<br />

FE<br />

28<br />

06<br />

FC<br />

00<br />

13<br />

11<br />

OF<br />

PUSH D<br />

PUSH H<br />

INC HL<br />

LD OE.<br />

INC DE<br />

LO A. <<br />

CP OD<br />

JR<br />

LO<br />

Z.<br />

B.<br />

I

Hurra! Ihre Datei wurde hochgeladen und ist bereit für die Veröffentlichung.

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!