diff --git a/Atari-Buttons.txt b/Atari-Buttons.txt new file mode 100644 index 0000000..d34b6ec --- /dev/null +++ b/Atari-Buttons.txt @@ -0,0 +1,15 @@ +ATARI BUTTONS + +F1: CONFIG PANEL (ESC, Exit) +F2: START +F3: SELECT +F4: OPTION +F5: WARM RESET (Preserves Ram) + // SHIFT-F5 = COLD RESET +F6: ?? UNKNOWN ?? +F7: SCROLL SCREEN BUFFER (down) +F8: +F9: CLEAN SHUTDOWN EMULATOR +F0: SCREENSHOT + // SHIFT-F0 = INTERLACED SCREENSHOT + diff --git a/DOCS/Basic_Programs_for_the_Atari_600XL_and_800XL.pdf b/DOCS/Basic_Programs_for_the_Atari_600XL_and_800XL.pdf new file mode 100644 index 0000000..2a27739 Binary files /dev/null and b/DOCS/Basic_Programs_for_the_Atari_600XL_and_800XL.pdf differ diff --git a/FDISK/BASICWEEK.atr b/FDISK/BASICWEEK.atr new file mode 100644 index 0000000..6b2a658 Binary files /dev/null and b/FDISK/BASICWEEK.atr differ diff --git a/FDISK/DOS/MyDos-4.55.atr b/FDISK/DOS/MyDos-4.55.atr index e45a3e4..3522e99 100644 Binary files a/FDISK/DOS/MyDos-4.55.atr and b/FDISK/DOS/MyDos-4.55.atr differ diff --git a/FDISK/test.atr b/FDISK/test.atr deleted file mode 100644 index 4507681..0000000 Binary files a/FDISK/test.atr and /dev/null differ diff --git a/HDISK/ACTNLOGO.ACT b/HDISK/ACTION/ACTNLOGO.ACT similarity index 100% rename from HDISK/ACTNLOGO.ACT rename to HDISK/ACTION/ACTNLOGO.ACT diff --git a/HDISK/BUTRFLY.ACT b/HDISK/ACTION/BUTRFLY.ACT similarity index 100% rename from HDISK/BUTRFLY.ACT rename to HDISK/ACTION/BUTRFLY.ACT diff --git a/HDISK/PTRQUILT.ACT b/HDISK/ACTION/PTRQUILT.ACT similarity index 100% rename from HDISK/PTRQUILT.ACT rename to HDISK/ACTION/PTRQUILT.ACT diff --git a/HDISK/SCROLCLR.ACT b/HDISK/ACTION/SCROLCLR.ACT similarity index 100% rename from HDISK/SCROLCLR.ACT rename to HDISK/ACTION/SCROLCLR.ACT diff --git a/HDISK/ZED.ACT b/HDISK/ACTION/ZED.ACT similarity index 100% rename from HDISK/ZED.ACT rename to HDISK/ACTION/ZED.ACT diff --git a/HDISK/BRDRCLR1.ASM b/HDISK/ASM/BRDRCLR1.ASM similarity index 100% rename from HDISK/BRDRCLR1.ASM rename to HDISK/ASM/BRDRCLR1.ASM diff --git a/HDISK/BRDRCLR1.OBJ b/HDISK/ASM/BRDRCLR1.OBJ similarity index 100% rename from HDISK/BRDRCLR1.OBJ rename to HDISK/ASM/BRDRCLR1.OBJ diff --git a/HDISK/HELLO.ASM b/HDISK/ASM/HELLO.ASM similarity index 100% rename from HDISK/HELLO.ASM rename to HDISK/ASM/HELLO.ASM diff --git a/HDISK/HELLO.OBJ b/HDISK/ASM/HELLO.OBJ similarity index 100% rename from HDISK/HELLO.OBJ rename to HDISK/ASM/HELLO.OBJ diff --git a/HDISK/BASIC/GREET.BAS b/HDISK/BASIC/GREET.BAS new file mode 100644 index 0000000..3c7594f --- /dev/null +++ b/HDISK/BASIC/GREET.BAS @@ -0,0 +1,6 @@ +10 REM THIS PROGRAM SAYS HELLO TO A SPECIFIC PERSON +20 REM ******************************************** +30 PRINT "Hello, there. What is your name?" +40 INPUT NAME$ +50 PRINT "How very nice to meet you, ";NAME$ +60 PRINT "Goodbye, now!" \ No newline at end of file diff --git a/HDISK/BASIC/GREET2.BAS b/HDISK/BASIC/GREET2.BAS new file mode 100644 index 0000000..04bda27 --- /dev/null +++ b/HDISK/BASIC/GREET2.BAS @@ -0,0 +1,7 @@ +10 REM THIS PROGRAM SAYS HELLO TO A SPECIFIC PERSON +20 REM ******************************************** +30 PRINT "Hello, there. What is your name?" +35 DIM NAME$(50) +40 INPUT NAME$ +50 PRINT "How very nice to meet you, ";NAME$ +60 PRINT "Goodbye, now!" diff --git a/HDISK/HELLO.BAS b/HDISK/BASIC/HELLO.BAS similarity index 100% rename from HDISK/HELLO.BAS rename to HDISK/BASIC/HELLO.BAS diff --git a/HDISK/MEMTEST.BAS b/HDISK/BASIC/MEMTEST.BAS similarity index 89% rename from HDISK/MEMTEST.BAS rename to HDISK/BASIC/MEMTEST.BAS index 90e3653..6b3d115 100644 --- a/HDISK/MEMTEST.BAS +++ b/HDISK/BASIC/MEMTEST.BAS @@ -10,13 +10,11 @@ 399 REM GET LOW AND HIGH MEMORY BOUNDS 400 L = PEEK(15) * N256 : H = PEEK(742) * N256 : IF PEEK(14)< >NO THEN L = L + N256 499 REM DISPLAY BOUNDS AND GET REPLY -500 ? CHR$(125); S$; "ATARI MEMORY TEST PROGRAM"; CHR$(155); S$; "MEMORY - BOUNDS ARE" +500 ? CHR$(125); S$; "ATARI MEMORY TEST PROGRAM"; CHR$(155); S$; "MEMORY BOUNDS ARE" 600 ? S$; "LOW = "; L : ? S$; "HIGH = "; H 700 ? S$; "GIVE TEST BOUNDS"; CHR$(155) 800 TRAP 800 : ? S$; "LOW = "; : INPUT LOW : IF LOW < L OR LOW > H THEN 800 -900 TRAP 900 : ? S$; "HIGH = "; : INPUT HIGH : IF HIGH > H OR HIGH < L OR - HIGH-LOW < N256 THEN 900 +900 TRAP 900 : ? S$; "HIGH = "; : INPUT HIGH : IF HIGH > H OR HIGH < L OR HIGH-LOW < N256 THEN 900 999 REM SETUP BOUNDS FOR THE MLP 1000 POKE 205, NO : POKE 206, INT(HIGH/N256) 1100 TRAP 32767 : POKE 203, NO : POKE 204, INT(LOW/N256) @@ -26,8 +24,7 @@ 1399 REM CHECK RETURN FROM MLP 1400 IF PEEK(208) = NO THEN 2200 1499 REM SHOW MEMORY ERROR ON SCREEN -1500 ? " ERROR AT "; (PEEK(203) + PEEK(204) * N256); " EXP = - "; PEEK(207); " ACT = "; PEEK(209) +1500 ? " ERROR AT "; (PEEK(203) + PEEK(204) * N256); " EXP = "; PEEK(207); " ACT = "; PEEK(209) 1600 SOUND NO, PASS, 6, 8 : FOR I = N1 TO 5 : NEXT I : SOUND NO, NO, NO, NO 1699 REM SETUP NEXT BYTE TO TEST SO WE DONT STOP WITH FIRST ERROR 1700 IF PEEK(203) = N255 THEN POKE 204, (PEEK(204) + N1) : POKE 203, NO : GOTO 1900 @@ -51,7 +48,5 @@ 2800 GOTO 1100 2899 REM READ IN MACHINE LANGUAGE PROGRAM 2900 FOR L = 1536 TO 1576 : READ H : POKE L, H : NEXT L : RETURN -3000 DATA 104, 169, 0, 160, 0, 24, 145, 203, 209, 203, 208, 18, 105, - 1, 208, 246, 200, 208, 242, 230, 204, 166, 204, 228, 206 -3100 DATA 208, 234, 133, 208, 96, 133, 207, 177, 203, 133, 209, 169, - 1, 133, 208, 96 +3000 DATA 104, 169, 0, 160, 0, 24, 145, 203, 209, 203, 208, 18, 105, 1, 208, 246, 200, 208, 242, 230, 204, 166, 204, 228, 206 +3100 DATA 208, 234, 133, 208, 96, 133, 207, 177, 203, 133, 209, 169, 1, 133, 208, 96 diff --git a/HDISK/MEMTEST2.BAS b/HDISK/BASIC/MEMTEST2.BAS similarity index 89% rename from HDISK/MEMTEST2.BAS rename to HDISK/BASIC/MEMTEST2.BAS index 56085c1..42a4dba 100644 --- a/HDISK/MEMTEST2.BAS +++ b/HDISK/BASIC/MEMTEST2.BAS @@ -10,13 +10,11 @@ 399 REM GET LOW AND HIGH MEMORY BOUNDS 400 L = PEEK(15) * N256 : H = PEEK(742) * N256 : IF PEEK(14)< >NO THEN L = L + N256 499 REM DISPLAY BOUNDS AND GET REPLY -500 ? CHR$(125); S$; "ATARI MEMORY TEST PROGRAM"; CHR$(155); S$; "MEMORY - BOUNDS ARE" +500 ? CHR$(125); S$; "ATARI MEMORY TEST PROGRAM"; CHR$(155); S$; "MEMORY BOUNDS ARE" 600 ? S$; "LOW = "; L : ? S$; "HIGH = "; H 700 ? S$; "GIVE TEST BOUNDS"; CHR$(155) 800 TRAP 800 : ? S$; "LOW = "; : INPUT LOW : IF LOW < L OR LOW > H THEN 800 -900 TRAP 900 : ? S$; "HIGH = "; : INPUT HIGH : IF HIGH > H OR HIGH < L OR - HIGH-LOW < N256 THEN 900 +900 TRAP 900 : ? S$; "HIGH = "; : INPUT HIGH : IF HIGH > H OR HIGH < L OR HIGH-LOW < N256 THEN 900 999 REM SETUP BOUNDS FOR THE MLP 1000 POKE 205, NO : POKE 206, INT(HIGH/N256) 1100 TRAP 32767 : POKE 203, NO : POKE 204, INT(LOW/N256) @@ -26,8 +24,7 @@ 1399 REM CHECK RETURN FROM MLP 1400 IF PEEK(208) = NO THEN 2200 1499 REM SHOW MEMORY ERROR ON SCREEN -1500 ? " ERROR AT "; (PEEK(203) + PEEK(204) * N256); " EXP = - "; PEEK(207); " ACT = "; PEEK(209) +1500 ? " ERROR AT "; (PEEK(203) + PEEK(204) * N256); " EXP = "; PEEK(207); " ACT = "; PEEK(209) 1600 SOUND NO, PASS, 6, 8 : FOR I = N1 TO 5 : NEXT I : SOUND NO, NO, NO, NO 1699 REM SETUP NEXT BYTE TO TEST SO WE DONT STOP WITH FIRST ERROR 1700 IF PEEK(203) = N255 THEN POKE 204, (PEEK(204) + N1) : POKE 203, NO : GOTO 1900 @@ -51,7 +48,5 @@ 2800 GOTO 1100 2899 REM READ IN MACHINE LANGUAGE PROGRAM 2900 FOR L = 1536 TO 1576 : READ H : POKE L, H : NEXT L : RETURN -3000 DATA 104, 169, 0, 160, 0, 24, 145, 203, 209, 203, 208, 18, 105, - 1, 208, 246, 200, 208, 242, 230, 204, 166, 204, 228, 206 -3100 DATA 208, 234, 133, 208, 96, 133, 207, 177, 203, 133, 209, 169, - 1, 133, 208, 96 +3000 DATA 104, 169, 0, 160, 0, 24, 145, 203, 209, 203, 208, 18, 105, 1, 208, 246, 200, 208, 242, 230, 204, 166, 204, 228, 206 +3100 DATA 208, 234, 133, 208, 96, 133, 207, 177, 203, 133, 209, 169, 1, 133, 208, 96 diff --git a/HDISK/MEMTEST3.BAS b/HDISK/BASIC/MEMTEST3.BAS similarity index 100% rename from HDISK/MEMTEST3.BAS rename to HDISK/BASIC/MEMTEST3.BAS diff --git a/HDISK/BASIC/MSOFT.BAS b/HDISK/BASIC/MSOFT.BAS new file mode 100644 index 0000000..02d103c --- /dev/null +++ b/HDISK/BASIC/MSOFT.BAS @@ -0,0 +1,5 @@ +10 REM *** A VERY SIMPLE PROGRAM *** +20 DIM A$(7) +20 DIM B$(7) +30 DIM C$(7) +40 A$="" \ No newline at end of file diff --git a/HDISK/P32P1.BAS b/HDISK/BASIC/P32P1.BAS similarity index 100% rename from HDISK/P32P1.BAS rename to HDISK/BASIC/P32P1.BAS diff --git a/HDISK/P33P1.BAS b/HDISK/BASIC/P33P1.BAS similarity index 100% rename from HDISK/P33P1.BAS rename to HDISK/BASIC/P33P1.BAS diff --git a/HDISK/P34P1.BAS b/HDISK/BASIC/P34P1.BAS similarity index 100% rename from HDISK/P34P1.BAS rename to HDISK/BASIC/P34P1.BAS diff --git a/HDISK/P34P2.BAS b/HDISK/BASIC/P34P2.BAS similarity index 100% rename from HDISK/P34P2.BAS rename to HDISK/BASIC/P34P2.BAS diff --git a/HDISK/BASIC/SIMPLE.BAS b/HDISK/BASIC/SIMPLE.BAS new file mode 100644 index 0000000..646e8de Binary files /dev/null and b/HDISK/BASIC/SIMPLE.BAS differ diff --git a/HDISK/BASIC/SIMPLE1.BAS b/HDISK/BASIC/SIMPLE1.BAS new file mode 100644 index 0000000..6b4280e --- /dev/null +++ b/HDISK/BASIC/SIMPLE1.BAS @@ -0,0 +1,12 @@ +5 REM *** SIMPLE PROGRAM *** +10 DIM A$(7) +12 DIM B$(7) +14 DIM C$(7) +16 DIM D$(25) +20 A$="" +30 B$="" +40 C$="" +45 D$="Microsoft Windows(tm)" +60 PRINT A$ +70 PRINT B$;D$ +80 PRINT C$ diff --git a/HDISK/TEST.BAS b/HDISK/BASIC/TEST.BAS similarity index 100% rename from HDISK/TEST.BAS rename to HDISK/BASIC/TEST.BAS diff --git a/HDISK/SIMPLE.C b/HDISK/CLANG/SIMPLE.C similarity index 100% rename from HDISK/SIMPLE.C rename to HDISK/CLANG/SIMPLE.C diff --git a/HDISK/ARTICLE-DUP.MD b/HDISK/TEXT/ARTICLE-DUP.MD similarity index 100% rename from HDISK/ARTICLE-DUP.MD rename to HDISK/TEXT/ARTICLE-DUP.MD diff --git a/HDISK/ARTICLE.MD b/HDISK/TEXT/ARTICLE.MD similarity index 100% rename from HDISK/ARTICLE.MD rename to HDISK/TEXT/ARTICLE.MD diff --git a/HDISK/SAMPLE.TXT b/HDISK/TEXT/SAMPLE.TXT similarity index 100% rename from HDISK/SAMPLE.TXT rename to HDISK/TEXT/SAMPLE.TXT diff --git a/HDISK/THINGS.TXT b/HDISK/TEXT/THINGS.TXT similarity index 100% rename from HDISK/THINGS.TXT rename to HDISK/TEXT/THINGS.TXT diff --git a/atari001.png b/atari001.png new file mode 100644 index 0000000..2e8b19c Binary files /dev/null and b/atari001.png differ