Admin: Created page with "= Action = Read data from a magnetic card. = ..."

2013-02-11T22:10:54Z

Created page with "= Action = Read data from a magnetic card. = ..."

New page

= Action =

Read data from a magnetic card.

 

 

= Syntax =

READMAGCARD var , count , coding

 

 

= Remarks =
<div style="padding: 0px; margin: 0px 0px 0px 4px;">
{| width="597" cellspacing="0" cellpadding="1" border="1" style="border: 2px solid rgb(0, 0, 0); border-spacing: 0px; border-collapse: collapse;"
|- style="vertical-align: top;"
| valign="top" width="13%" style="width: 74px; border: 1px solid rgb(0, 0, 0);" |
Var

| valign="top" width="100%" style="width: 514px; border: 1px solid rgb(0, 0, 0);" |
A byte array the receives the data.

|- style="vertical-align: top;"
| valign="top" width="13%" style="width: 74px; border: 1px solid rgb(0, 0, 0);" |
Count

| valign="top" width="100%" style="width: 514px; border: 1px solid rgb(0, 0, 0);" |
A byte variable that returns the number of bytes read.

|- style="vertical-align: top;"
| valign="top" width="13%" style="width: 74px; border: 1px solid rgb(0, 0, 0);" |
coding

| valign="top" width="100%" style="width: 514px; border: 1px solid rgb(0, 0, 0);" |
A numeric constant that specifies if 5 or 7 bit coding is used. Valid values are 5 and 7.

|}
</div>
 

There can be 3 tracks on a magnetic card.

Track 1 stores the data in 7 bit including the parity bit. This is handy to store alpha numeric data.

On track 2 and 3 the data is stored with 5 bit coding.

 

The ReadMagCard routine works with ISO7811-2 5 and 7 bit decoding.

 

The returned numbers for 5 bit coding are:
<div style="padding: 0px; margin: 0px 0px 0px 4px;">
{| width="368" cellspacing="0" cellpadding="1" border="1" style="border: 2px solid rgb(0, 0, 0); border-spacing: 0px; border-collapse: collapse;"
|- style="vertical-align: top;"
| valign="top" width="55%" bgcolor="#ffffb2" style="width: 198px; background-color: rgb(255, 255, 178); border: 1px solid rgb(0, 0, 0);" |
Returned number

| valign="top" width="100%" bgcolor="#ffffb2" style="width: 161px; background-color: rgb(255, 255, 178); border: 1px solid rgb(0, 0, 0);" |
ISO characterT

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
0

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
0

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
1

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
1

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
2

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
2

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
3

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
3

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
4

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
4

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
5

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
5

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
6

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
6

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
7

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
7

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
8

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
8

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
9

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
9

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
10

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
hardware control

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
11

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
start byte

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
12

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
hardware control

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
13

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
separator

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
14

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
hardware control

|- style="vertical-align: top;"
| valign="top" width="55%" style="width: 198px; border: 1px solid rgb(0, 0, 0);" |
15

| valign="top" width="100%" style="width: 161px; border: 1px solid rgb(0, 0, 0);" |
stop byte

|}
</div>
 

 

 

= Example =

 <source lang="bascomavr">
'-----------------------------------------------------------------------------------------
'name : magcard.bas
'copyright : (c) 1995-2005, MCS Electronics
'purpose : show you how to read data from a magnetic card
'micro : Mega48
'suited for demo : yes
'commercial addon needed : no
'-----------------------------------------------------------------------------------------

$regfile = "m48def.dat" ' specify the used micro
$crystal = 4000000 ' used crystal frequency
$baud = 19200 ' use baud rate
$hwstack = 32 ' default use 32 for the hardware stack
$swstack = 10 ' default use 10 for the SW stack
$framesize = 40 ' default use 40 for the frame space

'[reserve some space]
Dim Ar(100) As Byte , B As Byte , A As Byte

'the magnetic card reader has 5 wires
'red - connect to +5V
'black - connect to GND
'yellow - Card inserted signal CS
'green - clock
'blue - data

'You can find out for your reader which wires you have to use by connecting +5V
'And moving the card through the reader. CS gets low, the clock gives a clock pulse of equal pulses
'and the data varies
'I have little knowledge about these cards and please dont contact me about magnectic readers
'It is important however that you pull the card from the right direction as I was doing it wrong for
'some time :-)
'On the DT006 remove all the jumpers that are connected to the LEDs

'[We use ALIAS to specify the pins and PIN register]
_mport Alias Pinb 'all pins are connected to PINB
_mdata Alias 0 'data line (blue) PORTB.0
_mcs Alias 1 'CS line (yellow) PORTB.1
_mclock Alias 2 'clock line (green) PORTB.2

Config Portb = Input 'we only need bit 0,1 and 2 for input
Portb = 255 'make them high

Do
Print "Insert magnetic card" 'print a message
Readmagcard Ar(1) , B , 5 'read the data
Print B ; " bytes received"
For A = 1 To B
Print Ar(a); 'print the bytes
Next
Print
Loop

'By specifying 7 instead of 5 you can read 7 bit data
</source> {{Languages}}

[[Category:BASCOM Language Reference]]

READMAGCARD - Revision history

Admin: Created page with "= Action = Read data from a magnetic card. = ..."