Add new attachment

Only authorized users are allowed to upload new attachments.

List of attachments

Kind Attachment Name Size Version Date Modified Author Change note
jpg
Back2.jpg 532.7 kB 1 27-May-2021 21:35 Roland B. Wassenberg Back2.jpg
jpg
Cover.jpg 292.2 kB 1 27-May-2021 21:31 Roland B. Wassenberg Cover.jpg
jpg
Diskette2.jpg 314.9 kB 1 27-May-2021 21:35 Roland B. Wassenberg Diskette2.jpg
atr
MASIC (1987)(R & E Software)(D... 92.2 kB 1 30-May-2021 08:24 Roland B. Wassenberg MASIC (1987)(R & E Software)(DE)(Side A).atr
atx
MASIC (1987)(R & E Software)(D... 100.2 kB 3 30-May-2021 08:25 Roland B. Wassenberg MASIC (1987)(R & E Software)(DE)(Side A).atx
atr
MASIC (1987)(R & E Software)(D... 92.2 kB 1 30-May-2021 08:25 Roland B. Wassenberg MASIC (1987)(R & E Software)(DE)(Side B).atr
atx
MASIC (1987)(R & E Software)(D... 100.2 kB 2 30-May-2021 08:25 Roland B. Wassenberg MASIC (1987)(R & E Software)(DE)(Side B).atx

This page (revision-7) was last changed on 31-May-2021 06:01 by Roland B. Wassenberg  

This page was created on 27-May-2021 21:24 by Roland B. Wassenberg

Only authorized users are allowed to rename pages.

Only authorized users are allowed to delete pages.

Difference between version and

At line 5 changed 2 lines
* [MASIC (1987)(R & E Software)(DE)(Side A).atx] ; Vielen lieben Dank an das Preservation-Projekt! Ihr seid die besten! :-)
* [MASIC (1987)(R & E Software)(DE)(Side B).atx] ;
in Bearbeitung...
At line 8 added one line
in Bearbeitung...
At line 11 added one line
in Bearbeitung...
At line 13 added 23 lines
!!BASIC-Programm zum laden von Musik
{{{
10 GOSUB 31000:REM MUSIKPROGRAMM LADEN
20 AD=XXX:GOSUB 31500:REM FUER 'XXX' DIE INIT-ADRESSE EINSETZEN
30 POKE STADR,1:REM MUSIKPROGRAMM STARTEN...
50 GOTO 50
31000 DIM DISK$(35)
31010 RESTORE 7500:FOR I=1 TO 35:READ A:DISK$(I,I)=CHR$(A):NEXT I
31030 DATA 162,16,104,104,104,157,66,3,104,157,69,3,104,157,68,3
31040 DATA 104,157,73,3,104,157,72,3,32,86,228,152,133,212,169,0,133,213,96
31050 REM MUSIKSTUECK LADEN
31060 CLOSE #1:OPEN #1,4,0,"D:MUSIK.OBJ":REM FILENAMEN VOM MUSIKPROGRAMM HIER EINTRAGEN!
31070 GET #1,A:GET #1,A
31080 GET #1,A:GET #1,B:STADR=A+B*256
31090 GET #1,A:GET #1,B:EN=A+B*256
31100 LA=EN-STADR+1
31110 A=USR(ADR(DISK$),7,STADR,LA)
31120 CLOSE #1
31130 RETURN
31500 POKE 1024,104:POKE 1025,76:POKE 1027,INT(AD/256):POKE 1026,AD-PEEK(1027)*256
31510 Q=USR(1024):RETURN
}}}
Version Date Modified Size Author Changes ... Change note
7 31-May-2021 06:01 1.342 kB Roland B. Wassenberg to previous
6 30-May-2021 08:30 1.749 kB Roland B. Wassenberg to previous | to last
5 30-May-2021 08:26 1.481 kB Roland B. Wassenberg to previous | to last
4 27-May-2021 21:41 0.639 kB Roland B. Wassenberg to previous | to last
3 27-May-2021 21:41 0.601 kB Roland B. Wassenberg to previous | to last
2 27-May-2021 21:31 0.815 kB Roland B. Wassenberg to previous | to last
1 27-May-2021 21:24 0.181 kB Roland B. Wassenberg to last
« This page (revision-7) was last changed on 31-May-2021 06:01 by Roland B. Wassenberg