set position = args[0]
set $cockroach_symb = <font color=' + $args[2] + ' size=20>' + $args[1] + '</font>'
set $cockroach_way =   '<font color=' + $args[2] + ' size=20>[</font>'
set i = 0
:LOOP
    IF position = i OR (i = 50 AND position > 50):
        $cockroach_way = $cockroach_way + $cockroach_symb
    ELSE
        $cockroach_way = $cockroach_way + '<font color=' + $args[2] + ' size=20>.</font>'
    END
    set i = i + 1
IF i < 51: jump 'loop'

$cockroach_way = $cockroach_way + '<font color=' + $args[2] + ' size=20>]</font>'
*pl "<center><<$cockroach_way>></center>"