From d76911d38a8544c3351977e2a8edd81a3bcb75e7 Mon Sep 17 00:00:00 2001 From: jede Date: Thu, 2 Feb 2017 22:53:28 +0100 Subject: [PATCH] Fixing telestrat.h --- include/telestrat.h | 34 +++++++++++++++++++++++++++++----- libsrc/telestrat/close.s | 2 -- libsrc/telestrat/mainargs.s | 2 +- libsrc/telestrat/open.s | 4 +--- libsrc/telestrat/write.s | 2 +- 5 files changed, 32 insertions(+), 12 deletions(-) diff --git a/include/telestrat.h b/include/telestrat.h index 85da8df60..5a090647b 100644 --- a/include/telestrat.h +++ b/include/telestrat.h @@ -1,17 +1,41 @@ +/*****************************************************************************/ +/* */ +/* telestrat.h */ +/* */ +/* Oric Telestrat system-specific definitions */ +/* */ +/* */ +/* */ +/* (C) 2017 Debrune Jérome, */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ -void hires(); -void text(); void oups(); void ping(); void zap(); void shoot(); void explode(); -void paper(char color); -void ink(char color); - void kbdclick1(); diff --git a/libsrc/telestrat/close.s b/libsrc/telestrat/close.s index 04d8788d1..40e2c10b3 100644 --- a/libsrc/telestrat/close.s +++ b/libsrc/telestrat/close.s @@ -14,5 +14,3 @@ BRK_TELEMON XCLOSE ; launch primitive ROM rts .endproc - - \ No newline at end of file diff --git a/libsrc/telestrat/mainargs.s b/libsrc/telestrat/mainargs.s index 41c3a5131..0c9e799da 100644 --- a/libsrc/telestrat/mainargs.s +++ b/libsrc/telestrat/mainargs.s @@ -8,7 +8,7 @@ .constructor initmainargs, 24 .import __argc, __argv - .import ptr1 + .import ptr1 .include "telestrat.inc" .macpack generic diff --git a/libsrc/telestrat/open.s b/libsrc/telestrat/open.s index 8e94de311..08910f4f2 100644 --- a/libsrc/telestrat/open.s +++ b/libsrc/telestrat/open.s @@ -27,9 +27,7 @@ parmok: sta tmp3 ; save flags ; Get the filename from stack and parse it. Bail out if is not ok jsr popax ; Get name - ldy tmp3 ; Get flags again + ldy tmp3 ; Get flags again BRK_TELEMON XOPEN ; launch primitive ROM rts .endproc - - \ No newline at end of file diff --git a/libsrc/telestrat/write.s b/libsrc/telestrat/write.s index 1d269887d..8c2bc08f7 100644 --- a/libsrc/telestrat/write.s +++ b/libsrc/telestrat/write.s @@ -53,7 +53,7 @@ L2: ldy #0 cpx #$0A ; Check for \n bne L3 BRK_TELEMON XWR0 ; Macro send char to screen (channel 0 in telemon terms) - lda #$0D ; return to the beggining of the line + lda #$0D ; return to the beggining of the line BRK_TELEMON XWR0 ; Macro ; -- 2.39.5