clear
;R}hGCAXalias̃eXg
echo $_FILE

list ;-d
;alias abc?
;#exit

unalias 	-all;
alias

alias 0
alias 9
alias A
alias Z
alias a
alias z
alias _
alias _0
					;
alias oCg		12				;oCgl
list -d
alias 		{12}				;OK
alias 		{12}				;OK łɑ݂
alias 		{12}	abc			;OK łɑ݂
list 
alias 123		{12}				;NG
alias _123		{12}				;OK
alias _123\		{12}				;OK

alias a12345678901234			;OK 15
alias _12345678901234			;OK
alias a1234567890123456789012345678901234567890		;GCAXV{
alias 123456789@123456789				;sȕASp󔒂܂
alias 123456789,					;sȕ
alias 123456789(					;sȕ
alias $123456789					;sȕ
alias @123456789					;sȕ
alias \123456789					;sȕ
alias 123456789\					;sȕ
alias 123456789						;OK
alias _123456789					;OK
alias __123456789~					;NG
alias a1	{"12345" 'abcdsf'}		;
alias a2	{"12345 \"ABC\" ; \n" 'abcdsf \'123\' ; \n'};
alias a3	{"12345" 'abcdsf';}		;
alias a4	{"12345 \"ABC\" ; \n" 'abcdsf \'123\' ; \n';  };
alias a5	{	"12345" 'abcdsf'	}		;
alias a6	{	"12345 \"ABC\" ; \n" 'abcdsf \'123\' ; \n'	};
alias ab+cd
alias -123

alias a1
alias a2	
alias a1; OK
alias a2;OK
alias a1	; OK
alias a2	;OK

alias

alias b1	1234 567;
alias b1	{1234 567;
alias b1	{ 1234 567;
alias b1	{{1234 567;
alias b1	{{1234 567;abc}
alias b1	1234 567;}
alias b1	1234 567;}}
alias b1	{1234 567;}}

alias c1	{cd ; echo $abc @func(1, 3 ,) ; }
alias c2	{cd ; echo $abc @func(1, 3 ,) ; }1234
alias c3	{cd ; echo $abc @func(1, 3 ,) ; }  1234
alias c4	{cd ; echo $abc @func(1, 3 ,) ; };1234
alias c5	{cd ; echo $abc @func(1, 3 ,) ; }	;1234

list ;-d
c1 -w

define abc 1234
define wide -w
alias z1	{cd ; echo $abc @inc(1, 3 ,) ; }
z1 -w
alias z2 	{z1 $wide}
z2 -b 11 22 33

alias z3	{cd ; echo $abc @inc(1, 3 ,) ; z4;}
z3


#break
alias z4	{z2; z4}	;zĂяo
z4
z3


alias GCAX	{cd ; echo $abc @inc(1, 3 ,) ; }
GCAX

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 #* end > out}
define wide 	-w -n
z5 -b 11 22 33 "xyz" $wide $abc @byte ( 1234 ) (1*2 + 3*$abc)
z5
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))


alias z7	{print 12345; printt error; print 67890;}	;R}h}NŃG[
z7	;R}h}NŃG[

#exit

alias

list -d

unalias
unalias	c1
alias
unalias	c1 c2 c3 ;
alias d1 {dir -d}
alias

unalias -all
alias

;#exit

alias _FILE
alias _FILE;

		alias abc
		alias abc
		alias abc?
		alias abc"
		alias abc'd
		aliase cdf


#exit

 alias bb 	@byte($oCg)
 alias ww	@word($[h) 	
 alias dd	@dword($_u[h)

 alias b1 	@byte($b1)
 alias ww	@word($[h) 	
 alias dd	@dword($_u[h)

echo $NONE
echo $NONE	;
echo $oCg
echo $oCg	;oCgl
echo $abcdef	;`
echo $a@bc	;sȕ

echo $b1	;zQ



alias z	$oCg $[h $z	"abcd"	;
echo $z

alias dup1	$oCg $[h $dup $oCg

alias dup	$dup1	;zQ(WJɌoj

;cout s1

echo $dup1			;zQ
echo $oCg $dup1		;zQ

undef dup
alias dup	$dup
echo $dup			;zQ

undef dup
undef dup1
alias dup	$oCg $[h $dup $oCg	;zQ(WJɌoj
alias dup1	$oCg $[h $dup $_u[h
echo $dup1		;zQ

alias dup2	$dup1
echo $dup2		;zQ

alias dup10	$dup10
alias dup11	$dup10
alias dup12	$dup11
alias dup13	$dup12
echo $oCg $dup13




echo A= $oCg , 	B= $oCg , 	C= $oCg
echo A= ($oCg-1) , 	B= ($oCg + 	$oCg)

echo A= $oCg , B= $oCg, C=$oCg*2	;OK@$<id>̑Oɋ󔒂͂ȂĂ悢

echo $abc $abc
echo $[h @byte($[h) @byte($[h) @byte(@word($[h))

echo @byte($[h, $[h)
echo @byte( 10 ,20, 30 )

echo $str1 $str2
echo $str1$str2; comment
echo $str1+$str2
echo &$$str1


echo $abc
echo $abc?
echo $abc"
echo $abc'd



alias

