view code_part1/OSTC_code_asm_part1/wait.asm @ 117:d92a6a8ab516
added sample workspace file
author
heinrichsweikamp
date
Sun, 26 Dec 2010 16:47:29 +0100 (2010-12-26)
parents
96a35aeda5f2
children
42acd9316f7a
line source
; OSTC - diving computer code+ − ; Copyright (C) 2008 HeinrichsWeikamp GbR+ − ; This program 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.+ − ; This program 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 this program. If not, see <http://www.gnu.org/licenses/>.+ − ; Wait routines+ − ; written by: chsw, info@heinrichsweikamp.com+ − ; written: 01/31/04+ − ; last updated: 11/05/07+ − ; known bugs:+ − ; ToDo: + − + − ; ==========================================================+ − ; WAIT 10 MICROSECONDS - 16 MHZ+ − ; ==========================================================+ − WAIT10US macro wait_temp+ − movlw wait_temp+ − call WAIT10USX+ − endm+ − + − WAIT10USX movwf wait_temp+ − goto JumpIn10us+ − WAIT10USX2 nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − JumpIn10us:+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − decfsz wait_temp,1+ − goto WAIT10USX2+ − return+ − ; ==========================================================+ − ; WAIT 1 MILLISECOND - 16 MHZ+ − ; ==========================================================+ − WAITMS macro waitms_temp+ − movlw waitms_temp+ − call WAITMSX+ − endm+ − WAITMSX movwf waitms_temp+ − goto JumpInMSX+ − WAITMSX2 nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − JumpInMSX:+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − nop+ − WAIT10US d'99'+ − decfsz waitms_temp,1+ − goto WAITMSX2+ − return+ −
