Add new attachment

Only authorized users are allowed to upload new attachments.

This page (revision-2) was last changed on 02-Jan-2011 13:47 by Carsten Strotmann  

This page was created on 02-Jan-2011 13:25 by Carsten Strotmann

Only authorized users are allowed to rename pages.

Only authorized users are allowed to delete pages.

Difference between version and

At line 163 added 62 lines
!Call CIO from Atari Basic
{{{
00010 .LI OFF
00020 *
00030 ****************
00040 * *
00050 * CIO-Routinen *
00060 * *
00070 ****************
00080 *
00090 *
00100 *
00110 CIOV .EQ $E456
00120 *
00130 ICCOM .EQ $0342
00140 ICSTAT .EQ $0343
00150 ICBALO .EQ $0344
00160 ICBLEN .EQ $0348
00170 *
00180 COUNT .EQ $CD
00190 *
00200 *
00210 *
00220 *
00230 *
00240 *
00250 START PLA Parameterzahl holen
00260 *
00270 PLA Daten-
00280 PLA kanalnr.
00290 ASL holen
00300 ASL *16
00310 ASL als
00320 ASL Index nach
00330 TAX nach <X>
00340 *
00350 PLA Kommando
00360 PLA holen
00370 STA ICCOM,X
00380 *
00390 PLA Daten
00400 STA ICBALO+1,X
00410 PLA addresse
00420 STA ICBALO,X holen
00430 *
00440 PLA Daten-
00450 STA ICBLEN+1,X
00460 PLA laenge
00470 STA ICBLEN,X holen
00480 *
00490 EXEC JSR CIOV CIO aufrufen
00500 *
00510 LDA ICSTAT Status
00520 STA $D4 ins
00530 LDA #0 Ueberga-
00540 STA $D5 beregis-
00550 RTS ter
}}}
Version Date Modified Size Author Changes ... Change note
2 02-Jan-2011 13:47 5.293 kB Carsten Strotmann to previous
1 02-Jan-2011 13:25 3.865 kB Carsten Strotmann to last
« This page (revision-2) was last changed on 02-Jan-2011 13:47 by Carsten Strotmann