I used to type an equivalent of this into C64s in stores. I even had a few of these printed out. It does tend to have a lot of short loops but sometimes you get an amazingly complex path for such a simple method.