QBASIC common algorithm assembly