Context Navigation

mainWindow.rbfrm @ 15

Revision 15, 110.6 KB checked in by pinwc4, 15 years ago (diff)
Created more database methods and tweaked interface

Line
1	#tag Window
2	Begin Window mainWindow
3	BackColor = &hFFFFFF
4	Backdrop = 1384026073
5	CloseButton = True
6	Composite = True
7	Frame = 0
8	FullScreen = False
9	HasBackColor = False
10	Height = 352
11	ImplicitInstance= True
12	LiveResize = True
13	MacProcID = 0
14	MaxHeight = 32000
15	MaximizeButton = False
16	MaxWidth = 32000
17	MenuBar = 1097909413
18	MenuBarVisible = True
19	MinHeight = 64
20	MinimizeButton = True
21	MinWidth = 64
22	Placement = 0
23	Resizeable = True
24	Title = "Flip Side ICS"
25	Visible = True
26	Width = 640
27	Begin PushButton PushButton_Read
28	AutoDeactivate = True
29	Bold = ""
30	Cancel = ""
31	Caption = "Read"
32	Default = ""
33	Enabled = True
34	Height = 20
35	HelpTag = ""
36	Index = -2147483648
37	InitialParent = ""
38	Italic = ""
39	Left = 26
40	LockBottom = ""
41	LockedInPosition= False
42	LockLeft = ""
43	LockRight = ""
44	LockTop = ""
45	Scope = 0
46	TabIndex = 4
47	TabPanelIndex = 0
48	TabStop = True
49	TextFont = "System"
50	TextSize = 0
51	Top = 312
52	Underline = ""
53	Visible = True
54	Width = 88
55	End
56	Begin PushButton PushButton_Write
57	AutoDeactivate = True
58	Bold = ""
59	Cancel = ""
60	Caption = "Write"
61	Default = False
62	Enabled = True
63	Height = 20
64	HelpTag = ""
65	Index = -2147483648
66	InitialParent = ""
67	Italic = ""
68	Left = 126
69	LockBottom = ""
70	LockedInPosition= False
71	LockLeft = ""
72	LockRight = ""
73	LockTop = ""
74	Scope = 0
75	TabIndex = 5
76	TabPanelIndex = 0
77	TabStop = True
78	TextFont = "System"
79	TextSize = 0
80	Top = 312
81	Underline = ""
82	Visible = True
83	Width = 88
84	End
85	Begin PushButton PushButton_Reset
86	AutoDeactivate = True
87	Bold = ""
88	Cancel = ""
89	Caption = "Reset"
90	Default = ""
91	Enabled = True
92	Height = 20
93	HelpTag = ""
94	Index = -2147483648
95	InitialParent = ""
96	Italic = ""
97	Left = 226
98	LockBottom = ""
99	LockedInPosition= False
100	LockLeft = ""
101	LockRight = ""
102	LockTop = ""
103	Scope = 0
104	TabIndex = 6
105	TabPanelIndex = 0
106	TabStop = True
107	TextFont = "System"
108	TextSize = 0
109	Top = 312
110	Underline = ""
111	Visible = True
112	Width = 88
113	End
114	Begin TabPanel TabPanel1
115	AutoDeactivate = True
116	Bold = ""
117	Enabled = True
118	Height = 264
119	HelpTag = ""
120	Index = -2147483648
121	InitialParent = ""
122	Italic = ""
123	Left = 0
124	LockBottom = ""
125	LockedInPosition= False
126	LockLeft = ""
127	LockRight = ""
128	LockTop = ""
129	Panels = ""
130	Scope = 0
131	SmallTabs = False
132	TabDefinition = "Settings\rProfiles\rCar\rCustom"
133	TabIndex = 43
134	TabPanelIndex = 0
135	TabStop = True
136	TextFont = "System"
137	TextSize = 0
138	Top = 32
139	Underline = ""
140	Value = 2
141	Visible = True
142	Width = 637
143	Begin StaticText StaticText_SerialPort
144	AutoDeactivate = True
145	Bold = ""
146	DataField = ""
147	DataSource = ""
148	Enabled = True
149	Height = 20
150	HelpTag = ""
151	Index = -2147483648
152	InitialParent = "TabPanel1"
153	Italic = ""
154	Left = 214
155	LockBottom = ""
156	LockedInPosition= False
157	LockLeft = ""
158	LockRight = ""
159	LockTop = ""
160	Multiline = ""
161	Scope = 0
162	TabIndex = 0
163	TabPanelIndex = 1
164	Text = "COM Port"
165	TextAlign = 0
166	TextColor = "&cB8B8B8"
167	TextFont = "System"
168	TextSize = 0
169	Top = 106
170	Underline = ""
171	Visible = True
172	Width = 100
173	End
174	Begin PopupMenu PopupMenu_SerialPort
175	AutoDeactivate = True
176	Bold = ""
177	DataField = ""
178	DataSource = ""
179	Enabled = True
180	Height = 20
181	HelpTag = ""
182	Index = -2147483648
183	InitialParent = "TabPanel1"
184	InitialValue = ""
185	Italic = ""
186	Left = 26
187	ListIndex = 0
188	LockBottom = ""
189	LockedInPosition= False
190	LockLeft = ""
191	LockRight = ""
192	LockTop = ""
193	Scope = 0
194	TabIndex = 1
195	TabPanelIndex = 1
196	TabStop = True
197	TextFont = "System"
198	TextSize = 0
199	Top = 106
200	Underline = ""
201	Visible = True
202	Width = 176
203	End
204	Begin GroupBox GroupBox1
205	AutoDeactivate = True
206	Bold = ""
207	Caption = ""
208	Enabled = True
209	Height = 89
210	HelpTag = ""
211	Index = -2147483648
212	InitialParent = "TabPanel1"
213	Italic = ""
214	Left = 14
215	LockBottom = ""
216	LockedInPosition= False
217	LockLeft = ""
218	LockRight = ""
219	LockTop = ""
220	Scope = 0
221	TabIndex = 0
222	TabPanelIndex = 2
223	TextFont = "System"
224	TextSize = 0
225	Top = 94
226	Underline = ""
227	Visible = True
228	Width = 358
229	Begin PopupMenu PopupMenu_Profile
230	AutoDeactivate = True
231	Bold = ""
232	DataField = ""
233	DataSource = ""
234	Enabled = True
235	Height = 20
236	HelpTag = ""
237	Index = -2147483648
238	InitialParent = "GroupBox1"
239	InitialValue = ""
240	Italic = ""
241	Left = 26
242	ListIndex = 0
243	LockBottom = ""
244	LockedInPosition= False
245	LockLeft = ""
246	LockRight = ""
247	LockTop = ""
248	Scope = 0
249	TabIndex = 0
250	TabPanelIndex = 2
251	TabStop = True
252	TextFont = "System"
253	TextSize = 0
254	Top = 106
255	Underline = ""
256	Visible = True
257	Width = 176
258	End
259	Begin PushButton PushButton_Create
260	AutoDeactivate = True
261	Bold = ""
262	Cancel = ""
263	Caption = "Create"
264	Default = ""
265	Enabled = True
266	Height = 20
267	HelpTag = ""
268	Index = -2147483648
269	InitialParent = "GroupBox1"
270	Italic = ""
271	Left = 26
272	LockBottom = ""
273	LockedInPosition= False
274	LockLeft = ""
275	LockRight = ""
276	LockTop = ""
277	Scope = 0
278	TabIndex = 1
279	TabPanelIndex = 2
280	TabStop = True
281	TextFont = "System"
282	TextSize = 0
283	Top = 142
284	Underline = ""
285	Visible = True
286	Width = 88
287	End
288	Begin PushButton PushButton_Delete
289	AutoDeactivate = True
290	Bold = ""
291	Cancel = ""
292	Caption = "Delete"
293	Default = ""
294	Enabled = True
295	Height = 20
296	HelpTag = ""
297	Index = -2147483648
298	InitialParent = "GroupBox1"
299	Italic = ""
300	Left = 126
301	LockBottom = ""
302	LockedInPosition= False
303	LockLeft = ""
304	LockRight = ""
305	LockTop = ""
306	Scope = 0
307	TabIndex = 2
308	TabPanelIndex = 2
309	TabStop = True
310	TextFont = "System"
311	TextSize = 0
312	Top = 142
313	Underline = ""
314	Visible = False
315	Width = 88
316	End
317	Begin StaticText StaticText_Profiles
318	AutoDeactivate = True
319	Bold = ""
320	DataField = ""
321	DataSource = ""
322	Enabled = True
323	Height = 20
324	HelpTag = ""
325	Index = -2147483648
326	InitialParent = "GroupBox1"
327	Italic = ""
328	Left = 214
329	LockBottom = ""
330	LockedInPosition= False
331	LockLeft = ""
332	LockRight = ""
333	LockTop = ""
334	Multiline = ""
335	Scope = 0
336	TabIndex = 4
337	TabPanelIndex = 2
338	Text = "Profiles"
339	TextAlign = 0
340	TextColor = "&cB8B8B8"
341	TextFont = "System"
342	TextSize = 0
343	Top = 106
344	Underline = ""
345	Visible = True
346	Width = 100
347	End
348	End
349	Begin GroupBox GroupBox2
350	AutoDeactivate = True
351	Bold = ""
352	Caption = ""
353	Enabled = True
354	Height = 202
355	HelpTag = ""
356	Index = -2147483648
357	InitialParent = "TabPanel1"
358	Italic = ""
359	Left = 14
360	LockBottom = ""
361	LockedInPosition= False
362	LockLeft = ""
363	LockRight = ""
364	LockTop = ""
365	Scope = 0
366	TabIndex = 0
367	TabPanelIndex = 3
368	TextFont = "System"
369	TextSize = 0
370	Top = 94
371	Underline = ""
372	Visible = True
373	Width = 608
374	Begin Slider Slider_THGain
375	AutoDeactivate = True
376	Enabled = True
377	Height = 16
378	HelpTag = ""
379	Index = -2147483648
380	InitialParent = "GroupBox2"
381	Left = 322
382	LineStep = 1
383	LiveScroll = ""
384	LockBottom = ""
385	LockedInPosition= False
386	LockLeft = ""
387	LockRight = ""
388	LockTop = ""
389	Maximum = 255
390	Minimum = 1
391	PageStep = 20
392	Scope = 0
393	TabIndex = 0
394	TabPanelIndex = 3
395	TabStop = True
396	Top = 268
397	Value = 0
398	Visible = True
399	Width = 128
400	End
401	Begin EditField EditField_THGain
402	AcceptTabs = ""
403	Alignment = 0
404	AutoDeactivate = True
405	BackColor = &hFFFFFF
406	Bold = ""
407	Border = True
408	DataField = ""
409	DataSource = ""
410	Enabled = True
411	Format = ""
412	Height = 22
413	HelpTag = ""
414	Index = -2147483648
415	InitialParent = "GroupBox2"
416	Italic = ""
417	Left = 462
418	LimitText = 0
419	LockBottom = ""
420	LockedInPosition= False
421	LockLeft = ""
422	LockRight = ""
423	LockTop = ""
424	Mask = "###"
425	Multiline = ""
426	Password = ""
427	ReadOnly = ""
428	Scope = 0
429	ScrollbarHorizontal= ""
430	ScrollbarVertical= True
431	Styled = ""
432	TabIndex = 1
433	TabPanelIndex = 3
434	TabStop = True
435	Text = ""
436	TextColor = &h000000
437	TextFont = "System"
438	TextSize = 0
439	Top = 268
440	Underline = ""
441	UseFocusRing = True
442	Visible = True
443	Width = 32
444	End
445	Begin StaticText StaticText_THGain
446	AutoDeactivate = True
447	Bold = ""
448	DataField = ""
449	DataSource = ""
450	Enabled = True
451	Height = 20
452	HelpTag = ""
453	Index = -2147483648
454	InitialParent = "GroupBox2"
455	Italic = ""
456	Left = 506
457	LockBottom = ""
458	LockedInPosition= False
459	LockLeft = ""
460	LockRight = ""
461	LockTop = ""
462	Multiline = ""
463	Scope = 0
464	TabIndex = 2
465	TabPanelIndex = 3
466	Text = "Throttle Gain"
467	TextAlign = 0
468	TextColor = "&cB8B8B8"
469	TextFont = "System"
470	TextSize = 0
471	Top = 268
472	Underline = ""
473	Visible = True
474	Width = 128
475	End
476	Begin Slider Slider_STGain
477	AutoDeactivate = True
478	Enabled = True
479	Height = 16
480	HelpTag = ""
481	Index = -2147483648
482	InitialParent = "GroupBox2"
483	Left = 322
484	LineStep = 1
485	LiveScroll = ""
486	LockBottom = ""
487	LockedInPosition= False
488	LockLeft = ""
489	LockRight = ""
490	LockTop = ""
491	Maximum = 255
492	Minimum = 1
493	PageStep = 20
494	Scope = 0
495	TabIndex = 3
496	TabPanelIndex = 3
497	TabStop = True
498	Top = 234
499	Value = 0
500	Visible = True
501	Width = 128
502	End
503	Begin EditField EditField_STGain
504	AcceptTabs = ""
505	Alignment = 0
506	AutoDeactivate = True
507	BackColor = &hFFFFFF
508	Bold = ""
509	Border = True
510	DataField = ""
511	DataSource = ""
512	Enabled = True
513	Format = ""
514	Height = 22
515	HelpTag = ""
516	Index = -2147483648
517	InitialParent = "GroupBox2"
518	Italic = ""
519	Left = 462
520	LimitText = 0
521	LockBottom = ""
522	LockedInPosition= False
523	LockLeft = ""
524	LockRight = ""
525	LockTop = ""
526	Mask = "###"
527	Multiline = ""
528	Password = ""
529	ReadOnly = ""
530	Scope = 0
531	ScrollbarHorizontal= ""
532	ScrollbarVertical= True
533	Styled = ""
534	TabIndex = 4
535	TabPanelIndex = 3
536	TabStop = True
537	Text = ""
538	TextColor = &h000000
539	TextFont = "System"
540	TextSize = 0
541	Top = 234
542	Underline = ""
543	UseFocusRing = True
544	Visible = True
545	Width = 32
546	End
547	Begin StaticText StaticText_STGain
548	AutoDeactivate = True
549	Bold = ""
550	DataField = ""
551	DataSource = ""
552	Enabled = True
553	Height = 20
554	HelpTag = ""
555	Index = -2147483648
556	InitialParent = "GroupBox2"
557	Italic = ""
558	Left = 506
559	LockBottom = ""
560	LockedInPosition= False
561	LockLeft = ""
562	LockRight = ""
563	LockTop = ""
564	Multiline = ""
565	Scope = 0
566	TabIndex = 5
567	TabPanelIndex = 3
568	Text = "Steering Gain"
569	TextAlign = 0
570	TextColor = "&cB8B8B8"
571	TextFont = "System"
572	TextSize = 0
573	Top = 234
574	Underline = ""
575	Visible = True
576	Width = 128
577	End
578	Begin PopupMenu PopupMenu_BackTiming
579	AutoDeactivate = True
580	Bold = ""
581	DataField = ""
582	DataSource = ""
583	Enabled = True
584	Height = 20
585	HelpTag = ""
586	Index = -2147483648
587	InitialParent = "GroupBox2"
588	InitialValue = "1\r2\r3\r4\r5\rCustom"
589	Italic = ""
590	Left = 322
591	ListIndex = 0
592	LockBottom = ""
593	LockedInPosition= False
594	LockLeft = ""
595	LockRight = ""
596	LockTop = ""
597	Scope = 0
598	TabIndex = 6
599	TabPanelIndex = 3
600	TabStop = True
601	TextFont = "System"
602	TextSize = 0
603	Top = 202
604	Underline = ""
605	Visible = True
606	Width = 172
607	End
608	Begin StaticText StaticText_BackTiming
609	AutoDeactivate = True
610	Bold = ""
611	DataField = ""
612	DataSource = ""
613	Enabled = True
614	Height = 20
615	HelpTag = ""
616	Index = -2147483648
617	InitialParent = "GroupBox2"
618	Italic = ""
619	Left = 506
620	LockBottom = ""
621	LockedInPosition= False
622	LockLeft = ""
623	LockRight = ""
624	LockTop = ""
625	Multiline = ""
626	Scope = 0
627	TabIndex = 7
628	TabPanelIndex = 3
629	Text = "Back Timing"
630	TextAlign = 0
631	TextColor = "&cB8B8B8"
632	TextFont = "System"
633	TextSize = 0
634	Top = 202
635	Underline = ""
636	Visible = True
637	Width = 128
638	End
639	Begin PopupMenu PopupMenu_VerticalInteria
640	AutoDeactivate = True
641	Bold = ""
642	DataField = ""
643	DataSource = ""
644	Enabled = True
645	Height = 20
646	HelpTag = ""
647	Index = -2147483648
648	InitialParent = "GroupBox2"
649	InitialValue = "Strong\r2\r3\r4\rOff\rCustom"
650	Italic = ""
651	Left = 322
652	ListIndex = 0
653	LockBottom = ""
654	LockedInPosition= False
655	LockLeft = ""
656	LockRight = ""
657	LockTop = ""
658	Scope = 0
659	TabIndex = 8
660	TabPanelIndex = 3
661	TabStop = True
662	TextFont = "System"
663	TextSize = 0
664	Top = 171
665	Underline = ""
666	Visible = True
667	Width = 172
668	End
669	Begin StaticText StaticText_VerticalIntertia
670	AutoDeactivate = True
671	Bold = ""
672	DataField = ""
673	DataSource = ""
674	Enabled = True
675	Height = 20
676	HelpTag = ""
677	Index = -2147483648
678	InitialParent = "GroupBox2"
679	Italic = ""
680	Left = 506
681	LockBottom = ""
682	LockedInPosition= False
683	LockLeft = ""
684	LockRight = ""
685	LockTop = ""
686	Multiline = ""
687	Scope = 0
688	TabIndex = 9
689	TabPanelIndex = 3
690	Text = "Vertical Intertia"
691	TextAlign = 0
692	TextColor = "&cB8B8B8"
693	TextFont = "System"
694	TextSize = 0
695	Top = 171
696	Underline = ""
697	Visible = True
698	Width = 128
699	End
700	Begin PopupMenu PopupMenu_Nuetral
701	AutoDeactivate = True
702	Bold = ""
703	DataField = ""
704	DataSource = ""
705	Enabled = True
706	Height = 20
707	HelpTag = ""
708	Index = -2147483648
709	InitialParent = "GroupBox2"
710	InitialValue = "Narrow\rMid\rWide\rCustom"
711	Italic = ""
712	Left = 322
713	ListIndex = 0
714	LockBottom = ""
715	LockedInPosition= False
716	LockLeft = ""
717	LockRight = ""
718	LockTop = ""
719	Scope = 0
720	TabIndex = 10
721	TabPanelIndex = 3
722	TabStop = True
723	TextFont = "System"
724	TextSize = 0
725	Top = 139
726	Underline = ""
727	Visible = True
728	Width = 172
729	End
730	Begin StaticText StaticText_Nuetral
731	AutoDeactivate = True
732	Bold = ""
733	DataField = ""
734	DataSource = ""
735	Enabled = True
736	Height = 20
737	HelpTag = ""
738	Index = -2147483648
739	InitialParent = "GroupBox2"
740	Italic = ""
741	Left = 506
742	LockBottom = ""
743	LockedInPosition= False
744	LockLeft = ""
745	LockRight = ""
746	LockTop = ""
747	Multiline = ""
748	Scope = 0
749	TabIndex = 11
750	TabPanelIndex = 3
751	Text = "Nuetral"
752	TextAlign = 0
753	TextColor = "&cB8B8B8"
754	TextFont = "System"
755	TextSize = 0
756	Top = 139
757	Underline = ""
758	Visible = True
759	Width = 128
760	End
761	Begin PopupMenu PopupMenu_DFreq
762	AutoDeactivate = True
763	Bold = ""
764	DataField = ""
765	DataSource = ""
766	Enabled = True
767	Height = 20
768	HelpTag = ""
769	Index = -2147483648
770	InitialParent = "GroupBox2"
771	InitialValue = "High\rMedium\rLow\rCustom"
772	Italic = ""
773	Left = 322
774	ListIndex = 0
775	LockBottom = ""
776	LockedInPosition= False
777	LockLeft = ""
778	LockRight = ""
779	LockTop = ""
780	Scope = 0
781	TabIndex = 12
782	TabPanelIndex = 3
783	TabStop = True
784	TextFont = "System"
785	TextSize = 0
786	Top = 107
787	Underline = ""
788	Visible = True
789	Width = 172
790	End
791	Begin StaticText StaticText_DFreq
792	AutoDeactivate = True
793	Bold = ""
794	DataField = ""
795	DataSource = ""
796	Enabled = True
797	Height = 20
798	HelpTag = ""
799	Index = -2147483648
800	InitialParent = "GroupBox2"
801	Italic = ""
802	Left = 506
803	LockBottom = ""
804	LockedInPosition= False
805	LockLeft = ""
806	LockRight = ""
807	LockTop = ""
808	Multiline = ""
809	Scope = 0
810	TabIndex = 13
811	TabPanelIndex = 3
812	Text = "Drive Frequency"
813	TextAlign = 0
814	TextColor = "&cB8B8B8"
815	TextFont = "System"
816	TextSize = 0
817	Top = 106
818	Underline = ""
819	Visible = True
820	Width = 106
821	End
822	Begin PopupMenu PopupMenu_Dump
823	AutoDeactivate = True
824	Bold = ""
825	DataField = ""
826	DataSource = ""
827	Enabled = True
828	Height = 20
829	HelpTag = ""
830	Index = -2147483648
831	InitialParent = "GroupBox2"
832	InitialValue = "Over\rSmooth\rCustom"
833	Italic = ""
834	Left = 26
835	ListIndex = 0
836	LockBottom = ""
837	LockedInPosition= False
838	LockLeft = ""
839	LockRight = ""
840	LockTop = ""
841	Scope = 0
842	TabIndex = 14
843	TabPanelIndex = 3
844	TabStop = True
845	TextFont = "System"
846	TextSize = 0
847	Top = 262
848	Underline = ""
849	Visible = True
850	Width = 172
851	End
852	Begin StaticText StaticText_Dump
853	AutoDeactivate = True
854	Bold = ""
855	DataField = ""
856	DataSource = ""
857	Enabled = True
858	Height = 20
859	HelpTag = ""
860	Index = -2147483648
861	InitialParent = "GroupBox2"
862	Italic = ""
863	Left = 210
864	LockBottom = ""
865	LockedInPosition= False
866	LockLeft = ""
867	LockRight = ""
868	LockTop = ""
869	Multiline = ""
870	Scope = 0
871	TabIndex = 15
872	TabPanelIndex = 3
873	Text = "Dump"
874	TextAlign = 0
875	TextColor = "&cB8B8B8"
876	TextFont = "System"
877	TextSize = 0
878	Top = 262
879	Underline = ""
880	Visible = True
881	Width = 128
882	End
883	Begin PopupMenu PopupMenu_DBand
884	AutoDeactivate = True
885	Bold = ""
886	DataField = ""
887	DataSource = ""
888	Enabled = True
889	Height = 20
890	HelpTag = ""
891	Index = -2147483648
892	InitialParent = "GroupBox2"
893	InitialValue = "Narrow\rMid\rWide\rCustom"
894	Italic = ""
895	Left = 26
896	ListIndex = 0
897	LockBottom = ""
898	LockedInPosition= False
899	LockLeft = ""
900	LockRight = ""
901	LockTop = ""
902	Scope = 0
903	TabIndex = 16
904	TabPanelIndex = 3
905	TabStop = True
906	TextFont = "System"
907	TextSize = 0
908	Top = 230
909	Underline = ""
910	Visible = True
911	Width = 172
912	End
913	Begin StaticText StaticText_DBand
914	AutoDeactivate = True
915	Bold = ""
916	DataField = ""
917	DataSource = ""
918	Enabled = True
919	Height = 20
920	HelpTag = ""
921	Index = -2147483648
922	InitialParent = "GroupBox2"
923	Italic = ""
924	Left = 210
925	LockBottom = ""
926	LockedInPosition= False
927	LockLeft = ""
928	LockRight = ""
929	LockTop = ""
930	Multiline = ""
931	Scope = 0
932	TabIndex = 17
933	TabPanelIndex = 3
934	Text = "Drive Band"
935	TextAlign = 0
936	TextColor = "&cB8B8B8"
937	TextFont = "System"
938	TextSize = 0
939	Top = 230
940	Underline = ""
941	Visible = True
942	Width = 128
943	End
944	Begin Slider Slider_Punch
945	AutoDeactivate = True
946	Enabled = True
947	Height = 16
948	HelpTag = ""
949	Index = -2147483648
950	InitialParent = "GroupBox2"
951	Left = 26
952	LineStep = 1
953	LiveScroll = ""
954	LockBottom = ""
955	LockedInPosition= False
956	LockLeft = ""
957	LockRight = ""
958	LockTop = ""
959	Maximum = 10
960	Minimum = 1
961	PageStep = 20
962	Scope = 0
963	TabIndex = 18
964	TabPanelIndex = 3
965	TabStop = True
966	Top = 202
967	Value = 0
968	Visible = True
969	Width = 128
970	End
971	Begin EditField EditField_Punch
972	AcceptTabs = ""
973	Alignment = 0
974	AutoDeactivate = True
975	BackColor = &hFFFFFF
976	Bold = ""
977	Border = True
978	DataField = ""
979	DataSource = ""
980	Enabled = True
981	Format = ""
982	Height = 22
983	HelpTag = ""
984	Index = -2147483648
985	InitialParent = "GroupBox2"
986	Italic = ""
987	Left = 166
988	LimitText = 0
989	LockBottom = ""
990	LockedInPosition= False
991	LockLeft = ""
992	LockRight = ""
993	LockTop = ""
994	Mask = "###"
995	Multiline = ""
996	Password = ""
997	ReadOnly = ""
998	Scope = 0
999	ScrollbarHorizontal= ""
1000	ScrollbarVertical= True
1001	Styled = ""
1002	TabIndex = 19
1003	TabPanelIndex = 3
1004	TabStop = True
1005	Text = ""
1006	TextColor = &h000000
1007	TextFont = "System"
1008	TextSize = 0
1009	Top = 202
1010	Underline = ""
1011	UseFocusRing = True
1012	Visible = True
1013	Width = 32
1014	End
1015	Begin StaticText StaticText_Punch
1016	AutoDeactivate = True
1017	Bold = ""
1018	DataField = ""
1019	DataSource = ""
1020	Enabled = True
1021	Height = 20
1022	HelpTag = ""
1023	Index = -2147483648
1024	InitialParent = "GroupBox2"
1025	Italic = ""
1026	Left = 210
1027	LockBottom = ""
1028	LockedInPosition= False
1029	LockLeft = ""
1030	LockRight = ""
1031	LockTop = ""
1032	Multiline = ""
1033	Scope = 0
1034	TabIndex = 20
1035	TabPanelIndex = 3
1036	Text = "Punch"
1037	TextAlign = 0
1038	TextColor = "&cB8B8B8"
1039	TextFont = "System"
1040	TextSize = 0
1041	Top = 202
1042	Underline = ""
1043	Visible = True
1044	Width = 128
1045	End
1046	Begin PopupMenu PopupMenu_Speed
1047	AutoDeactivate = True
1048	Bold = ""
1049	DataField = ""
1050	DataSource = ""
1051	Enabled = True
1052	Height = 20
1053	HelpTag = ""
1054	Index = -2147483648
1055	InitialParent = "GroupBox2"
1056	InitialValue = "Slow\r2\r3\r4\rFast\rCustom"
1057	Italic = ""
1058	Left = 26
1059	ListIndex = 0
1060	LockBottom = ""
1061	LockedInPosition= False
1062	LockLeft = ""
1063	LockRight = ""
1064	LockTop = ""
1065	Scope = 0
1066	TabIndex = 21
1067	TabPanelIndex = 3
1068	TabStop = True
1069	TextFont = "System"
1070	TextSize = 0
1071	Top = 170
1072	Underline = ""
1073	Visible = True
1074	Width = 172
1075	End
1076	Begin StaticText StaticText_Speed
1077	AutoDeactivate = True
1078	Bold = ""
1079	DataField = ""
1080	DataSource = ""
1081	Enabled = True
1082	Height = 20
1083	HelpTag = ""
1084	Index = -2147483648
1085	InitialParent = "GroupBox2"
1086	Italic = ""
1087	Left = 210
1088	LockBottom = ""
1089	LockedInPosition= False
1090	LockLeft = ""
1091	LockRight = ""
1092	LockTop = ""
1093	Multiline = ""
1094	Scope = 0
1095	TabIndex = 22
1096	TabPanelIndex = 3
1097	Text = "Speed"
1098	TextAlign = 0
1099	TextColor = "&cB8B8B8"
1100	TextFont = "System"
1101	TextSize = 0
1102	Top = 170
1103	Underline = ""
1104	Visible = True
1105	Width = 100
1106	End
1107	Begin PopupMenu PopupMenu_Gain
1108	AutoDeactivate = True
1109	Bold = ""
1110	DataField = ""
1111	DataSource = ""
1112	Enabled = True
1113	Height = 20
1114	HelpTag = ""
1115	Index = -2147483648
1116	InitialParent = "GroupBox2"
1117	InitialValue = "Min\rMid\rStrong\rCustom"
1118	Italic = ""
1119	Left = 26
1120	ListIndex = 0
1121	LockBottom = ""
1122	LockedInPosition= False
1123	LockLeft = ""
1124	LockRight = ""
1125	LockTop = ""
1126	Scope = 0
1127	TabIndex = 23
1128	TabPanelIndex = 3
1129	TabStop = True
1130	TextFont = "System"
1131	TextSize = 0
1132	Top = 138
1133	Underline = ""
1134	Visible = True
1135	Width = 172
1136	End
1137	Begin StaticText StaticText_Gain
1138	AutoDeactivate = True
1139	Bold = ""
1140	DataField = ""
1141	DataSource = ""
1142	Enabled = True
1143	Height = 20
1144	HelpTag = ""
1145	Index = -2147483648
1146	InitialParent = "GroupBox2"
1147	Italic = ""
1148	Left = 210
1149	LockBottom = ""
1150	LockedInPosition= False
1151	LockLeft = ""
1152	LockRight = ""
1153	LockTop = ""
1154	Multiline = ""
1155	Scope = 0
1156	TabIndex = 24
1157	TabPanelIndex = 3
1158	Text = "Gain"
1159	TextAlign = 0
1160	TextColor = "&cB8B8B8"
1161	TextFont = "System"
1162	TextSize = 0
1163	Top = 139
1164	Underline = ""
1165	Visible = True
1166	Width = 100
1167	End
1168	Begin StaticText StaticText_CarType
1169	AutoDeactivate = True
1170	Bold = ""
1171	DataField = ""
1172	DataSource = ""
1173	Enabled = True
1174	Height = 20
1175	HelpTag = ""
1176	Index = -2147483648
1177	InitialParent = "GroupBox2"
1178	Italic = ""
1179	Left = 210
1180	LockBottom = ""
1181	LockedInPosition= False
1182	LockLeft = ""
1183	LockRight = ""
1184	LockTop = ""
1185	Multiline = ""
1186	Scope = 0
1187	TabIndex = 25
1188	TabPanelIndex = 3
1189	Text = "Car Type"
1190	TextAlign = 0
1191	TextColor = "&cB8B8B8"
1192	TextFont = "System"
1193	TextSize = 0
1194	Top = 106
1195	Underline = ""
1196	Visible = True
1197	Width = 100
1198	End
1199	Begin PopupMenu PopupMenu_CarType
1200	AutoDeactivate = True
1201	Bold = ""
1202	DataField = ""
1203	DataSource = ""
1204	Enabled = True
1205	Height = 20
1206	HelpTag = ""
1207	Index = -2147483648
1208	InitialParent = "GroupBox2"
1209	InitialValue = "MR-03\rdNaNo\rASF"
1210	Italic = ""
1211	Left = 26
1212	ListIndex = 0
1213	LockBottom = ""
1214	LockedInPosition= False
1215	LockLeft = ""
1216	LockRight = ""
1217	LockTop = ""
1218	Scope = 0
1219	TabIndex = 26
1220	TabPanelIndex = 3
1221	TabStop = True
1222	TextFont = "System"
1223	TextSize = 0
1224	Top = 106
1225	Underline = ""
1226	Visible = True
1227	Width = 172
1228	End
1229	End
1230	Begin EditField EditField_Byte1
1231	AcceptTabs = ""
1232	Alignment = 0
1233	AutoDeactivate = True
1234	BackColor = &hFFFFFF
1235	Bold = ""
1236	Border = True
1237	DataField = ""
1238	DataSource = ""
1239	Enabled = False
1240	Format = ""
1241	Height = 22
1242	HelpTag = ""
1243	Index = -2147483648
1244	InitialParent = "TabPanel1"
1245	Italic = ""
1246	Left = 26
1247	LimitText = 0
1248	LockBottom = ""
1249	LockedInPosition= False
1250	LockLeft = ""
1251	LockRight = ""
1252	LockTop = ""
1253	Mask = "###"
1254	Multiline = ""
1255	Password = ""
1256	ReadOnly = ""
1257	Scope = 0
1258	ScrollbarHorizontal= ""
1259	ScrollbarVertical= True
1260	Styled = ""
1261	TabIndex = 2
1262	TabPanelIndex = 4
1263	TabStop = True
1264	Text = ""
1265	TextColor = &h000000
1266	TextFont = "System"
1267	TextSize = 0
1268	Top = 96
1269	Underline = ""
1270	UseFocusRing = True
1271	Visible = True
1272	Width = 32
1273	End
1274	Begin EditField EditField_Byte18
1275	AcceptTabs = ""
1276	Alignment = 0
1277	AutoDeactivate = True
1278	BackColor = &hFFFFFF
1279	Bold = ""
1280	Border = True
1281	DataField = ""
1282	DataSource = ""
1283	Enabled = False
1284	Format = ""
1285	Height = 22
1286	HelpTag = ""
1287	Index = -2147483648
1288	InitialParent = "TabPanel1"
1289	Italic = ""
1290	Left = 316
1291	LimitText = 0
1292	LockBottom = ""
1293	LockedInPosition= False
1294	LockLeft = ""
1295	LockRight = ""
1296	LockTop = ""
1297	Mask = "###"
1298	Multiline = ""
1299	Password = ""
1300	ReadOnly = ""
1301	Scope = 0
1302	ScrollbarHorizontal= ""
1303	ScrollbarVertical= True
1304	Styled = ""
1305	TabIndex = 3
1306	TabPanelIndex = 4
1307	TabStop = True
1308	Text = ""
1309	TextColor = &h000000
1310	TextFont = "System"
1311	TextSize = 0
1312	Top = 266
1313	Underline = ""
1314	UseFocusRing = True
1315	Visible = False
1316	Width = 32
1317	End
1318	Begin EditField EditField_Byte17
1319	AcceptTabs = ""
1320	Alignment = 0
1321	AutoDeactivate = True
1322	BackColor = &hFFFFFF
1323	Bold = ""
1324	Border = True
1325	DataField = ""
1326	DataSource = ""
1327	Enabled = True
1328	Format = ""
1329	Height = 22
1330	HelpTag = ""
1331	Index = -2147483648
1332	InitialParent = "TabPanel1"
1333	Italic = ""
1334	Left = 316
1335	LimitText = 0
1336	LockBottom = ""
1337	LockedInPosition= False
1338	LockLeft = ""
1339	LockRight = ""
1340	LockTop = ""
1341	Mask = "###"
1342	Multiline = ""
1343	Password = ""
1344	ReadOnly = ""
1345	Scope = 0
1346	ScrollbarHorizontal= ""
1347	ScrollbarVertical= True
1348	Styled = ""
1349	TabIndex = 4
1350	TabPanelIndex = 4
1351	TabStop = True
1352	Text = ""
1353	TextColor = &h000000
1354	TextFont = "System"
1355	TextSize = 0
1356	Top = 232
1357	Underline = ""
1358	UseFocusRing = True
1359	Visible = True
1360	Width = 32
1361	End
1362	Begin EditField EditField_Byte16
1363	AcceptTabs = ""
1364	Alignment = 0
1365	AutoDeactivate = True
1366	BackColor = &hFFFFFF
1367	Bold = ""
1368	Border = True
1369	DataField = ""
1370	DataSource = ""
1371	Enabled = True
1372	Format = ""
1373	Height = 22
1374	HelpTag = ""
1375	Index = -2147483648
1376	InitialParent = "TabPanel1"
1377	Italic = ""
1378	Left = 316
1379	LimitText = 0
1380	LockBottom = ""
1381	LockedInPosition= False
1382	LockLeft = ""
1383	LockRight = ""
1384	LockTop = ""
1385	Mask = "###"
1386	Multiline = ""
1387	Password = ""
1388	ReadOnly = ""
1389	Scope = 0
1390	ScrollbarHorizontal= ""
1391	ScrollbarVertical= True
1392	Styled = ""
1393	TabIndex = 5
1394	TabPanelIndex = 4
1395	TabStop = True
1396	Text = ""
1397	TextColor = &h000000
1398	TextFont = "System"
1399	TextSize = 0
1400	Top = 198
1401	Underline = ""
1402	UseFocusRing = True
1403	Visible = True
1404	Width = 32
1405	End
1406	Begin EditField EditField_Byte15
1407	AcceptTabs = ""
1408	Alignment = 0
1409	AutoDeactivate = True
1410	BackColor = &hFFFFFF
1411	Bold = ""
1412	Border = True
1413	DataField = ""
1414	DataSource = ""
1415	Enabled = True
1416	Format = ""
1417	Height = 22
1418	HelpTag = ""
1419	Index = -2147483648
1420	InitialParent = "TabPanel1"
1421	Italic = ""
1422	Left = 316
1423	LimitText = 0
1424	LockBottom = ""
1425	LockedInPosition= False
1426	LockLeft = ""
1427	LockRight = ""
1428	LockTop = ""
1429	Mask = "###"
1430	Multiline = ""
1431	Password = ""
1432	ReadOnly = ""
1433	Scope = 0
1434	ScrollbarHorizontal= ""
1435	ScrollbarVertical= True
1436	Styled = ""
1437	TabIndex = 6
1438	TabPanelIndex = 4
1439	TabStop = True
1440	Text = ""
1441	TextColor = &h000000
1442	TextFont = "System"
1443	TextSize = 0
1444	Top = 164
1445	Underline = ""
1446	UseFocusRing = True
1447	Visible = True
1448	Width = 32
1449	End
1450	Begin EditField EditField_Byte14
1451	AcceptTabs = ""
1452	Alignment = 0
1453	AutoDeactivate = True
1454	BackColor = &hFFFFFF
1455	Bold = ""
1456	Border = True
1457	DataField = ""
1458	DataSource = ""
1459	Enabled = True
1460	Format = ""
1461	Height = 22
1462	HelpTag = ""
1463	Index = -2147483648
1464	InitialParent = "TabPanel1"
1465	Italic = ""
1466	Left = 316
1467	LimitText = 0
1468	LockBottom = ""
1469	LockedInPosition= False
1470	LockLeft = ""
1471	LockRight = ""
1472	LockTop = ""
1473	Mask = "###"
1474	Multiline = ""
1475	Password = ""
1476	ReadOnly = ""
1477	Scope = 0
1478	ScrollbarHorizontal= ""
1479	ScrollbarVertical= True
1480	Styled = ""
1481	TabIndex = 7
1482	TabPanelIndex = 4
1483	TabStop = True
1484	Text = ""
1485	TextColor = &h000000
1486	TextFont = "System"
1487	TextSize = 0
1488	Top = 130
1489	Underline = ""
1490	UseFocusRing = True
1491	Visible = True
1492	Width = 32
1493	End
1494	Begin EditField EditField_Byte13
1495	AcceptTabs = ""
1496	Alignment = 0
1497	AutoDeactivate = True
1498	BackColor = &hFFFFFF
1499	Bold = ""
1500	Border = True
1501	DataField = ""
1502	DataSource = ""
1503	Enabled = True
1504	Format = ""
1505	Height = 22
1506	HelpTag = ""
1507	Index = -2147483648
1508	InitialParent = "TabPanel1"
1509	Italic = ""
1510	Left = 316
1511	LimitText = 0
1512	LockBottom = ""
1513	LockedInPosition= False
1514	LockLeft = ""
1515	LockRight = ""
1516	LockTop = ""
1517	Mask = "###"
1518	Multiline = ""
1519	Password = ""
1520	ReadOnly = ""
1521	Scope = 0
1522	ScrollbarHorizontal= ""
1523	ScrollbarVertical= True
1524	Styled = ""
1525	TabIndex = 8
1526	TabPanelIndex = 4
1527	TabStop = True
1528	Text = ""
1529	TextColor = &h000000
1530	TextFont = "System"
1531	TextSize = 0
1532	Top = 95
1533	Underline = ""
1534	UseFocusRing = True
1535	Visible = True
1536	Width = 32
1537	End
1538	Begin EditField EditField_Byte12
1539	AcceptTabs = ""
1540	Alignment = 0
1541	AutoDeactivate = True
1542	BackColor = &hFFFFFF
1543	Bold = ""
1544	Border = True
1545	DataField = ""
1546	DataSource = ""
1547	Enabled = True
1548	Format = ""
1549	Height = 22
1550	HelpTag = ""
1551	Index = -2147483648
1552	InitialParent = "TabPanel1"
1553	Italic = ""
1554	Left = 154
1555	LimitText = 0
1556	LockBottom = ""
1557	LockedInPosition= False
1558	LockLeft = ""
1559	LockRight = ""
1560	LockTop = ""
1561	Mask = "###"
1562	Multiline = ""
1563	Password = ""
1564	ReadOnly = ""
1565	Scope = 0
1566	ScrollbarHorizontal= ""
1567	ScrollbarVertical= True
1568	Styled = ""
1569	TabIndex = 9
1570	TabPanelIndex = 4
1571	TabStop = True
1572	Text = ""
1573	TextColor = &h000000
1574	TextFont = "System"
1575	TextSize = 0
1576	Top = 266
1577	Underline = ""
1578	UseFocusRing = True
1579	Visible = True
1580	Width = 32
1581	End
1582	Begin EditField EditField_Byte11
1583	AcceptTabs = ""
1584	Alignment = 0
1585	AutoDeactivate = True
1586	BackColor = &hFFFFFF
1587	Bold = ""
1588	Border = True
1589	DataField = ""
1590	DataSource = ""
1591	Enabled = True
1592	Format = ""
1593	Height = 22
1594	HelpTag = ""
1595	Index = -2147483648
1596	InitialParent = "TabPanel1"
1597	Italic = ""
1598	Left = 154
1599	LimitText = 0
1600	LockBottom = ""
1601	LockedInPosition= False
1602	LockLeft = ""
1603	LockRight = ""
1604	LockTop = ""
1605	Mask = "###"
1606	Multiline = ""
1607	Password = ""
1608	ReadOnly = ""
1609	Scope = 0
1610	ScrollbarHorizontal= ""
1611	ScrollbarVertical= True
1612	Styled = ""
1613	TabIndex = 10
1614	TabPanelIndex = 4
1615	TabStop = True
1616	Text = ""
1617	TextColor = &h000000
1618	TextFont = "System"
1619	TextSize = 0
1620	Top = 232
1621	Underline = ""
1622	UseFocusRing = True
1623	Visible = True
1624	Width = 32
1625	End
1626	Begin EditField EditField_Byte10
1627	AcceptTabs = ""
1628	Alignment = 0
1629	AutoDeactivate = True
1630	BackColor = &hFFFFFF
1631	Bold = ""
1632	Border = True
1633	DataField = ""
1634	DataSource = ""
1635	Enabled = True
1636	Format = ""
1637	Height = 22
1638	HelpTag = ""
1639	Index = -2147483648
1640	InitialParent = "TabPanel1"
1641	Italic = ""
1642	Left = 154
1643	LimitText = 0
1644	LockBottom = ""
1645	LockedInPosition= False
1646	LockLeft = ""
1647	LockRight = ""
1648	LockTop = ""
1649	Mask = "###"
1650	Multiline = ""
1651	Password = ""
1652	ReadOnly = ""
1653	Scope = 0
1654	ScrollbarHorizontal= ""
1655	ScrollbarVertical= True
1656	Styled = ""
1657	TabIndex = 11
1658	TabPanelIndex = 4
1659	TabStop = True
1660	Text = ""
1661	TextColor = &h000000
1662	TextFont = "System"
1663	TextSize = 0
1664	Top = 198
1665	Underline = ""
1666	UseFocusRing = True
1667	Visible = True
1668	Width = 32
1669	End
1670	Begin EditField EditField_Byte9
1671	AcceptTabs = ""
1672	Alignment = 0
1673	AutoDeactivate = True
1674	BackColor = &hFFFFFF
1675	Bold = ""
1676	Border = True
1677	DataField = ""
1678	DataSource = ""
1679	Enabled = True
1680	Format = ""
1681	Height = 22
1682	HelpTag = ""
1683	Index = -2147483648
1684	InitialParent = "TabPanel1"
1685	Italic = ""
1686	Left = 154
1687	LimitText = 0
1688	LockBottom = ""
1689	LockedInPosition= False
1690	LockLeft = ""
1691	LockRight = ""
1692	LockTop = ""
1693	Mask = "###"
1694	Multiline = ""
1695	Password = ""
1696	ReadOnly = ""
1697	Scope = 0
1698	ScrollbarHorizontal= ""
1699	ScrollbarVertical= True
1700	Styled = ""
1701	TabIndex = 12
1702	TabPanelIndex = 4
1703	TabStop = True
1704	Text = ""
1705	TextColor = &h000000
1706	TextFont = "System"
1707	TextSize = 0
1708	Top = 164
1709	Underline = ""
1710	UseFocusRing = True
1711	Visible = True
1712	Width = 32
1713	End
1714	Begin EditField EditField_Byte8
1715	AcceptTabs = ""
1716	Alignment = 0
1717	AutoDeactivate = True
1718	BackColor = &hFFFFFF
1719	Bold = ""
1720	Border = True
1721	DataField = ""
1722	DataSource = ""
1723	Enabled = True
1724	Format = ""
1725	Height = 22
1726	HelpTag = ""
1727	Index = -2147483648
1728	InitialParent = "TabPanel1"
1729	Italic = ""
1730	Left = 154
1731	LimitText = 0
1732	LockBottom = ""
1733	LockedInPosition= False
1734	LockLeft = ""
1735	LockRight = ""
1736	LockTop = ""
1737	Mask = "###"
1738	Multiline = ""
1739	Password = ""
1740	ReadOnly = ""
1741	Scope = 0
1742	ScrollbarHorizontal= ""
1743	ScrollbarVertical= True
1744	Styled = ""
1745	TabIndex = 13
1746	TabPanelIndex = 4
1747	TabStop = True
1748	Text = ""
1749	TextColor = &h000000
1750	TextFont = "System"
1751	TextSize = 0
1752	Top = 129
1753	Underline = ""
1754	UseFocusRing = True
1755	Visible = True
1756	Width = 32
1757	End
1758	Begin EditField EditField_Byte7
1759	AcceptTabs = ""
1760	Alignment = 0
1761	AutoDeactivate = True
1762	BackColor = &hFFFFFF
1763	Bold = ""
1764	Border = True
1765	DataField = ""
1766	DataSource = ""
1767	Enabled = True
1768	Format = ""
1769	Height = 22
1770	HelpTag = ""
1771	Index = -2147483648
1772	InitialParent = "TabPanel1"
1773	Italic = ""
1774	Left = 154
1775	LimitText = 0
1776	LockBottom = ""
1777	LockedInPosition= False
1778	LockLeft = ""
1779	LockRight = ""
1780	LockTop = ""
1781	Mask = "###"
1782	Multiline = ""
1783	Password = ""
1784	ReadOnly = ""
1785	Scope = 0
1786	ScrollbarHorizontal= ""
1787	ScrollbarVertical= True
1788	Styled = ""
1789	TabIndex = 14
1790	TabPanelIndex = 4
1791	TabStop = True
1792	Text = ""
1793	TextColor = &h000000
1794	TextFont = "System"
1795	TextSize = 0
1796	Top = 95
1797	Underline = ""
1798	UseFocusRing = True
1799	Visible = True
1800	Width = 32
1801	End
1802	Begin EditField EditField_Byte6
1803	AcceptTabs = ""
1804	Alignment = 0
1805	AutoDeactivate = True
1806	BackColor = &hFFFFFF
1807	Bold = ""
1808	Border = True
1809	DataField = ""
1810	DataSource = ""
1811	Enabled = True
1812	Format = ""
1813	Height = 22
1814	HelpTag = ""
1815	Index = -2147483648
1816	InitialParent = "TabPanel1"
1817	Italic = ""
1818	Left = 26
1819	LimitText = 0
1820	LockBottom = ""
1821	LockedInPosition= False
1822	LockLeft = ""
1823	LockRight = ""
1824	LockTop = ""
1825	Mask = "###"
1826	Multiline = ""
1827	Password = ""
1828	ReadOnly = ""
1829	Scope = 0
1830	ScrollbarHorizontal= ""
1831	ScrollbarVertical= True
1832	Styled = ""
1833	TabIndex = 15
1834	TabPanelIndex = 4
1835	TabStop = True
1836	Text = ""
1837	TextColor = &h000000
1838	TextFont = "System"
1839	TextSize = 0
1840	Top = 266
1841	Underline = ""
1842	UseFocusRing = True
1843	Visible = True
1844	Width = 32
1845	End
1846	Begin EditField EditField_Byte5
1847	AcceptTabs = ""
1848	Alignment = 0
1849	AutoDeactivate = True
1850	BackColor = &hFFFFFF
1851	Bold = ""
1852	Border = True
1853	DataField = ""
1854	DataSource = ""
1855	Enabled = True
1856	Format = ""
1857	Height = 22
1858	HelpTag = ""
1859	Index = -2147483648
1860	InitialParent = "TabPanel1"
1861	Italic = ""
1862	Left = 26
1863	LimitText = 0
1864	LockBottom = ""
1865	LockedInPosition= False
1866	LockLeft = ""
1867	LockRight = ""
1868	LockTop = ""
1869	Mask = "###"
1870	Multiline = ""
1871	Password = ""
1872	ReadOnly = ""
1873	Scope = 0
1874	ScrollbarHorizontal= ""
1875	ScrollbarVertical= True
1876	Styled = ""
1877	TabIndex = 16
1878	TabPanelIndex = 4
1879	TabStop = True
1880	Text = ""
1881	TextColor = &h000000
1882	TextFont = "System"
1883	TextSize = 0
1884	Top = 233
1885	Underline = ""
1886	UseFocusRing = True
1887	Visible = True
1888	Width = 32
1889	End
1890	Begin EditField EditField_Byte4
1891	AcceptTabs = ""
1892	Alignment = 0
1893	AutoDeactivate = True
1894	BackColor = &hFFFFFF
1895	Bold = ""
1896	Border = True
1897	DataField = ""
1898	DataSource = ""
1899	Enabled = True
1900	Format = ""
1901	Height = 22
1902	HelpTag = ""
1903	Index = -2147483648
1904	InitialParent = "TabPanel1"
1905	Italic = ""
1906	Left = 26
1907	LimitText = 0
1908	LockBottom = ""
1909	LockedInPosition= False
1910	LockLeft = ""
1911	LockRight = ""
1912	LockTop = ""
1913	Mask = "###"
1914	Multiline = ""
1915	Password = ""
1916	ReadOnly = ""
1917	Scope = 0
1918	ScrollbarHorizontal= ""
1919	ScrollbarVertical= True
1920	Styled = ""
1921	TabIndex = 17
1922	TabPanelIndex = 4
1923	TabStop = True
1924	Text = ""
1925	TextColor = &h000000
1926	TextFont = "System"
1927	TextSize = 0
1928	Top = 199
1929	Underline = ""
1930	UseFocusRing = True
1931	Visible = True
1932	Width = 32
1933	End
1934	Begin EditField EditField_Byte3
1935	AcceptTabs = ""
1936	Alignment = 0
1937	AutoDeactivate = True
1938	BackColor = &hFFFFFF
1939	Bold = ""
1940	Border = True
1941	DataField = ""
1942	DataSource = ""
1943	Enabled = True
1944	Format = ""
1945	Height = 22
1946	HelpTag = ""
1947	Index = -2147483648
1948	InitialParent = "TabPanel1"
1949	Italic = ""
1950	Left = 26
1951	LimitText = 0
1952	LockBottom = ""
1953	LockedInPosition= False
1954	LockLeft = ""
1955	LockRight = ""
1956	LockTop = ""
1957	Mask = "###"
1958	Multiline = ""
1959	Password = ""
1960	ReadOnly = ""
1961	Scope = 0
1962	ScrollbarHorizontal= ""
1963	ScrollbarVertical= True
1964	Styled = ""
1965	TabIndex = 18
1966	TabPanelIndex = 4
1967	TabStop = True
1968	Text = ""
1969	TextColor = &h000000
1970	TextFont = "System"
1971	TextSize = 0
1972	Top = 164
1973	Underline = ""
1974	UseFocusRing = True
1975	Visible = True
1976	Width = 32
1977	End
1978	Begin EditField EditField_Byte2
1979	AcceptTabs = ""
1980	Alignment = 0
1981	AutoDeactivate = True
1982	BackColor = &hFFFFFF
1983	Bold = ""
1984	Border = True
1985	DataField = ""
1986	DataSource = ""
1987	Enabled = False
1988	Format = ""
1989	Height = 22
1990	HelpTag = ""
1991	Index = -2147483648
1992	InitialParent = "TabPanel1"
1993	Italic = ""
1994	Left = 26
1995	LimitText = 0
1996	LockBottom = ""
1997	LockedInPosition= False
1998	LockLeft = ""
1999	LockRight = ""
2000	LockTop = ""
2001	Mask = "###"
2002	Multiline = ""
2003	Password = ""
2004	ReadOnly = ""
2005	Scope = 0
2006	ScrollbarHorizontal= ""
2007	ScrollbarVertical= True
2008	Styled = ""
2009	TabIndex = 19
2010	TabPanelIndex = 4
2011	TabStop = True
2012	Text = ""
2013	TextColor = &h000000
2014	TextFont = "System"
2015	TextSize = 0
2016	Top = 130
2017	Underline = ""
2018	UseFocusRing = True
2019	Visible = True
2020	Width = 32
2021	End
2022	Begin StaticText StaticText_Byte1
2023	AutoDeactivate = True
2024	Bold = ""
2025	DataField = ""
2026	DataSource = ""
2027	Enabled = True
2028	Height = 20
2029	HelpTag = ""
2030	Index = -2147483648
2031	InitialParent = "TabPanel1"
2032	Italic = ""
2033	Left = 70
2034	LockBottom = ""
2035	LockedInPosition= False
2036	LockLeft = ""
2037	LockRight = ""
2038	LockTop = ""
2039	Multiline = ""
2040	Scope = 0
2041	TabIndex = 21
2042	TabPanelIndex = 4
2043	Text = "Header"
2044	TextAlign = 0
2045	TextColor = "&cB8B8B8"
2046	TextFont = "System"
2047	TextSize = 0
2048	Top = 96
2049	Underline = ""
2050	Visible = True
2051	Width = 106
2052	End
2053	Begin StaticText StaticText_Byte6
2054	AutoDeactivate = True
2055	Bold = ""
2056	DataField = ""
2057	DataSource = ""
2058	Enabled = True
2059	Height = 20
2060	HelpTag = ""
2061	Index = -2147483648
2062	InitialParent = "TabPanel1"
2063	Italic = ""
2064	Left = 70
2065	LockBottom = ""
2066	LockedInPosition= False
2067	LockLeft = ""
2068	LockRight = ""
2069	LockTop = ""
2070	Multiline = ""
2071	Scope = 0
2072	TabIndex = 22
2073	TabPanelIndex = 4
2074	Text = "Drive Band"
2075	TextAlign = 0
2076	TextColor = "&cB8B8B8"
2077	TextFont = "System"
2078	TextSize = 0
2079	Top = 266
2080	Underline = ""
2081	Visible = True
2082	Width = 106
2083	End
2084	Begin StaticText StaticText_Byte5
2085	AutoDeactivate = True
2086	Bold = ""
2087	DataField = ""
2088	DataSource = ""
2089	Enabled = True
2090	Height = 20
2091	HelpTag = ""
2092	Index = -2147483648
2093	InitialParent = "TabPanel1"
2094	Italic = ""
2095	Left = 70
2096	LockBottom = ""
2097	LockedInPosition= False
2098	LockLeft = ""
2099	LockRight = ""
2100	LockTop = ""
2101	Multiline = ""
2102	Scope = 0
2103	TabIndex = 23
2104	TabPanelIndex = 4
2105	Text = "Punch"
2106	TextAlign = 0
2107	TextColor = "&cB8B8B8"
2108	TextFont = "System"
2109	TextSize = 0
2110	Top = 232
2111	Underline = ""
2112	Visible = True
2113	Width = 106
2114	End
2115	Begin StaticText StaticText_Byte4
2116	AutoDeactivate = True
2117	Bold = ""
2118	DataField = ""
2119	DataSource = ""
2120	Enabled = True
2121	Height = 20
2122	HelpTag = ""
2123	Index = -2147483648
2124	InitialParent = "TabPanel1"
2125	Italic = ""
2126	Left = 70
2127	LockBottom = ""
2128	LockedInPosition= False
2129	LockLeft = ""
2130	LockRight = ""
2131	LockTop = ""
2132	Multiline = ""
2133	Scope = 0
2134	TabIndex = 24
2135	TabPanelIndex = 4
2136	Text = "Speed"
2137	TextAlign = 0
2138	TextColor = "&cB8B8B8"
2139	TextFont = "System"
2140	TextSize = 0
2141	Top = 200
2142	Underline = ""
2143	Visible = True
2144	Width = 106
2145	End
2146	Begin StaticText StaticText_Byte3
2147	AutoDeactivate = True
2148	Bold = ""
2149	DataField = ""
2150	DataSource = ""
2151	Enabled = True
2152	Height = 20
2153	HelpTag = ""
2154	Index = -2147483648
2155	InitialParent = "TabPanel1"
2156	Italic = ""
2157	Left = 70
2158	LockBottom = ""
2159	LockedInPosition= False
2160	LockLeft = ""
2161	LockRight = ""
2162	LockTop = ""
2163	Multiline = ""
2164	Scope = 0
2165	TabIndex = 25
2166	TabPanelIndex = 4
2167	Text = "Gain"
2168	TextAlign = 0
2169	TextColor = "&cB8B8B8"
2170	TextFont = "System"
2171	TextSize = 0
2172	Top = 164
2173	Underline = ""
2174	Visible = True
2175	Width = 106
2176	End
2177	Begin StaticText StaticText_Byte2
2178	AutoDeactivate = True
2179	Bold = ""
2180	DataField = ""
2181	DataSource = ""
2182	Enabled = True
2183	Height = 20
2184	HelpTag = ""
2185	Index = -2147483648
2186	InitialParent = "TabPanel1"
2187	Italic = ""
2188	Left = 70
2189	LockBottom = ""
2190	LockedInPosition= False
2191	LockLeft = ""
2192	LockRight = ""
2193	LockTop = ""
2194	Multiline = ""
2195	Scope = 0
2196	TabIndex = 26
2197	TabPanelIndex = 4
2198	Text = "Header"
2199	TextAlign = 0
2200	TextColor = "&cB8B8B8"
2201	TextFont = "System"
2202	TextSize = 0
2203	Top = 130
2204	Underline = ""
2205	Visible = True
2206	Width = 106
2207	End
2208	Begin StaticText StaticText_Byte7
2209	AutoDeactivate = True
2210	Bold = ""
2211	DataField = ""
2212	DataSource = ""
2213	Enabled = True
2214	Height = 20
2215	HelpTag = ""
2216	Index = -2147483648
2217	InitialParent = "TabPanel1"
2218	Italic = ""
2219	Left = 200
2220	LockBottom = ""
2221	LockedInPosition= False
2222	LockLeft = ""
2223	LockRight = ""
2224	LockTop = ""
2225	Multiline = ""
2226	Scope = 0
2227	TabIndex = 27
2228	TabPanelIndex = 4
2229	Text = "Dump"
2230	TextAlign = 0
2231	TextColor = "&cB8B8B8"
2232	TextFont = "System"
2233	TextSize = 0
2234	Top = 97
2235	Underline = ""
2236	Visible = True
2237	Width = 106
2238	End
2239	Begin StaticText StaticText_Byte8
2240	AutoDeactivate = True
2241	Bold = ""
2242	DataField = ""
2243	DataSource = ""
2244	Enabled = True
2245	Height = 20
2246	HelpTag = ""
2247	Index = -2147483648
2248	InitialParent = "TabPanel1"
2249	Italic = ""
2250	Left = 200
2251	LockBottom = ""
2252	LockedInPosition= False
2253	LockLeft = ""
2254	LockRight = ""
2255	LockTop = ""
2256	Multiline = ""
2257	Scope = 0
2258	TabIndex = 28
2259	TabPanelIndex = 4
2260	Text = "Drive Frequency"
2261	TextAlign = 0
2262	TextColor = "&cB8B8B8"
2263	TextFont = "System"
2264	TextSize = 0
2265	Top = 130
2266	Underline = ""
2267	Visible = True
2268	Width = 106
2269	End
2270	Begin StaticText StaticText_Byte9
2271	AutoDeactivate = True
2272	Bold = ""
2273	DataField = ""
2274	DataSource = ""
2275	Enabled = True
2276	Height = 20
2277	HelpTag = ""
2278	Index = -2147483648
2279	InitialParent = "TabPanel1"
2280	Italic = ""
2281	Left = 198
2282	LockBottom = ""
2283	LockedInPosition= False
2284	LockLeft = ""
2285	LockRight = ""
2286	LockTop = ""
2287	Multiline = ""
2288	Scope = 0
2289	TabIndex = 29
2290	TabPanelIndex = 4
2291	Text = "Unknown"
2292	TextAlign = 0
2293	TextColor = "&cB8B8B8"
2294	TextFont = "System"
2295	TextSize = 0
2296	Top = 166
2297	Underline = ""
2298	Visible = True
2299	Width = 106
2300	End
2301	Begin StaticText StaticText_Byte10
2302	AutoDeactivate = True
2303	Bold = ""
2304	DataField = ""
2305	DataSource = ""
2306	Enabled = True
2307	Height = 20
2308	HelpTag = ""
2309	Index = -2147483648
2310	InitialParent = "TabPanel1"
2311	Italic = ""
2312	Left = 200
2313	LockBottom = ""
2314	LockedInPosition= False
2315	LockLeft = ""
2316	LockRight = ""
2317	LockTop = ""
2318	Multiline = ""
2319	Scope = 0
2320	TabIndex = 30
2321	TabPanelIndex = 4
2322	Text = "Unknown"
2323	TextAlign = 0
2324	TextColor = "&cB8B8B8"
2325	TextFont = "System"
2326	TextSize = 0
2327	Top = 200
2328	Underline = ""
2329	Visible = True
2330	Width = 106
2331	End
2332	Begin StaticText StaticText_Byte11
2333	AutoDeactivate = True
2334	Bold = ""
2335	DataField = ""
2336	DataSource = ""
2337	Enabled = True
2338	Height = 20
2339	HelpTag = ""
2340	Index = -2147483648
2341	InitialParent = "TabPanel1"
2342	Italic = ""
2343	Left = 198
2344	LockBottom = ""
2345	LockedInPosition= False
2346	LockLeft = ""
2347	LockRight = ""
2348	LockTop = ""
2349	Multiline = ""
2350	Scope = 0
2351	TabIndex = 31
2352	TabPanelIndex = 4
2353	Text = "Neutral Low"
2354	TextAlign = 0
2355	TextColor = "&cB8B8B8"
2356	TextFont = "System"
2357	TextSize = 0
2358	Top = 233
2359	Underline = ""
2360	Visible = True
2361	Width = 106
2362	End
2363	Begin StaticText StaticText_Byte12
2364	AutoDeactivate = True
2365	Bold = ""
2366	DataField = ""
2367	DataSource = ""
2368	Enabled = True
2369	Height = 20
2370	HelpTag = ""
2371	Index = -2147483648
2372	InitialParent = "TabPanel1"
2373	Italic = ""
2374	Left = 198
2375	LockBottom = ""
2376	LockedInPosition= False
2377	LockLeft = ""
2378	LockRight = ""
2379	LockTop = ""
2380	Multiline = ""
2381	Scope = 0
2382	TabIndex = 32
2383	TabPanelIndex = 4
2384	Text = "Neutral High"
2385	TextAlign = 0
2386	TextColor = "&cB8B8B8"
2387	TextFont = "System"
2388	TextSize = 0
2389	Top = 266
2390	Underline = ""
2391	Visible = True
2392	Width = 106
2393	End
2394	Begin StaticText StaticText_Byte13
2395	AutoDeactivate = True
2396	Bold = ""
2397	DataField = ""
2398	DataSource = ""
2399	Enabled = True
2400	Height = 20
2401	HelpTag = ""
2402	Index = -2147483648
2403	InitialParent = "TabPanel1"
2404	Italic = ""
2405	Left = 360
2406	LockBottom = ""
2407	LockedInPosition= False
2408	LockLeft = ""
2409	LockRight = ""
2410	LockTop = ""
2411	Multiline = ""
2412	Scope = 0
2413	TabIndex = 33
2414	TabPanelIndex = 4
2415	Text = "Vertical Inertia"
2416	TextAlign = 0
2417	TextColor = "&cB8B8B8"
2418	TextFont = "System"
2419	TextSize = 0
2420	Top = 97
2421	Underline = ""
2422	Visible = True
2423	Width = 106
2424	End
2425	Begin StaticText StaticText_Byte14
2426	AutoDeactivate = True
2427	Bold = ""
2428	DataField = ""
2429	DataSource = ""
2430	Enabled = True
2431	Height = 20
2432	HelpTag = ""
2433	Index = -2147483648
2434	InitialParent = "TabPanel1"
2435	Italic = ""
2436	Left = 360
2437	LockBottom = ""
2438	LockedInPosition= False
2439	LockLeft = ""
2440	LockRight = ""
2441	LockTop = ""
2442	Multiline = False
2443	Scope = 0
2444	TabIndex = 34
2445	TabPanelIndex = 4
2446	Text = "Unknown"
2447	TextAlign = 0
2448	TextColor = "&cB8B8B8"
2449	TextFont = "System"
2450	TextSize = 0
2451	Top = 131
2452	Underline = ""
2453	Visible = True
2454	Width = 106
2455	End
2456	Begin StaticText StaticText_Byte15
2457	AutoDeactivate = True
2458	Bold = ""
2459	DataField = ""
2460	DataSource = ""
2461	Enabled = True
2462	Height = 20
2463	HelpTag = ""
2464	Index = -2147483648
2465	InitialParent = "TabPanel1"
2466	Italic = ""
2467	Left = 360
2468	LockBottom = ""
2469	LockedInPosition= False
2470	LockLeft = ""
2471	LockRight = ""
2472	LockTop = ""
2473	Multiline = ""
2474	Scope = 0
2475	TabIndex = 35
2476	TabPanelIndex = 4
2477	Text = "Back Timing"
2478	TextAlign = 0
2479	TextColor = "&cB8B8B8"
2480	TextFont = "System"
2481	TextSize = 0
2482	Top = 165
2483	Underline = ""
2484	Visible = True
2485	Width = 106
2486	End
2487	Begin StaticText StaticText_Byte16
2488	AutoDeactivate = True
2489	Bold = ""
2490	DataField = ""
2491	DataSource = ""
2492	Enabled = True
2493	Height = 20
2494	HelpTag = ""
2495	Index = -2147483648
2496	InitialParent = "TabPanel1"
2497	Italic = ""
2498	Left = 360
2499	LockBottom = ""
2500	LockedInPosition= False
2501	LockLeft = ""
2502	LockRight = ""
2503	LockTop = ""
2504	Multiline = ""
2505	Scope = 0
2506	TabIndex = 36
2507	TabPanelIndex = 4
2508	Text = "Steering Gain"
2509	TextAlign = 0
2510	TextColor = "&cB8B8B8"
2511	TextFont = "System"
2512	TextSize = 0
2513	Top = 199
2514	Underline = ""
2515	Visible = True
2516	Width = 106
2517	End
2518	Begin StaticText StaticText_Byte17
2519	AutoDeactivate = True
2520	Bold = ""
2521	DataField = ""
2522	DataSource = ""
2523	Enabled = True
2524	Height = 20
2525	HelpTag = ""
2526	Index = -2147483648
2527	InitialParent = "TabPanel1"
2528	Italic = ""
2529	Left = 360
2530	LockBottom = ""
2531	LockedInPosition= False
2532	LockLeft = ""
2533	LockRight = ""
2534	LockTop = ""
2535	Multiline = ""
2536	Scope = 0
2537	TabIndex = 37
2538	TabPanelIndex = 4
2539	Text = "Throttle Gain"
2540	TextAlign = 0
2541	TextColor = "&cB8B8B8"
2542	TextFont = "System"
2543	TextSize = 0
2544	Top = 233
2545	Underline = ""
2546	Visible = True
2547	Width = 106
2548	End
2549	Begin StaticText StaticText_Byte18
2550	AutoDeactivate = True
2551	Bold = ""
2552	DataField = ""
2553	DataSource = ""
2554	Enabled = True
2555	Height = 20
2556	HelpTag = ""
2557	Index = -2147483648
2558	InitialParent = "TabPanel1"
2559	Italic = ""
2560	Left = 360
2561	LockBottom = ""
2562	LockedInPosition= False
2563	LockLeft = ""
2564	LockRight = ""
2565	LockTop = ""
2566	Multiline = ""
2567	Scope = 0
2568	TabIndex = 38
2569	TabPanelIndex = 4
2570	Text = "Checksum"
2571	TextAlign = 0
2572	TextColor = "&cB8B8B8"
2573	TextFont = "System"
2574	TextSize = 0
2575	Top = 267
2576	Underline = ""
2577	Visible = False
2578	Width = 106
2579	End
2580	End
2581	Begin ICSSerialPort ICSSerialPort1
2582	Baud = 8
2583	Bits = 3
2584	byte01 = &hFF
2585	carType = "MR-03"
2586	CTS = ""
2587	DTR = ""
2588	Height = 32
2589	Index = -2147483648
2590	Left = 716
2591	LockedInPosition= False
2592	mode = "read"
2593	Parity = 0
2594	Scope = 0
2595	Stop = 0
2596	TabPanelIndex = 0
2597	Top = -6
2598	Width = 32
2599	XON = ""
2600	End
2601	Begin PushButton PushButton_Default
2602	AutoDeactivate = True
2603	Bold = ""
2604	Cancel = ""
2605	Caption = "Default"
2606	Default = ""
2607	Enabled = True
2608	Height = 20
2609	HelpTag = ""
2610	Index = -2147483648
2611	InitialParent = ""
2612	Italic = ""
2613	Left = 326
2614	LockBottom = ""
2615	LockedInPosition= False
2616	LockLeft = ""
2617	LockRight = ""
2618	LockTop = ""
2619	Scope = 0
2620	TabIndex = 44
2621	TabPanelIndex = 0
2622	TabStop = True
2623	TextFont = "System"
2624	TextSize = 0
2625	Top = 312
2626	Underline = ""
2627	Visible = True
2628	Width = 88
2629	End
2630	Begin PushButton PushButton_SaveProfile
2631	AutoDeactivate = True
2632	Bold = ""
2633	Cancel = ""
2634	Caption = "Save Profile"
2635	Default = ""
2636	Enabled = True
2637	Height = 20
2638	HelpTag = ""
2639	Index = -2147483648
2640	InitialParent = ""
2641	Italic = ""
2642	Left = 520
2643	LockBottom = ""
2644	LockedInPosition= False
2645	LockLeft = ""
2646	LockRight = ""
2647	LockTop = ""
2648	Scope = 0
2649	TabIndex = 45
2650	TabPanelIndex = 0
2651	TabStop = True
2652	TextFont = "System"
2653	TextSize = 0
2654	Top = 312
2655	Underline = ""
2656	Visible = False
2657	Width = 100
2658	End
2659	Begin StaticText StaticText_Version
2660	AutoDeactivate = True
2661	Bold = ""
2662	DataField = ""
2663	DataSource = ""
2664	Enabled = True
2665	Height = 20
2666	HelpTag = ""
2667	Index = -2147483648
2668	InitialParent = ""
2669	Italic = ""
2670	Left = 522
2671	LockBottom = ""
2672	LockedInPosition= False
2673	LockLeft = ""
2674	LockRight = ""
2675	LockTop = ""
2676	Multiline = ""
2677	Scope = 0
2678	TabIndex = 46
2679	TabPanelIndex = 0
2680	Text = "Version "
2681	TextAlign = 0
2682	TextColor = &h000000
2683	TextFont = "System"
2684	TextSize = 0
2685	Top = 14
2686	Underline = ""
2687	Visible = True
2688	Width = 100
2689	End
2690	End
2691	#tag EndWindow
2692
2693	#tag WindowCode
2694	#tag Event
2695	Sub Open()
2696	StaticText_Version.Text = "Version " + str(app.NonReleaseVersion/100)
2697
2698	//Set the default car type
2699	ICSSerialPort1.setCarType("MR-03")
2700	End Sub
2701	#tag EndEvent
2702
2703
2704	#tag Method, Flags = &h21
2705	Private Sub disableControls()
2706	select case ICSSerialPort1.carType
2707
2708	Case "MR-03"
2709	//Enable any controls that may have been disabled
2710	PopupMenu_BackTiming.Enabled = True
2711	StaticText_BackTiming.Enabled = True
2712
2713	Slider_STGain.Enabled = True
2714	StaticText_STGain.Enabled = True
2715
2716	Slider_THGain.Enabled = True
2717	StaticText_THGain.Enabled = True
2718
2719
2720	Case "dNaNo"
2721	//Disable unused controls and set them to custom
2722	PopupMenu_BackTiming.Enabled = False
2723	StaticText_BackTiming.Enabled = False
2724	PopupMenu_BackTiming.ListIndex = PopupMenu_BackTiming.ListCount
2725
2726	//Enable any controls that may have been disabled
2727	Slider_STGain.Enabled = True
2728	StaticText_STGain.Enabled = True
2729
2730	Slider_THGain.Enabled = True
2731	StaticText_THGain.Enabled = True
2732
2733	Case "ASF"
2734	//Disable unused controls and set them to custom
2735	PopupMenu_BackTiming.Enabled = False
2736	StaticText_BackTiming.Enabled = False
2737	PopupMenu_BackTiming.ListIndex = PopupMenu_BackTiming.ListCount
2738
2739	Slider_STGain.Enabled = False
2740	StaticText_STGain.Enabled = False
2741	Slider_STGain.Value = 255
2742
2743	Slider_THGain.Enabled = False
2744	StaticText_THGain.Enabled = False
2745	Slider_THGain.Value = 255
2746
2747
2748	end select
2749	End Sub
2750	#tag EndMethod
2751
2752	#tag Method, Flags = &h21
2753	Private Sub updateCarScreen()
2754	//Use this method to update the car screen
2755
2756	//Update Gain
2757	Select Case ICSSerialPort1.byte03
2758
2759	Case chrb(&h32)
2760	PopupMenu_Gain.ListIndex = 0
2761
2762	Case chrb(&h64)
2763	PopupMenu_Gain.ListIndex = 1
2764
2765	Case chrb(&hFF)
2766	PopupMenu_Gain.ListIndex = 2
2767
2768	Else
2769	PopupMenu_Gain.ListIndex = 3
2770
2771	End Select
2772
2773	//Update Speed
2774	Select Case ICSSerialPort1.Byte04
2775
2776	Case chrb(&h0A)
2777	PopupMenu_Speed.ListIndex = 0
2778
2779	Case chrb(&h14)
2780	PopupMenu_Speed.ListIndex = 1
2781
2782	Case chrb(&h1E)
2783	PopupMenu_Speed.ListIndex = 2
2784
2785	Case chrb(&h28)
2786	PopupMenu_Speed.ListIndex = 3
2787
2788	Case chrb(&hFF)
2789	PopupMenu_Speed.ListIndex = 4
2790
2791	Else
2792	PopupMenu_Speed.ListIndex = 5
2793
2794	End Select
2795
2796	//Update punch
2797	Slider_Punch.Value = asc(ICSSerialPort1.Byte05)
2798	EditField_Punch.Text = str(asc(ICSSerialPort1.Byte05))
2799
2800	//Update DBAND
2801	Select Case ICSSerialPort1.Byte06
2802
2803	Case chrb(&h01)
2804	PopupMenu_DBand.ListIndex = 0
2805
2806	Case chrb(&h02)
2807	PopupMenu_DBand.ListIndex = 1
2808
2809	Case chrb(&h03)
2810	PopupMenu_DBand.ListIndex = 2
2811
2812	Else
2813	PopupMenu_DBand.ListIndex = 3
2814
2815	End Select
2816
2817	//Update Dump
2818	Select Case ICSSerialPort1.Byte07
2819
2820	Case chrb(&h01)
2821	PopupMenu_Dump.ListIndex = 0
2822
2823	Case chrb(&h02)
2824	PopupMenu_Dump.ListIndex = 1
2825
2826	Else
2827	PopupMenu_Dump.ListIndex = 2
2828
2829	End Select
2830
2831	//Update DFREQ
2832	Select Case ICSSerialPort1.Byte08
2833
2834	Case chrb(&h40)
2835	PopupMenu_DFreq.ListIndex = 0
2836
2837	Case chrb(&h78)
2838	PopupMenu_DFreq.ListIndex = 1
2839
2840	Case chrb(&hFF)
2841	PopupMenu_DFreq.ListIndex = 2
2842
2843	Else
2844	PopupMenu_DFreq.ListIndex = 3
2845
2846	End Select
2847
2848	//Update Nuetral
2849	//Nuetral is defined by 2 bytes
2850	Select Case ICSSerialPort1.Byte11
2851
2852	Case chrb(&h82)
2853	if ICSSerialPort1.Byte12 = chrb(&h7C) then
2854	PopupMenu_Nuetral.ListIndex = 0
2855	else
2856	PopupMenu_Nuetral.ListIndex = 3
2857	end if
2858
2859	Case chrb(&h88)
2860	if ICSSerialPort1.Byte12 = chrb(&h78) then
2861	PopupMenu_Nuetral.ListIndex = 1
2862	else
2863	PopupMenu_Nuetral.ListIndex = 3
2864	end if
2865
2866	Case chrb(&h94)
2867	if ICSSerialPort1.Byte12 = chrb(&h6C) then
2868	PopupMenu_Nuetral.ListIndex = 2
2869	else
2870	PopupMenu_Nuetral.ListIndex = 3
2871	end if
2872
2873	Else
2874	PopupMenu_Nuetral.ListIndex = 3
2875
2876	End Select
2877
2878	//Update Vertial Intertia
2879	Select Case ICSSerialPort1.Byte13
2880
2881	Case chrb(&h01)
2882	PopupMenu_VerticalInteria.ListIndex = 0
2883
2884	Case chrb(&h02)
2885	PopupMenu_VerticalInteria.ListIndex = 1
2886
2887	Case chrb(&h03)
2888	PopupMenu_VerticalInteria.ListIndex = 2
2889
2890	Case chrb(&h04)
2891	PopupMenu_VerticalInteria.ListIndex = 3
2892
2893	Case chrb(&hFF)
2894	PopupMenu_VerticalInteria.ListIndex = 4
2895
2896	Else
2897	PopupMenu_VerticalInteria.ListIndex = 5
2898
2899	End Select
2900
2901	//Update Back Timing
2902	Select Case ICSSerialPort1.Byte15
2903
2904	Case chrb(&h01)
2905	PopupMenu_BackTiming.ListIndex = 0
2906
2907	Case chrb(&h05)
2908	PopupMenu_BackTiming.ListIndex = 1
2909
2910	Case chrb(&h0A)
2911	PopupMenu_BackTiming.ListIndex = 2
2912
2913	Case chrb(&h14)
2914	PopupMenu_BackTiming.ListIndex = 3
2915
2916	Case chrb(&h28)
2917	PopupMenu_BackTiming.ListIndex = 4
2918
2919	Else
2920	PopupMenu_BackTiming.ListIndex = 5
2921
2922	End Select
2923
2924	//Update Steering Gain
2925	Slider_STGain.Value = asc(ICSSerialPort1.Byte16)
2926	EditField_STGain.Text = str(asc(ICSSerialPort1.Byte16))
2927
2928	//Update Throttle Gain
2929	Slider_THGain.Value = asc(ICSSerialPort1.Byte17)
2930	EditField_THGain.Text = str(asc(ICSSerialPort1.Byte17))
2931	End Sub
2932	#tag EndMethod
2933
2934	#tag Method, Flags = &h21
2935	Private Sub updateAdvancedScreen()
2936	//Update the fields on the advanced screen to match current values
2937	EditField_Byte1.Text = str(asc(ICSSerialPort1.byte01))
2938	EditField_Byte2.Text = str(asc(ICSSerialPort1.byte02))
2939	EditField_Byte3.Text = str(asc(ICSSerialPort1.byte03))
2940	EditField_Byte4.Text = str(asc(ICSSerialPort1.byte04))
2941	EditField_Byte5.Text = str(asc(ICSSerialPort1.byte05))
2942	EditField_Byte6.Text = str(asc(ICSSerialPort1.byte06))
2943	EditField_Byte7.Text = str(asc(ICSSerialPort1.byte07))
2944	EditField_Byte8.Text = str(asc(ICSSerialPort1.byte08))
2945	EditField_Byte9.Text = str(asc(ICSSerialPort1.byte09))
2946	EditField_Byte10.Text = str(asc(ICSSerialPort1.byte10))
2947	EditField_Byte11.Text = str(asc(ICSSerialPort1.byte11))
2948	EditField_Byte12.Text = str(asc(ICSSerialPort1.byte12))
2949	EditField_Byte13.Text = str(asc(ICSSerialPort1.byte13))
2950	EditField_Byte14.Text = str(asc(ICSSerialPort1.byte14))
2951	EditField_Byte15.Text = str(asc(ICSSerialPort1.byte15))
2952	EditField_Byte16.Text = str(asc(ICSSerialPort1.byte16))
2953	EditField_Byte17.Text = str(asc(ICSSerialPort1.byte17))
2954	EditField_Byte18.Text = str(asc(ICSSerialPort1.byte18))
2955	End Sub
2956	#tag EndMethod
2957
2958	#tag Method, Flags = &h21
2959	Private Sub readPreferences()
2960	dim filePreference as FolderItem = GetFolderItem("icspref.xml")
2961	dim xdoc as XmlDocument
2962	dim root as XmlNode
2963	dim i as Integer
2964	dim count as integer
2965	dim item as string
2966
2967	//Read the settings from the preferences file
2968	if filePreference <> Nil then
2969	xdoc = New XmlDocument(filePreference)
2970
2971	count = xdoc.DocumentElement.ChildCount
2972
2973	for i = 0 to count - 1
2974	root = xdoc.DocumentElement.Child(i)
2975
2976	item = root.FirstChild.Value
2977
2978	select case root.Name
2979	case "comPort"
2980	comPort = item
2981	end select
2982	next
2983
2984	else
2985	//Do nothing
2986
2987	end if
2988	End Sub
2989	#tag EndMethod
2990
2991	#tag Method, Flags = &h21
2992	Private Sub savePreferences()
2993	dim xml as XmlDocument
2994	dim root as XMLNode
2995	dim comPortXML as XmlNode
2996	dim f as FolderItem
2997
2998	//Save the preferences
2999
3000	f = GetFolderItem("icspref.xml")
3001
3002	if f <> Nil then
3003	//Create a new XML document
3004	xml = New XmlDocument
3005	root = xml.AppendChild(xml.CreateElement("icspref"))
3006
3007	//Add elements
3008	comPortXML = root.AppendChild(xml.CreateElement("comPort"))
3009	comPortXML.AppendChild(xml.CreateTextNode(comPort))
3010
3011	//Save the output
3012	xml.SaveXml(f)
3013	end if
3014
3015	End Sub
3016	#tag EndMethod
3017
3018
3019	#tag Property, Flags = &h0
3020	comPort As string
3021	#tag EndProperty
3022
3023
3024	#tag Constant, Name = defaultControlHeight, Type = Double, Dynamic = False, Default = \"20", Scope = Public
3025	#Tag Instance, Platform = Mac OS, Language = Default, Definition = \"20"
3026	#Tag Instance, Platform = Windows, Language = Default, Definition = \"22"
3027	#Tag Instance, Platform = Linux, Language = Default, Definition = \"24"
3028	#tag EndConstant
3029
3030
3031	#tag EndWindowCode
3032
3033	#tag Events PushButton_Read
3034	#tag Event
3035	Sub Action()
3036	ICSSerialPort1.readCar
3037	End Sub
3038	#tag EndEvent
3039	#tag EndEvents
3040	#tag Events PushButton_Write
3041	#tag Event
3042	Sub Action()
3043	ICSSerialPort1.writeCar
3044	End Sub
3045	#tag EndEvent
3046	#tag EndEvents
3047	#tag Events PushButton_Reset
3048	#tag Event
3049	Sub Action()
3050	ICSSerialPort1.resetCar
3051	End Sub
3052	#tag EndEvent
3053	#tag EndEvents
3054	#tag Events TabPanel1
3055	#tag Event
3056	Sub Change()
3057	updateAdvancedScreen
3058	updateCarScreen
3059	End Sub
3060	#tag EndEvent
3061	#tag EndEvents
3062	#tag Events PopupMenu_Profile
3063	#tag Event
3064	Sub Change()
3065	if me.Text <> "" then
3066	PushButton_SaveProfile.Visible = true
3067	PushButton_Delete.Visible = true
3068	ICSSerialPort1.loadProfile(me.Text)
3069	end if
3070	End Sub
3071	#tag EndEvent
3072	#tag Event
3073	Sub Open()
3074	dim s() as string
3075	dim i as integer
3076
3077	s = ICSSerialPort1.listProfiles
3078
3079	if UBound(s) > -1 then
3080	for each element as string in s
3081	me.AddRow(element)
3082	next
3083	end if
3084	End Sub
3085	#tag EndEvent
3086	#tag EndEvents
3087	#tag Events PushButton_Create
3088	#tag Event
3089	Sub Action()
3090	dim tempProfWindow as new createProfile
3091	tempProfWindow.Show
3092	End Sub
3093	#tag EndEvent
3094	#tag EndEvents
3095	#tag Events PushButton_Delete
3096	#tag Event
3097	Sub Action()
3098	ICSSerialPort1.deleteProfile(PopupMenu_Profile.Text)
3099	End Sub
3100	#tag EndEvent
3101	#tag EndEvents
3102	#tag Events Slider_THGain
3103	#tag Event
3104	Sub ValueChanged()
3105	ICSSerialPort1.Byte17 = chrb(me.Value)
3106	//Check to see if we need to update the edit field
3107	//This prevents the edit field from triggering this event that then updates the edit field again
3108	//Causing the cursor to move to the begginning of the editfield
3109	if EditField_THGain.Text <> str(me.Value) then
3110	EditField_THGain.Text = str(me.Value)
3111	end if
3112
3113
3114	End Sub
3115	#tag EndEvent
3116	#tag EndEvents
3117	#tag Events EditField_THGain
3118	#tag Event
3119	Sub TextChange()
3120	//Make sure we have a valid value if not then set it to something
3121	if me.Text <> "" then
3122	if val(me.Text) > 255 or val(me.Text) < 1 then
3123	me.Text = "255"
3124	end if
3125	end if
3126
3127	dim d as double
3128	dim i as integer
3129	d = val(me.Text)
3130	i = d
3131	ICSSerialPort1.Byte17 = chrb(i)
3132
3133	Slider_THGain.Value = val(me.Text)
3134	End Sub
3135	#tag EndEvent
3136	#tag EndEvents
3137	#tag Events Slider_STGain
3138	#tag Event
3139	Sub ValueChanged()
3140	ICSSerialPort1.Byte16 = chrb(me.Value)
3141	//Check to see if we need to update the edit field
3142	//This prevents the edit field from triggering this event that then updates the edit field again
3143	//Causing the cursor to move to the begginning of the editfield
3144	if EditField_STGain.Text <> str(me.Value) then
3145	EditField_STGain.Text = str(me.Value)
3146	end if
3147	End Sub
3148	#tag EndEvent
3149	#tag EndEvents
3150	#tag Events EditField_STGain
3151	#tag Event
3152	Sub TextChange()
3153	//Make sure we have a valid value if not then set it to something
3154	if me.Text <> "" then
3155	if val(me.Text) > 255 or val(me.Text) < 1 then
3156	me.Text = "255"
3157	end if
3158	end if
3159
3160	dim d as double
3161	dim i as integer
3162	d = val(me.Text)
3163	i = d
3164	ICSSerialPort1.Byte16 = chrb(i)
3165
3166	Slider_STGain.Value = val(me.Text)
3167
3168
3169	End Sub
3170	#tag EndEvent
3171	#tag EndEvents
3172	#tag Events PopupMenu_BackTiming
3173	#tag Event
3174	Sub Change()
3175	Select Case me.ListIndex
3176
3177	Case 0
3178	ICSSerialPort1.Byte15 = chrb(&h01)
3179	Case 1
3180	ICSSerialPort1.Byte15 = chrb(&h05)
3181	Case 2
3182	ICSSerialPort1.Byte15 = chrb(&h0A)
3183	Case 3
3184	ICSSerialPort1.Byte15 = chrb(&h14)
3185	Case 4
3186	ICSSerialPort1.Byte15 = chrb(&h28)
3187	Case 5
3188
3189	End Select
3190	End Sub
3191	#tag EndEvent
3192	#tag EndEvents
3193	#tag Events PopupMenu_VerticalInteria
3194	#tag Event
3195	Sub Change()
3196	Select Case me.ListIndex
3197
3198	Case 0
3199	ICSSerialPort1.Byte13 = chrb(&h01)
3200	Case 1
3201	ICSSerialPort1.Byte13 = chrb(&h02)
3202	Case 2
3203	ICSSerialPort1.Byte13 = chrb(&h03)
3204	Case 3
3205	ICSSerialPort1.Byte13 = chrb(&h04)
3206	Case 4
3207	ICSSerialPort1.Byte13 = chrb(&hFF)
3208	Case 5
3209
3210	End Select
3211	End Sub
3212	#tag EndEvent
3213	#tag EndEvents
3214	#tag Events PopupMenu_Nuetral
3215	#tag Event
3216	Sub Change()
3217	Select Case me.ListIndex
3218
3219	Case 0
3220	ICSSerialPort1.Byte11 = chrb(&h82)
3221	ICSSerialPort1.Byte12 = chrb(&h7C)
3222
3223	Case 1
3224	ICSSerialPort1.Byte11 = chrb(&h88)
3225	ICSSerialPort1.Byte12 = chrb(&h78)
3226
3227	Case 2
3228	ICSSerialPort1.Byte11 = chrb(&h94)
3229	ICSSerialPort1.Byte12 = chrb(&h6C)
3230
3231	Case 3
3232
3233	End Select
3234	End Sub
3235	#tag EndEvent
3236	#tag EndEvents
3237	#tag Events PopupMenu_DFreq
3238	#tag Event
3239	Sub Change()
3240	Select Case me.ListIndex
3241
3242	Case 0
3243	ICSSerialPort1.Byte08 = chrb(&h40)
3244	Case 1
3245	ICSSerialPort1.Byte08 = chrb(&h78)
3246	Case 2
3247	ICSSerialPort1.Byte08 = chrb(&hFF)
3248	Case 3
3249
3250	End Select
3251	End Sub
3252	#tag EndEvent
3253	#tag EndEvents
3254	#tag Events PopupMenu_Dump
3255	#tag Event
3256	Sub Change()
3257	Select Case me.ListIndex
3258
3259	Case 0
3260	ICSSerialPort1.Byte07 = chrb(&h01)
3261	Case 1
3262	ICSSerialPort1.Byte07 = chrb(&h02)
3263	Case 2
3264
3265	End Select
3266	End Sub
3267	#tag EndEvent
3268	#tag EndEvents
3269	#tag Events PopupMenu_DBand
3270	#tag Event
3271	Sub Change()
3272	Select Case me.ListIndex
3273
3274	Case 0
3275	ICSSerialPort1.Byte06 = chrb(&h01)
3276	Case 1
3277	ICSSerialPort1.Byte06 = chrb(&h02)
3278	Case 2
3279	ICSSerialPort1.Byte06 = chrb(&h03)
3280	Case 3
3281
3282	End Select
3283	End Sub
3284	#tag EndEvent
3285	#tag EndEvents
3286	#tag Events Slider_Punch
3287	#tag Event
3288	Sub ValueChanged()
3289	ICSSerialPort1.Byte05 = chrb(me.Value)
3290	//Check to see if we need to update the edit field
3291	//This prevents the edit field from triggering this event that then updates the edit field again
3292	//Causing the cursor to move to the begginning of the editfield
3293	if EditField_Punch.Text <> str(me.Value) then
3294	EditField_Punch.Text = str(me.Value)
3295	end if
3296
3297
3298	End Sub
3299	#tag EndEvent
3300	#tag EndEvents
3301	#tag Events EditField_Punch
3302	#tag Event
3303	Sub TextChange()
3304	//Make sure we have a valid value if not then set it to something
3305	if me.Text <> "" then
3306	if val(me.Text) > 255 or val(me.Text) < 1 then
3307	me.Text = "255"
3308	end if
3309	end if
3310
3311	dim d as double
3312	dim i as integer
3313	d = val(me.Text)
3314	i = d
3315	ICSSerialPort1.Byte05 = chrb(i)
3316
3317	Slider_Punch.Value = val(me.Text)
3318	End Sub
3319	#tag EndEvent
3320	#tag EndEvents
3321	#tag Events PopupMenu_Speed
3322	#tag Event
3323	Sub Change()
3324	Select Case me.ListIndex
3325
3326	Case 0
3327	ICSSerialPort1.Byte04 = chrb(&h0A)
3328	Case 1
3329	ICSSerialPort1.Byte04 = chrb(&h14)
3330	Case 2
3331	ICSSerialPort1.Byte04 = chrb(&h1E)
3332	Case 3
3333	ICSSerialPort1.Byte04 = chrb(&h28)
3334	Case 4
3335	ICSSerialPort1.Byte04 = chrb(&hFF)
3336	Case 5
3337
3338	End Select
3339	End Sub
3340	#tag EndEvent
3341	#tag EndEvents
3342	#tag Events PopupMenu_Gain
3343	#tag Event
3344	Sub Change()
3345	Select Case me.ListIndex
3346
3347	case 0
3348	ICSSerialPort1.Byte03 = chrb(&h32)
3349
3350	case 1
3351	ICSSerialPort1.Byte03 = chrb(&h64)
3352
3353	case 2
3354	ICSSerialPort1.Byte03 = chrb(&hFF)
3355
3356	case 3
3357
3358	End Select
3359
3360	End Sub
3361	#tag EndEvent
3362	#tag EndEvents
3363	#tag Events PopupMenu_CarType
3364	#tag Event
3365	Sub Change()
3366	ICSSerialPort1.setCarType(me.Text)
3367	disableControls
3368
3369	End Sub
3370	#tag EndEvent
3371	#tag EndEvents
3372	#tag Events EditField_Byte17
3373	#tag Event
3374	Function KeyDown(Key As String) As Boolean
3375	//Make sure we have a valid value if not then set it to something
3376	if val(me.Text) > 255 or val(me.Text) < 0 then
3377	me.Text = "255"
3378	end if
3379
3380	dim d as double
3381	dim i as integer
3382	d = val(me.Text)
3383	i = d
3384	ICSSerialPort1.Byte17 = chrb(i)
3385	End Function
3386	#tag EndEvent
3387	#tag EndEvents
3388	#tag Events EditField_Byte16
3389	#tag Event
3390	Function KeyDown(Key As String) As Boolean
3391	//Make sure we have a valid value if not then set it to something
3392	if val(me.Text) > 255 or val(me.Text) < 0 then
3393	me.Text = "255"
3394	end if
3395
3396	dim d as double
3397	dim i as integer
3398	d = val(me.Text)
3399	i = d
3400	ICSSerialPort1.Byte16 = chrb(i)
3401	End Function
3402	#tag EndEvent
3403	#tag EndEvents
3404	#tag Events EditField_Byte15
3405	#tag Event
3406	Function KeyDown(Key As String) As Boolean
3407	//Make sure we have a valid value if not then set it to something
3408	if val(me.Text) > 255 or val(me.Text) < 0 then
3409	me.Text = "255"
3410	end if
3411
3412	dim d as double
3413	dim i as integer
3414	d = val(me.Text)
3415	i = d
3416	ICSSerialPort1.Byte15 = chrb(i)
3417	End Function
3418	#tag EndEvent
3419	#tag EndEvents
3420	#tag Events EditField_Byte14
3421	#tag Event
3422	Function KeyDown(Key As String) As Boolean
3423	//Make sure we have a valid value if not then set it to something
3424	if val(me.Text) > 255 or val(me.Text) < 0 then
3425	me.Text = "255"
3426	end if
3427
3428	dim d as double
3429	dim i as integer
3430	d = val(me.Text)
3431	i = d
3432	ICSSerialPort1.Byte14 = chrb(i)
3433	End Function
3434	#tag EndEvent
3435	#tag EndEvents
3436	#tag Events EditField_Byte13
3437	#tag Event
3438	Function KeyDown(Key As String) As Boolean
3439	//Make sure we have a valid value if not then set it to something
3440	if val(me.Text) > 255 or val(me.Text) < 0 then
3441	me.Text = "255"
3442	end if
3443
3444	dim d as double
3445	dim i as integer
3446	d = val(me.Text)
3447	i = d
3448	ICSSerialPort1.Byte13 = chrb(i)
3449	End Function
3450	#tag EndEvent
3451	#tag EndEvents
3452	#tag Events EditField_Byte12
3453	#tag Event
3454	Function KeyDown(Key As String) As Boolean
3455	//Make sure we have a valid value if not then set it to something
3456	if val(me.Text) > 255 or val(me.Text) < 0 then
3457	me.Text = "255"
3458	end if
3459
3460	dim d as double
3461	dim i as integer
3462	d = val(me.Text)
3463	i = d
3464	ICSSerialPort1.Byte12 = chrb(i)
3465	End Function
3466	#tag EndEvent
3467	#tag EndEvents
3468	#tag Events EditField_Byte11
3469	#tag Event
3470	Function KeyDown(Key As String) As Boolean
3471	//Make sure we have a valid value if not then set it to something
3472	if val(me.Text) > 255 or val(me.Text) < 0 then
3473	me.Text = "255"
3474	end if
3475
3476	dim d as double
3477	dim i as integer
3478	d = val(me.Text)
3479	i = d
3480	ICSSerialPort1.Byte11 = chrb(i)
3481	End Function
3482	#tag EndEvent
3483	#tag EndEvents
3484	#tag Events EditField_Byte10
3485	#tag Event
3486	Function KeyDown(Key As String) As Boolean
3487	//Make sure we have a valid value if not then set it to something
3488	if val(me.Text) > 255 or val(me.Text) < 0 then
3489	me.Text = "255"
3490	end if
3491
3492	dim d as double
3493	dim i as integer
3494	d = val(me.Text)
3495	i = d
3496	ICSSerialPort1.Byte10 = chrb(i)
3497	End Function
3498	#tag EndEvent
3499	#tag EndEvents
3500	#tag Events EditField_Byte9
3501	#tag Event
3502	Function KeyDown(Key As String) As Boolean
3503	//Make sure we have a valid value if not then set it to something
3504	if val(me.Text) > 255 or val(me.Text) < 0 then
3505	me.Text = "255"
3506	end if
3507
3508	dim d as double
3509	dim i as integer
3510	d = val(me.Text)
3511	i = d
3512	ICSSerialPort1.Byte09 = chrb(i)
3513	End Function
3514	#tag EndEvent
3515	#tag EndEvents
3516	#tag Events EditField_Byte8
3517	#tag Event
3518	Function KeyDown(Key As String) As Boolean
3519	//Make sure we have a valid value if not then set it to something
3520	if val(me.Text) > 255 or val(me.Text) < 0 then
3521	me.Text = "255"
3522	end if
3523
3524	dim d as double
3525	dim i as integer
3526	d = val(me.Text)
3527	i = d
3528	ICSSerialPort1.Byte08 = chrb(i)
3529	End Function
3530	#tag EndEvent
3531	#tag EndEvents
3532	#tag Events EditField_Byte7
3533	#tag Event
3534	Function KeyDown(Key As String) As Boolean
3535	//Make sure we have a valid value if not then set it to something
3536	if val(me.Text) > 255 or val(me.Text) < 0 then
3537	me.Text = "255"
3538	end if
3539
3540	dim d as double
3541	dim i as integer
3542	d = val(me.Text)
3543	i = d
3544	ICSSerialPort1.Byte07 = chrb(i)
3545	End Function
3546	#tag EndEvent
3547	#tag EndEvents
3548	#tag Events EditField_Byte6
3549	#tag Event
3550	Function KeyDown(Key As String) As Boolean
3551	//Make sure we have a valid value if not then set it to something
3552	if val(me.Text) > 255 or val(me.Text) < 0 then
3553	me.Text = "255"
3554	end if
3555
3556	dim d as double
3557	dim i as integer
3558	d = val(me.Text)
3559	i = d
3560	ICSSerialPort1.Byte06 = chrb(i)
3561	End Function
3562	#tag EndEvent
3563	#tag EndEvents
3564	#tag Events EditField_Byte5
3565	#tag Event
3566	Function KeyDown(Key As String) As Boolean
3567	//Make sure we have a valid value if not then set it to something
3568	if val(me.Text) > 255 or val(me.Text) < 0 then
3569	me.Text = "255"
3570	end if
3571
3572	dim d as double
3573	dim i as integer
3574	d = val(me.Text)
3575	i = d
3576	ICSSerialPort1.Byte05 = chrb(i)
3577	End Function
3578	#tag EndEvent
3579	#tag EndEvents
3580	#tag Events EditField_Byte4
3581	#tag Event
3582	Function KeyDown(Key As String) As Boolean
3583	//Make sure we have a valid value if not then set it to something
3584	if val(me.Text) > 255 or val(me.Text) < 0 then
3585	me.Text = "255"
3586	end if
3587
3588	dim d as double
3589	dim i as integer
3590	d = val(me.Text)
3591	i = d
3592	ICSSerialPort1.Byte04 = chrb(i)
3593	End Function
3594	#tag EndEvent
3595	#tag EndEvents
3596	#tag Events EditField_Byte3
3597	#tag Event
3598	Sub TextChange()
3599	//Make sure we have a valid value if not then set it to something
3600	if val(me.Text) > 255 or val(me.Text) < 0 then
3601	me.Text = "255"
3602	end if
3603
3604	dim d as double
3605	dim i as integer
3606	d = val(me.Text)
3607	i = d
3608	ICSSerialPort1.Byte03 = chrb(i)
3609	End Sub
3610	#tag EndEvent
3611	#tag EndEvents
3612	#tag Events ICSSerialPort1
3613	#tag Event
3614	Sub valuesChanged()
3615	//Update the screens with the new values
3616	updateAdvancedScreen
3617	updateCarScreen
3618	End Sub
3619	#tag EndEvent
3620	#tag EndEvents
3621	#tag Events PushButton_Default
3622	#tag Event
3623	Sub Action()
3624	ICSSerialPort1.setDefaultValues
3625	End Sub
3626	#tag EndEvent
3627	#tag EndEvents
3628	#tag Events PushButton_SaveProfile
3629	#tag Event
3630	Sub Action()
3631	ICSSerialPort1.saveProfile(PopupMenu_Profile.Text)
3632	End Sub
3633	#tag EndEvent
3634	#tag EndEvents

Note: See TracBrowser for help on using the repository browser.