( Generate a pulse train on pb0 ) : pulse pb0 hi! pb0 lo! seq ; : train pulse repeat ; : faster-train pulse factor-port-setup repeat seq ; faster-train reset