1381
<<
Message Index
>>
1383
Number: 1382
From: "negusm" <negusm@y...>
Date: Fri Sep 27, 2002 12:54 am
Subject: [ASC McLaren ] Re: CarFax
Body:
Well, I wrote the program which kind of prodded through the
Vins...it never found anything but 5L cars...I think car fax will
accept any correct vin, provided the "check" digit in the vin is
correct (digit 9).
For giggles sake, I toyed with it until I figured out the algo for
the "check" digit. It is simply a BASE 11 number with X
being "10"...0,1,2,3,4,5,6,7,8,9,X...and it is calculated off from
the last 6 digits of the VIN. Lets say your Vin ends in:
607867
You would take the first number "6" and multiply it by 7 subtract
one and divide by 11 and take the remainder. This is Value 1.
You then take "0" multiply it by 6, add to Value 1, divide the
result by 11 and take the remainder. This is Value 2.
You then take "7" multiply it by 5, add to Value 2, divide the
result by 11 and take the remainder. This is Value 3.
You then take "8" multiply it by 4, add to Value 3, divide the
result by 11 and take the remainder. This is Value 4.
You then take "6" multiply it by 3, add to Value 4, divide the
result by 11 and take the remainder. This is Value 5.
You then take "7" multiply it by 2, add to Value 5, divide the
result by 11 and take the remainder. This is Value 6.
Value 6 is your check digit, unless it is 10 then it is "X"
Here is some quick VB code that figures it out:
Dim digit As String
Dim num As String
num = Right(sText, 6)
digit = (Mid(num, 1, 1) * 7 - 1) Mod 11
digit = (digit + Mid(num, 2, 1) * 6) Mod 11
digit = (digit + Mid(num, 3, 1) * 5) Mod 11
digit = (digit + Mid(num, 4, 1) * 4) Mod 11
digit = (digit + Mid(num, 5, 1) * 3) Mod 11
digit = (digit + Mid(num, 6, 1) * 2) Mod 11
If digit = 10 Then
digit = "X"
End If
Yeah, I was bored...
Carfax barfs on everything except the correct check digit.
-Mike
--- In ascmclaren@y..., "Brent Abrams" <babrams@l...> wrote:
> Mike,
>
> Just an FWI on getting a reports from CarFax on Capri's.
> I know of several people that have run '85 Capri RS's and '86
Capri 5.0L
> cars through CarFax and it reports that they are GS trim cars.
> If you were able to write a program to search their site looking
for just
> the V8 equipped cars and catalog the vin's in a spreadsheet, I
believe that
> you might be the only one to do so.
>
> Brent
>
> ----- Original Message -----
> From: "negusm" <negusm@y...>
> To: <ascmclaren@y...>
> Sent: Thursday, September 26, 2002 10:49 AM
> Subject: [ASC McLaren ] Re: CarFax
>
>
> > Which list? The list of 1985 vins of ASCs, or the list of 1985
vins
> > of Mercury Capris?
> >
> > Carfax obviously has the master list (or a damn near complete
one) of
> > VINs of the 1985 Mercury Capris. Putting in VINs that are
slightly
> > incorrect as far as engine code, prompts you that it is a close
match
> > to another code which is correct. Now this will not tell you
whether
> > your car was an ASC but it will give you an idea as to what ford
made.
> >
> > -Mike
> >
> >
--- In ascmclaren@y..., "Sandy Block" <cigarsandy@c...> wrote:
> > > I have the list you speak of, but only for 1986. The 1985
listing
> > > was shredded, and no longer exists.
> > >
> > >
> > >
> > >
--- In ascmclaren@y..., "negusm" <negusm@y...> wrote:
> > > > So I ordered a history report from car fax. It didn't really
> > tell
> > > me
> > > > much I didn't know, except the police report where the car
was
> > hit
> > > in
> > > > Florida. I wonder if you can get an old Police report from
the
> > > > report number....
> > > >
> > > > So I started messing around on the site and putting in
various
> > made-
> > > > up VINS...one off from my own and it looks like all the cars
were
> > > the
> > > > same build type, 5L standard, etc....
> > > >
> > > > I then wondered if I should write a program to check all the
VINS
> > > > against carfax and get a complete list of all the VINs for
1985
> > > > coupes that had that engine/tranny/body combination.
> > > >
> > > > Would that list be at all helpful? I'm not sure that it
would.
> > I
> > > > bet there would be thousands of VINS...
> > > >
> > > > what would be interesting is to see where these cars fell in
the
> > > > production run...whether they were grouped or randomly spread
> > out...
> > > >
> > > > or maybe there is an easier way to get the list...I know
carfax
> > > > obviously has it.
> > > >
> > > > -Mike
> >
> >
> >
> > To unsubscribe from this group, send an email to:
> > ascmclaren-unsubscribe@y...
> >
> >
> >
> >
> >
> >
> >