I'm no genious or anything, but I think that this is an improvement...

Code:

For $ = 0 To 13
 ($ - 13) * -($ > 6) - $ * -($ < 7) " "
Next


Thats 38