From: beihl@.removethis.tiger.net Subject: Newton Credit Card Format Verification Formulas and standalone Newton calculator. Verifies a credit card number's FORMAT is correct. Requires NOS 2.x http://www.geocities.com/SiliconValley/Haven/1490/ Allan Beihl beihl@tiger.net (This file must be converted with BinHex 4.0) :$NjPGh4$FQ9NDA3ZFfPd!&0*9%46593K!*!%&6)!!!&'&`"6593K!!)!!"8bFNa KG3+b!*!$&Z'f$3d+3h*PC'Pd,R"VCdJ#UD#m!$9[LJ#3!i!!N!3#XUdJ0J-!N"3 5l!#3"2q3"("VCb"`DfGB!3#a!JcEX3)-i`!!!4i!!#hX!*!$J3!!%HAMi$P-!*! 'a!S4!!LbdALq@F,S)feR#9#ijq3mV3804k3[1M"9eUjAZhkp"V9UeqeAQl!XNZl ,M%J21%lC`I8I0$(IlhMbh6qcN!!2r-#"335N`lF$KS$$1U!rC),(qBb3!$@(R(C ilcG2QhKhlXmDiHX9Y,qrID!VJ[`qpFJFhp"ASG&C6qj2SE45&Jh!kk$1cXZ6R5L 3!+h-0KXif24D+,q&4IR&STfAA&[BT9`[@rLAl0B-6pr0eRbf$ZVcGY+fAPkhF"G qG$%l,Z%,Ak6mB[XmEq%$klb&l*0XBr,B[PJ,baeh)GYEMZFYV+-QT`[PpLk%lV0 Mql4b"DSqJ2ABHDAPNGf%h%+@JH3@AFKJ1E)F'5hN+&R`!6a3jRHVeqlBB1p3+MI M-j2i$$LEmFXN+R[lF@2b+bT-3+Xd2,l51rPXprLk02"fqLV0&LrlUC+Z`QmK@@N *+H5N6R+*0arCmHSQ2jAMh8U,J@1N$kJ19!N!bDm+lJVZhELeS4C4V8#eS8k!UP' h%@cSHQ96`11f0RXmVJh1J,@br-VbUYB&MJ9A@ldZHi"lBfehZK5V9QG"HB@eqiV ,4DPk9HXR&8I!IlfR6QN0GP6AqT3fCk$F[k@VTQ*c"Ei&9499N8K%khFTN9#-USF TC$Viq*HP9++ICE&@`iMV4T5YeE4d(b"Ia2N-cRH*C[`'89S'm(Y`rJMDZj'SJQ[ V(pIr$Xi36Y3c6XFj$bGU'"@F1iR5Dd5PK$@V8jjjEkrGkm9M4K6c9efl6J58c3% kG1J38AB8er1j2c[UG(MFM6l2fAUrrI&I[CpaBr@F2Hkb3+G5VdTrCK6Ap,Vc+fe +Gi2E(l#lA%d1Rp1VF5f)eR!FqU2RI%UATeZ*i`ZMq1fppMZGS`5)mU,iUF[[f+h UXRTaia+5YFNB)JGq,F)hR041@dM8cSV@cVDmXmiIm$RG(9`hAG1KD4T1D#h*MKk 2kXd%2c-"Na[P-1RYGDH$lNkRbaP3fJ3rUBZ'[Dq9k%MJG(l3[1Plm!VFcG"erKK (k0d%(c!p(Hr9)jX@IDA9%h5hqEPA8T1&UcjYDh8'J',ZXLmrbk[XGAKF(PqG2@! AIFRAqB0cp1Y86k[HJd5e"fEiMVN-*h"QD%(b2ITF5CT,DGGd+[fPr+%llJeif&m bSjM-)`qNq*`GRDTQC5pIZ6pbUY86#(LkZ*Fl0,ebcr&TSB0bmIZ2chDGN@ae1kQ i2S(QhTT+FfqI3TEEB)RrqZND6%$""(KSiUH)TUk%"q#8rA`LNRGNXFpRhb,kUIY &`XG`hSi(Dm`[0"dPV-%*8j3FER[KTMd16E"%19(FMA0DR`#X6[%'1S@fM$r8G-% FZ%ArSiZ*(Vi65%IR[a-#UUHQdBpK*`jFqP!jFKQ,`[q)C641FBeSTILG160Vm4# p#T!!MY9`T%Hp'&D(kQ"Zm"K@8Y,UYVIMd#r4TdLlL[hJqbIXL8[)GPEEhfRY(c3 k!F-App6%AMaBb2$eFcjSQ9$""eq,kZ&[q6Ne"Kh"qA,-BKl"qjRBqf2MlfF1R(R X`'2X2@IiI@5%4P,"DS458jREL(K0"6Ap(398fiM)Ga6"bHqR2HhYTpXp10SpR04 2ai3rr[iAX@G1kQ2p(1[h4!0kRSSmcERSlA0kjU6d[hT1&Dh#9%5mpY1E3QN(cpr rjY'R$Keip#!G5kkSk2q9#MT@8A%0mEfr2j8LiRkB$PI3Akjjm90VehVTa6AmMGk "dhRU[2qcrjch1GhU16`*'62T54@Ap1G%dc%6L1C`rNCR!8QB$mNFlM6Z1pCPpfp 3FrMICrYiYNdk4C5#'TC[Jbr1H(q5H5CPR5JNGdiXmF@cT3b3!1pMBlP6ailRcYM $qG`jLMfE1f2%YB+a"NcmmX9p-(8+(LCkb*d6$haUcQ5GLjLR[B[FUEl,h+Qqbp` ThpAF+GljKHYaf3N`p'a"VTTS)(IqiNY1VVL@NX8GZ40hN6Ya&lP6h*%lNGUSraU 6DH+#rZZj8jqcFSj8%IrGIhA1ZJYceXRr0@I9Cq!cJQTIH!iq!h1Hmc0`cVc)[Yb VL3,Q`rrhe@Pp5q0C11E$h+0Ll&l-qe2FRGM2@+UelVXUYT4R(EMV*qpe,00lR+e LdZl(L9f20-cDdV#rNBkCHhSP6XbFdm%TI6Y1p$mG0G*4)afj231l#A*hiR[AGKE i!iUh&NX'E6j&fmZ3!$X!(hYMeHGU2E`mi6irEjlrdrY[DE'lR'hfJ+,@PGJRY`h 0VI1d+$jR1iqkcf,22$dTJQ80AlG6fD4Lj5l'c8mPY$"Z5A42)6q+rDhbV""MP`I p!DB9h`GSYpAHZmlVm`3mjfS1(&PDf9eVpl9G(qaU9A`!&8HaMpaiafRZr@+Abq0 !$p&RXFS5lrr'fp)I%2@EYhLjbI(GM-D@UPAGUi)"Ej!!DdUFqadX'9hRXVXG@+' *FGPpEr"Dl-mdEHPUpEJ%&he@`cV1D!!(H%$Kid4&Ad1I#SLU0-r)`*`R%hV1K!G N3XX%6SE2iJdcRq`%SYe`01129Ed[(28)pS--c)KiaiGp)31HNh%5YH%$QI!KpSP -m*El"AGHpiRe,RZVS[C)pZqCKaF9#9`pK#+`8NYIfadqaGTX8J*",fraD*XfF5e qq3pZr6%,V,E6lZi3qbb5@qh06CeF[pjPle"p4R)V14"ma1Y6G*Qf5ChU-k[-R4K G)'iDAi,()f@E&[lc2SV'RAGmVUFJG9'Vf2)4h&-N9Y@Tc[2lZ#b!lm"6Xk!TiFh X+D2C)`YFXm!e#hV,JVkbX%FPp68lkB9kKm[Z9rXX[IM@,e9rKrH8I%&(`!R2(I2 0`mpNVHG0)*rGG4kE0Pac`ZlVU2ICZc3[PRjdmc9ArmJGl&VXJl+LmcrdajXcar$ CHh)EM@SpVBHLCr#),(J%qi68U'2ai#F9Gm#hCBA6VAUKj"pqm%ZY3VqU09c36$E fRV+[N!#DX86lB-TH#)cBDG2iFjDCUpA2aTJj'aN["jS5(qS@`ZG-(e9c6HN&[f- rcGkVqPdf[&6h1+Qe0d2I'RDi%#38(b*-800-845rV1HHKc@mEPHa'@Qf2L0p#*4 IarRXqh2A-Er4qm5pbF&E(QB)HFKqqFMAqI$m!ZLM!$dVK#rVfXRK$-Khe'6Icm% -ee35maZYjcQmTiHqXmHcCVRIdRFIr10Y0l3'X5[P9PYpSBp-Ser9eTKZFj!!'h2 i6G2YM+KZXcGqmi!2jR(11h)aqq*qF#rdR[2F1"IDcf8m-RXZqTN,I"lQaAR)1AP A4If42EH&'UJ*qjM#Bf`5Ya+ERRlXDV*2eq,0Kpe08D0FePJ-*eHhp4bSi-BdHLP Y*Uqfr`N$j(SeXPkGf"hPLV`P@S[0d5#5`%FeIXb9GdaGJSX$Xh#@6h`rN!$Vqi( dL,e5,6pSfQ1mJVUVJ3i+,M,c-(Bj@#kKZGKX43k,CDdiGS'12HX*b(YjQ(q`*q4 KpX'HF&l6i#)dhI1"T[2J1EUQ,q[h,'INU$c1MH#FMmajN61i#XiiacRRmbl[,cP MmT@2(9E"'B(r)QG`CFjLp@#F-cce3ml)MrR)eB)cGKh'160A`IQ5AaE!`crNR)k DR-("Z3$[&cPVHMCFdR-"-Y'(R*%G#T!!M36R&bpae[4XZ+6R!Ulc5mlB"#P%*Q, 1KCKhA15XkCPTMA-Z4,Ej"HGipLa%jSKQcdYCXa!jX`Kq@m5V66aM@BFhl'@D0UM cXl'X+@BUfVb0mh)4I&(2QR*q-D2RkZHMXj%kMeYI8bCD)[eq+A+#QQbXb"UF414 Z1VqUDFIkrUaL6$qQC[!jKMZbkEJ1L[ErA!F,YAT&U*F)ll9UQV%LGr,GKMSfAP0 E4M3,HK1k!1pV4R8KjNTD(V9#leCSRE9KK3H`9U`mPp4d)ZF,[Di[l12"MYb2P6- 6qbe([ZTdYbQEe5`8a6fh19,2fUTe14dESVU51IlAAMfmL2%0EDlSG[L&$)&qQZ$ "G""H%-ZXeL(XSXr%LIl04'kG#Cqd`IaYb,,98VYaVGBMkrQJ8,[3E3989ijE*@l mh`AS2rI[)l,f'LKk0G4rRFLmcAMKelVcG5lrji'SdbEVE"+rF[ccJB*11%42R#, lPSZ8fS9Xk`I#*4+b"abk`BAr-8("G[XdS$[acPR@MEG+UN,Ia0*DUH6)lU2fSND `Bkiqm1-FcI+MURJHrjGrBf!YbTTHB1cSMXM,BajQJcIEBPNR,6U2Q&-qB-UqbJJ pa(h0KR`X2HEhARY3p@%fK)Zc24YQAcEiPZ#(R#hR(CK6N8h-1mlb3efj8pH3!*p aG*Qc6CXRMA'E"9qFaGP#kjhZrbUhMERc[ZfKDGEprL-diq'0J518l+&mkhj6JAr M0`Y,)1[*1Eh&rIY04C5iN!$3EG%,rImFZ"Hc-*GNVjf&f56llLcN@2EJ@6`6JYF 9`i0PVaahpEhEe1R4C["5)jmq@[pbJlm"3pB16-`C+fY1VLlFk9kKl`R)q9r6%jm )39Ha@CVdlUH2,bpYFrS#UUIVqa[&m&$HHbM'(-,dql(p$5e$&0qJC5[1#9%ZGhe ap`m#cS#QhIS22$LHPmljFB[`1LH3!2c1b,-C5TmMmkc$F&c0"6Uf'"UDM6R9E-c b'-qZ1$CMjVR[E13LR[I14Qk3!,SCEVVV9SG(p`@jYe#eGqhc@-(e+b+Ab2RNcqi jmi-P6RGYIG!YKX'LVVP4krHmr@qL380&)fC$6pDb8&rrY*0P,hN(9a`dKrSD$D' q'Q1SMa,H)RTck22VYiA4+81I*F(34j15L,i2V"RB)3eReR"[$Djm"E9&hEm1pDf RF"rKE+5K-R)0lU&%i)jc65c0*+(1Y,FLN9Fe,Lm-lV'i`J19aR#IeB$hC`8HGqj 6*,,N,I"JEPcVZf%SIcV`H84("rFFGiAk,01!R33Xecjm-ZmKVpV6edE8RYB3ph9 `jI&pk-11SFm2r2SEhl#N[0'(m`papPK5J#X'VLlFejriaMF)@%SCr(Lr)6F5H3m F'9YkFT%Pj@3CcX*'h"Y6`Xf8H!#FF5IFcH%"#!D'M`bi'HFpd&QqTSH$3Jm$U)9 rUd(r%iEZXe$S5M*Nh'Fa6kqN591"3@h6`*lTjU&HLcQNBZKNhQ-MiEiH98[Jq6, U3#XlKRZRdm$fRX6"(KKd)jQILN6HjGi1hpeV4Tq6`hepU1QP-0`'0G0B6p$@e(# IKG#2h31l+"%m+SClCd)E0'h`VU*Ni(CS@Z+Hl3a98!*k-(P`PpF3@NY6`2&8Z&V dciKH'Y'[bYP`9r58kj5"Gpe3%Iedk'l@I3f&@f!5f+!#rm6K&mNmK'5NkESGh-h $f`hQ`4deKP!c63+hdi-YC&a10%PJdGp3Rh@l@QFQ$6D5mDC)j#HUTeJ%0r"+'Ya M03rrcNa$H$90I@"*aC3(m2lJCbS01QlJ-d5$fbf'd!f#ic[J[M6-%ri"-Z9!@p! f0%m'eTNfQ12Y,Mjj"e2lMjcSRA(BRN1U*H*GK#YafR$1BS2(LIQ)!Ir"Bd"f-Z! IJJcB-6#`5i+aMUH2`,ma#jMm+Q6"#49EGiP0H1F-`(-rh[,NNrFD8f*[qTe8hkB DpCkl3[2a(HTphZqUpbQGf[[AYIZckMhEUVfrT0j,jQVhCSfA4EX(e,ZK@,Z[eql EY$[qDdRQMD2[A6(NYJHFhFT+6eY3a+X,qA8H-Y"mGIiQGKpr8qi#l0ZBfq[2lc8 99(pKDr'h2*4HZ'rVR-K2m@)YSXRmpK1mP5+kmYX2mED`L+E`f`MHkSTSkMj4Gmd F`le&P$52eP'l+)T)h$l(2#``QbLjL+CY+k+8%T&ppAdicVlcN50j(d6XI@!q-"q c@pk,+m&q33PQb#9`XK,J5j!!JdYj2J@XRSeMXjbPb)3qN3bYq%mS+qBcEYU!d`2 b[%h!+61!'C`2VqTrZ'Jp+)((m0i-Fj+jZ2bQBmPHHk"ck@B[4fR8@a6IFp$6k18 *hlRm+[K@b2S0dHR0')GQc(*iLR*Z&[2cHL[%[+F$((RMrppU0JSYY!1(Y26[0Fp f-cjcZ'9YlH4'Phe,%qrpM@CbA,$2aDF*HG`mppaH#@ZGGqH%pM&2C&hc$Kh21hL 2EXc$5M'r,%8Y23p-Pak@Nc[rr9dShVX8rk'&fE$FUGRer+P9Uj81hR3,BTAV`Tb U$$A,p(d(m*6l6YNjmi$4I82R@)ECJ[c2UU8fGqiDGjcKZ"qAB5HLM(Ga0BlkVNa @fGDYk1(@l*cj(TUq06Yh2Qh0Xqd9RUR2@34[[*9")f@B%r&rIFQGXAIp6ckkc1j [FRPBU()rmrEArq6ZeHTrE6(dd2m$!*!$$3d+8Q9KC'eP,R4iG#jcDA3ZD(&i!*! 0b8F*KJ#3#S!!N!3@!*!)rj!%9%9B9(4dH(3"!,%Pqmka*I[4!!!"R!#3!m!!!!% j!*!$R4QB!bS!N!DEE"%!#"bma#')5XBZVq9i`A[#&@FI0rf&f+cERMk`ZqqkdrE HpBldfdlG)rpaeHl0dj@5F!Eeb5(5PlEP%&pm*0VI*dPkHXfZ0)-2STlR3dNp3p+ aXcE*0c56rmiQEpf8VC!!3`(f12bD#blHiB%M(ZbdjmJcbfhcaU#NBF92fV[cN!$ -8iqqZrKHehIFrCA6AVNkl`#ik+54Eekcja%2cpKJiX0T[6CkirUHRMFQhj6cqMT [Kbr1Fp'K99ikG2mhGYULh#[G0ZpeATYEUche3[KQh[HUCY2D6Ybfjp-9cXYSXIF 0TqjmarEER*Hkd@@0clLqhB5MVTT4V(&,28-Rj$"cC)!h4i,$2E-Rkmhf1'Ck)XS K`arQh2PKcLFrb,%ZM@pdmS(*VcJ+KGS!QA*SZU1*--UNJq-qEJ%!!&%QL,+iS$X -h#%[#'2bCJ9Kb!GX[LL')H"a"cdNRN#8,1cS3ri-[iqJ`)0mAMmQkGJ,3Pa@ZJr 9#`16h@R9ZB!r$$`3)Cm(*`ZG[VkF(a(NX6d0+*2l#B8-aUa@SBK'SmQC2ZMaBb+ NHf#@)XdIp(YJU+-l'24P+pUi)lk3!#+eJ5C&)46UJN&h#,6bqCQJ-*erq`VfCrT 3FXL(KIX"b2X!!!%!N!-"&!#3!a3!N!-b!*!3#Qi!N!F'!!j4k`!!$NjPGh4$FQ9 NDA3ZFfPdD3)!N!06594%8dP8)3%!rrm!!&0*9%46593K!3$rN!3!N"+a*YYS!!! 9-J!!!8B!N#%3!!$Y#!!&!%N!B`"[!'i!$3!#!!)!N!EY$V"GfML`AGSi!*!FD@0 [ENe"3e0!!,(JXH!!N"83!#X!"3%B!IB!N!B$!*!$!3#3!`%8!*!$&!#3!c)#U8) )3%3!N!-F!$)!!&0PG'F!N!-+!!$rr`#3"!+TS'J"a!: