DEV=imq0
MAX=7500kbit
...

CLASS="tc class add dev $DEV parent 1:1 classid "
$CLASS $VoIP            htb rate 200kbit ceil 200kbit   prio 1
#$CLASS $SKYPE          htb rate 200kbit ceil 200kbit   prio 2
$CLASS $RADIO           htb rate 300kbit ceil 300kbit   prio 3
$CLASS $INTERAKTIV      htb rate  50kbit ceil 200kbit   prio 4 quantum 6000
$CLASS $HTTP            htb rate 150kbit ceil $MAX      prio 5
$CLASS $DEFAULT         htb rate 150kbit ceil $MAX      prio 5
$CLASS $FTP             htb rate  50kbit ceil $MAX      prio 5 quantum 6000
$CLASS $MAIL            htb rate  20kbit ceil $MAX      prio 5 quantum 1500

....

# TOS Minimum Delay:
filter u32 match ip tos 0x10 0xff flowid $INTERAKTIV

# ICMP:
filter u32 match ip protocol 1 0xff flowid $INTERAKTIV

# ACK:
filter u32                                      \
        match ip protocol 6 0xff                \
        match u8 0x05 0x0f at 0                 \
        match u16 0x0000 0xffc0 at 2            \
        match u8 0x10 0xff at 33                \
        flowid $INTERAKTIV
...
for f in 20 21
do
        filter u32 match ip sport $f 0xffff flowid $FTP
done

for f in 110 995 25 465 
do
        filter u32 match ip sport $f 0xffff flowid $MAIL
done