diff options
Diffstat (limited to 'software/ttx/ttx.asm')
-rw-r--r-- | software/ttx/ttx.asm | 82 |
1 files changed, 82 insertions, 0 deletions
diff --git a/software/ttx/ttx.asm b/software/ttx/ttx.asm new file mode 100644 index 0000000..316ce46 --- /dev/null +++ b/software/ttx/ttx.asm @@ -0,0 +1,82 @@ + ;; + ;; mur.sat + ;; + ;; Somewhen in the year 2011, mur.at will have a nano satellite launched + ;; into a low earth orbit (310 km above the surface of our planet). The + ;; satellite itself is a TubeSat personal satellite kit, developed and + ;; launched by interorbital systems. mur.sat is a joint venture of mur.at, + ;; ESC im Labor and realraum. + ;; + ;; Please visit the project hompage at sat.mur.at for further information. + ;; + ;; + ;; Copyright (C) 2011 Christian Pointner <equinox@spreadspace.org> + ;; + ;; This file is part of mur.sat. + ;; + ;; mur.sat 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 + ;; any later version. + ;; + ;; mur.sat 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 mur.sat. If not, see <http://www.gnu.org/licenses/>. + ;; + ;; ------------------------------------- + ;; PREAMBLE + + LIST p=10F206 + include "p10f206.inc" + __config _MCLRE_OFF & _CP_OFF & _WDT_OFF + + ;; ------------------------------------- + ;; DEFINES + +CNT0 EQU H'0008' +CNT1 EQU H'0009' + + ;; ------------------------------------- + ;; OFFSET + org 0 + + ;; ------------------------------------- + ;; INIT +init + bsf CMCON0,NOT_COUTEN + bcf CMCON0,CMPON + movlw b'11000110' + option + movlw b'11111011' + tris GPIO + bcf GPIO,GP2 + + ;; ------------------------------------- + ;; MAINLOOP +main + movlw .255 + movwf CNT0 + +outer + movlw .255 + movwf CNT1 + +inner + decfsz CNT1,f + goto inner + + decfsz CNT0,f + goto outer + + movlw b'00000100' + xorwf GPIO,f + + goto main + + ;; ------------------------------------- + ;; END + end |