Author: robhamerling
Date: Sun Mar 1 12:56:58 2009
New Revision: 822
Modified:
trunk/tools/Dev2Jal.cmd
trunk/tools/devicespecific.cmd
Log:
Most recent dev2jal Rexx script version 0.0.58
Modified: trunk/tools/Dev2Jal.cmd
==============================================================================
--- trunk/tools/Dev2Jal.cmd (original)
+++ trunk/tools/Dev2Jal.cmd Sun Mar 1 12:56:58 2009
@@ -28,7 +28,7 @@
/* - The script contains some test and debugging
code. */
/*
*/
/*
------------------------------------------------------------------------ */
- ScriptVersion = '0.0.57'
/* */
+ ScriptVersion = '0.0.59'
/* */
ScriptAuthor = 'Rob Hamerling' /* global
constants */
CompilerVersion = '>=2.4i'
/* */
/*
------------------------------------------------------------------------ */
@@ -1409,8 +1409,8 @@
'at' shadow ':'
offset') is'
call lineout jalfile, ' pragma inline'
end
- else if s.j > 1 then do /* multi-bit */
- call lineout jalfile, 'procedure' field"'put"'(byte in x',
+ else if s.j > 1 & s.j < 8 then do /* multi-bit */
+ call lineout jalfile, 'procedure' field"'put"'(bit*'s.j 'in x',
'at' shadow ':' offset -
s.j + 1') is'
call lineout jalfile, ' pragma inline'
end
@@ -2427,7 +2427,7 @@
/* --------------------------------------------- */
/* Signal duplicates names */
-/* Collect all names in Name. compound var */
+/* Collect all names in Name. compound variable */
/* Return - 0 when name is unique */
/* - 1 when name is dumplicate */
/* --------------------------------------------- */
Modified: trunk/tools/devicespecific.cmd
==============================================================================
--- trunk/tools/devicespecific.cmd (original)
+++ trunk/tools/devicespecific.cmd Sun Mar 1 12:56:58 2009
@@ -500,7 +500,7 @@
when PicName = '18F248' then return '41159'
when PicName = '18F2480' then return '39637'
when PicName = '18F24J10' then return '39682'
- when PicName = '18F24J11' then return '-'
+ when PicName = '18F24J11' then return '39932'
when PicName = '18F24J50' then return '-'
when PicName = '18F24K20' then return '41303'
when PicName = '18F2510' then return '39636'
@@ -516,7 +516,7 @@
when PicName = '18F2580' then return '39637'
when PicName = '18F2585' then return '39625'
when PicName = '18F25J10' then return '39682'
- when PicName = '18F25J11' then return '-'
+ when PicName = '18F25J11' then return '39932'
when PicName = '18F25J50' then return '-'
when PicName = '18F25K20' then return '41303'
when PicName = '18F2610' then return '39636'
@@ -524,7 +524,7 @@
when PicName = '18F2680' then return '39625'
when PicName = '18F2682' then return '39761'
when PicName = '18F2685' then return '39761'
- when PicName = '18F26J11' then return '-'
+ when PicName = '18F26J11' then return '39932'
when PicName = '18F26J50' then return '-'
when PicName = '18F26K20' then return '41303'
when PicName = '18F4220' then return '39599'
@@ -545,7 +545,7 @@
when PicName = '18F448' then return '41159'
when PicName = '18F4480' then return '39637'
when PicName = '18F44J10' then return '39682'
- when PicName = '18F44J11' then return '-'
+ when PicName = '18F44J11' then return '39932'
when PicName = '18F44J50' then return '-'
when PicName = '18F44K20' then return '41303'
when PicName = '18F4510' then return '39636'
@@ -561,7 +561,7 @@
when PicName = '18F4580' then return '39637'
when PicName = '18F4585' then return '39625'
when PicName = '18F45J10' then return '39682'
- when PicName = '18F45J11' then return '-'
+ when PicName = '18F45J11' then return '39932'
when PicName = '18F45J50' then return '-'
when PicName = '18F45K20' then return '41303'
when PicName = '18F4610' then return '39636'
@@ -569,7 +569,7 @@
when PicName = '18F4680' then return '39625'
when PicName = '18F4682' then return '39761'
when PicName = '18F4685' then return '39761'
- when PicName = '18F46J11' then return '-'
+ when PicName = '18F46J11' then return '39932'
when PicName = '18F46J50' then return '-'
when PicName = '18F46K20' then return '41303'
when PicName = '18F6310' then return '39635'
@@ -668,20 +668,20 @@
when PicName = '18LF14K50' then return '41350'
when PicName = '18LF14K22' then return '-'
when PicName = '18LF24J10' then return '39682'
- when PicName = '18LF24J11' then return '-'
+ when PicName = '18LF24J11' then return '39932'
when PicName = '18LF24J50' then return '-'
when PicName = '18LF25J10' then return '39682'
- when PicName = '18LF25J11' then return '-'
+ when PicName = '18LF25J11' then return '39932'
when PicName = '18LF25J50' then return '-'
- when PicName = '18LF26J11' then return '-'
+ when PicName = '18LF26J11' then return '39932'
when PicName = '18LF26J50' then return '-'
when PicName = '18LF44J10' then return '39682'
- when PicName = '18LF44J11' then return '-'
+ when PicName = '18LF44J11' then return '39932'
when PicName = '18LF44J50' then return '-'
when PicName = '18LF45J10' then return '39682'
- when PicName = '18LF45J11' then return '-'
+ when PicName = '18LF45J11' then return '39932'
when PicName = '18LF45J50' then return '-'
- when PicName = '18LF46J11' then return '-'
+ when PicName = '18LF46J11' then return '39932'
when PicName = '18LF46J50' then return '-'
otherwise
say ' Error:' PicName 'is unlisted in Datasheet table!'
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups
"jallib" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/jallib?hl=en
-~----------~----~----~----~------~----~------~--~---
