clear
;R}hGCAXalias̃eXg4
echo $_FILE

unalias -all

alias z4	{print print = #1    #2 #3}
z4 "abc
z4 $ abc;
z4 $a123;
z4 $123 ;
;#exit
z4 @
z4 @byte(1234)
z4 @ byte(1234)
z4 @byte (1234)
z4 @byte( 1234)
z4 @byte ( 1234 )

z4 @12byte(1234)
z4 @12byte( 1234 )
z4 @12byte ( 1234 )
z4 @12byte ( 1234 
z4 @12byte ( 1234 (
z4 ( 123  )
z4 ( 123  (1*2 + 3*$abc) )

z4 -b 11 22 33 $a123 @byte(1234)
z4 -b 11 22 33 $a123 "ABC"
z4 "ABC" -b11 22 
z4 $a123 -b11 22 

z4 123 456 -b 11 22 33 
z4 -Da="1234 56\n"  -$abc 456 "xyz"
z4 -Da="1234 56\n"  -$abc 456 -b

;#exit
alias z5	{print print = test #0     #1 #2 #3 #4 #5 #6 #7 #8 #9 #10 #11 #12 #13 #14end > out}
alias z6	{print print = test #0     #* end > out}
define wide 	-w -n
z5 -b 11 22 33 "xyz" $wide $abc @byte ( 1234 ) (1*2 + 3*$abc)
z5 -b 11 22 @byte( 1234 ) $abc -w (1*2 + 3*$abc) $a123

alias p1	{print #1= #1;\
		print #2= #2;\
		print #3= #3;\
		print #4= #4;	\
		print #5= #5;}

#define s1	111 222

p1 123 4546 "abc" 'dfg'
p1 123 4546"abc" 'dfg'
p1 123 4546 $123 @Byte( 1234 )
p1 123 4546 @Byte(1234) $123 
p1 123  -b 11 22 33 "abc" $123 $456
p1 123  -b 11 22 33  $123 $456
p1 123  -b 11 22 33  @Byte( 1234 ) @Byte( 7890 )
p1 $123 @Byte( 1234 )
p1 123 Byte(1234)

;-------------------------
define pp	{print #1= #1;\
		print #2= #2;\
		print #3= #3;\
		print #4= #4;	\
		print #5= #5;}

alias pp1	$pp
pp1 123 4546 "abc" 'dfg'



#exit

z6 -b 11 22 33 "xyz" $wide $abc @byte(1234) (1*2+3*$abc)
z6 -b 11 22 33 "xyz" $wide    $-abc    @1byte(1234)    (1*2+3*$abc))

list -d
z5 123 456 $123 $987 987 "abcd"
z5 123 456 $123 @987 ( " abcd" )
z5 123 456 -b $123 $987 987 @987 ( " abcd" ) "abcd"
z5 123 456 -b $123 $987 "" 987 @987 ( " abcd" ) "abcd"
z5 123 456 -b $123 $987 -a 987 @987 ( " abcd" ) "abcd"
z5 123 456 -Dss=" abcd" 567

