Troubles with the MDX Tool Bar

What is wrong in this script??? I want to create a simple Tool Bar (users.ico is one symbol):



alias views return views.mdx
alias bars return bars.mdx
alias mdxdll return mdx.dll
alias mdx { tokenize 32 $dll($mdxdll,$1,$2-) | if ($isid) { return $1- } | elseif ($1 != ok) { echo -s $1- } }

alias testdlg {
dialog $iif($dialog(chanlog),-v,-md testdlg) testdlg
}


dialog testdlg {
title "testdlg"
size -2 -3 1020 670

list 199, 450 30 100 100, size
button OK, 99, 930 670 60 30, ok
}


on *:dialog:testdlg:init:0: {
mdx SetMircVersion $version
mdx MarkDialog testdlg $dialog(testdlg).hwnd

mdx SetControlMDX 199 flat > $bars

did -i testdlg 199 1 bmpsize 16 16
did -i testdlg 199 1 setimage +n 0 icon small 0,users.ico
did -i testdlg 199 1 setbkg none
did -i testdlg 199 1 setscheme default default
did -i testdlg 199 1 bwidth 30 40
did -i testdlg 199 1 pad 5 10
}