CLEO Help Insert problem

[veikelele]

Sup, i have 1 problem and idk how to fix this.

$CLEO .cs}
0000:
while not samp.Available()
    wait 100
end
alloc 2@ 32
format 2@ "Ar žmogus" //dialog title to detect
 
while true  
wait 0
IF
0B4C: samp is_dialog_active -1
then
    alloc 3@ 256                          
    0BD8: samp get_dialog_caption 3@
    if 0C14: strcmp string1 2@ string2 3@ //comparing
    then
        free 3@
        wait 200
        alloc 5@ 512 //alloc
        0BD7: 5@ //get text
        0ad4: 7@ = scan 5@ "%s tikrina ar jūs žmogus%c Įrodyk, kad esi žmogus, įvesk %d" $nu $nu2 6@
        0B4B: samp set_current_dialog_editbox_text 6@
        0B47: samp close_current_dialog_with_button 1
        end
    end    
END

i want insert in dialog box $d.

When i try text did not inserting..

Help?