Sharp PC-1500 Anwenderhandbuch Seite 139

[ Programmlisting ]
700:"D": CLEAR :
WAIT @
7@1:DIN BCS@)
718@:GOSUB 828
720:BEEP 3
722: INPUT "BAND El
N OKCYZN) "5 X$
P26: 1F X$<>"¥" GOTO
222
73i:LF 2
735: RESTORE
740:FOR 1=8TO 14
758: READ A$
P7AB:NEXT I
780: USING :LPRINT
"GSESAMTSUMME"
788: END
8ag:DATA "LEBENSMI
TITEL"; "MIETE",
"STROM, W., GA
S", "KLEIDUNG"
801:DATA "INS.+SAN
IT. aAUSG.", "AUS
BILDUNG"", "UNTE
RHALTUNG", "SOZ
IALES"
802:DATA "TRANSPOR
T", "KOMMUNIKAT
ION", "UERSCHIE
DENES", "ABZAHL
UNGEN", "STEUER
Nr
B819:DATA "WEITERES
" "ERSPARNISSE
820: RETURN
999: INPUT "JAHR=";
BC)
918: INPUT "MONAT="
;BO1)
928: INPUT "TAG="3
C2)
968: RETURN
STATUS 1
2036
— 133 —
PROGRAMN-NR.
[ Speicherinhalt ]
B
ere
Ee i a
2
ca en
Eo rae
Ee ee
Ee et
a
i ee
ce a
Np
2 ce
rs
eae et
Einzelposten-Betrag
dieses Tages
Gesamtbetrag
dieses Tages
ow
ied
Quittung auf Band.
eee |
Einzelposten-
Gesamtbetrag
wo
le a Wa