`QDDOOCJ
`
`
`BiQ‘EFZ
`
`(37233-512
` LEMA'Sm
`MKS?)
`LZMAfim
`EflCéEr‘x
`LZHDX: Em
`ianCIfl-n
`
` {:55 MPG?
`413045553
`
`
`
`93313.2(;
`Changes Gap) l
`
`
`
`C\!Fe:efif_t 56:50?» LPG
`
`{Theme Seyfian 2,296
`
`fierencxe Serfion BVPS
`Meme Section 4.35313
`{Harte Seditm 5.3156
`[zaphlbas
`
`9a aphlbas
`
`
`2?? 572
`
`
`52 ’
`1
`32 336.
`
`
`
`2411-61-11 12:34?
`311431-12 12
`
`11
`12 USE
`
`33m ,
`11 15:54
`Z‘EISZVQSVIEI 97:2?
`
`
`
`
`
`
`
`
`Escort Ex. 2091, pg. 1
`
`
`
`
`
`
`
`
`
`
`
`
`Changes Graph2 to Graph3 No Comments.JPG
`
`
`
`
`
`
`
`
`
`
`
`
`
`
`Escort Ex. 2091, pg. 2
`
`
`
`
`_—_
`
`Document: C:\H\Escort\Fleming\Prog\graph2.has
`? a D“ «‘1 f
`
`
`r?
`I<|<|>|>||
`A
`CPEH "CIJM1:1921313,n,8,1,RB1CCCC,IJin,RS,DpC,cdfl,dSfl" Fllll Ilfllllllll IIS 111
`CPEH "CIJM1:192flfl,n,8,1,RB1flCflfl,bin,RS,opfl,cdfl,dsfl" Fllll
`IIIIIIJCII IIS 111
`
`CUT CHZFB, CHB
`IF dc TIIEH CPEH "RDadData txt" Fllll
`IIPPEIIJ IIS 1111
`
`
`
`IF dc TIIEH CPEII "RoadData txt" Fllll
`IIPPEIIJ IIS 1111
`IF LOCI-(2) TIIEH
`Ell) IF
`fl = nsouwurSu, 312))
`Llllll'
`'EPEN "Ua'at.t.¥t" F31? Jflfl’flf £3 #4!
`
`J
`
`
`'1'; 136(2) me»!
`= gstgimwflr, #2))
`
`
`'EPEI'V "Ua’at.t.¥t" F319 Jfl'fi’flf A?! #4!
`
`Ring tell if eeletkee’ Sign.
`
`
`
`
`III)
`Hill)
`SELECT CIISE INKEVS
`SELECT CIISE INKEV$
`CIISE CllllSmHD):
`CIISE CIIIISwHD): PIIIHT " Program Execution Ended": CLIISE : Ell)
`CIISE "1": STllI'
`CIISE " "
`CIISE " "
`IF locked = 1] ml) fictiueTimer TIIEH
`IF locked = 1] ml) fictiueTimer TIIEH
`Fidx = Fidx + 1:
`IF Fidx ) 25 TIIEH Fidx = fl
`Fidx = Fidx + 1:
`IF Fidx ) 25 TIIEH Fidx = fl
`ZLock(Fidx, 1) = zlat: ZLock(Fidx, 2) = zlong: LSET 1at$ = II1S$(zlat): LSET 1|
`ZLock(Fidx, 1) = zlat: ZLock(Fidx, 2) = zlong: LSET 1at$ = II1S$(zlat): LSET
`LPeakflFidx) = peak1: LPeak2(Fidx) = Peak2: LSET peak1$ = IIIISUJeaM): LSET Pl
`LPeakflFidx) = peak1: LPeak2(Fidx) = Peak2: LSET peak1$ = HI$(peak1): LSET
`TdatES(Fidx) = DIITES: TTi-aS(Fidx) = TIIIES:
`IISET d3 = TdateS(Fidx):
`IISET ts =
`Tdate$(Fidx) = DIITES: TTiIE$(Fidx) = TIIIES:
`IISET d3 = TdatES(Fidx):
`PIIT 113, Fidx:
`locked = 1
`PIIT 113, Fidx:
`locked = 1
`Ell) IF
`Ell) IF
`CIISE "u"
`CIISE "u"
`IF locked TIIEH ZLock(Pindex, 1) = 5
`IF locked TIIEH ZLock(Pindex, 1) = 5
`Ell) SELECT
`Ell) SELECT
`CllSllB record
`CllSllB record
`IF Flaga ml) 15 TIIEH fictiueTimer = 1|
`IF Flaga ml) 15 TIIEH fictiueTimer = 1|
`IF fictiueTimer THEN
`IF fictiueTimer TIIEH
`IF fictiueTimer = 1| ml) locked =
`IF nctiueTimer = 1: ml) locked = o TIIEII_ Ring 5-211 1'F waletkee’ 5.
`fictiueTimer = fictiueTimer — 1
`v
`fictiueTimer = fictiueTimer — 1
`Ll
`3—!
`
`'
`
`Read a retard Frem interface and extrett tee seFtMre uersz'en A?
`
`Read a retere’ Frem interface and extrett tee seFtwre uersz'ee A?
`
`CLS
`grec:
`
`I
`
`I
`
`I
`
`PIIIHT 111, "H";
`
`'
`
`skewed
`
`HIILE LllC(2) ) 128
`LIIIE III’IIT 112, U$
`
`CLS
`grec:
`
`IF INSTII(U$, "$CPC-") TIIEII
`zlat = Fnz(fi): zlong = —Fnz(E2): SrS = US
`locked = l]
`Fllll
`I = 1 TI] Fidx
`za = ZLockU, 1) — zlat: 23 = ZLockU, 2) — zlong: 2dist = Sllll(za * za + 23 {-
`IF zdist ( .25 TIIEII locked = 1: Pindex = I
`[EXT I
`Ell) IF
`IF INSTII(U$, "$CPUTC") TIIEII
`
`I = INSTII(U$, "11"): telocity = Fnzz(I + 2)
`
`I'IIIIIT " Program Execution Ended": CLIISE : Ell)
`
`PIIIHT 111, "H";
`
`'
`
`skewed
`
`HIILE LllC(2) ) 128
`llll Ellllllll CBTII errorhandler2
`LIIIE III’IIT 112, Us
`fermieete tfle errer seppert
`llll Ellllllll CllTll
`fl '
`IF IllSTIl(U$, "$CPCE") TIIEII
`zlat = Fnz(m): zlong = —Fnz(E]2): SrS = US
`locked = l]
`Fllll
`I = 1 TI] Fidx
`za = ZLockU, 1) — zlat: 23 = ZLockU, 2) — zlong: zdist = Sllll(za * za + 23
`IF 2dist ( .25 TIIEII locked = 1: Pindex = I
`[EXT I
`Ell) IF
`IF IllSTIl(U$, "$CPUTC") TIIEH I = IllSTIl(U$, "11"): ZUelocity = Fnzz(I + 2)
`
`C TIIEH SIJUND 8131],
`
`'
`
`Escort Ex. 2091, pg. 3
`
`
`
`
`
`
`
`
`
`
`
`
`Changes Graph2 to Graph3.JPG
`
`
`
`
`
`
`
`
`
`
`
`
`
`
`Escort Ex. 2091, pg. 4
`
`
`
`IF dc TNEN IIPEN RoadData.txt" FIIR IIPPEIIJ IIS fill
`
`IF Loc(2) TIIEN
`[I = nscuquSH, 3m)
`
`”WE” 1F
`'JPEI'V "Ua’at. Err" F31? Jflfflflf ES #4!
`flead a recame Eryn interface and extract the svfIwere uersiafl #
`
`'
`
`PRINT 111, "R";
`
`'
`
`IILS
`grec:
`
`HIILE Lllfl(2) ) 128
`LITE III’IIT 112, U$
`
`5;"ng
`
`IF INSTR(U$, "$GPG-") TNEN
`zlat = Fn2(EJ)= zlong = -Fn2(E2)= Sr$ = us
`locked = a
`Hm I = 1 TI] Fidx
`2a = ZLock(I, 1) — zlat: 23 = ZLock(I, 2) — zlong: 2dist = Sflfl(za * 2a + 23 *
`IF zdist ( .25 THEN locked = 1: Pindex = I
`[EDIT I
`Ell) IF
`"$GPUTG") THEN I = INSTR(U$, "M"): telocity = Fnzz(I + 2)
`IF INSTR(U$,
`III)
`SELEIIT [:RSE INKEV$
`case BIIR$(&HD): PRINT " Program Execution Ended":
`”SE ..
`..
`IF locked = 8 ml) fictiueTimer TIIEN
`Fidx = Fidx + 1:
`IF Fidx ) 25 TIIEN Fidx = fl
`ZLock(Fidx, 1) = zlat: ZLock(Fidx, 2) = zlong: LSET 1at$ = IIIS$(zlat): LSET 1
`LPeak1(Fidx) = peak1: LPeak2(Fidx) = Peak2: LSET peak1$ = HII$(peak1): LSET P
`Tdate$(Fidx) = DIITES: TTimSUzidx) = TIRES: RSET [ls = Tdate$(Fidx): RSET ts =
`PUT #3, Fidx:
`locked = 1
`Ell) IF
`IIIISE "u"
`IF locked THEN ZLock(Pindex, 1) = 5
`Ell) SELEBT
`GBSUB record
`IF Flaga ml) 15 TIIEN fictiueTimer = 1|
`
`[:LllSE : Ell)
`
`
`
`I
`
`I
`
`
`
`
`IF fictiueTimer TIIEN
`IF fictiueTimer TIIEN
`DOS heel) InaUd'ble In De" laptOP
`IF fictiueTimer = II ml) locked = l] TIIEN SIJUHD soo,
`I
`IF fictiueTimer = II ml) locked = B TIIEN PRINT BHR$(7);
`'
`Ring 0211 if yfllackea’ 5.
`'
`Ring 0211 if Haleakala 513m.
`fictiueTimer = fictiueTimer — 1
`v
`fictiueTimer = fictiueTimer — 1
`
`
`
`
`
`
`
`IF dc TNEN llPEN "RoadData.txt' FllR IIPPEIIJ IIS fill ROCKWEII Navcard USES Odd pantfiA
`
`
`
`[F wag!) ma!
`_
`_
`_
`
`
`
`= gscg'mewxn, #2)) Commenting thls section. allows Ra
`data display even if no GPS satellites
`IOCk.
`'JPEI'V "udat. Err" F31? Jflfflflf £3 #4!
`flead a recame Eryn interface and extract the suftwere aersiafl #
`
`'
`
`PRINT 111, "R";
`
`'
`
`skama’
`
`IILS
`grec:
`
`
`HIILE Lllfl(2) ) 128
`_
`_
`_
`
`
`ll" Ellllllll
`lillTll errorhandlerz Ignore serial communication EI'I’OI‘S
`LITE III’IIT 112, U$
`
`Ibrwiflate {we errwr sqqpart
`0N ERRflR GflTfl fl'
`IF INSTR(U$, "$GPGEfl") TNEN
`
`zlat = Fnz(m): zlong = —Fnz(E]2): Sr$ = us Navcard coordinates m B
`locked = a
`GPGGA sentence
`Hm I = 1 TI] Fidx
`2a = ZLock(I, 1) — zlat: 23 = ZLock(I, 2) — zlong: 2dist = Sflfl(za * 2a + 23 *
`IF zdist ( .25 THEN locked = 1: Pindex = I
`[EDIT I
`Ell) IF
`"$GPUTG") THEN I = INSTR(U$, "M"): telocity = Fnzz(I + 2)
`IF INSTR(U$,
`III)
`SELEIIT [:RSE INKEV$
`
`case BIIR$(&HD): PRINT " Proqram Execution Ended":
`[:LllSE : Ell)
`
`
`'
`'
`IIIISE "1": STllP
`l
`Diagnostic only. Can be removed.
`”SE ..
`..
`IF locked = 8 ml) fictiueTimer TIIEN
`Fidx = Fidx + 1:
`IF Fidx ) 25 TIIEN Fidx = fl
`ZLock(Fidx, 1) = zlat: ZLock(Fidx, 2) = zlong: LSET 1at$ = IIIS$(21at): LSET 1
`LPeak1(Fidx) = peak1: LPeak2(Fidx) = Peak2: LSET peak1$ = HII$(peak1): LSET P
`Tdate$(Fidx) = DIITES: TTimSUzidx) = TIRES: RSET [ls = Tdate$(Fidx): RSET ts =
`PUT #3, Fidx:
`locked = 1
`Ell) IF
`IIIISE "u"
`IF locked THEN ZLock(Pindex, 1) = 5
`Ell) SELEBT
`GBSUB record
`IF Flaga ml) 15 TIIEN fictiueTimer = 1|
`
`
`
`
`
`J
`
`
`
`
`
`
`
`
`‘1? a D“ «‘1 I.“ F? lg” HI {I ’IHI
`Document: C:\H\Escort\Fleming\Prog\graph2.has
`Document: C:\H\Escort\Fleming\Prog\graph3.has
`(IIIIS(LPI!aII1(PinI:IeiA
`IF locked = [1 THEN PRINT "Not Locked" ELSE PRINT llSIll: "Locked Deltlflflflt";
`IF locked = [1 THEN PRINT "Not Locked" ELSE PRINT llSIll: "Locked Deltlflflflt";
`
`row = row + 1: PRINT "fit" + an$(21at, zlong):
`row = row + 1
`row = row + 1: PRINT "fit" + an$(zlat, zlong):
`row = row + 1
`
`
` - No nlert below 8
`
`
`Stan-'5‘") =
`States”) = .."”""E 8'3”"
`"mm 8'3”"
`.. Refresh speed-reporting status it changed C
`
`
`e: LastSpd = state
`
`FIIR I
`1 TI] Fidx
`PRINT llSIll: "Lit"; I;
`PRINT an$(ZLm:k(I, 1), ZankU, 2))
`IF zdist ( 9 TIIEN PRINT llSIll: "$11.11"; zdist; ELSE PRINT "I:|:---";
`mmuwmww
`
`Hm I
`1 TI] Fidx
`PRINT llSIII: "L11"; I;
`PRINT an$(ZLIJI:I:(I, 1), Zank(I, 2))
`IF zdist ( 9 THEN PRINT llSIII: "I:|:1t.fl"; zdiSt; ELSE PRINT "I:|:---";
`mmuwmm-JW
`
`
`
`
`
`Escort Ex. 2091, pg. 5
`
`
`
`
`
`
`
`
`
`
`
`
`Difference Section 1.JPG
`
`
`
`
`
`
`
`
`
`
`
`
`
`
`Escort Ex. 2091, pg. 6
`
`
`
`
`
`C:\...\TST4BUUK original from 9-25-95.BAS
`
`E DISPLAYASM
`a gps QEDDix Sz 93485 e
`a QDS-h
`h graph2.bas
`a INFORMASM
`a LCDASM
`a MACHDSASM
`a main_.c
`m MDDSASM
`fl PHYSICALASM
`m PDWEHTSTASM
`a PHDCESSASM
`
`original fmrn
`a UWL_2U1.ASM
`a WHO ASM
`
` m TEiT
`
`
`
`I
`
`
`
`
`
`jja-v-pvmseeaseamell
`
`
`:l'fifi
`
`
`
`
`
`D ocument: C: \x\E scult\Patent\Litigation\Q B T ools\graph2. has
`
`
`
`
`The Fnfl'nMingr 2 elements are n’nnhien‘ in nrn‘er tn cemensate Fer the
`The Felinaling 2 elements are nenhien’ in nrn’er tn cemensate Fer the
`
`'2 hyte; stnragen’ Fnr each index in memory.
`'2 hyte; stnrayen’ Fnr each index in memory.
`mhz16 = 3
`mhz16 = 3
`mpg = 1:
`mpg = 1:
`
`IF mhz16 IIIEH Inpy = 2
`
`IF mhz16 TIIEH Inpy = 2
`
`
`xkbase = 3H1flflfl
`KHBRSE = txH3BflB
`HIJTXKBRSE = aHSflflfl
`
`stoler = 93
`Fullstick = 31
`tclose = 2|]
`left = {33.3 — 16.2) * xcpts / wa'
`rite = {66.6 — 16.2) * xcpts / wa'
`'
`asize = 3' f {rite — left) / 3'6
`
`ansun dis
`' .S'tart next transFer
`‘ .S'tart next transFer
`llPEH "R", #3, "Locked.Ll][:", 3|]
`
`1: as longs, 2 as peak1$, 2 as Peak2$
`FIELD a3, 10 as as, s as ts, u as 1at$,
`
`DIH Zank(25, 2), LPeak1(25), LPeak2(25), Tdate$(25), TTiIe$(25)
`
`Fidx = B
`Fllll
`I - 1 TI] 25
`
`
`
`
` LPeak1(I) [:llI(peak1$): LPeakZU) IIIII(Peak2$)
`Idatesu) = Us: 11113“) = ts
`IF ZanIIU, 1) “IE" Fidx = I
`[EXT I
`
`xkbase = 3H1Bflfl
`NflBflSE = 8xH3EIBB
`HIJTXKBHSE = aHSflBB
`
`stoler = 9|]
`Fullstick = 31
`tclose = 2|]
`left = {33.3 - 16.2) * xcpts / ree'
`rite = {66.6 - 16.2) * xcpts / ree'
`asize = 3' + {rite — left) / 3'6
`
`'
`
`'
`
`'
`
`Finn size nF smart mute
`reginns.
`
`IIIIIIJIIH IIS #2
`llPEH "[:l]M2:96|]|],n,3,1,RB1flflflfl,bin,RS,opfl,cdfl,dsfl" Fllll
`llPEH"CIJM1:192BB,n,3,1,RB1BBlfl,bin,RS,opB,ch,dsB" Fllll aamnu as in
`IF dc TIIEH llPEH "RoadData.txt" Fllll
`IIPPEIIJ as all
`DI] HIILE I () 13
`IF Llll:(2)
`IIIEH
`I = ascuqusU, 112))
`Ell) IF
`
`Llllll'
`'JPEE "anat.txt" FE»? 36"?th as m
`
`flean’ a recnrn’ Fran interface ann’ extract the snFtaGre uersinn a
`
`PIIIHT 111, "n";
`
`'
`
`shame
`
`[:LS
`grec:
`
`'
`
`'
`
`Finn size nF smart mute
`reginns.
`
`
`
`
`
`
`
`llPEH "CflM1:192flfl,n,8,1,RB1Bflfl,bin,RS,opB,cdfl,dsfl" Faa aamau as 111
`
`
`
`
`
`hean’ a recnrn' Fran interface ann’ extract the snFtaGre uersinn a
`
`
`
`HIILE Llll:(2) ) 123
`
`LIIIE "Pl" #2, us
`
`IF INSTIl(U$, "$GPGLL") TIIEH
`
`zlat = Fnz(9): zlong = —Fnz(22): Sr$ = 03
`locked = B
`
`FllllI=1 TI] Fidx
`
`1.1—
`ZLnlzlu'J
`7_'Laj"7J}=ZLnl:ILLI7_I—7_Lnnn'zdj_qj'=
`
`
`
`'7 AutorEHpandJCollapse
`'7 Sort
`
`
`Difference
`
`
`
`@-
`
`lFiIe: Reference
`IO‘|;=‘|!‘|
`
`DSIHrtI a #XZIudGVybmFsXOZst. ‘.
`
`I a Apple — iPad — apps for iP. .. g Tertfile Dif‘Ferenoe Edit...
`
`I E Inbox - MicrosoFtOufiook
`
`I a My Documents
`
`“0 CodeWright
`
`@
`
`Escort Ex. 2091, pg. 7
`
`
`
`
`
`
`
`
`
`
`
`
`Difference Section 2.JPG
`
`
`
`
`
`
`
`
`
`
`
`
`
`
`Escort Ex. 2091, pg. 8
`
`
`
`
`ll*v*vllim§as%fi|gg
`_:J:_r
`C:\...\TST4BDDK original from 9-25-35.BAS
`
`Output
`E DISPLAYASM
`
`—
`a gps QEDDir-r Sr ngE c
`
`a ops-h
`
`
`‘? 6 l3“ «ll 9" fl lg” “I {I ’IHI
`Document: C:\x\Escort\Patent\Litigation\QB Tools\graph2.bas
`Document: C:\H\Escort\Patent\Litigation\QB Tools\TST4BDDK original from ',--95.BAS
`h graph2.bas
`Fllll
`I = 1 TI] Fidx
`a lNFDFlMASM
`2a
`
`2a = ZanIIU, 1) — zlat: 23 = ZankU, 2) — zlong: 2dist = SllR(
`a LCDASM
`IF zdist < .25 TREN locked = 1: Pindex = I
`
`a MACHDSASM
`TEXT I
`a main_.c
`Ell) IF
`
`m MDDSASM
`IF INSTR(U$, "$cPUTc") TNEN I = INSTR(U$, "M"): telocity = Fnzz(I + 2)
`fl PHYSICALASM
`LEI.)
`m PDWEHTSTASM
`SELECT ERSE INKEV$
`a PHDCESSASM
`ERSE BNR$(&HD): PRINT " Program Execution Ended": BLRSE : END
`
`case n "
`original from
`m TEiT
`IF locked = B ml) fictiueTimer TREN
`a UWL_2U‘I.ASM
`Fidx = Fidx + 1:
`IF Fidx ) 25 TNEN Fidx = [1
`a WHO ASM
`ZLuck(Fidx, 1) = zlat: Zank(Fidx, 2) = zlong: LSET latS = HIS$(2
`
`pe
`LPeak1(Fidx) = peak1: LPeak2(Fidx) = Peak2: LSET peak1$ = HII$(
`Tdate$(Fidx) = DRTES: TTiIe$(Fidx) = TIIIES:
`IISET [IS = Tdate$(Fidx
`
`PHI #3, Fidx:
`locked = 1
`El.) IF
`
`[:RSE "u"
`IF locked TNEN ZLock(Pindex, 1) = 5
`Ell) SELECT
`
`BRSIIR record
`
`IF Flaga Run 15 TNEN fictiueTimer = h
`
`
`TNEN
`IFflt'
`T'
`
`
`flctiueTimer
`flctiueTimer — 1
`
`I'll
`
`
`IF dc THEN PRINT fill, DRTES; ","; TIIIES; ",";
`: Fllll
`I = 8 TI] words - 1:
`Ell) IF
`
`GRSNR display
`shame!
`lillTll grec '
`IF timeout <) B TNEN GflTfl grec
`ELS
`I'IIIHT : PRINT
`I'IIINT :
`FIIIHT :
`PRINT "SoFtware in target is version "; NER$(Uersion)
`IILIISE 112
`
`q:
`dis:
`
`#931 time display
`
`BLS 0
`black = 8: blue = 1: green = 2: cyan = 3
`?
`red = h: magenta = 5: BROWN = 6: white
`gray = 8: 1blue = 9: 1green = 18: 1cyan = 11
`1red = 12: 1magenta = 13: yellow = 11:: hiwhite = 15
`
`Foreground = white
`background = black
`bnr_d.rar=bJ_u.P
`
`
`
`
`
`
`
`
`
`
`
`IF timeout () I3 TREN GllTll grec
`BLS
`I'IIIHT : PRINT
`I'IIIHT :
`I'IIIHT :
`PRINT "Software in target is version "; NEx$(Uersion)
`BLIISE #2
`
`#231 time £355,013}!
`q:
`dis:
`[18 l]
`black = 8: blue = 1: green = 2: cyan = 3
`red = 1r: magenta = 5: BROWN = 6: white = 7
`gray = 8: 1blue = 9: 1green = 18: 1cyan = 11
`lred = 12: 1magenta = 13: yellow = 111: hiuhite = 15
`
`Foreground = white
`background = black
`
` |
`
`
`
`IO‘|;=‘|!‘|
`
`DSIHrtI a #XZludGVybmFsXOZst. r.
`
`I a Apple — iPad — apps for iP. .. g TertFile Dif‘Ferenoe Edit...
`
`I E Inbox - MicrosoFtOuliook
`
`I a My Documents
`
`“0 CodeWright
`
`E DiFFerence Sechnn 1.JPG. .. I
`
`E
`
`
`
`
`
`'7 Sort
`
`'7 AutorEHpandJCollapse
`
`
`
`1
`
`J
`
`
`
`
`
`
`lillSllR record
`
`{F then? () A? fflffl FEM” 'Fifier checksww Prrar ",' Fflxfg'cfleck): Sfl'ffl' yrs:
`I?" scheck 0 a? {HEX PRIMF '(S'erz'al fransFer error"; Fflxfg'scfleck): £33}? grec
`
`IF check () I] TNEN PRINT "Fiber checksum error "; an$(check):
`IF scheck () I3 TNEN PRINT "Serial TransFer error"; an$(scheck): GllTll grec
`
`bnr_d.P_r=b_Lu.P
`
`
`
`Escort Ex. 2091, pg. 9
`
`
`
`
`
`
`
`
`
`
`
`
`Difference Section 3.JPG
`
`
`
`
`
`
`
`
`
`
`
`
`
`
`Escort Ex. 2091, pg. 10
`
`
`
`
`--'——_........
`-
`.
`-
`=
`.
`-
`--
`1.-
`
`
`Output
`_.
`
`
`
`Document: C:\H\Escort\Patent\Litigation\QB Tools\TST4BDDK original from 35.3%
`Document: CMEscoIt\Patent\Litigation\flB Toolsmraphzbas
`i? a D“ 4'7 .9 F? @I “I 4| pl)”
`background = black
`background = black
`border = blue
`
`border = blue
`SCREEN 12
`
`xchars = 8|]: ychars = 3|]
`ycsize = 16: xcsize = 8
`sizex
`xchars * xcsize — 1
`
`sizey
`ychars 1- ycsize - 1
`"IE! (1, 1)—(sizex — 1, sizey — 1) ', nookgroono”, ooro’or
`IIIIJIII (1, 1)—(sizex — 1, sizey — 1)
`
`)\2
`
`)\2
`
`JJfl-vfiv\lifi§%%fi|flfll
`'—
`C:\...\TST4BDDKoriginalfromS—25-SSBAS
`
`fl DISPLAYASM
`fl gps QEDDix s. ngE c
`fl gush
`h graph2.bas
`flINFDHMASM
`h LCDASM
`fl MACHDSASM
`”main _C
`mMDDSASM
`flPHYSIEALASM
`mPDWEHTSTASM
`“PROCESSASM
`
`
`
`a UWL_2D1.ASM
`flWHDASM
`
`4.39
`
`sanEN 12
`xchars = 8|]: ychars = 3|]
`ycsize = 16: xcsize = 8
`5129:: = xchars * xcsize — 1
`sizey
`ychars * ycsize — 1
`"IE! (1, 1)—(sizex — 1, sizey — 1) ', nookoroono”, ooro’or
`IIIIJIII (1’ 1)_(Sizex _ 1’ 51299 _ 1)
`_
`xcenter = (5129:: + 1) \ 2
`ycenter = (51299 + 1) \ 2
`xchar2 = xchars \ 2
`DEF Fnr (r) = xcsize * (r — 1) ' FM? Mayo; onor ,oosition to soroon ooor
`DEF Fns (s) = ycsize * (ychars — s) 'FMS' Mp5 onor ,oosition
`CIJLIJR Foreground ', nookyroono’
`“'11 = HINXCNBI‘Z - 1): zFull = Full
`
`
` plotdone
`
`
`
`
`
`
` “TEST Euriginalfmrn .
`
`
`
`J
`
`
`
`
`
`
`
`
`
`xcenter = (sizex + 1
`ycenter = (51299 + 1
`xchar2 = xchars \ 2
`DEF Fnr (r) = xcsize * (r — 1) ' FM? Mayo; onor ,oosition to soroon ooor
`DEF Fns (s) = ycsize * (ychars — s) 'FAG' Mao; onor ,oosition
`CIJLIJR Foreground ', nookyroono’
`Full = Fnr(xchar2 — 1): zFu11 = Full
`
`D
`
`plotdone
`textc = 8
`textd = 13 '
`1meter = —1
`xled = —1
`kled = -1
`kaled = —1
`lasled = —1
`
`llfifl'orizonto'ir onerootor ,oosition
`
`l3
`
`textc = 8
`textd = 13 '
`1meter = —1
`xled = —1
`kled = -1
`kaled = —1
`lasled = —1
`
`Horizontal onerootor ,oosition
`
`I
`
`'
`
`5245650 = FISPITE)
`
`' tot noxt roooro’ of o’oto
`
`LIIIE (xcenter, ycenter + 2flfl)—(xcenter, sizey). 1magenta
`nETunu
`..... figf‘ffffff‘
`dis 1a :
`|fioosoo roooro’
`IF pllfiflfl
`'I'IIEH
`#ooints in X/k Ewen
`xcpts = 2 i 2688 '
`#‘points in M; swan
`kacpts = xcpts '
`zfl’t = 125 / nopts'
`oonuort ino’ox to M
`hotxkcpts = 2 l- 12?6 l- ((29 + 62.5) I 62.5)
`ELSE
`xcpts = 2 * 2M8
`kacpts = xcpts
`hotxkcpts = 1111
`Ell) IF
`
`
`
`
`
`
`
`
`
`
`LIIIE (xcenter, ycenter + 2flfl)—(xcenter, sizey). 1magenta
`
`fgfflp = rfsyfffl')
`
`' Eot noxt roooro’ oF o'oto
`
`'
`
`' ' ' ' 'fffffffffff
`dis lay:
`iGflSllB record
`IF pllfiflfl
`'I'IIEH
`#ooints in X/k Ewen
`xcpts = 2 l- 2688 '
`#ooints in Mar smog
`kacpts = xcpts
`'
`zFJt = 125' / gopts'
`oonuort ino’ox to M
`hotxkcpts = 2 l- 12?6 l- ((29 + 62.5) I 62.5)
`ELSE
`xcpts = 2 I- 28118
`kacpts = xcpts
`hotxkcpts = 1111
`Ell) IF
`
` 1
`
`'7 Sort
`
`'7 AutoEHpandx’Collapse
`
`
`
`I
`
`Dstartl fl #xziudGVybmst02sm...| a Apple —iPad whpps for iP... gTertfile Dif‘Ferenoe Edit...
`
`I Elohim -Microsoft0ufiook I E3 My Documents
`
`IIOcodewj-ignt
`
`E DiFFerence Sechnn 2.]PG...|
`
`I0‘ |;=‘ ll‘l
`
`E[
`
`Escort Ex. 2091, pg. 11
`
`
`
`
`
`
`
`
`
`
`
`
`Difference Section 4.JPG
`
`
`
`
`
`
`
`
`
`
`
`
`
`
`Escort Ex. 2091, pg. 12
`
`
`
`
`--'——_........
`-
`.
`-
`=
`.
`-
`--
`1.-
`
`
`Output
`_
`
`
`
`Document: C:\H\Escort\Patent\Litigation\QB Tools\TST4BDDK original from ' .
`Document: C:\X\ESCUIt\Patent\Litigation\QB Tools\graph2.bas
`‘? Q B“ «kl 9" a la” “I {I ’IHI
`background = black
`background = black
`border = blue
`
`border = blue
`SCREEN 12
`
`xchars = 8|]: ychars = 3|]
`ycsize = 16: xcsize = 8
`sizex
`xchars * xcsize — 1
`
`sizey
`ychars 1- ycsize - 1
`"IE! (1, 1)—(sizex — 1, sizey — 1) ', nookgroono”, ooro’or
`IIIIJIII (1, 1)—(sizex — 1, sizey — 1)
`
`)\2
`
`)\2
`
`jja-v-pvrnlhwfiéasfimgl
`'—
`C:\...\TST4BDDKoriginalfromS—25-SSBAS
`
`& DISPLAYASM
`fl gps QEDDix s. ngE c
`m gosh
`“ graph2.bas
`filNFDHMASM
`fl LCDASM
`fl MAcnoSASM
`flmain _C
`mMDDSASM
`flPHYSIEALASM
`mPDWEHTSTASM
`flPHDCESSASM
`
`
`
`m UWL_2D1.ASM
`flWHDASM
`
`4.39
`
`sanEN 12
`xchars = 8|]: ychars = 3|]
`ycsize = 16: xcsize = s
`5129:: = xchars * xcsize — 1
`sizey
`ychars * ycsize — 1
`"IE! (1, 1)—(sizex — 1, sizey — 1) ', nookoroono”, ooro’or
`IIIIJIII (1’ 1)_(Sizex _ 1’ 51299 _ 1)
`_
`xcenter = (5129:: + 1) \ 2
`ycenter = (51299 + 1) \ 2
`xchar2 = xchars \ 2
`DEF Fnr (r) = xcsize * (r — 1) ' FM? Mos onor ,oosition to soroon ooor
`DEF Fns (s) = ycsize * (ychars — s) 'FMS' Mos onor ,oosition
`CIJLIJR Foreground ', nookyroono’
`“'11 = Fnr(xchar2 - 1): zFull = Full
`
`
` plotdone
`
`
`
`
`
`
` ETEIT original from .
`
`
`
`J
`
`
`
`
`
`
`
`
`
`xcenter = (sizex + 1
`ycenter = (51299 + 1
`xchar2 = xchars \ 2
`DEF Fnr (r) = xcsize * (r — 1) ' FM? Mos onor ,oosition to screen ooor
`DEF Fns (s) = ycsize * (ychars — s) 'FAG' Maps onor ,oosition
`CIJLIJR Foreground ', nookyroono’
`Full = Fnr(xchar2 — 1): zFu11 = Full
`
`l]
`
`plotdone
`textc = 8
`textd = 13 '
`1meter = —1
`xlod = —1
`kled = -1
`kaled = —1
`lasled = —1
`
`.Ififl'orizonto'ir onoraotor ,oosition
`
`D
`
`textc = 8
`textd = 13 '
`1meter = —1
`xled = —1
`kled = -1
`kaled = —1
`lasled = —1
`
`Horizontal onerootor ,oosition
`
`I
`
`'
`
`5245650 = FISPITE)
`
`' tot next roooro’ of o’oto
`
`LIIIE (xcenter, ycenter + 2Dfl)—(xcenter, sizey). 1magenta
`nETunn
`..... figf‘ffffff‘
`dis 1a :
`'flosoo roooro’
`IF pll6flfl
`'I'IIEH
`#ooints in X/k swap
`xcpts = 2 i 2688 '
`#ooints in M; smog
`kacpts = xcpts '
`zfl’t = 125 / xopts'
`oonoort ino’ox to M
`hotxkcpts = 2 l- 12?6 l- ((29 + 62.5) I 62.5)
`ELSE
`xcpts = 2 * 28118
`kacpts = xcpts
`hotxkcpts = 1111
`Ell) IF
`
`
`
`
`
`
`
`
`
`
`LIIIE (xcenter, ycenter + 2Bfl)—(xcenter, sizey). 1magenta
`
`fgfflp = rfsyfffl')
`
`' Eot noxt roooro’ of oat;
`
`'
`
`' ' ' ' 'fffffffffff
`dis lay:
`iGflSllB record
`IF pll6flfl
`'I'IIEH
`#ooints in X/k swoo
`xcpts = 2 l- 2688 '
`#ooints in Mar smog
`kacpts = xcpts
`'
`zFJt = 125' / xopts'
`oonuort index to mS'
`hotxkcpts = 2 l- 12?6 l- ((29 + 62.5) I 62.5)
`ELSE
`xcpts = 2 I- 28118
`kacpts = xcpts
`hotxkcpts = 1111
`Ell) IF
`
` 1
`
`'7 Sort
`
`'7 AutoEHpandx’Collapse
`
`
`
`I
`
`flsmrtl fl #xziudGVybmst02sm...| a Apple —iPad napps for iP... gTextHle Dif‘Ferenoe Edit...
`
`I Elnbox -MicrosoFtOuflook
`
`I E3! My Documents
`
`“0 (MEWright
`
`U DiFFerence Sechnn 2.]PG...|
`
`Q i“ « Emga 12:34 PM
`
`I0‘ |;=‘ ll‘l
`
`Escort Ex. 2091, pg. 13
`
`
`
`
`
`
`
`
`
`
`
`
`Difference Section 5.JPG
`
`
`
`
`
`
`
`
`
`
`
`
`
`
`Escort Ex. 2091, pg. 14
`
`
`
`
`jja-v-pvmsmax. hfimgl—j 139
`'_.J;_l -
`C:\...\TST4BDDK original from 9-25-35.BAS
`
`
`& DISPLAYASM
`Output
`
`a gps QEDDix $1 93485 c
`
`
`
`ra h2.bas
`‘? a D“ «kl »" a El “I {I ’IHI
`Document: C:\x\Esc01t\Patent\Litigation\QB Tools\graph2.bas
`Document: C:\H\Escort\Patent\Litigation\QB Tools\TST4BDDK original from ' .
`a gps.h
`stateSU) = "Not Transient"
`A
`stateSU) = "Not Transient"
`glgNFpDHMASM
`state = Flagc mm 1|: lstate = transientd
`ELCDASM
`state = Flagc IND u: lstate = transientd
`
`GllSllR dstate: transientd = state: row = row + 1
`EMACHDSASM
`EllSllR dstate: transientd = state: row = row + 1
`stateSUJ) = .
`”main .c
`statesw) = "
`"
`..
`mMDDEASM
`statESU) = "Unpaired"
`state$(1) = "Unpaired"
`flPHYSIEALASM
`state = Flagb IND ll: lstate = unp
`state = Flagb ml) 1|: lstate = unp
`mPDWEHTSTASM
`EllSllR dstate: unp = state: row = row + 1
`GllSllR dstate: unp = state: row = row + 1
`flPHDCESSASM
`LflBflTE raw,
`1
`LflBflTE row,
`1
`
`aSWEE
`IF xdetect THEN PRINT "X
`IF xdetect THEN PRINT "X
`ELSE PRINT "
`";
`ELSE PRINT "
`";
`curigir'lalfnjrn
`“TEST
`_
`IF kdetect TNEN PRINT "K
`IF kdetect TNEN PRINT "K
`ELSE PRINT "
`';
`ELSE PRINT "
`;
`
`EUWLJDIASM
`IF kadetect THEN PRINT "Ka
`IF kadetect THEN PRINT "Ka
`" ELSE PRINT "
`" ELSE PRINT "
`flWHDASM
`"DW = I‘D“ * 1: LUCHTE I‘DW.
`row = row + 1: LIJBHTE row,
`1
`1
`IF train TIIEN PRINT "Train
`IF train TIIEN PRINT "Train
`"
`"
`IF emergency TIIEN PRINT "Emergency Uehicle"
`[F emergency TIIEN PRINT "Emergency Uehicle"
`IF roadhaz TIIEN PRINT "Road Hazzard
`"
`IF roadhaz TIIEN PRINT "Road Hazzard
`"
`IF “IT (train ml) emergency ml) roadhaz) TIIEN PRINT "
`IF lllT (train ml) emergency ml) roadhaz) TIIEN PRINT "
`row = row + 1: LIJBflTE row,
`1
`row = row + 1: Lame row,
`1
`ELSE mum "
`:4 ";
`ELSE PIIIHT "
`IF hotxdetect TIIEN PRINT "Hot N ":
`IF hotxdetect THEN PRINT "Hot
`IF hotkdetect TIIEN PRINT "Hot K " ELSE PRINT "
`IF hotkdetect THEN PRINT "Hot K " ELSE PRINT "
`
`";
`'
`;
`
`"
`
`";
`
`"
`
`J
`
`"
`
`";
`";
`
`"
`
`";
`
`"
`
`(IIRS
`
`
`
`
`
`
`
`
`
`row=row+1
`row=row+1
`LIJBHTE row,
`1
`LUCHTE I‘DW.
`1
`IIEIIS
`PRINT IJSIII: "I ffltfH t \\ \\ \\'
`IIEXS
`PRINT llSIII: "I ffltfH t \\ \\ \\ '
`
`
`
`
`
`
`PRINT usm: "FIJISrITm \\ \\ \\ ; nexSwad); nexS(sbad); nexSuhad)
`PRINI usm: "beSrme \\ \\ \\" IIExSuJad); nexS(snad); nexSubad)
`row=row+1
`row=row+1
`PRINT "Smart "; IIEx$(smartspec); " "
`PRINT "Smart "; NExS(5martspec); " "E
`row = row + 2
`Hum
`IF lucked = B TIIEN PRINT "Not Locked" ELSE PRINT IISIII: "Locked Deltlmmt";
`row = row + 1: PRINT "at" + anS(zlat, zlong):
`row = row + 1
`stateSUJ) = "nboue Speed
`"
`stateSU) = "No fllert below Spd"
`state = 8:
`IF telocity ( .2 TIIEN state = 1
`EllSllR dstate: LastSpd = state: ruw = row + 1
`FOR I = 1 TI] Fidx
`PRINT llSIlIi "L31"; 1;
`PRINT an$(2Luck(I, 1), ZankU, 2))
`IF zdist ( 9 TIIEN PRINT IISIII: "11:11.11"; zdist; ELSE PRINT "d:———";
`PRINT llSIll: " Frqmmm 11111111"; LPeak1(I); LPeakZU)
`—row = row + 1
`TEXT I
`row = 1
`53 = ":dk a Ka fluter Band Stick": lastx = 1xk1eun: lastax = laxkleun
`max = 115: r = xkleun: GllSllR tabar: 1xk1eun = X:
`laxkleun = ax
`row=row+1
`55 = "Ka Inner Band Stick": lastx = 1ka1eun: lastax = lakaleun
`r = kaleun
`GllSllR tabar: 1ka1eun = X:
`lakaleun = ax
`
`row = row + 1
`row = 1
`lastax = laxkleun
`lastx = lxkleun:
`S$ = "xfk & Ra fluter Band Stick":
`max = 115: r = xkleun: GRSIIR tabar: 1xk1eun = X:
`laxkleun = ax
`row=row+1
`s$ = "Ka Inner Band Stick":
`r = kaleun
`GRSIIR tabar: 1ka1eun = X:
`
`lastx = 1ka1eun:
`lakaleun = ax
`
`lastax = lakaleun
`
`M q
`I
`M q
`(I
`'7 AutoEHpandx’Collapse
`'7 Sort
`
`I
`I0‘ |;=‘ ll‘l
`
`1’5de 6 #XZIudGVybmFsXOZst...| a Apple —iPad —Apps for iP... gTextHle Dif‘Ferenoe Edit...
`
`I E Inbox -MicrosoFt Ouflook
`
`I E3 My comments
`
`“0 CodeWright
`
`y DiFFerence Secnon 4.]PG...|
`
`Q i“ « Eygfi 12:35 PM
`
`Escort Ex. 2091, pg. 15
`
`
`
`
`
`
`
`
`
`
`
`
`Graph2.bas
`Graph2.bas
`
`
`
`
`
`
`
`
`
`
`
`
`
`
`Escort Ex. 2091, pg. 16
`
`Escort Ex. 2091, pg. 16
`
`
`
`'tst4600i: change axleft &axright
`
`graph2
`
`DEFINT A-Y
`DEFSNG Z
`PRINT : PRINT : PRINT
`PRINT "4600/Solo Support Code 4/10/95"
`zcon = 180 / 3.141592654#
`zk1 = .005: zk2 = .995' Energy averaging constants
`
`DIM s$(512), s(512), c$(512), bit(512)
`DIM r(256)
`DIM xkindex(11), xkcor(11), kaindex(11), kacor(11)
`DIM hotxkindex(11), hotxkmag(11)
`DIM xkmag(11), kamag(11)
`DIM index(16), mag(16), cor(16)
`DIM rr(256, 10)
`
`DATA 1,2,4,8,&h10,&h20,&h40,&h80
`DATA &h100,&h200,&h400,&h800,&h1000,&h2000,&h4000,&h8000
`DIM p(15)
`
`FOR I = 0 TO 15: READ p(I): NEXT I
`aa$ = "## \ \ \ \"
`
`id = 3 ' # of plots
`DIM v(500)
`peaks = 10
`DIM nc(id, peaks), nm(id, peaks)
`DIM lc(id, peaks)
`DIM lm(id, peaks)
`DIM y1(id), zx(id), zy(id)
`DIM lp1(id), lp2(id)
`DIM rlx(id), rly(id)
`DIM rc(peaks)
`
`
`
`DEF FNA (I, j$) = NOT (I - VAL(j$))
`DEF fnb (I, j) = VAL("&H" + CHR$(I) + CHR$(j))
` DEF FNC (I, j, k, l) = VAL("&H" + CHR$(I) + CHR$(j) + CHR$(k) + CHR$(l))
`DEF FND (I) = CSNG(I) / d256
`DEF fnx$ (I) = RIGHT$("0000" + HEX$(I), 4)
`DEF fnx (X) = zx(id) * X + x1
`DEF fny (Y) = (Y) * zy(id) + y1(id)
`DEF fnzz$ (z) = STR$(INT(z * 10!) / 10!)
`DEF fnq$ (z1, z2) = "{" + fnzz$(z1) + "," + fnzz$(z2) + "}"
`DEF fnzz (I) = VAL(MID$(v$, I))
`DEF fnz (I) = (fnzz(I) - (40! * INT(fnzz(I) / 100!))) / 60! * 69.1722
`iv1 = VARPTR(iv): iv2 = iv1 + 1
`
`' Constants
`'The following 2 elements are doubled in order to compensate for the
`'2 bytes storaged for each index in memory.
`mhz16 = 0
`mpy = 1: IF mhz16 THEN mpy = 2
`
`xkbase = &H1000
`KABASE = &H3000
`HOTXKBASE = &H5000
`
`stoler = 90
`fullstick = 31
`tclose = 20
`' left = (33.3 - 16.2) * xcpts / 100' find size of smart mute
`Page 1
`
`Escort Ex. 2091, pg. 17
`
`
`
`graph2
` ' rite = (66.6 - 16.2) * xcpts / 100' regions.
` ' msize = 1 + (rite - left) / 16
`
`GOSUB dis
`' Start next transfer
`OPEN "R", #3, "Locked.LOC", 30
`FIELD #3, 10 AS d$, 8 AS t$, 4 AS lat$, 4 AS long$, 2 AS peak1$, 2 AS Peak2$
`DIM ZLock(25, 2), LPeak1(25), LPeak2(25), Tdate$(25), TTime$(25)
`fidx = 0
`FOR I = 1 TO 25
`GET #3, I: ZLock(I, 1) = CVS(lat$): ZLock(I, 2) = CVS(long$)
`LPeak1(I) = CVI(peak1$): LPeak2(I) = CVI(Peak2$)
`Tdate$(I) = d$: TTime$(I) = t$
`IF ZLock(I, 1) THEN fidx = I
`
`NEXT I
`
`OPEN "COM2:9600,n,8,1,RB10000,bin,RS,op0,cd0,ds0" FOR RANDOM AS #2
`OPEN "COM1:19200,n,8,1,RB10000,bin,RS,op0,cd0,ds0" FOR RANDOM AS #1
`IF dc THEN OPEN "RoadData.txt" FOR APPEND AS #4
`DO WHILE I <> 13
`IF LOC(2) THEN
`I = ASC(INPUT$(1, #2))
`
`LOOP
` 'OPEN "vdat.txt" FOR OUTPUT AS #4
`
`END IF
`
`' Read a record from interface and extract the software version #
`
` CLS
`grec:
`
`PRINT #1, "A"; ' skomod
`
`WHILE LOC(2) > 128
`LINE INPUT #2, v$
`IF INSTR(v$, "$GPGLL") THEN
`zlat = fnz(9): zlong = -fnz(22): Sr$ = v$
`locked = 0
`FOR I = 1 TO fidx
`za = ZLock(I, 1) - zlat: zB = ZLock(I, 2) -
`
`zlong: zdist = SQR(za * za + zB * zB)
`
`IF zdist < .25 THEN locked = 1: Pindex = I
`
`NEXT I
`
`END IF
`IF INSTR(v$, "$GPVTG") THEN I = INSTR(v$, "M"): zVelocity =
`
`fnzz(I + 2)
`
`END
`
`WEND
`SELECT CASE INKEY$
`CASE CHR$(&HD): PRINT " Program Execution Ended": CLOSE :
`
`CASE " "
`IF locked = 0 AND ActiveTimer THEN
`fidx = fidx + 1: IF fidx > 25 THEN fidx = 0
`ZLock(fidx, 1) = zlat: ZLock(fidx, 2) =
`zlong: LSET lat$ = MKS$(zlat): LSET long$ = MKS$(zlong)
`LPeak1(fidx) = peak1: LPeak2(fidx) = Peak2:
`LSET peak1$ = MKI$(peak1): LSET Peak2$ = MKI$(Peak2)
`Tdate$(fidx) = DATE$: TTime$(fidx) = TIME$:
`RSET d$ = Tdate$(fidx): RSET t$ = TTime$(fidx)
`PUT #3, fidx: locked = 1
`
`END IF
`CASE "u"
`IF locked THEN ZLock(Pindex, 1) = 5
`
`END SELECT
` GOSUB record
`
`Page 2
`
`Escort Ex. 2091, pg. 18
`
`
`
`graph2
`IF flaga AND 15 THEN ActiveTimer = 4
`
`IF ActiveTimer THEN
`IF ActiveTimer = 4 AND locked = 0 THEN PRINT CHR$(7); '
` Ring bell if unlocked signal detected
`ActiveTimer = ActiveTimer - 1
`IF dc THEN PRINT #4, DATE$; ","; TIME$; ","; : FOR I = 0 TO
`words - 1: PRINT #4, r(I); ","; : NEXT I: PRINT #4, Sr$, zVelocity
`END IF
`
`'IF check <> 0 THEN PRINT "Fiber checksum error "; fnx$(check): GOTO grec
`'IF scheck <> 0 THEN PRINT "Serial Transfer error"; fnx$(scheck): GOTO grec
`
`GOSUB display
`GOTO grec' skomod
`IF timeout <> 0 THEN GOTO grec
`
`CLS
`PRINT : PRINT : PRINT : PRINT
`PRINT "Software in target is version "; HEX$(version)
`CLOSE #2
`
`''''''''''''''''''''''''''''''' Real time display ''''''''''''''''''''''
`q:
`dis: CLS 0
`black = 0: blue = 1: green = 2: cyan = 3
`red = 4: magenta = 5: BROWN = 6: white = 7
`gray = 8: lblue = 9: lgreen = 10: lcyan = 11
`lred = 12: lmagenta = 13: yellow = 14: hiwhite = 15
`
`
`
`foreground = white
`background = black
`border = blue
`
`SCREEN 12
`xchars = 80: ychars = 30
`ycsize = 16: xcsize = 8
`sizex = xchars * xcsize - 1
`sizey = ychars * ycsize - 1
`VIEW (1, 1)-(sizex - 1, sizey - 1)', background', border
`WINDOW (1, 1)-(sizex - 1, sizey - 1)
`
`xcenter = (sizex + 1) \ 2
`ycenter = (sizey + 1) \ 2
`xchar2 = xchars \ 2
`DEF fnr (r) = xcsize * (r - 1)' FNR Maps char position to screen coor
`DEF fns (s) = ycsize * (ychars - s)'FNS Maps char position
`COLOR foreground', background
`
`full = fnr(xchar2 - 1): zfull = full
`
`ipavg = -1
`bad = 0
`sbad = 0
`tbad = 0
`textdone = 0
`plotdone = 0
`textc = 8
`textd = 13' Horizontal character position
`lmeter = -1
`xled = -1
`kled = -1
`kaled = -1
`
`Page 3
`
`Escort Ex. 2091, pg. 19
`
`
`
`lasled = -1
`
`graph2
`
`LINE (xcenter, ycenter + 200)-(xcenter, sizey), lmagenta
`RETURN
`'''''*********** setup = r(set10)
`display:
`' GOSUB record ' Get next record of data
`
`
`IF p4600 THEN
`xcpts = 2 * 2688 ' # points in x/k sweep
`kacpts = xcpts ' # points in Ka sweep
`' zflt = 125 / xcpts' convert index to mS
`hotxkcpts = 2 * 1276 * ((29 + 62.5) / 62.5)
` ELSE
`xcpts = 2 * 2048
`kacpts = xcpts
` hotxkcpts = 1111
` END IF
`
`
`
`'IF check <> 0 THEN bad = (bad + 1) AND 255: GOTO display
`'IF scheck <> 0 THEN sbad = (sbad + 1) AND 255: GOTO display
`
`' a$ = INKEY$
`IF a$ = CHR$(27) THEN END
`IF a$ = "*" THEN dhistory = 1
`IF (a$ = " ") THEN page2 = -1 ELSE page2 = 0
`
` xdetect = flaga AND 1: IF xdetect THEN xdetect = -1
` kdetect = flaga AND 2: IF kdetect THEN kdetect = -1: xdetect = 0
` kadetect = flaga AND &HC: IF kadetect THEN kadetect = -1
` kaouter = flaga AND 8
` kainner = flaga AND 4
`
`
`
`train = lcount AND 32: IF train THEN train = -1
`emergency = lcount AND 64: IF emergency THEN emergency = -1
`roadhaz = lcount AND 128: IF roadhaz THEN roadhaz = -1
`
`
` anydetect = xdetect OR kdetect OR kadetect OR hotkdetect OR hotxdetect
`
`row = 3
`
`
`
`LOCATE row, 1
`IF solo THEN PRINT "Solo": row = row + 1
`IF e4600 THEN PRINT "P 4600": row = row + 1
`
` state$(1) = "Bad RAM"
` state$(0) = "RAM ok "
` state = flagb AND 1: lstate = ram
` GOSUB estate: ram = state: row = row + 1
` state$(1) = "City Mode "
` state$(0) = "Highway Mode"
`state = flagi1 AND 8: lstate = city
`GOSUB dstate: city = state: row = row + 1
` state$(1) = "Muted "
` state$(0) = "Not Muted "
`state = flagi1 AND 2: lstate = muted
`GOSUB dstate: muted = state: row = row + 1
` state$(1) = "Automute "
` state$(0) = "Not Automute "
`state = flagi1 AND 32: lstate = amuted
`GOSUB dstate: amuted = state: row = row + 1
` state$(0) = "Not Dark Mode"
`
`Page 4
`
`Escort Ex. 2091, pg. 20
`
`
`
`graph2
`
` state$(1) = "Dark Mode "
`state = flagi1 AND 4: lstate = darken
`GOSUB dstate: darken = state: row = row + 1
` state$(0) = "Transient "
` state$(1) = "Not Transient"
`state = flagc AND 4: lstate = transientd
`GOSUB dstate: transientd = state: row = row + 1
` state$(0) = " "
` state$(1) = "Unpaired"
`state = flagb AND 4: lstate = unp
`GOSUB dstate: unp = state: row = row + 1
` LOCATE row, 1
` IF xdetect THEN PRINT "X "; ELSE PRINT " ";
` IF kdetect THEN PRINT "K "; ELSE PRINT " ";
` IF kadetect THEN PRINT "Ka " ELSE PRINT " "
`row = row + 1: LOCATE row, 1
` IF train THEN PRINT "Train "
` IF emergency THEN PRINT "Emergency Vehicle"
` IF roadhaz THEN PRINT "Road Hazzard "
` IF NOT (train AND emergency AND roadhaz) THEN PRINT " "
`
`row = row + 1: LOCATE row, 1
` IF hotxdetect THEN PRINT "Hot X "; ELSE PRINT " ";
` IF hotkdetect THEN PRINT "Hot K " ELSE PRINT " "
`
`
`row = row + 1
` LOCATE row, 1
`PRINT USING "In/Ot/Hot \\ \\ \\"; HEX$(swcntinner); HEX$(swcntouter);
`HEX$(swcnthotxk)
`row = row + 1
`PRINT USING "Fb/Sr/Tm \\ \\ \\"; HEX$(bad); HEX$(sbad); HEX$(tbad)
`row = row + 1
`PRINT "Smart "; HEX$(smartspec); " "
`row = row + 2
`IF locked = 0 THEN PRINT "Not Locked" ELSE PRINT USING "Locked DeltI:###";
`(ABS(LPeak1(Pindex) + LPeak2(Pindex) - peak1 - Peak2)) / 2
`row = row + 1: PRINT "At" + fnq$(zlat, zlong): row = row + 1
` state$(0) = "Above Speed "
` state$(1) = "No Alert below Spd"
`state = 0: IF zVelocity < .2 THEN state = 1
`GOSUB dstate: LastSpd = state: row = row + 1
`FOR I = 1 TO fidx
`PRINT USING "L#"; I;
`PRINT fnq$(ZLock(I, 1), ZLock(I, 2))
`IF zdist < 9 THEN PRINT USING "d:#.#"; zdist; ELSE PRINT
`
`"d:---";
`
`PRIN