Activity for Pere font vilanova
-
Pere font vilanova posted a comment on discussion Open Discussion
thanks for the information. but yes, i'm using scamp words. but because i'm using the FSM with vocabularies, really is not necessary use the marker option. I keep the specific words in different vocabularies.and i load them only when necessary.
-
when i have: -test marker -test ram create buf 20 allot ram create buf2 20 allot test2 buf c@+ evaluate buf2 c@+ evaluate ; s" : test 1 2" buf place s" + . ;" buf2 place test2 test 3 in a text file and I make copy and paste to the forth terminal, this works fine. but if I put this in a buffer and then I make evaluate, the system don't recognizes the -test word and give me aan error message and the evaluate stops. then i can not save files starting with -name marker -name. is there any way to solve...
-
I've finally managed to read an entire 4K text from external storage without worrying about truncated definitions or being stuck mid-word at the end of a 256-byte page of Scamp3e. I parse to the next CR (even if it's on the next page), save it in a 64-byte buffer, and then evaluate. It works perfectly even when a definition is evaluated in several parts, as you mentioned in your answer.
-
it works well. Good idea for some quick test.
-
thank you for the information. my idea was to have two buffer, a buffer 256 bytes and then a buffer of 64 bytes and a handle system. but now i'm thinking to have only one of 64 bytes and fill it reading the text until cr, evaluate and do the same until the end of file. i will check and try this idea and I will inform you. last : why buf c@+ evaluate buf2 c@+ evaluate doesn't work? and : test2 buf c@+ evaluate buf2 c@+ evaluate ; works.?
-
thank you for the information. my idea was to have two buffer, a buffer 256 bytes and then a buffer of 64 bytes and a handle system. but now i'm thinking to have only one of 64 bytes and fill it reading the text until cr, evaluate and do the same until the end of file. i will check and try this idea and I will inform you.
-
thank you for the information. my idea was to have two buffer, a buffer 256 bytes and then a buffer of 64 bytes and a handle system. but now i'm thinking to have only one of 64 bytes and fill it reading the text until cr, evaluate and do the same until the end of file. i will check and try this idea and I inform you.
-
what i really need: with loops and more accurate 1 ram create buf 20 allot 2 : test buf 20 evaluate ; 3 s" test3 1 2" buf swap cmove 4 test 5 buffer 20 erase 6 s" + . ;" buf swap cmove 7 test test3---->3 if this possible? my goal is evaluate a complet file of 4 K with a buffer of 256 bytes.
-
what i really need: with loops and more accurate ram create buf 20 allot test buf 20 evaluate ; s" test3 1 2" buf swap cmove test buffer 20 erase s" + . ;" buf swap cmove test test3---->3 if this possible? my goal is evaluate a complet file of 4 K with a buffer of 256 bytes.
-
what i really need: with loops and more accurate ram create buf 20 allot test buf 20 evaluate ; s" test3 1 2" buf swap cmove test buffer 20 erase s" + . ;" buf 8 + swap cmove test test3---->3 if this possible? my goal is evaluate a complet file of 4 K with a buffer of 256 bytes.
-
what i really need: with loops and more accurate ram create buf 20 allot test buf c@+ evaluate ; s" test3 1 2" buf swap cmove test buffer 20 erase s" + . ;" buf 8 + swap cmove test test3---->3 if this possible? my goal is evaluate a complet file of 4 K with a buffer of 256 bytes.
-
Hello Mikael is there a way to use interpret in a buffer? i mean, i have a buffer with some forth words, and some definitions. if i need several buffers to interpret, i cannot use evaluate, because some of them finish in the midle of a definition, ande aluate doesnt work. but maybe if i change the source and use interpret i can use it and following reading the newbuffer until the end... exMple: create buffer 10 allot buffer ------> ( : test 1 cr 1 + . ; )definition in two lines. twice the buffer...
-
Hello Mikael is there a way to use interpret in a buffer? i mean, i have a buffer with some forth words, and some definitions. if i need several buffers to interpret, i cannot use evaluate, because some of them finish in the midle of a definition, ande aluate doesnt work. but maybe if i change the source and use interpret i can use it and following reading the newbuffer until the end... exMple: create buffer 10 allot buffer ------> ( : test 1 cr 1 + . ; )definition in two lines. buffer evaluate doesnt...
-
Hello Mikael is there a way to use interpret in a buffer? i mean, i have a buffer with some forth words, and some definitions. if i need several buffers to interpret, i cannot use evaluate, because some of them finish in the midle of a definition, ande aluate doesnt work. but maybe if i change the source and use interpret i can use it and following reasing the newbuffer until the end... exMple: create buffer 10 allot buffer ------> ( : test 1 cr 1 + . ; )definition in two lines. buffer evaluate doesnt...
-
I always thought that when there were two nested loops, the index value of each loop had to be requested using I and J. But in the last example, I see that I can get the value of each index (inner and outer) using only index I, without needing to use J. I suppose they should only be used if both indices are requested within the same loop. sorry for a lot of questions, but i'm beginner forth user....
-
also : tt 10 for i . 10 for i . next cr next ; ok tt 10 10 9 8 7 6 5 4 3 2 1 0 9 10 9 8 7 6 5 4 3 2 1 0 8 10 9 8 7 6 5 4 3 2 1 0 7 10 9 8 7 6 5 4 3 2 1 0 6 10 9 8 7 6 5 4 3 2 1 0 5 10 9 8 7 6 5 4 3 2 1 0 4 10 9 8 7 6 5 4 3 2 1 0 3 10 9 8 7 6 5 4 3 2 1 0 2 10 9 8 7 6 5 4 3 2 1 0 1 10 9 8 7 6 5 4 3 2 1 0 0 10 9 8 7 6 5 4 3 2 1 0 ok
-
yes but normally in nested loop i used: qq 10 0 do Jx . 10 0 do I x . loop cr loop ; that is working well but if i make ww 10 0 do Ix . 10 0 do Ix . loop cr loop ; also it works... then why you need Jx? qq 10 0 do i . 10 0 do i . loop cr loop ; \ tested on my ipad swiftforth \ but also checked in my scamp ok qq 0 0 1 2 3 4 5 6 7 8 9 1 0 1 2 3 4 5 6 7 8 9 2 0 1 2 3 4 5 6 7 8 9 3 0 1 2 3 4 5 6 7 8 9 4 0 1 2 3 4 5 6 7 8 9 5 0 1 2 3 4 5 6 7 8 9 6 0 1 2 3 4 5 6 7 8 9 7 0 1 2 3 4 5 6 7 8 9 8 0 1 2 3 4...
-
yes but normally in nested loop i used: qq 10 0 do Jx . 10 0 do I x . loop cr loop ; that is working well but if i make ww 10 0 do Ix . 10 0 do Ix . loop cr loop ; also it works... then why you need Jx? qq 10 0 do i . 10 0 do i . loop cr loop ; \ tested on my ipad swiftforth \ but also checked in my scamp ok qq 0 0 1 2 3 4 5 6 7 8 9 1 0 1 2 3 4 5 6 7 8 9 2 0 1 2 3 4 5 6 7 8 9 3 0 1 2 3 4 5 6 7 8 9 4 0 1 2 3 4 5 6 7 8 9 5 0 1 2 3 4 5 6 7 8 9 6 0 1 2 3 4 5 6 7 8 9 7 0 1 2 3 4 5 6 7 8 9 8 0 1 2 3 4...
-
yes but normally in nested loop i used: qq 10 0 do Jx . 10 0 do I x . loop cr loop ; that is working well but if i make ww 10 0 do Ix . 10 0 do Ix . loop cr loop ; also it works... then why you need Jx? qq 10 0 do i . 10 0 do i . loop cr loop ; ok qq 0 0 1 2 3 4 5 6 7 8 9 1 0 1 2 3 4 5 6 7 8 9 2 0 1 2 3 4 5 6 7 8 9 3 0 1 2 3 4 5 6 7 8 9 4 0 1 2 3 4 5 6 7 8 9 5 0 1 2 3 4 5 6 7 8 9 6 0 1 2 3 4 5 6 7 8 9 7 0 1 2 3 4 5 6 7 8 9 8 0 1 2 3 4 5 6 7 8 9 9 0 1 2 3 4 5 6 7 8 9 ok
-
curiously if i use only i . the nested loop runs ok........
-
oh oh totally true, i had a wrong idea. really i is inner loop and j is outer loop. thank you again.....
-
hello , i use i and jin the for next loop and ix and jx in the do loop: I checked these words: test1 10 0 do ." i " ix . 10 0 do ."j" jx . loop loop ; and doesnt work but (a) test1 10 0 do ." i" ix . 10 0 do ." j" ix. loop loop ; it works! (b) (a) : i0 j0 j0 j0 j0 j0 j0 j0 j0 j0 j0 i1 j1 j1 j1 j1 j1 j1 j1 j1 j1 j1 i2 j2 j2 j2 j2 j2 j2 j2 j2 j2 j2 i3 j3 j3 j3 j3 j3 j3 j3 j3 j3 j3 i4 j4 j4 j4 j4 j4 j4 j4 j4 j4 j4 i5 j5 j5 j5 j5 j5 j5 j5 j5 j5 j5 i6 j6 j6 j6 j6 j6 j6 j6 j6 j6 j6 i7 j7 j7 j7 j7 j7 j7...
-
hello , i use i and jin the for next loop and ix and jx in the do loop: I checked these words: test1 10 0 do ." i " ix . 10 0 do ."j" jx . loop loop ; and doesnt work but (a) test1 10 0 do ." i" ix . 10 0 do ." j" ix. loop loop ; it works! (b) (a) : i0 j0 j0 j0 j0 j0 j0 j0 j0 j0 j0 i1 j1 j1 j1 j1 j1 j1 j1 j1 j1 j1 i2 j2 j2 j2 j2 j2 j2 j2 j2 j2 j2 i3 j3 j3 j3 j3 j3 j3 j3 j3 j3 j3 i4 j4 j4 j4 j4 j4 j4 j4 j4 j4 j4 i5 j5 j5 j5 j5 j5 j5 j5 j5 j5 j5 i6 j6 j6 j6 j6 j6 j6 j6 j6 j6 j6 i7 j7 j7 j7 j7 j7 j7...
-
in the rest of forths the firts way is the correct, using i and j, not using always i. the question is why when i use i and j, the double loop doesnt work well?
-
really in the loop do loop i use the index Ix and Jx , in this way ther is no interference with the i and j of the for next......
-
I checked these words: test1 10 0 do ." i " i . 10 0 do ."j" j . loop loop ; and doesnt work but test1 10 0 do ." i" i . 10 0 do ." j" i . loop loop ; it works! also test2 10 for ." i" i . 10 for ." j"j . next next ; doesnt works but test2 10 for ." i" i . 10 for ." j" i . next next ; it works that is not standard at all... is it normal?
-
yes, i know. mi idea was flash create buffer 4096 allot ram create array 1024 allot array buffer u cmove \ maybe to much wear? i only use it time by time. i want to use for saving data to external memory system. but maybe is not good idea. what do you think about: buffer r| variable x : test 1 1 + . ; : test2 2 2 * . ; | ; \ r| parse multiline and have my data in text file. \ r| ( text -- addr u ) then i have my data in the flash word buffer. buffer array place \ my data in ram or buffer ext-memory...
-
yes, i know. mi idea was flash create buffer 4096 allot ram create array 1024 allot array buffer u cmove \ maybe to much wear? i only use it time by time. i want to use for saving data to external memory system. but maybe is not good idea. what do you think about: buffer r| variable x : test 1 1 + . ; : test2 2 2 * . ; | ; \ r| parse multiline and have my data in text file. r| ( text -- addr u ) then i have my data in the flash word buffer. buffer array place \ my data in ram or buffer ext-memory...
-
yes, i know. mi idea was flash create buffer 4096 allot ram create array 1024 allot array buffer u cmove \ maybe to much wear? i only use it time by time. i want to use for saving data to external memory system. but maybe is not good idea. what do you think about: buffer r| variable x : test 1 1 + . ; : test2 2 2 * . ; | ; \ r| parse multiline and have my data in text file then i have my data in the flash word buffer. buffer array place \ my data in ram or buffer ext-memory save! \ save! is a user...
-
i want to create an array in flash flash create buffer 1024 allot ram then i want to insert data inside, with cmove, accept etc.. it works well in my code but, after a reset, the data is lost. what is the way to do it and don't lost the data?
-
i have the version 1.7.4 for AT commands. and also the esp-link for the serial bridge and bluetooth managements. i have not tried yet the connections https with this one. now i'm working with a file system manager for scamp3e. if you want to check, the url for esp-link is: https://aceindy.github.io/esp-link/ the link doesn't works on safari browser.
-
i have the version 1.7.4 for AT commands. and also the esp-link for the serial bridge and bluetooth managements. i have not tried yet the connections https with this one. now i'm working with a file system manager for scamp3e. if you want to check, the url for esp-link is: https://aceindy.github.io/esp-link/
-
i tried yesterday but not communication with METAR. NEITHER inmanual mode. i think that firmware 1.7.4 doesnt allow the https protocol.next week i will check if the esp-link firmware allow me the protocol. another solution is to flash a personal software via arduino ide, to setup the wifi and send the data to serial,port. But you need C code. and im not sure is it works.
-
ohh I will try soon. its a kind of forget for testing words....
-
after some investigation it seems that esp01 doesnt support https. you will need a model with at less 1 or 2 MB. maybe you can chaeck with the firmware esp-link.
-
these days im on relax days , south of France, until next wednesday. then i will check your code. regarding esp01 firmware there are differents versions. I use version 1.74, uploaded with esptools , also the esp-link is available and programmable as ap sta or both.
-
these days im on relax days , south of France, until next wednesday. then i will check your code. regarding esp01 firmware there are differents versions. I use version 1.74, uploaded with arduino IDE , also the esp-link is available and programmable as ap sta or both.
-
I have got time to try but, not working. but yor solution 1 day ago with abort is good option for me. i checked and is going quit well, even you can send messages from one to another. thank you a lot for all your help.. the echo in putty terminal is because i forgot remove the echo in setup
-
I have got time to try but, not working. but yor solution 1 day ago with abort is good option for me. i checked and is going quit well, even you can send messages from one to another. thank you a lot for all your help..
-
i tried in a very similar way and also not working. i find a code that if a i write code in term and enter nothing but when i write code in wifi and enter then execute the term and when do enter in term then execute in wifi.......? after that in becomes little crazy. i have some new idea, but i can't try until tomorrow.....maybe not possible....
-
In my projects, I use the ESP01 in two different modes: 1. Transparent mode. Basically, I use the ESP-Link firmware and use the ESP01 without AT commands, as if it were any UART. I explain this in the Udamonic group. 2. AT mode. With AT firmware, as is the case with the ISS. To preprogram it, I use the TERM program (see attached photo). You can find it in Udamonic, in the serial communications section. Once TERM is running, I enter the commands: AT --> OK AT+CIPMODE=1 --> OK AT+CIPMUX=0 --> OK AT+CWJAP="router","pasw"...
-
In my projects, I use the ESP01 in two different modes: 1. Transparent mode. Basically, I use the ESP-Link firmware and use the ESP01 without AT commands, as if it were any UART. I explain this in the Udamonic group. 2. AT mode. With AT firmware, as is the case with the ISS. To preprogram it, I use the TERM program (see attached photo). You can find it in Udamonic, in the serial communications section. Once TERM is running, I enter the commands: AT --> OK AT+CIPMODE=1 --> OK AT+CIPMUX=0 --> OK AT+CWJAP="router","pasw"...
-
I find it hard to understand what you mean by 'control' ? Control of the interpreter in the operator task ? You can do that without any BG tasks. Just use your >terminal and >wifi in the operator task as you have already defined. THANKS FOR THE HELP. YOU ARE RIGTH, but with my words when i do >wifi i can work with a putty terminal in uart1 but... the teratem in serial,port stops. the only way to start it again is do >terminal from uart1, but then putty terminal in uart1 stops. my goal was use both...
-
hello Mikael. after see your links, I have changed my code, as showed in the file attached. it works very well, but with some limitations. I'd like it if you could help me with my initial idea: If I type >wifi from the serial terminal, control of the scamp goes to the wifi terminal, and if I type >terminal from the wifi terminal, control goes to the serial terminal. It works like a charm. So, how could I create a background task that would do this automatically, with two tasks that would pass control...
-
thanks for the information, i will read it. anyway, in this case the interpret command is working in bg, i will check in depth next days. also i will try the correct size of stacks and i will check the correct quantity of pauses and position
-
I've been programming the code in the photo for some time without any success. - Sometimes data was displayed in the PUTY terminal, but I couldn't enter data. I could only input it from the serial terminal, but then I couldn't see what I typed. - Sometimes PUTY would work, but the serial terminal would freeze. Suddenly, it occurred to me that some process was blocking the program and it was stuck in an endless loop. So, I started pressing PAUSE in all the places that seemed critical, and... Eureka,...
-
Hello Jan i have posted my version of the iss code for scamp3e in the udamonic group page. it works very well, you can see the pictures there. the only think to have in mind is that I have the esp01 already preprogrammed to connect to my router and , very important, working at 9600 bauds.
-
thanks for the information.
-
i made: : test 1 1 + . ; $100 transient : test1 ." this is a transient word" ; permanent : test2 ." this is a permanent word" ; Then words----> i saw test1 ,blank blank test2 test3 test1 ---> ok test2 ---> ok test3 ---> ok discard words---> i saw again all words. i ran tes1 --->ok test2---> system crash reset and try again all---> all workig well only the words---> test1, lank blank test3, not contiguos. reset and try again all---> now all seem ok but after run test 3, the system crash again . reset...
-
i made: : test 1 1 + . ; $100 transient : test1 ." this is a transient word" ; permanent : test2 ." this is a permanent word" ; Then words----> i saw test1 , test2 test3 test1 ---> ok test2 ---> ok test3 ---> ok discard words---> i saw again all words. i ran tes1 --->ok test2---> system crash reset and try again all---> all workig well only the words---> test1, test3, not contiguos. reset and try again all---> now all seem ok but after run test 3, the system crash again . reset but system working...
-
i made: : test 1 1 + . ; $100 transient : test1 ." this is a transient word" ; permanent : test2 ." this is a permanent word" ; Then words----> i saw test1 test2 test3 test1 ---> ok test2 ---> ok test3 ---> ok discard words---> i saw again all words. i ran tes1 --->ok test2---> system crash reset and try again all---> all workig well only the words---> test1 test3, not contiguos. reset and try again all---> now all seem ok but after run test 3, the system crash again . reset but system working bad....
-
i made: : test 1 1 + . ; $100 transient : test1 ." this is a transient word" ; permanent : test2 ." this is a permanent word" ; Then words----> i saw test1 test2 test3 test1 ---> ok test2 ---> ok test3 ---> ok discard words---> i saw again all words. i ran tes1 --->ok test2---> system crash reset and try again all---> all workig well only the words---> test1 test3, not contiguos. reset and try again all---> now all seem ok but after run test 3, the system crash again . reset but system working bad....
-
i made: : test 1 1 + . ; $100 transient : test1 ." this is a transient word" ; permanent : test2 ." this is a permanent word" ; Then words----> i saw test1 test2 test3 test1 ---> ok test2 ---> ok test3 ---> ok discard words---> i saw again all words. i ran tes1 --->ok test2---> system crash reset and try again all---> all workig well only the words---> test1 test3, not contiguos. reset and try again all---> now all seem ok but after run test 3, the system crash again . reset but system working bad....
-
i made: test 1 1 + . ; $100 transient test1 ." this is a transient word" ; permanent test2 ." this is a permanent word" ; Then words----> i saw test1 test2 test3 test1 ---> ok test2 ---> ok test3 ---> ok discard words---> i saw again all words. i ran tes1 --->ok test2---> system crash reset and try again all---> all workig well only the words---> test1 test3, not contiguos. reset and try again all---> now all seem ok but after run test 3, the system crash again . reset but system working bad. a lot...
-
i made: test 1 1 + . ; $100 transient test1 ." this is a transient word" ; permanent test2 ." this is a permanent word" ; Then words----> i saw test1 test2 test3 test1 ---> ok test2 ---> ok test3 ---> ok discard words---> i saw again all words. i ran tes1 --->ok test2---> system crash reset and try again all---> all workig well only the words---> test1 test3, not contiguos. reset and try again all---> now all seem ok but after run test 3, the system crash again . reset but system working bad. a lot...
-
i made: test 1 1 + . ; $100 transient test1 ." this is a transient word" ; permanent test2 ." this is a permanent word" ; Then words----> i saw test1 test2 test3 test1 ---> ok test2 ---> ok test3 ---> ok discard words---> i saw again all words. i ran tes1 --->ok test2---> system crash reset and try again all---> all workig well only the words---> test1 test3, not contiguos. reset and try again all---> now all seem ok but after run test 3, the system crash again . reset but system working bad. a lot...
-
i made: test 1 1 + . ; $100 transient test1 ." this is a transient word" ; permanent test2 ." this is a permanent word" ; Then words----> i saw test1 test2 test3 test1 ---> ok test2 ---> ok test3 ---> ok discard words---> i saw again all words. i ran tes1 --->ok test2---> system crash reset and try again all---> all workig well only the words---> test1 test3, not contiguos. reset and try again all---> now all seem ok but after run test 3, the system crash again . reset but system working bad. a lot...
-
I've been testing the transient.fs file you have in your ff code on SourceForge. I've had some problems with it on my SCAMP3E. Creating transient and permanent words, sometimes when I discard the transients, they still appear in the dictionary. Other times, my board has crashed, and once it got completely out of control and I had to use EMPTY to get it working again. Is it possible there's a code error using it in Scamp3, or is there something I should consider before using the code?
-
im interested in use it if we can use the 2MB extra flash memory. in other case my idea is to create a text files save-load tool , to keep the programs saved in this extra memory.
-
fantastic
-
Finally the problem was solved. the bridge program or the task system gave also not reception of all characters. at the end the solution was to put the speed at 9600 bauds! now all is working perfect...
-
i also tested this option with two scamps without problems. or the scamp with the lora module. even two scamps communicte with two esp01 modules with the bridge and with the term. but when i connect with the server from iss, mentioned in the post of mr Jan i can communicate but when the server send the las message of 113 bytes about, always i received only about 1/4 of message and after the 10, 15 characters the message is a garbage.....but this happen only with tje term program. i will check with...
-
i also tested this option with two scamps without problems. or the scamp with the lora module. even two scamps communicte with two esp01 modules with the bridge and with the term. but when i connect with the server from iss, mentioned in the post of mr Jan i can communicate but when the server send the las message of 113 bytes about, always i received only about 1/4 of message and after the 10, 15 characters the message is a garbage.....but this happen only with tje term program. i will check with...
-
the message is about 113 bytes, and i lost almost all.
-
already i removed the echo without results, now i will try with a background task. im working in windows PC. the esp01 speed is 115.200 but wheni use teraterm directly connected to esp01, it woks very well. ( maybe the delay in code of term program is the reason?) first i will check a task to read . send the command and start task. i will see, thanks for your help.....without the term program.
-
already i removed the echo without results, now i will try with a background task. im working in windows PC. but wheni use teraterm directly connected to esp01, it woks very well. ( maybe the delay in code of term program is the reason?) first i will check a task to read . send the command and start task. i will see, thanks for your help.....without the term program.
-
no, i worked with this code : term ( -- , uses UART1 ) cr 2 fg \ green text, optional begin rx1? if \ has something come in? rx1 emit \ then display it locally then key? if \ local user typing key \ get the char dup emit \ echo it locally dup tx1 \ send it dup $d = if \ return key? $a emit \ print a new line as well then $1b = if \ ESC to quit cr plain \ plain text exit then then again ; but also i will try your code tocheck..... thanks why you use u1- ? is possible that if message is longer...
-
no, i worked with this code : term ( -- , uses UART1 ) cr 2 fg \ green text, optional begin rx1? if \ has something come in? rx1 emit \ then display it locally then key? if \ local user typing key \ get the char dup emit \ echo it locally dup tx1 \ send it dup $d = if \ return key? $a emit \ print a new line as well then $1b = if \ ESC to quit cr plain \ plain text exit then then again ; but also i will try your code tocheck..... thanks why you use u1- ?
-
no, i worked with this code : term ( -- , uses UART1 ) cr 2 fg \ green text, optional begin rx1? if \ has something come in? rx1 emit \ then display it locally then key? if \ local user typing key \ get the char dup emit \ echo it locally dup tx1 \ send it dup $d = if \ return key? $a emit \ print a new line as well then $1b = if \ ESC to quit cr plain \ plain text exit then then again ; but also i will try your code tocheck..... thanks
-
is a program to simulate a terminal in scamp3. is written in the interfaces, serial cimmunications option in the udamonic web page. basically is a loop that read the rx1 and emit and read the key and send by tx1. i used to communicate or read data from/to serial devices by hand.
-
Maybe you can help me with another problem I'm having with Flashforth. If I connect the ESP01 board directly to the PC's serial port and connect with TeraTerm, I can send AT commands and connect to an external server, and when it sends information, I read it in the terminal. If I connect the ESP01 to Scamp and run the TERM program, which reads the data from RX1 and sends it to the screen and sends the keyboard data to TX1, I can program the ESP01 and connect to the external server. I send the required...
-
thank you for help. it works.
-
I have problems to run the task: read begin rx1? for rx1 buffer i + c! next again ; as a word it works, but as a task when i run it, the scamp stop and don't says OK. i need to do a reset.
-
usually i do something similar to: create ubuffer 256 allot 0 value index : u-read begin rx1? while ubuffer index + rx1 c ! index 1+ to index repeat 0 to index ; please check the code, im writing on the sofa, watching tv... then you must read the ubuffer and check for the parts you need. for me that way works very well. this works if you know that you have an answer, if you dont know it is better to,use another way, 0 value n : uread begin rx1? if ubuffer index + rx1 c ! index 1+ to index else n...
-
usually i do something similar to: create ubuffer 256 allot 0 value index : u-read rx1? while ubuffer index + rx1 c ! index 1+ to index repeat 0 to index ; please check the code, im writing on the sofa, watching tv... then you must read the ubuffer and check for the parts you need. for me that way works very well. this works if you know that you have an answer, if you dont know it is better to,use another way, 0 value n : uread begin rx1? if ubuffer index + rx1 c ! index 1+ to index else n 1+ to...
-
usually i do something similar to: create ubuffer 256 allot 0 value index u-read rx1? while ubuffer index + rx1 c ! index 1+ to index repeat 0 to index ; please check the code, im writing on the sofa, watching tv... then you must read the ubuffer and check for the parts you need. for me that way works very well. this works if you know that you have an answer, if you dont know it is better to,use another way, 0 value n uread begin rx1? if ubuffer index + rx1 c ! index 1+ to index else n 1+ to n 1000...
-
usually i do something similar to: create ubuffer 256 allot 0 value index u-read rx1? while ubuffer index + rx1 c ! index 1+ to index repeat 0 to index ; please check the code, im writing on the sofa, watching tv... then you must read the ubuffer and check for the parts you need. for me that way works very well. this works if you know that you have an answer, if you dont know it is better to,use another way, 0 value n uread begin rx1? if ubuffer index + rx1 c ! index 1+ to index else n 1+ to n 1000...
-
hello Jan, I found the problem. 1- after the cipstart command you must wait at least 5000 ms 2- the length for cipsend must be 76. i checked and worked every time i did it. see attached picture and video
-
look at the attached picture. manually the connection works but only once every 10 trials... maybe we need to check another way. i tried differents ways, but the only one is working time by time is when i send tour code with the correct characters in cipsend
-
after connect my scamp3 to esp-01, i tried your code by hand. it really connect with the api of notify.org. after first line i have a connect OK. and after the rest of lines i have a send OK, but any answer. I think is necessary another request o add new code to have an answer from the api server. testing the connection with python it runs ok, but with a library.
-
maybe you need the rx1> before close the connection......
-
in teraterm, is useful to avoid problems with garbage characters to put a delay of 2 ms for haracter and 10 or 100 ms(try) for line. i think in the terminal or port option.
-
hi Mikel, you are rigth! my code is working only if you use it immediately after the definition , ( as i usually do). but if you use it in several definitions, then only the last string is printed or sent, or we have en error message. thank you for your information. i will change it in my tools marker. i didn't think that the s" strings are only temporal.
-
I only adjust in the terminal option, the receiving characters as auto and the semding as cr+ lf. i choose the option serial, and the port comX where the scamp is at 115200 bauds. the rest dont touch. please use better the code from Mikael, it works very well. my code has a bug. see below explanation.
-
yes of course. you can use freely the code i explain, change it and do anything you need to improve it. also you can use it to use the putty as a terminal. it is faster than the other serial terminals i have.
-
yes of course. you can use freely the code i explain, change it and do anything you need to improve it.
-
Jan if you are trying to use the esp-01 with the scamp to send and receive data, you can check the 3 posts i wrote in the udamonic webpage. i connected the scamp to pc and also one scamp to another scamp using the esp01 as wifi module as plug and play modules using the transparent mode ( serial bridge). in this way you dont need to send AT commands fromscamp, you only send data to uart 1. make a sight.
-
Mikael i will try your code, seems good to use in both modes . but to use in compile mode, i'm using my code time ago without any problem. i have used a lot to write LORA modules with AT commands. see the picture in the comment above. regarding Jan problem i think is a serial terminal problem o a text editor problem. Ihad similar problems in windows and scamp using the words key, accept and key? or with strange characters in screen. I changed the serial monitor to teraterm an the text editor to notepad...
-
Mikael i will try your code, seems good to use in both modes . but to use in compile mode, i'm using my code time ago without any problem. i have used a lot to write LORA modules with AT commands. regarding Jan problem i think is a serial terminal problem o a text editor problem. Ihad similar problems in windows and scamp using the words key, accept and key? or with strange characters in screen. I changed the serial monitor to teraterm an the text editor to notepad and all the problems were solv...
-
the word only works in compile mode......
-
i tested again and it runs on my scamp3. i don't understand what happen. see picfure attached.
-
you cam read with rx1. 0 value index begin index 255 < while rx1? if rx1 textbuffer index + c ! index 1 + to index then repeat it's not tested, but you can test and improve and it will work. you can think other similar alternatives.
-
to solve this i created the word S': : S' [CHAR] ' \ ( -- char ) obtiene el separador " PARSE \ ( char -- c-addr u ) parsea hasta la siguiente comilla >R \ ( c-addr u -- c-addr ) guarda u en return-stack POSTPONE LITERAL \ compila LITERAL que insertará c-addr R> \ recupera u POSTPONE LITERAL \ compila LITERAL que insertará u ; IMMEDIATE then you can use: : test S' AT + CWJAP="SSID","pasword" ';
-
to solve this i created the word S': : S' [CHAR] ' \ ( -- char ) obtiene el separador " PARSE \ ( char -- c-addr u ) parsea hasta la siguiente comilla R \ ( c-addr u -- c-addr ) guarda u en return-stack POSTPONE LITERAL \ compila LITERAL que insertará c-addr R> \ recupera u POSTPONE LITERAL \ compila LITERAL que insertará u ; IMMEDIATE then you can use: : test S' AT + CWJAP="SSID","pasword" ';
-
to solve this i created the word S': S' [CHAR] ' \ ( -- char ) obtiene el separador " PARSE \ ( char -- c-addr u ) parsea hasta la siguiente comilla R \ ( c-addr u -- c-addr ) guarda u en return-stack POSTPONE LITERAL \ compila LITERAL que insertará c-addr R> \ recupera u POSTPONE LITERAL \ compila LITERAL que insertará u ; IMMEDIATE then you can use: : test S' AT + CWJAP="SSID","pasword" ';
-
to solve this i created the word S' S' [CHAR] ' \ ( -- char ) obtiene el separador " PARSE \ ( char -- c-addr u ) parsea hasta la siguiente comilla R \ ( c-addr u -- c-addr ) guarda u en return-stack POSTPONE LITERAL \ compila LITERAL que insertará c-addr R> \ recupera u POSTPONE LITERAL \ compila LITERAL que insertará u ; IMMEDIATE then you can use: : test S' AT + CWJAP="SSID","pasword" ';
-
to solve this i created the word S' S' [CHAR] ' \ ( -- char ) obtiene el separador " PARSE \ ( char -- c-addr u ) parsea hasta la siguiente comilla R \ ( c-addr u -- c-addr ) guarda u en return-stack POSTPONE LITERAL \ compila LITERAL que insertará c-addr R> \ recupera u POSTPONE LITERAL \ compila LITERAL que insertará u ; IMMEDIATE then you can use: : test S' AT + CWJAP="SSID","pasword" ';
-
to solve this i created the word S' S' [CHAR] ' \ ( -- char ) obtiene el separador " PARSE \ ( char -- c-addr u ) parsea hasta la siguiente comilla R \ ( c-addr u -- c-addr ) guarda u en return-stack POSTPONE LITERAL \ compila LITERAL que insertará c-addr R> \ recupera u POSTPONE LITERAL \ compila LITERAL que insertará u ; IMMEDIATE then you can use: : test S' AT + CWJAP="SSID","pasword" ';
-
to solve this i created the word S' S' [CHAR] ' \ ( -- char ) obtiene el separador " PARSE \ ( char -- c-addr u ) parsea hasta la siguiente comilla >R \ ( c-addr u -- c-addr ) guarda u en return-stack POSTPONE LITERAL \ compila LITERAL que insertará c-addr R> \ recupera u POSTPONE LITERAL \ compila LITERAL que insertará u ; IMMEDIATE then you can use test S' AT + CWJAP="SSID","pasword" ';
-
to solve this i created the word S' S' [CHAR] ' \ ( -- char ) obtiene el separador " PARSE \ ( char -- c-addr u ) parsea hasta la siguiente comilla >R \ ( c-addr u -- c-addr ) guarda u en return-stack POSTPONE LITERAL \ compila LITERAL que insertará c-addr R> \ recupera u POSTPONE LITERAL \ compila LITERAL que insertará u ; IMMEDIATE then you can use test S' AT + CWJAP="SSID","pasword" ';
1 >
