alias class {
; $1 = property, $?2 = param
goto $prop
:loaded | {
return $class_loaded($2). [ $+ [ $1 ] ]
}
:stored | {
return $class_stored($2). [ $+ [ $1 ] ]
}
}
alias -l class_loaded {
goto $prop
:at | {
; $1 = index
return $objdll(class_at,$1)
}
:num | {
; !$1-
return $objdll(class_num)
}
}
alias -l class_stored {
goto $prop
:at | {
; $1 = index
return $noext($nopath($findfile(system\classes\,*.ini,$1,0)))
}
:num | {
; !$1-
return $findfile(system\classes\,*.ini,0,0)
}
}