Kaj de Vos Posted November 15, 2021 Author Share Posted November 15, 2021 not-count: 10 repeat 10 [write/line not-count: 10 - not-count] This is an 8-bit loop. Quote Link to comment Share on other sites More sharing options...
zbyti Posted November 15, 2021 Share Posted November 15, 2021 I understand, but this behavior is inconsistent for me. For this I need to remember the type/value I put in for repeat to know how this gonna be behave. Quote Link to comment Share on other sites More sharing options...
Kaj de Vos Posted November 15, 2021 Author Share Posted November 15, 2021 No, it just counts the number of times you tell it. It's exactly the same as in Logo, which was carefully designed sixty years ago to teach kids programming. You think it should be more complicated because you are used to that. Quote Link to comment Share on other sites More sharing options...
zbyti Posted November 15, 2021 Share Posted November 15, 2021 What tempted me to call it counter - now we can't get along Quote Link to comment Share on other sites More sharing options...
zbyti Posted November 15, 2021 Share Posted November 15, 2021 dupa: 10 repeat 10 [write/line dupa: 10 - dupa] write/line "dupa end" Quote Link to comment Share on other sites More sharing options...
Kaj de Vos Posted November 15, 2021 Author Share Posted November 15, 2021 Use for counter 10 [] instead. Quote Link to comment Share on other sites More sharing options...
zbyti Posted November 15, 2021 Share Posted November 15, 2021 (edited) ok... I made a fool of myself, correcting the code accidentally deleted the variable and I did not notice it - hence further unnecessary discussion. 1000 - var behave exactly the same as 10 - var. apologize. Edited November 15, 2021 by zbyti Quote Link to comment Share on other sites More sharing options...
zbyti Posted November 15, 2021 Share Posted November 15, 2021 (edited) To clarify, I was sure the code looks like this: count: 1000 repeat count [write/line count: 1000 - count] write/line "dupa end" but it looked like this: count: 1000 repeat count [write/line 1000 - count] write/line "dupa end" the first produces 0 and 1000 alternately (which I don't understand), and the second of course 0. lack of readability from my side Edited November 15, 2021 by zbyti Quote Link to comment Share on other sites More sharing options...
Kaj de Vos Posted November 15, 2021 Author Share Posted November 15, 2021 Ah. ? No problem. 1 Quote Link to comment Share on other sites More sharing options...
zbyti Posted November 15, 2021 Share Posted November 15, 2021 ping atari8.metaproject.frl ping: atari8.metaproject.frl: Temporary failure in name resolution this makes it difficult to play with. I wanted to write something more in Meta. Quote Link to comment Share on other sites More sharing options...
zbyti Posted November 15, 2021 Share Posted November 15, 2021 unsafe!!! constant reference volatile byte! [ RND= ~D20A ] forever [ either RND < ~80 [write "/"] [write "\\"] ] write "workaround" program.xex without last line I have an error: out.c:26: Error: Expression expected out.c:26: Error: Illegal function call out.c:31: Error: Incomplete type 'void' out.c:31: Error: Incomplete type 'void' out.c:32: Warning: Parameter 'arguments' is never used 4 errors and 1 warnings generated. 1 Quote Link to comment Share on other sites More sharing options...
zbyti Posted November 15, 2021 Share Posted November 15, 2021 (edited) switch, and, or, xor - not implemented yet? and again: ./compile test.meta Compiling file test.meta % Total % Received % Xferd Average Speed Time Time Time Current Dload Upload Total Spent Left Speed 0 0 0 0 0 0 0 0 --:--:-- --:--:-- --:--:-- 0curl: (6) Could not resolve host: atari8.metaproject.frl Result is in file program.xex it's not fun... Edited November 15, 2021 by zbyti Quote Link to comment Share on other sites More sharing options...
Kaj de Vos Posted November 15, 2021 Author Share Posted November 15, 2021 XOR is X-OR, no SWITCH yet Quote Link to comment Share on other sites More sharing options...
Kaj de Vos Posted November 15, 2021 Author Share Posted November 15, 2021 Looks like you need a better DNS provider. Try 1.1.1.1 or Google. Quote Link to comment Share on other sites More sharing options...
zbyti Posted November 15, 2021 Share Posted November 15, 2021 4 minutes ago, Kaj de Vos said: Looks like you need a better DNS provider. Try 1.1.1.1 or Google. I don't think so. I used 8.8.8.8 and 1.1.1.1. @Kaj de Vos I'll back to testing Meta if you clearly let us know what part of REBOL is implemented. For now I used http://rigaux.org/language-study/syntax-across-languages-per-language/Rebol.html It's time consuming - guessing whats works what not. Online compiler spoil fun too. Quote Link to comment Share on other sites More sharing options...
Kaj de Vos Posted November 15, 2021 Author Share Posted November 15, 2021 I have a solution in the works for conversion from REBOL. You definitely have unreliable DNS. It's not my server doing that. Quote Link to comment Share on other sites More sharing options...
zbyti Posted November 15, 2021 Share Posted November 15, 2021 unsafe!!! constant reference volatile byte! [ RTCLOK3= ~14 STICK0= ~278 ] forever [ tmp: RTCLOK3 + 4 while tmp > RTCLOK3 [] if STICK0 = 14 [write/line "UP"] if STICK0 = 13 [write/line "DOWN"] if STICK0 = 7 [write/line "RIGHT"] if STICK0 = 11 [write/line "LEFT"] ] write "workaround" program.xex without not implemented switch + workaround 1 Quote Link to comment Share on other sites More sharing options...
Kaj de Vos Posted November 15, 2021 Author Share Posted November 15, 2021 Nested EITHER is better. Quote Link to comment Share on other sites More sharing options...
zbyti Posted November 15, 2021 Share Posted November 15, 2021 7 minutes ago, Kaj de Vos said: Nested EITHER is better. simply I just deleted "switch" and added "if" to the rest - even indentations remained 1 Quote Link to comment Share on other sites More sharing options...
zbyti Posted November 15, 2021 Share Posted November 15, 2021 foo: byte![1 2 3] write "..." ./compile test.meta Compiling file test.meta % Total % Received % Xferd Average Speed Time Time Time Current Dload Upload Total Spent Left Speed 100 54 100 24 100 30 62 77 --:--:-- --:--:-- --:--:-- 139 word: 1 word: 2 word: 3 ? Quote Link to comment Share on other sites More sharing options...
Kaj de Vos Posted November 15, 2021 Author Share Posted November 15, 2021 This is unimplemented behaviour. The syntax for literal arrays is different. I'll look it up tomorrow. I'm on my phone now. Quote Link to comment Share on other sites More sharing options...
zbyti Posted November 15, 2021 Share Posted November 15, 2021 Sure. Take your time and make proper documentation, implement missing things and improve parser. In current state I can't image who else wants to take a ride withe Meta I'm quit now too. Quote Link to comment Share on other sites More sharing options...
Kaj de Vos Posted November 15, 2021 Author Share Posted November 15, 2021 I have someone else using it right now. Quote Link to comment Share on other sites More sharing options...
ilmenit Posted November 16, 2021 Share Posted November 16, 2021 d:\Projekty\Meta>dir /b compile.ape curl.exe libcurl.dll test.meta d:\Projekty\Meta>compile.ape test.meta Compiling file test.meta % Total % Received % Xferd Average Speed Time Time Time Current Dload Upload Total Spent Left Speed 0 0 0 0 0 0 0 0 --:--:-- --:--:-- --:--:-- 0 curl: (60) SSL certificate problem: unable to get local issuer certificate More details here: https://curl.se/docs/sslcerts.html curl failed to verify the legitimacy of the server and therefore could not establish a secure connection to it. To learn more about this situation and how to fix it, please visit the web page mentioned above. Result is in file program.xex d:\Projekty\Meta>dir /b program.xex File Not Found I tried to use the compile.ape with curl.exe to compile a sample program, however with "Result is in file program.xex" there is no program.xex in the current directory. Any hints? Quote Link to comment Share on other sites More sharing options...
ilmenit Posted November 16, 2021 Share Posted November 16, 2021 (edited) 16 hours ago, Kaj de Vos said: Again, there isn't one yet. It takes a lot of time to write documentation. It's great if you want to try Meta already, but then you have to make do with the few examples I have published so far and the REBOL documentation I have selected. It's really useful to work through that to learn the basics. I agree that writing documentation is time consuming, but documentation for a new language is a must have. Maybe less time consuming would be pointing the differences from REBOL? Now for the ones that try to use the language it is a guessing game. Here is the best REBOL guide that I found so far: https://www.cis.upenn.edu/~matuszek/Concise Guides/Concise Rebol.html Edited November 16, 2021 by ilmenit 1 Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.