mirror of
https://github.com/irmen/prog8.git
synced 2024-07-05 06:29:02 +00:00
47 lines
1.3 KiB
Lua
47 lines
1.3 KiB
Lua
%import textio
|
|
%import string
|
|
%zeropage basicsafe
|
|
|
|
main {
|
|
sub start() {
|
|
str s1 = "irmen@razorvine.net"
|
|
|
|
ubyte qq = '@'
|
|
|
|
if qq in s1
|
|
txt.print("good1\n")
|
|
else
|
|
txt.print("error1\n")
|
|
|
|
if 'r' in s1
|
|
txt.print("good2\n")
|
|
else
|
|
txt.print("error2\n")
|
|
|
|
if qq in "irmen22@razorvine.netirmen22@razorvine.netirmen22@razorvine.netirmen22@razorvine.net"
|
|
txt.print("good3\n")
|
|
else
|
|
txt.print("error3\n")
|
|
|
|
qq = 2
|
|
if qq in [1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2]
|
|
txt.print("good4\n")
|
|
else
|
|
txt.print("error4\n")
|
|
|
|
qq='z'
|
|
if qq in "irm@razo"
|
|
txt.print("good5\n")
|
|
else
|
|
txt.print("error5\n")
|
|
|
|
uword zz = 2222
|
|
if zz in [1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2222,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2]
|
|
txt.print("good6\n")
|
|
else
|
|
txt.print("error6\n")
|
|
|
|
; str s1, ubyte ff, txt.print_uwhex(s1+ff, true) ; TODO fix compiler crash on s1+ff. why no crash when using 1-argument functioncall?
|
|
}
|
|
}
|