Jump to content

Search the Community

Showing results for tags 'Novo Basic'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • PIC Embedded Programming
    • BoostC and Chameleon compilers programming
    • BoostC porting source code
    • BoostC++ compiler programming
    • BoostBasic compiler programming
    • Assembler programming PIC
    • Novo RTOS Programming
    • Hardware PIC
    • Enhancement Requests
    • Bug Reports

Found 1 result

  1. Novo & Boostbasic

    I am working on a simple program just to blink an LED. This is my way of teaching myself how to use the Novo RTOS with BoostBasic. I am using MPLAB for the IDE with Notepad++ as an external editor. When I compile I get the following error: Executing: "C:\Program Files\SourceBoost\boostbasic_pic16.exe" MPLABIDETest.bas -O1 -W1 -t 16F877A BoostBasic Optimizing Basic Compiler Version 7.10 (for PIC16 architecture) http://www.sourceboost.com Copyright© 2004-2012 Pavel Baranov Copyright© 2004-2012 David Hobday Licensed to Henry Link under Single user Pro License for 1 node(s) Limitations: PIC12,PIC16 max code size:Unlimited, max RAM banks:Unlimited MPLABIDETest.bas MPLABIDETest.bas(20): error: general error MPLABIDETest.bas(20): error: failure failure BUILD FAILED: Tue Oct 30 11:44:15 2012 If I comment out line 21 (call SysTimerUpdate) the the error above moves to line 27 (the next call to Novo). Any ideas? I get the impression there is very little if any use of Boostbasic with Novo. I've included the source below. Source code: #include <basic/system.bas> #include <basic/novocfg_pic16t6e4ts2_h.bas> #include <basic/novo_h.bas> #pragma DATA _CONFIG, _CP_OFF & _WDT_OFF & _BODEN_OFF & _PWRTE_OFF & _XT_OSC & _WRT_OFF & _LVP_OFF & _CPD_OFF #pragma CLOCK_FREQ 4000000 #pragma OPTIMIZE "1" dim mscounter as dword 'used to count ms ticks of TIMER0 dim seccounter as byte 'used to count seconds from mscounter sub interupt () tmr0 = 6 mscounter = mscounter + 1 if mscounter = 10000 then seccounter = seccounter + 1 mscounter = 0 end if call SysTimerUpdate () end sub sub TaskToggleLED(byref PC as byte) PC = PC ^ 00000001b portc = PC 'Flip the 1st LED call Sys_Sleep(500) end sub sub main() dim ShadowC as byte = 0 'setup PIC trisc = 0 'Set port c to all output option_reg = 0x84 intcon = 0xA0 call SysInit() call SysCreateTask(0, 7, TaskToggleLED) 'main loop do while 1 call Sys_Yield() loop end sub
×