Gut dass mir auch jetzt erst durch himitsus Beitrag auffiel, dass dann sogar "wert shr 4" völlig ausreicht. Das dürfte die schnellste und logisch am besten nachvollziehbare Übersetzung sein.
@QBasic: Der Integer-OP in QB ist "\". Den kannte der Originalautor wohl nicht. Was QB hingegen noch nicht kannte war Bitshifting.
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)