Kent,
ignore the following line if you alreay manage to correct the script.

should'nt it be :
Const RIGHT_READ = &80000000
Const RIGHT_EXECUTE = &20000000
Const RIGHT_WRITE = &40000000
Const RIGHT_DELETE = &10000
Const RIGHT_FULL = &10000000
Const RIGHT_CHANGE_PERMS = &40000
Const RIGHT_TAKE_OWNERSHIP = &80000

in your addace function ?

also, if this call is working ?
addace $dacl, $namevar, $rightvar, ADS_ACETYPE_ACCESS_ALLOWED, ADS_ACEFLAG_SUB_NEW

It always seems to me that any calls in kixtart should be done in this way :
addace ($dacl, $namevar, $rightvar, ADS_ACETYPE_ACCESS_ALLOWED, ADS_ACEFLAG_SUB_NEW )
whatever the function return a value or not