Druckfehlerteufelchen

Adreß- und Telefonregister, 5/84. Seite 64

In Zeile 1840 sollte nicht GOTO 610, sondern GOTO 510 stehen.

Abgerechnet wird mit dem C 64, 8/84, Seite 68

Mit Interesse habe ich den o.g. Artikel in Ihrer Zeitschrift gelesen. Da sich der Autor mit diesem Programm wegen der Thematik zwangsläufig an Gewerbetreibende wendet, fühle ich mich veranlaßt, einige Bemerkungen zu machen.

Im Text wird unter der Überschrift »Der feine Unterschied« auf die umsatzsteuerliche Behandlung von Portogebühren hingewiesen.

Die Deutsche Bundespost ist mit einem Teil ihrer Aufgaben (Postbeförderung) hoheitlich tätig und daher nicht Unternehmer im umsatzsteuerlichen Sinne, daher sind diese Umsätze der Post nicht steuerbar. Der gewerbliche Unternehmer ist - von Spezialfällen abgesehen - bei Weiterbelastung des Portos auch mit diesem Betrag umsatzsteuerpflichtig. Im Umsatzsteuerrecht wird die Portobelastung als Nebenleistung zur Hauptleistung (der Warenlieferung) gesehen und teilt deren Schicksal, das heißt der für die Lieferung geltende Steuersatz ist in der Regel auch für berechnete Portokosten zu erheben und an das Finanzamt abzuführen.

Im Interesse Ihrer gewerblichen Leser, für die eine Anwendung in Frage kommt, halte ich zur Vermeidung von leichtfertigen Steuerverkürzungen eine Richtigstellung für notwendig.

Zeile 60400 lautet:
…*10↑ur+.5))/10↑ur)

Kurvendiskussion in hires, 7/84, Seite 118

Ich möchte hiermit auf einen von mir lang gesuchten Druckfehler aufmerksam machen. Er befindet sich auf Seite 118, Zeile 114.
Original:
114 SYS49629.Y+.5.X/8.XAND255:SYS49744.2↑PEEK(16122)
Richtig:
114 SYS49629,Y+.5,X/8,XAND255:SYS49744,2↑РЕКК(16722)

Alle Tasten-, Zeichen- und Steuercodes, Teil 2, 5/84, Seite 107

Unter »Wo steht was?« hat sich ein Fehler eingeschlichen. Unter Punkt (4) muß stehen:
60536 für 64632
Dasselbe gilt für Zeile 160.
64632 = $ FC78
60536 = $ EC78
Der Fehler ist also schon in der Programmerstellung entstanden, als sich für ein E ein F eingeschlichen hat.

Pac-Boy, 8/84, Seite 89

Das Abspeichern des Datenblockes »DATA-PAC« auf Datasette hat sich leider als schwieriger herausgestellt, als angenommen. Ein Abspeichern ist aber dennoch folgendermaßen möglich:

Das Listing »DATA-PAC« wird wie folgt abgeändert…

310 poke 56,128:clr:rem speicherplatz fuer ma reservieren
500:
510:
520:
530:
540
550:
560 for t=0 to 5937:read a :rem ma in Speicher bringen
570 poke 32768+t,a :next

Diese Änderung bewirkt, daß der Datenblock nun im Speicherbereich 32768 aufwärts abgelegt wird und weiterbearbeitet werden kann.

Nachdem sich DATA-PAC selbst gelöscht hat, ist folgendes Listing einzugeben…

0 data 169,128,133,21,169,0,133, 20,169,48,133,88,169,0,133,87,162,23,160
1 data0,177,20,145,87,136,208, 249,230,21,230,88,202,16,240,169,0,133,251
2 data169,48,133,252,169,3,162,1,160,3,32,186,255,169,6,162,70,160,192,32
3 data189,255,169,251,162,0,160,72,32,216,255,96,77,65,45,80,65,67,0
4 for t= 0 to 76:reada:poke 49152 + t,a:next
5 sys 49152

Startet man dieses Programm mit RUN, so wird das Programm »MA-PAC« auf Kassette abgespeichert. Damit das gesamte Programm ablauffähig ist, muß außerdem noch die Zeile 40 im Listing »PAC-BOY« zu

40........:load "ma-pac",1,1

abgeändert werden. Abschließend sei noch gesagt, daß die Programme »PAC BOY« und »MA-PAC« auf der Kassette hintereinander abgespeichert werden sollten.

Spring Vogel, 9/84, Seite 82

Das beste Listing das mir in meiner Laufbahn als Computerfreak untergekommen ist, ist jenes aus der Ausgabe 9/84, Seite 82. Das Druckfehlerteufelchen hat jedoch auch bei diesem Listing zugeschlagen. Damit das Programm korrekt läuft sollte man folgendes ändern:

Die Zeilennummern 59999, 60199, 60299, 60399, 60499 umändern in 60000, 60200, 60300, 60400 60500.

Nach Zeile 60030 sollte man noch folgende Zeile einfüigen: 60100 REM BILD 2. Das Zeichen »_« in den Zeilen 146050, 48041, 49096 und 49160 bedeuted »←«.

Ansonsten stimmt alles beim »SPRING VOGEL«, und es wurde bei mir sofort zum Listing des Jahres gewählt!

Merge für C 64,10/84, Seite 105

2. muß wohl richtig lauten:
POKE 43,(PEEK(45) + 256 * PEEK(46)-2) AND 255 <RETURN>
POKE 44,(PEEK(45) + 256 * PEEK(46)-2)/255 <RETURN>
dann funktioniert es.

Index-sequentielle Datei, 9/84, Seite 56

Folgende Zeilen müssen korrekt lauten: 3350 IF R$ = "L" THEN GOSUB 4000: GOTO 3220
3340 IF R$ = "A" THEN GOSUB 12000: GOTO 3240.

Das macht den Kleinen größer, 9/84, Seite 112

Die beiden Bildunterschriften wurden vertauscht.