This Forum is Dedicated For all The Object Oriented PIC Lovers .......... The concept behind OOPic is straight forward. Use preprogrammed multitasking Objects from a library of highly optimized Objects to do all the work of interacting with the hardware. Then write small scripts in Basic, C, or Java syntax styles to control the Objects. During operation, the Objects run continuously and simultaneously in the background while the scripts run in the foreground telling the objects what to do.

Sunday, January 20, 2008

[oopic] Re: owire2, owire2c and ofanout2 cannot use in oopic complier 6 why.....help(4)

Dear sir,

I have tried the Owire2 but oopic-R only turn only the LED no flash.
Pls, help

Michael

--- In oopic@yahoogroups.com, ooPIC Tech Support <dennis.clark@...>
wrote:
>
> You have linked your clock to the oWire input, you have not linked
> anything to the oWire.ProcessClock. I recommend that you don't use
> oWire2C and simply use oWire2. I have found little reason to use
the
> "C" options unless you are needed a special synchronization to
another
> object. To copy across the oWire using oWireC you need to toggle
the
> ProcessClock flag. I repeat, simply use oWire2 and it should work.
>
> DLC
>
> aibomc wrote:
> > Dear Sir,
> >
> > I write the these two case of program and download to oopicR
B2.2+ by
> > complier 6.1.1. Unfortunately, I cannot success on it. however,I
> > success the case(1) program by complier 5.0.1, the oopic-R could
make
> > the two LEDs to flash.
> >
> > Could you kindly check this matter? thanks
> >
> > *Case(1)
> > Dim W As New oFanout(2)
> > Dim LED_1 As New oDIO1
> > Dim LED_2 As New oDIO1
> > Dim a As New oClock
> >
> > Sub Main()
> >
> > LED_1.IOLine = 6
> > LED_1.Direction = cvOutput
> > LED_2.IOLine = 5
> > LED_2.Direction = cvOutput
> >
> > a.Rate = 200
> > W.Input.Link(a)
> > a.Operate = cvTrue
> >
> > W.Output1.Link(LED_2)
> > W.Output2.Link(LED_1)
> > W.Operate = cvTrue
> >
> > End Sub
> >
> > Result:
> > Case(1) Program is only turn on the two LED in oopic-R.
> >
> > *Case(2)
> > Dim W As New oWire2C
> > Dim LED_1 As New oDIO1
> > Dim LED_2 As New oDIO1
> > Dim a As New oClock
> >
> > Sub Main()
> >
> > LED_1.IOLine = 6
> > LED_1.Direction = cvOutput
> > LED_2.IOLine = 5
> > LED_2.Direction = cvOutput
> >
> > a.Rate = 200
> > W.Input.Link(a)
> > a.Operate = cvTrue
> >
> > W.Output1.Link(LED_2)
> > W.Output2.Link(LED_1)
> > W.Operate = cvTrue
> >
> > End Sub
> >
> > Result:
> > Case(2) the two LED no any respond.
> >
> > Thank you for your kindly support
> >
> > Michael
> >
> > --- In oopic@yahoogroups.com, "aibomc" <aibomc@> wrote:
> >
> >> --- In oopic@yahoogroups.com, "aibomc" <aibomc@> wrote:
> >>
> >>> Dear sir,
> >>>
> >>> Actually, I tried the oFanOut2,oWire2 and oWire2c, it does work
> >>>
> > at
> >
> >>> oopic V6.
> >>> Pls, help
> >>>
> >>> Michael
> >>> --- In oopic@yahoogroups.com, ooPIC Tech Support
<dennis.clark@>
> >>> wrote:
> >>>
> >>>> Please check out the manual and example programs. This line:
> >>>> Dim W As New oFanOut2/OWire2/Owire2c
> >>>> will not compile. Try this instead:
> >>>> Dim W As New oFanOut2
> >>>>
> >>>> DLC
> >>>>
> >>>> aibomc wrote:
> >>>>
> >>>>> Dear Sir,
> >>>>>
> >>>>> I write the following program by oopic complier Ver6 using
> >>>>>
> > the
> >
> >>>>> OFanout, Owrie and owire2c
> >>>>> However, It cannot seccess in Window XP.
> >>>>>
> >>>>>
> >>>>>
> >>>>>
> >
*********************************************************************
> >
> >>>>> 'ooPIC Version: ooPIC R B2.2
> >>>>>
> >>>>> The oClock Object generates specific clock rate To LED-1 &
> >>>>>
> > LED-2
> >
> >>>>> interface by oFanOut2
> >>>>>
> >>>>> ' *********** ************** ------> LED-1
> >>>>> ' *Oclock(a)*----->*OFanout2 (w)*
> >>>>> ' *********** ************** ------> LED-2
> >>>>>
> >>>>>
> >>>>> Dim W As New oFanOut2/OWire2/Owire2c
> >>>>> Dim LED_1 As New oDIO1
> >>>>> Dim LED_2 As New oDIO1
> >>>>> Dim a As New oClock
> >>>>>
> >>>>> Sub Main()
> >>>>>
> >>>>> LED_1.IOLine = 6
> >>>>> LED_1.Direction = cvOutput
> >>>>> LED_2.IOLine = 5
> >>>>> LED_2.Direction = cvOutput
> >>>>>
> >>>>>
> >>>>> a.Rate = 200
> >>>>> W.Input.Link(a)
> >>>>> a.Operate = cvTrue
> >>>>>
> >>>>>
> >>>>> W.Output1.Link(LED_2)
> >>>>> W.Output2.Link(LED_1)
> >>>>> W.Operate = cvTrue
> >>>>>
> >>>>>
> >>>>> End Sub
> >>>>>
> >>>>>
> >
*********************************************************************
> >
> >>>>> Could you kindly reply my problem?
> >>>>>
> >>>>> Thank you for your concern
> >>>>>
> >>>>> Michael
> >>>>>
> >>>>>
> >>>>>
> >>>>>
> >>>>>
> >>>>> Yahoo! Groups Links
> >>>>>
> >>>>>
> >>>>>
> >>>>>
> >>>>>
> >>>>>
> >>>> --
> >>>> ------------------------------------------------------
> >>>> Dennis Clark ooPIC Tech Support
> >>>> www.oopic.com
> >>>> ------------------------------------------------------
> >>>>
> >>>>
> >
> >
> >
> >
> >
> > Yahoo! Groups Links
> >
> >
> >
> >
>
> --
> ------------------------------------------------------
> Dennis Clark ooPIC Tech Support
> www.oopic.com
> ------------------------------------------------------
>



Yahoo! Groups Links

<*> To visit your group on the web, go to:

http://groups.yahoo.com/group/oopic/

<*> Your email settings:
Individual Email | Traditional

<*> To change settings online go to:

http://groups.yahoo.com/group/oopic/join

(Yahoo! ID required)

<*> To change settings via email:
mailto:oopic-digest@yahoogroups.com
mailto:oopic-fullfeatured@yahoogroups.com

<*> To unsubscribe from this group, send an email to:
oopic-unsubscribe@yahoogroups.com

<*> Your use of Yahoo! Groups is subject to:

http://docs.yahoo.com/info/terms/

No comments: