vb6 - understanding this VB code -

-

can try wrap brain around one? thought ensuring there 2 bytes in hex byte , ensuring values between 0 -9 , a-f no.

a snippet of program infrared controller/blaster. subroutine send actual signals (or other codes) out serial port controller finish job.

sample call:

sendcode ("04241001")

the vb6 code says:

public sub sendcode(byval strout string) ' **************************** ' sub sends hex codes ' ****************************   dim numb1 integer, numb2 integer dim strrs string dim long dim newline(200) string, outline(200) string  debug.print "sending ir - " & strout      strrs = vbnullstring      = 1 len(strout)         newline(i) = mid(strout, i, 1)     next      = 1 len(strout) step 2         if asc(newline(i)) < 64             numb1 = (asc(newline(i)) - 48) * 16             strrs = strrs + format(hex(numb1 / 16), "0")         else             numb1 = (asc(newline(i)) - 55) * 16             strrs = strrs + format(hex(numb1 / 16), "0")         end if         if asc(newline(i + 1)) < 64             numb2 = (asc(newline(i + 1)) - 48)             strrs = strrs + format(hex(numb2), "0")         else             numb2 = (asc(newline(i + 1)) - 55)             strrs = strrs + format(hex(numb2), "0")         end if         numb1 = numb1 + numb2         outline((i + 1) \ 2) = cbyte(numb1)         strrs = strrs + " "     next      mscomm1         .rtsenable = true         sleep (20)         .outbuffercount = 0         = 1 (len(strout) / 2)             .output = chr(outline(i))         next         sleep (20)         .rtsenable = false     end  end sub

the question based around second for/next loop step 2 , embedded if statements. going on inside loop? numb1 , numb2

what purpose of loop?

it converts hex string binary byte string, sends binary byte string. converts binary bytes hex (strrs) can check conversion , output. check/debug string not used anything, if put break point in there can check values.


Comments

Post a Comment

Popular posts from this blog

Detect support for Shoutcast ICY MP3 without navigator.userAgent in Firefox? -

-
the current version of mozilla firefox 23.0.1, version not support play mp3 shoutcast streams tcp port different 80 (most common 8000 shoutcast 1.9.8). i use flash when mp3 support not available in html5 audio, way detect is: try{ var = document.createelement('audio'); r = !!(a.canplaytype && !!a.canplaytype("audio/mpeg; codecs=mp3").replace(/^no$/,'')) }catch(e){ r = false; } the support mp3 shoutcast streams in firefox added in version 24 . a.canplaytype("audio/mpeg; codecs=mp3") = in chrome , firefox, chrome support, firefox not support, due current code detect not work firefox. the current version of jquery support ie 6 1.10.2, version not has .browser i think "stylized" way testing features , not querying browsers / versions, notwithstanding here see hard not violate "principle". what "stylized" way of detect mp3 icy support without navigator.useragent in firefox? ther...
Read more

web - SVG not rendering properly in Firefox -

-
i have problem svg renderring in firefox. whilst works in safari, chrome or in ie, doesn't work in firefox. inspecting element seems layers there, background visible if it's z-index higher z-index of others. rendered in firefox: svg logo in firefox link original source file: svg file thanks help. ps: used sketch 3 export svg. if helps somehow. you're experiencing bug 995813 . i fixed bug time ago change still making way through release process example display correctly firefox 31 onwards released on 22 july 2014. in meantime if move fill="white" <mask> element child <use> element work around firefox bug.
Read more

java - JavaFX 2 slider labelFormatter not being used -

-
i have following code not label slider "foo50", etc... 1 expect setlabelformatter call, instead seems have no effect (the slider labelled 50, 100, etc , println's dont run). there missing? not implemented in default 2.2 skin? using oracle java 7 package javafxbugtest; import javafx.application.application; import javafx.scene.*; import javafx.scene.control.*; import javafx.stage.*; import javafx.util.stringconverter; public class javafxbugtest extends application { @override public void start(final stage primarystage) { slider cp = new slider(); cp.setlabelformatter(new stringconverter<double>() { @override public string tostring(double t) { system.out.println("nope?"); return "foo" + t.tostring(); } @override public double fromstring(string string) { system.out.println("he...
Read more