35 lines
1.1 KiB
Plaintext
35 lines
1.1 KiB
Plaintext
## Copyright (C) 2016 Jeremiah Orians
|
|
## This file is part of M2-Planet.
|
|
##
|
|
## M2-Planet is free software: you can redistribute it and/or modify
|
|
## it under the terms of the GNU General Public License as published by
|
|
## the Free Software Foundation, either version 3 of the License, or
|
|
## (at your option) any later version.
|
|
##
|
|
## M2-Planet is distributed in the hope that it will be useful,
|
|
## but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
## GNU General Public License for more details.
|
|
##
|
|
## You should have received a copy of the GNU General Public License
|
|
## along with M2-Planet. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
:_start
|
|
;; Prep TAPE_02
|
|
LOADUI R0 0x1101
|
|
FOPEN_WRITE
|
|
|
|
;; Prep TAPE_01
|
|
LOADUI R0 0x1100
|
|
FOPEN_READ
|
|
|
|
LOADR32 R12 @HEAP ; Setup HEAP pointer
|
|
LOADUI R15 $STACK ; Setup initial stack pointer
|
|
COPY R14 R15 ; Setup initial base pointer
|
|
CALLI R15 @FUNCTION_main ; Go to main
|
|
HALT ; Exit to kernel
|
|
|
|
;; Our default heap pointer
|
|
:HEAP
|
|
'00100000'
|