2 cents..by Lisztfr (no login)If someone can tell better ? Please look at Buffer (TXT1$). The only way i have to go to Start0 label i want to, is to wait for the SUB has returned from where it was called, line 3. In QB 4.5 i don't know an other way ! But after RETURNed, i check the flag (line 4, 5) and then from this place i can GOTO the label... IF PRINTX > linelength% THEN GOSUB LineCut Buffer (TXT1$) IF flags% = 1 THEN GOTO Start0 'new start after search routin IF flagtf% = 1 THEN GOTO Start0 GOTO PRINTALL ELSE Buffer (linebuf$) IF flags% = 1 THEN GOTO Start0 'same IF flagtf% = 1 THEN GOTO Start0 END IF |
| Response Title | Author and Date |
| even better dont use GOTO | Unseen Machine on Sep 23 |
| Sure | Lisztfr on Sep 24 |
| Nested loops are necessary, | Solitaire on Sep 26 |
| * Another thing to avoid...being French! Nasty people! :-P | on Sep 26 |