API tools faq
paste
Advertisement
Guest User

Untitled

a guest
May 15th, 2012
68
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.20 KB | None | 0 0
raw download clone embed print report
  1.  
  2. ; PICBASIC PRO(TM) Compiler 2.50, (c) 1998, 2007 microEngineering Labs, Inc. All Rights Reserved.
  3. _USED EQU 1
  4.  
  5. INCLUDE "C:\PBP\16F628A.INC"
  6.  
  7.  
  8. ; Define statements.
  9. ; C:\USERS\ANDREW\DESKTOP\RAPID FIRE\RAPID\TEST.PBP 00013 Define OSC 4
  10. #define OSC 4
  11.  
  12. RAM_START EQU 00020h
  13. RAM_END EQU 0014Fh
  14. RAM_BANKS EQU 00003h
  15. BANK0_START EQU 00020h
  16. BANK0_END EQU 0007Fh
  17. BANK1_START EQU 000A0h
  18. BANK1_END EQU 000EFh
  19. BANK2_START EQU 00120h
  20. BANK2_END EQU 0014Fh
  21. EEPROM_START EQU 02100h
  22. EEPROM_END EQU 0217Fh
  23.  
  24. ; C:\PBP\PBPPIC14.RAM 00012 R0 VAR WORD BANK0 SYSTEM ' System Register
  25. R0 EQU RAM_START + 000h
  26. ; C:\PBP\PBPPIC14.RAM 00013 R1 VAR WORD BANK0 SYSTEM ' System Register
  27. R1 EQU RAM_START + 002h
  28. ; C:\PBP\PBPPIC14.RAM 00014 R2 VAR WORD BANK0 SYSTEM ' System Register
  29. R2 EQU RAM_START + 004h
  30. ; C:\PBP\PBPPIC14.RAM 00015 R3 VAR WORD BANK0 SYSTEM ' System Register
  31. R3 EQU RAM_START + 006h
  32. ; C:\PBP\PBPPIC14.RAM 00016 R4 VAR WORD BANK0 SYSTEM ' System Register
  33. R4 EQU RAM_START + 008h
  34. ; C:\PBP\PBPPIC14.RAM 00017 R5 VAR WORD BANK0 SYSTEM ' System Register
  35. R5 EQU RAM_START + 00Ah
  36. ; C:\PBP\PBPPIC14.RAM 00018 R6 VAR WORD BANK0 SYSTEM ' System Register
  37. R6 EQU RAM_START + 00Ch
  38. ; C:\PBP\PBPPIC14.RAM 00019 R7 VAR WORD BANK0 SYSTEM ' System Register
  39. R7 EQU RAM_START + 00Eh
  40. ; C:\PBP\PBPPIC14.RAM 00020 R8 VAR WORD BANK0 SYSTEM ' System Register
  41. R8 EQU RAM_START + 010h
  42. ; C:\PBP\PBPPIC14.RAM 00026 FLAGS VAR BYTE BANK0 SYSTEM ' Static flags
  43. FLAGS EQU RAM_START + 012h
  44. ; C:\PBP\PBPPIC14.RAM 00025 GOP VAR BYTE BANK0 SYSTEM ' Gen Op Parameter
  45. GOP EQU RAM_START + 013h
  46. ; C:\PBP\PBPPIC14.RAM 00022 RM1 VAR BYTE BANK0 SYSTEM ' Pin 1 Mask
  47. RM1 EQU RAM_START + 014h
  48. ; C:\PBP\PBPPIC14.RAM 00024 RM2 VAR BYTE BANK0 SYSTEM ' Pin 2 Mask
  49. RM2 EQU RAM_START + 015h
  50. ; C:\PBP\PBPPIC14.RAM 00021 RR1 VAR BYTE BANK0 SYSTEM ' Pin 1 Register
  51. RR1 EQU RAM_START + 016h
  52. ; C:\PBP\PBPPIC14.RAM 00023 RR2 VAR BYTE BANK0 SYSTEM ' Pin 2 Register
  53. RR2 EQU RAM_START + 017h
  54. ; C:\PBP\16F628A.BAS 00020 PORTL VAR PORTB
  55. _PORTL EQU PORTB
  56. ; C:\PBP\16F628A.BAS 00021 PORTH VAR PORTA
  57. _PORTH EQU PORTA
  58. ; C:\PBP\16F628A.BAS 00022 TRISL VAR TRISB
  59. _TRISL EQU TRISB
  60. ; C:\PBP\16F628A.BAS 00023 TRISH VAR TRISA
  61. _TRISH EQU TRISA
  62. #define _b _PORTB??0
  63. #define _RTrigger _PORTB??3
  64. #define _LTrigger _PORTB??2
  65. #define _LED4 _PORTA??1
  66. #define _LED3 _PORTB??1
  67. #define _SYNC _PORTA??2
  68. #define _y _PORTA??3
  69. #define _x _PORTA??4
  70. #define _PORTB??0 PORTB, 000h
  71. #define _PORTB??3 PORTB, 003h
  72. #define _PORTB??2 PORTB, 002h
  73. #define _PORTA??1 PORTA, 001h
  74. #define _PORTB??1 PORTB, 001h
  75. #define _PORTA??2 PORTA, 002h
  76. #define _PORTA??3 PORTA, 003h
  77. #define _PORTA??4 PORTA, 004h
  78. INCLUDE "TEST.MAC"
  79. INCLUDE "C:\PBP\PBPPIC14.LIB"
  80.  
  81.  
  82. ; C:\PBP\16F628A.BAS 00012 BANK0 $0020, $007F
  83. ; C:\PBP\16F628A.BAS 00013 BANK1 $00A0, $00EF
  84. ; C:\PBP\16F628A.BAS 00014 BANK2 $0120, $014F
  85. ; C:\PBP\16F628A.BAS 00015 EEPROM $2100, $217F
  86. ; C:\PBP\16F628A.BAS 00016 LIBRARY "PBPPIC14"
  87.  
  88. ; C:\PBP\16F628A.BAS 00018 include "PIC14EXT.BAS"
  89.  
  90. ; C:\PBP\16F628A.BAS 00025 include "PBPPIC14.RAM"
  91.  
  92. ; C:\USERS\ANDREW\DESKTOP\RAPID FIRE\RAPID\TEST.PBP 00011 @ __config _INTRC_OSC_NOCLKOUT & _WDT_ON & _PWRTE_OFF & _MCLRE_OFF & _BODEN_OFF & _LVP_OFF
  93.  
  94. ASM?
  95. __config _INTRC_OSC_NOCLKOUT & _WDT_ON & _PWRTE_OFF & _MCLRE_OFF & _BODEN_OFF & _LVP_OFF
  96.  
  97. ENDASM?
  98.  
  99. ; C:\USERS\ANDREW\DESKTOP\RAPID FIRE\RAPID\TEST.PBP 00013 Define OSC 4
  100.  
  101. ; C:\USERS\ANDREW\DESKTOP\RAPID FIRE\RAPID\TEST.PBP 00025 CMCON = 7
  102. MOVE?CB 007h, CMCON
  103.  
  104. ; C:\USERS\ANDREW\DESKTOP\RAPID FIRE\RAPID\TEST.PBP 00026 VRCON = 0
  105. MOVE?CB 000h, VRCON
  106.  
  107. ; C:\USERS\ANDREW\DESKTOP\RAPID FIRE\RAPID\TEST.PBP 00027 PortA = %00000000
  108. MOVE?CB 000h, PORTA
  109.  
  110. ; C:\USERS\ANDREW\DESKTOP\RAPID FIRE\RAPID\TEST.PBP 00028 PortB = %00000000
  111. MOVE?CB 000h, PORTB
  112.  
  113. ; C:\USERS\ANDREW\DESKTOP\RAPID FIRE\RAPID\TEST.PBP 00029 T1CON = %00000011
  114. MOVE?CB 003h, T1CON
  115.  
  116. ; C:\USERS\ANDREW\DESKTOP\RAPID FIRE\RAPID\TEST.PBP 00030 TRISA = %00000000
  117. MOVE?CB 000h, TRISA
  118.  
  119. ; C:\USERS\ANDREW\DESKTOP\RAPID FIRE\RAPID\TEST.PBP 00031 TRISB = %00001100
  120. MOVE?CB 00Ch, TRISB
  121.  
  122. ; C:\USERS\ANDREW\DESKTOP\RAPID FIRE\RAPID\TEST.PBP 00032 start:
  123.  
  124. LABEL?L _start
  125.  
  126. ; C:\USERS\ANDREW\DESKTOP\RAPID FIRE\RAPID\TEST.PBP 00033 pause 1000
  127. PAUSE?C 003E8h
  128.  
  129. ; C:\USERS\ANDREW\DESKTOP\RAPID FIRE\RAPID\TEST.PBP 00034 goto start
  130. GOTO?L _start
  131.  
  132. END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!