I will, but i just revamed my program as well

by Sai (no login)

 

Here it is:

*Note I know I still havent identified the month:



LS

PRINT "Sai"
PRINT
INPUT "Type your drivers liscense number"; N$


LET First$ = LEFT$(N$, 1)
LET First$ = UCASE$(First$) + "."

LET D$ = "-"
LET l = 0

FOR x = 1 TO 2
DO
l = l + 1
LOOP UNTIL D$ = MID$(N$, l, LEN(D$))
NEXT x

' IF M = 1 THEN
LET M = December
'ELSEIF M = 2 THEN
LET M = January
'ELSEIF M = 3 THEN
LET M = Febuary
'ELSEIF M = 4 THEN
LET M = March
'ELSEIF M = 5 THEN
LET M = April
'ELSEIF M = 6 THEN
LET M = May
'ELSEIF M = 7 THEN
LET M = June
'ELSEIF M = 8 THEN
LET M = July
'ELSEIF M = 9 THEN
LET M = August
'ELSEIF M = 10 THEN
LET M = September
'ELSEIF M = 11 THEN
LET M = October
'ELSEIF M = 12 THEN
LET M = November


PRINT "The persons last name starts with "; LN$; " the year they were born was 19"; Y1$; Y2$; " The month and day was";


lol-one more thing to ask, can i get code to find the digit before the second dash now since I dont have the D2-1 thing anymore, how can I find that?

Posted on Dec 8, 2008, 5:52 PM

Respond to this message   

Goto Forum Home

Response TitleAuthor and Date
* If the plate string length never changes, find that Y position too. on Dec 8
* It should be "licence" or "license"Spelling Police on Dec 8
 YaySai on Dec 9
  * I'd love to see it if you'd like to post it here.Pete on Dec 9
   * Me too Mr. "U12-08-2008-India". I bet UR12..........:-P on Dec 9
    Here, butSai on Dec 9
     Sure use a string array if you can. on Dec 9
      thanksSai on Dec 9
       One more observation! on Dec 9
     Great job! Here it is a bit more optimized. Also, LET can be completely removed... on Dec 9

 Copyright © 1999-2014 Network54. All rights reserved.   Terms of Use   Privacy Statement