Update GPL and feature years

This commit is contained in:
peterdell 2019-09-02 23:32:34 +02:00
parent ab6977cfc2
commit 038943c9eb
5 changed files with 2 additions and 59 deletions

View File

@ -15,7 +15,7 @@ you plan to install WUDSN IDE itself.
</description>
<copyright>
WUDSN IDE Copyright (C) 2009 - 2014 Peter Dell
WUDSN IDE Copyright (C) 2009 - 2019 Peter Dell
66822 Lebach, Germany
This program is free software: you can redistribute it and/or
modify it under the terms of the GNU General Public License as

View File

@ -13,7 +13,7 @@ computers.
</description>
<copyright>
WUDSN IDE Copyright (C) 2009 - 2018 Peter Dell
WUDSN IDE Copyright (C) 2009 - 2019 Peter Dell
66822 Lebach, Germany
This program is free software: you can redistribute it and/or
modify it under the terms of the GNU General Public License as

View File

@ -1,14 +0,0 @@
mp.exe Example.pas
if ERRORLEVEL 1 goto :error
mads.exe Example.a65 -x -i:base -o:Example.xex
if ERRORLEVEL 1 goto :error
start Example.xex
goto: eof
:error
pause

View File

@ -1,43 +0,0 @@
Program Hello;
// Comment
var SDLSTL: word absolute $230;
var COLPF2: byte absolute $d018;
var COLBK: byte absolute $d01a;
var NMIEN: byte absolute $d40e;
Procedure MeinDLI; assembler; interrupt;
asm
{ pha
lda #$38
sta wsync
sta COLPF2
pla
};
end;
Procedure HiThere;
Begin
Writeln('Hello World');
End;
var dl_ptr: ^byte;
Begin
HiThere;
SetIntVec(iDLI, @MeinDLI);
dl_ptr:=Pointer(SDLSTL+10);
dl_ptr^:=dl_ptr^ or $80;
NMIEN:=$c0;
repeat
COLBK:=14;
COLBK:=0;
until false;
End.