TIP: Click on subject to list as thread! ANSI
echo: power_bas
to: SIGURD RIJSDIJK
from: SANDER SMEENK
date: 1995-08-30 11:45:00
subject: Question

Hallo Sigurd,
Op 30 Augustus 1995, om 19:08, schreef Sigurd Rijsdijk aan All:
 SR>     Name: ...................
Try this:
DO
    A$ = INPUT$(1)                      '1 char. input from user
    IF A$ = CHR$(8) THEN                'Check for backspace CHR$(8)
        B$ = LEFT$(B$, LEN(B$)-1)       'Go back 1 char, when backspace 
pressed
    ELSE
        B$ = B$ + A$                    'When no backspace, add A$ to B$
        IF LEN(B$) = 20 THEN            'Check lengt of B$
            BEEP                        'To long, beep& message
            LOCATE 20,1:PRINT "You are over the limit! Max. 20 chars!"
        END IF
    END IF
LOOP
I did not test this, I just typed it from my brainz, so don't expect to much 
from it =)
p.s: waarom schrijf ik dit niet via netmail in het nederlands???
      Grtnx, Sander               * Internet: sander@taf.idn.nl
... Even Mason and Dixon had to draw the line somewhere.
--- FMail 1.02+ / GoldEd-
 # Origin: Co-Sysop - The Animal Farm BBS - 079-512523 (88:950/6.10)
 # Origin: BasicNet MailGate to -> United Bbs Systems  (119:119/88.0)
---------------
* Origin: United Bbs Systems Europe MailGate to -> Fido USA (2:283/529.0)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.