190 lines
15 KiB
Plaintext
190 lines
15 KiB
Plaintext
{{ Bellatrix-Code
|
|
┌──────────────────────────────────────────────────────────────────────────────────────────────────────┐
|
|
│ Autor: Ingo Kripahle │
|
|
│ Copyright (c) 2012 Ingo Kripahle │
|
|
│ See end of file for terms of use. │
|
|
│ Die Nutzungsbedingungen befinden sich am Ende der Datei │
|
|
└──────────────────────────────────────────────────────────────────────────────────────────────────────┘
|
|
|
|
Informationen : hive-project.de
|
|
Kontakt : drohne235@googlemail.com
|
|
System : trios
|
|
Name :
|
|
Chip : global
|
|
Typ : konstanten
|
|
|
|
|
|
}}
|
|
|
|
CON 'Signaldefinitionen --------------------------------------------------------------------------
|
|
|
|
'signaldefinitionen global
|
|
|
|
#0, D0,D1,D2,D3,D4,D5,D6,D7 'datenbus
|
|
#24, HBEAT 'front-led
|
|
BUSCLK 'bustakt
|
|
BUS_WR '/wr - schreibsignal
|
|
BUS_HS ' '/hs - quittungssignal
|
|
I2C_SCL
|
|
I2C_SDA
|
|
SER_TX
|
|
SER_RX
|
|
|
|
|
|
'signaldefinitionen bellatrix
|
|
|
|
#8, B_VGABASE 'vga-signale (8pin)
|
|
#16, B_KEYBC,B_KEYBD 'keyboard-signale
|
|
#18, B_MOUSEC,B_MOUSED 'maus-signale
|
|
#20, B_VIDBASE 'video-signale(3pin)
|
|
#23, B_SELECT 'belatrix-auswahlsignal
|
|
|
|
|
|
'signaldefinitionen administra
|
|
|
|
#8, A_SOUNDL,A_SOUNDR 'sound (stereo 2 pin)
|
|
#10, A_SDD0,A_SDCLK,A_SDCMD,A_SDD3 'sd-cardreader (4 pin)
|
|
#23, A_SELECT 'administra-auswahlsignal
|
|
|
|
CON 'ADMINISTRA-FUNKTIONEN --------------------------------------------------------------------------
|
|
|
|
CON 'BELLATRIX-FUNKTIONEN --------------------------------------------------------------------------
|
|
|
|
' +----------
|
|
' | +-------- window
|
|
' | |+------- vektor
|
|
' | ||+------ grafik
|
|
' | |||+----- text
|
|
' | ||||+---- maus
|
|
' | |||||+--- tastatur
|
|
' | ||||||+-- vga
|
|
' | |||||||+- tv
|
|
B_TV = %00000000_00000000_00000000_00000001
|
|
B_VGA = %00000000_00000000_00000000_00000010
|
|
B_KEY = %00000000_00000000_00000000_00000100
|
|
B_MOUSE = %00000000_00000000_00000000_00001000
|
|
B_TXT = %00000000_00000000_00000000_00010000
|
|
B_PIX = %00000000_00000000_00000000_00100000
|
|
B_VEC = %00000000_00000000_00000000_01000000
|
|
B_WIN = %00000000_00000000_00000000_10000000
|
|
|
|
|
|
#1, B_KEYSTAT 'tastaturstatus senden
|
|
B_KEYCODE 'tastaturzeichen senden
|
|
B_PRINTCTRL 'steuerzeichen ($100..$1FF) ausgeben
|
|
B_KEYSPEC 'statustasten ($100..$1FF) abfragen
|
|
B_PRINTLOGO 'hive-logo ausgeben
|
|
B_PRINTQCHAR '6 'zeichen ohne steuerzeichen augeben
|
|
|
|
#80, B_WDEF
|
|
B_WSET
|
|
B_WGETCOLS
|
|
B_WGETROWS
|
|
B_WOFRAME '84
|
|
|
|
#87, B_MGRLOAD 'neuen bellatrix-code laden
|
|
B_MGRWSCR 'setzt screen, in welchen geschrieben wird
|
|
B_MGRDSCR 'setzt screen, welcher angezeigt wird
|
|
B_MGRGETCOL 'farbregister auslesen
|
|
B_MGRSETCOL 'farbregister setzen
|
|
B_MGRGETRESX 'x-auflösung abfragen
|
|
B_MGRGETRESY 'y-auflösung abfragen
|
|
B_MGRGETCOLS 'spaltenanzahl abfragen
|
|
B_MGRGETROWS 'zeilenanzahl abfragen
|
|
B_MGRGETCOGS 'freie cogs abfragen
|
|
B_MGRGETSPEC 'spezifikation abfragen
|
|
B_MGRGETVER 'codeversion abfragen
|
|
B_MGRREBOOT '99 'bellatrix neu starten
|
|
|
|
' steuerzeichen
|
|
#0, B_CMD 'esc-code für zweizeichen-steuersequenzen
|
|
B_CLS
|
|
B_HOME
|
|
B_POS1
|
|
B_CURON
|
|
B_CUROFF
|
|
B_SCROLLUP
|
|
B_SCROLLDOWN
|
|
B_BACKSPACE
|
|
B_TAB
|
|
B_LF
|
|
B_FREE1
|
|
B_FREE2
|
|
B_CRLF
|
|
|
|
' dreizeichen-steuersequenzen
|
|
' [B_CMD][B_SCRCMD][...]
|
|
|
|
#01, B_SETCUR
|
|
B_SETX
|
|
B_SETY
|
|
B_GETX
|
|
B_GETY
|
|
B_SETCOL
|
|
B_FREE3
|
|
B_FREE4
|
|
B_SINIT
|
|
B_TABSET
|
|
B_WSETX
|
|
B_WSETY
|
|
B_WGETX
|
|
B_WGETY
|
|
|
|
CON 'G0-FUNKTIONEN --------------------------------------------------------------------------
|
|
|
|
#1, G0_KEYSTAT
|
|
G0_KEYCODE
|
|
G0_KEYSPEC
|
|
|
|
#10, G0_CLEAR
|
|
G0_COPY
|
|
G0_COLOR
|
|
G0_WIDTH
|
|
G0_COLORWIDTH
|
|
G0_PLOT
|
|
G0_LINE
|
|
G0_ARC
|
|
G0_VEC
|
|
G0_VECARC
|
|
G0_PIX
|
|
G0_PIXARC
|
|
G0_TEXT
|
|
G0_TEXTARC
|
|
G0_TEXTMODE
|
|
G0_BOX
|
|
G0_QUAD
|
|
G0_TRI
|
|
|
|
#93, G0_COLORTAB
|
|
G0_SCREEN
|
|
G0_DATBLK
|
|
G0_DATLEN
|
|
G0_DYNAMIC
|
|
G0_STATIC
|
|
G0_REBOOT
|
|
|
|
PUB glob_con_dummy
|
|
return
|
|
|
|
DAT
|
|
|
|
|
|
{{
|
|
|
|
┌──────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────┐
|
|
│ TERMS OF USE: MIT License │
|
|
├──────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────┤
|
|
│Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation │
|
|
│files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, │
|
|
│modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software│
|
|
│is furnished to do so, subject to the following conditions: │
|
|
│ │
|
|
│The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.│
|
|
│ │
|
|
│THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE │
|
|
│WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR │
|
|
│COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, │
|
|
│ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. │
|
|
└──────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────┘
|
|
}}
|