Expanded hardware.s

build.sh

@@ -1,3 +1,5 @@
+#!/bin/bash
+
 echo "Compiling for 65c02"
 
 # Removing previous build

docs/KernelRoutineList.txt

@@ -33,15 +33,16 @@ Hardware.s
   +- vram_write_color
   +- vram_read
   +- vram_dump
+  +- beep
+  +- set_activity_led
+  +- set_activity_led_duration
+  +- set_user_led
+  +- set_user_led_duration
+  +- expansion_set
+  +- expansion_get
 
-  beep
-  set_activity_led
-  set_user_led
   scan_keyboard
 
-  expansion_set
-  expansion_get
-
 Int.s
   |
   +- int16_add_byte

src/kernel/console.s

@@ -14,7 +14,7 @@ console_write:
             ; ToDo:
             ; Support for ASCII (0-32) Chars, Line feed etc.
             ; Support for Color codes => Maybe #$ff Indicator
-            ; Return propper work addresses in X & Y
+            ; Return propper work addresses in X & Y (for static support)
             ;
 
             stx z0

src/kernel/hardware.s

@@ -98,3 +98,89 @@ vram_dump:
 
             rts
 
+beep:
+            ; Beep
+            ; Beeps the main speaker
+
+            ; Input:
+            ; A => Beep Duration
+
+            ; Output: (none)
+
+            sta beep_counter
+
+            rts
+
+set_activity_led:
+            ; Set Activity LED
+            ; Sets the Activity LED Constant
+
+            ; Input:
+            ; A => State
+
+            ; Output: (none)
+
+            rts
+
+set_user_led:
+            ; Set User LED
+            ; Sets the User LED Constant
+
+            ; Input:
+            ; A => State
+
+            ; Output: (none)
+
+            rts
+
+set_activity_led_duration:
+            ; Set Activity LED Duration
+            ; Sets the Time (in Ticks),
+            ; where the Activity LED is HIGH
+
+            ; Input:
+            ; A => Duration
+
+            ; Output: (none)
+
+            rts
+
+set_user_led_duration:
+            ; Set User LED Duration
+            ; Sets the Time (in Ticks),
+            ; where the User LED is HIGH
+
+            ; Input:
+            ; A => Duration
+
+            ; Output: (none)
+
+            rts
+
+expansion_get:
+            ; Expansion Get
+            ; Gets Data from the Selected Expansion port,
+            ; at the given Port-Address
+
+            ; Input:
+            ; X => Port Number
+            ; Y => Port Address
+
+            ; Output:
+            ; A <= Read Data
+
+            rts
+
+expansion_set:
+            ; Expansion Set
+            ; Sets Data from the Selected Expansion port,
+            ; at the given Port-Address
+
+            ; Input:
+            ; A => Data
+            ; X => Port Number
+            ; Y => Port Address
+
+            ; Output: (none)
+
+            rts

src/variables.s

@@ -53,6 +53,14 @@ kernel_stack_counter    = $420      ; 8 bit     (internal)  Length of Kernel Sta
 kernel_stack_offload_1  = $421      ; 8 bit     (internal)  General Kernel Stack Offload Variable
 kernel_stack_offload_2  = $422      ; 8 bit     (internal)  ..
 
+beep_counter            = $423      ; 8 bit     (public)    Beeper counter in IRQ Ticks
+activity_led_counter    = $424      ; 8 bit     (public)    Activity LED Counter in IRQ Ticks 
+user_led_counter        = $425      ; 8 bit     (public)    User LED Counter in IRQ Ticks
+
+
+
+
+
 ; END => $500
 
 

upload.sh

@@ -1,3 +1,5 @@
+#!/bin/bash
+
 echo -e "\nUploading..."
 
 bold=$(tput bold)