#2
Post
by Alessandro Fulignani » 21 Jun 2022 10:48
Dear Thomas,
Basic it's much more readable then C. Compactness of C was born for the the VT100 terminal with green phosphor monitors.
C is loosing fans by several years and the prove it is that Payton it is the most used and recommended language which is a strong step toward Basic. (See the Tiobe index)
In my companies we are using MIkroBasic to make all the technicians capable to write firmware, and it has been a strong success!
Right now even the C writers are getting in love with MikroBasic because they can discuss with the Hardware engineers just reading the FW.
Final, we have analyzed the assembler output from MikroC and MikroBasic and they are almost identical.
Have a look to this simple CRC routines written in MikroBasic and in C:
Sub function Vector_CRC_Calc (Dim Vector_lenght As Byte, Dim Byref CRC_Vector as byte[255] ) as byte
Dim CRC_Result,Bit_,Dato as byte
SUMCHK = 0xffff
For Dato = 0 to Vector_lenght
SUMCHK = SUMCHK xor CRC_Vector[Dato]
For Bit_ = 0 to 7
If SUMCHK.b0 = 1
Then SUMCHK = SUMCHK >> 1
SUMCHK = SUMCHK xor 0xA001
Else SUMCHK = SUMCHK >> 1
End If
Next Bit_
Next Dato
------------------------------------------------------------------------------------------------------
// Compute the MODBUS RTU CRC
UInt16 ModRTU_CRC(byte[] buf, int len)
{
UInt16 crc = 0xFFFF;
for (int pos = 0; pos < len; pos++) {
crc ^= (UInt16)buf[pos]; // XOR byte into least sig. byte of crc
for (int i = 8; i != 0; i--) { // Loop over each bit
if ((crc & 0x0001) != 0) { // If the LSB is set
crc >>= 1; // Shift right and XOR 0xA001
crc ^= 0xA001;
}
else // Else LSB is not set
crc >>= 1; // Just shift right
}
}
// Note, this number has low and high bytes swapped, so use it accordingly (or swap bytes)
return crc;
}
The two routines gives exactly the same results, but the first one can be read by anybody, the second only by a SW engineer.
Don't forget that the goal it is NOT write software, but have the desired functionalities!
Of course we use MikroBasic only as Functions and Procedures, so you must avoid te use of Goto or Gosub or out of order instructions.
Have a nice day,
Alex
-
Attachments
-
- Screenshot 2022-06-21 113124.png (38.98 KiB) Viewed 1247 times
