Hi All
Thanks for the wakeup call grindstone.
No, I don't think so, BUT do we have the same restrictions within a Select Case ?
But I will now check for it.
Regards
Search found 1308 matches
- Oct 05, 2019 15:46
- Forum: General
- Topic: String Sort problem
- Replies: 24
- Views: 1336
- Oct 05, 2019 1:05
- Forum: General
- Topic: String Sort problem
- Replies: 24
- Views: 1336
Re: String Sort problem
Hi All I have replaced and tested by running the script in the terminal and directing the output into a file. Then Dim as Long pf = Freefile Dim s as String * 18 Open "max.txt" for Input as #pf Get #pf,, s Close #pf Print s Same fault in the same place, after it comes back from reading the...
- Oct 05, 2019 0:17
- Forum: General
- Topic: String Sort problem
- Replies: 24
- Views: 1336
Re: String Sort problem
Hi All Well it is not a Computer problem. I have tried it on another laptop (complete clean install of every thing) I have tried it on a BeagleBone Black. Even when the script is not run (due to permission error) the same fault on return from the shell. I HATE SHELL Programming, the only reason to d...
- Oct 04, 2019 23:39
- Forum: General
- Topic: String Sort problem
- Replies: 24
- Views: 1336
Re: String Sort problem
Hi All Currently using 1.06 , but just tried 1.05 with no difference. Have you recently updated libraries or installed new applications on your PC ? I have been preparing my laptop to hand it over to my successor here in the usa. But that has mainly involved removing things. However, I can try using...
- Oct 04, 2019 23:03
- Forum: General
- Topic: String Sort problem
- Replies: 24
- Views: 1336
Re: String Sort problem
Hi all
MrSwiss, tested both changes and , sorry Hero Title still open.
Even taking out the print statement, did nothing to solve the fault.
I am even thinking of taking the very radical step of going back a few versions of FB.
Never before have I had such a spate of these faults.
Regards
MrSwiss, tested both changes and , sorry Hero Title still open.
Even taking out the print statement, did nothing to solve the fault.
I am even thinking of taking the very radical step of going back a few versions of FB.
Never before have I had such a spate of these faults.
Regards
- Oct 04, 2019 21:46
- Forum: General
- Topic: String Sort problem
- Replies: 24
- Views: 1336
Re: String Sort problem
Hi All MrSwiss I thought it was that straight forward as well. In fact I could not find errors in my code and the way I did it. I kept getting Segmentation fault (core dumped) In fact I don't recall getting that fault for years. Now I seem to be getting it every day for some reason that nobody can p...
- Oct 04, 2019 14:55
- Forum: Hardware Interfaces / Communication
- Topic: TP-Link HS110
- Replies: 150
- Views: 7677
Re: TP-Link HS110
Hi All badidea we all have our distractions. Currently my wife is going through chemo therapy and that means I am away from work and have a lot of time whilst she rests. That is about to change next week though. With the help of srvaldez (which you probably saw) I have modified Step 4 in the DataTxR...
- Oct 04, 2019 14:08
- Forum: General
- Topic: String Sort problem
- Replies: 24
- Views: 1336
Re: String Sort problem
Hi All Many thanks for the responses, but dafhi the walk didn't help. srvaldez I have implemented your second example and modified it as per below,. dim as string d(30) dim as integer i=0, j, c, l=len(s), q,r while i<l c=s[i]=58 if c then j=i+1 if s[j]=34 then q=34 j+=1 else q=58 end if while s[j]<>...
- Oct 03, 2019 23:52
- Forum: General
- Topic: String Sort problem
- Replies: 24
- Views: 1336
String Sort problem
Hi All Linux, FB 1.06 The typical String: {"system":{"get_sysinfo":{"sw_ver":"1.5.5 Build 181225 Rel.102720","hw_ver":"2.0","type":"IOT.SMARTPLUGSWITCH","model":"HS110(AU)","mac":"B0:BE...
- Oct 02, 2019 16:40
- Forum: Hardware Interfaces / Communication
- Topic: TP-Link HS110
- Replies: 150
- Views: 7677
Re: TP-Link HS110
Hi All With this routine I get a segmentation fault on Case 21. Other then the names and the value of X, the code for each case is identical. I put some print statements in to make sure no weird values. Also copied the Temp buffer into a file and used an Hex editor to confirm there are no control Ch...
- Oct 02, 2019 14:38
- Forum: Hardware Interfaces / Communication
- Topic: TP-Link HS110
- Replies: 150
- Views: 7677
Re: TP-Link HS110
Hi All badidea , some progress. Case 4 ''Decrypt data recvd and convert commas to LF''s for readability. If Control.PrintFlag > 0 Then Print "Step-4" decrypt(.RxData) Dim as String Temp = .Rxdata 'StripSpaces(Temp) StripChars(Temp) 'strip { } " With LFCnt .LF(1) = 1 Dim X as Integer F...
- Oct 01, 2019 22:21
- Forum: Hardware Interfaces / Communication
- Topic: TP-Link HS110
- Replies: 150
- Views: 7677
Re: TP-Link HS110
Hi All I am working on, Reading the string for 24 locations of LF and recording the location as LF(x). Then using the value x-1 as Start and x as the end I have the beginning and end of each field. Save that string(x) Then using the : as the start and the LF as the end Read the string and assign it ...
- Oct 01, 2019 19:54
- Forum: Hardware Interfaces / Communication
- Topic: TP-Link HS110
- Replies: 150
- Views: 7677
Re: TP-Link HS110
Hi All The HS110 does not have a single command to check if the Relay is On / Off. When using the command system:get_sysinfo it does have buried in the string a statement: relay_state:1 So after some searching on stripping the string of all the unwanted char's, I wrote 2 Subs. 1 Specifically to &quo...
- Oct 01, 2019 0:24
- Forum: Hardware Interfaces / Communication
- Topic: TP-Link HS110
- Replies: 150
- Views: 7677
Re: TP-Link HS110
Hi All badidea, it is a huge improvement. The code that I zipped to you takes between 150 to 230 mSec for Command 4 Get Info (if you do it repeatedly) with the old snc Your test program takes between 50 and 120 mSec (if you do it repeatedly) When the HS110 is asleep it takes longer to wake it. But I...
- Sep 30, 2019 23:38
- Forum: Hardware Interfaces / Communication
- Topic: TP-Link HS110
- Replies: 150
- Views: 7677
Re: TP-Link HS110
Hi All This fixes it. Have tested. Case 11 ''Set Time zone Dim as String Year = Right(Date,4) Dim as String Month = Left(Date,2) Dim as String Day = Mid(Date,4,2) Dim as String Hour = Left(Time,2) If Val(Hour) = 0 Then Hour = " 0" Dim as String Min = Mid(Time,4,2) If Val(Min) = 0 Then Min ...