Warning

doggiedoc · 2012-01-18 19:25

[warning]Any thing you say....[/warning]

doggiedoc · 2012-01-18 19:28

Ok, that does not work.

doggiedoc · 2012-01-18 19:30

Perhaps [highlight]THIS[/highlight] is highlighted.

doggiedoc · 2012-01-18 19:35

what about [php] tags

[php]PUB main | col, loop, row, char, txt, i, start, end

LCD.start(_rxPin, _txPin, 0, 19_200)
waitcnt(clkfreq /2 + cnt)
Clear
row := 2
numChars := strsize(@_theText)

repeat 'loop indefinately
if numChars > 20
repeat i from 0 to 19 'increment in
MoveTo(20-i, row)
repeat txt from 0 to i
char := byte[@_theText][txt]
LCD.STR(@char)
waitcnt(clkfreq / _delay + cnt)
Clear
waitcnt(clkfreq / _delay + cnt)

repeat i from 1 to (numChars - 19) 'full line
MoveTo(1, row)
repeat txt from i to (i + 19)
char := byte[@_theText][txt]
LCD.STR(@char)
waitcnt(clkfreq / _delay + cnt)
Clear
waitcnt(clkfreq / _delay + cnt)

repeat i from (numChars-18) to numChars 'increment out
MoveTo(1, row)
repeat txt from i to numChars
char := byte[@_theText][txt]
LCD.STR(@char)
waitcnt(clkfreq / _delay + cnt)
Clear
waitcnt(clkfreq / _delay + cnt)

[/php]

vs [html] tags

[html]PUB main | col, loop, row, char, txt, i, start, end

LCD.start(_rxPin, _txPin, 0, 19_200)
waitcnt(clkfreq /2 + cnt)
Clear
row := 2
numChars := strsize(@_theText)

repeat 'loop indefinately
if numChars > 20
repeat i from 0 to 19 'increment in
MoveTo(20-i, row)
repeat txt from 0 to i
char := byte[@_theText][txt]
LCD.STR(@char)
waitcnt(clkfreq / _delay + cnt)
Clear
waitcnt(clkfreq / _delay + cnt)

repeat i from 1 to (numChars - 19) 'full line
MoveTo(1, row)
repeat txt from i to (i + 19)
char := byte[@_theText][txt]
LCD.STR(@char)
waitcnt(clkfreq / _delay + cnt)
Clear
waitcnt(clkfreq / _delay + cnt)

repeat i from (numChars-18) to numChars 'increment out
MoveTo(1, row)
repeat txt from i to numChars
char := byte[@_theText][txt]
LCD.STR(@char)
waitcnt(clkfreq / _delay + cnt)
Clear
waitcnt(clkfreq / _delay + cnt)

[/html]

doggiedoc · 2012-01-18 19:37

vs plain old

tags

[code]PUB main |  col, loop, row, char, txt, i, start, end


      LCD.start(_rxPin, _txPin, 0, 19_200)
      waitcnt(clkfreq /2 + cnt)
      Clear
      row := 2
      numChars := strsize(@_theText)

 repeat 'loop indefinately
   if numChars > 20
     repeat i from 0 to 19              'increment in     
       MoveTo(20-i, row)
         repeat txt from 0 to i
             char := byte[@_theText][txt]
             LCD.STR(@char)
       waitcnt(clkfreq / _delay + cnt)      
       Clear
       waitcnt(clkfreq / _delay + cnt)


     repeat i from 1 to (numChars - 19)             'full line       
       MoveTo(1, row)
           repeat txt from i to (i + 19)
             char := byte[@_theText][txt]
             LCD.STR(@char)     
       waitcnt(clkfreq / _delay + cnt)      
       Clear
       waitcnt(clkfreq / _delay + cnt)
               
           
     repeat i from (numChars-18) to numChars                 'increment out        
       MoveTo(1, row)
         repeat txt from i to numChars
            char := byte[@_theText][txt]
            LCD.STR(@char)
       waitcnt(clkfreq / _delay + cnt)      
       Clear
       waitcnt(clkfreq / _delay + cnt)

doggiedoc · 2012-01-19 09:21

So I played around some last night with making a custom BBCode tag for formatting spin code [spin][/spin] in an effort to duplicate the Prop IDE. Well, it's not coming along so good.

Warning

Comments