183 lines
4.0 KiB
C++
183 lines
4.0 KiB
C++
|
// file: main_02_MENT.cpp
|
||
|
// THIS IS C++, use clang++
|
||
|
|
||
|
#include <iostream>
|
||
|
|
||
|
#include "../../helpers/println.hpp"
|
||
|
|
||
|
struct PascalString{
|
||
|
int length; // number of chars used
|
||
|
char characters[256]; // chars of some character string
|
||
|
};
|
||
|
|
||
|
char cStringArea[1024];
|
||
|
|
||
|
int hexDigitToInt(char hexDigit) {
|
||
|
int value = 0;
|
||
|
|
||
|
if(hexDigit > 47 && hexDigit < 58)
|
||
|
value = hexDigit - 48;
|
||
|
|
||
|
if(hexDigit > 96 && hexDigit < 103)
|
||
|
value = hexDigit - 97 + 10;
|
||
|
|
||
|
return value;
|
||
|
}
|
||
|
|
||
|
int hexStringToInt(PascalString binaryDigits) {
|
||
|
int returnValue = 0;
|
||
|
|
||
|
for(int i = 0; i <= binaryDigits.length; ++i) {
|
||
|
returnValue += binaryDigits.characters[i];
|
||
|
}
|
||
|
|
||
|
return returnValue;
|
||
|
}
|
||
|
|
||
|
void printPascalString(PascalString s) {
|
||
|
for(int i = 0; i <= s.length; i++) {
|
||
|
print(s.characters[i]);
|
||
|
}
|
||
|
println("");
|
||
|
}
|
||
|
|
||
|
PascalString intToDual(int n) {
|
||
|
int i = std::to_string(n).length() * 4;
|
||
|
PascalString string = {i};
|
||
|
while(n >= 1) {
|
||
|
string.characters[i] = (n % 2) + '0';
|
||
|
n = n / 2;
|
||
|
i--;
|
||
|
}
|
||
|
return string;
|
||
|
}
|
||
|
|
||
|
char intToHexChar(int n) {
|
||
|
switch(n) {
|
||
|
case 0: return '0';
|
||
|
case 1: return '1';
|
||
|
case 2: return '2';
|
||
|
case 3: return '3';
|
||
|
case 4: return '4';
|
||
|
case 5: return '5';
|
||
|
case 6: return '6';
|
||
|
case 7: return '7';
|
||
|
case 8: return '8';
|
||
|
case 9: return '9';
|
||
|
case 10: return 'A';
|
||
|
case 11: return 'B';
|
||
|
case 12: return 'C';
|
||
|
case 13: return 'D';
|
||
|
case 14: return 'E';
|
||
|
case 15: return 'F';
|
||
|
default: return 'X';
|
||
|
}
|
||
|
}
|
||
|
|
||
|
PascalString intToHex(int n) {
|
||
|
int i = std::to_string(n).length();
|
||
|
PascalString string = {i};
|
||
|
while(n >= 1) {
|
||
|
string.characters[i] = intToHexChar(n % 16);
|
||
|
n = n / 16;
|
||
|
i--;
|
||
|
}
|
||
|
return string;
|
||
|
|
||
|
}
|
||
|
|
||
|
int getInt(char character) {
|
||
|
if(character == '0') return 0;
|
||
|
else return 1;
|
||
|
}
|
||
|
|
||
|
PascalString bitwiseDualAnd(PascalString a, PascalString b) {
|
||
|
PascalString result = {b.length};
|
||
|
|
||
|
for(int i = 0; i <= b.length; ++i) {
|
||
|
result.characters[i] = a.characters[i] & b.characters[i];
|
||
|
}
|
||
|
return result;
|
||
|
}
|
||
|
|
||
|
PascalString bitwiseOctalAnd(PascalString a, PascalString b) {
|
||
|
PascalString result = {b.length, '0'};
|
||
|
|
||
|
for(int i = 0; i <= b.length; ++i) {
|
||
|
result.characters[i] = a.characters[i] & b.characters[i];
|
||
|
}
|
||
|
return result;
|
||
|
}
|
||
|
|
||
|
|
||
|
|
||
|
PascalString bitwiseHexAnd(PascalString a, PascalString b) {
|
||
|
a = intToDual(hexStringToInt(a));
|
||
|
b = intToDual(hexStringToInt(b));
|
||
|
PascalString result = bitwiseDualAnd(a, b);
|
||
|
|
||
|
return result;
|
||
|
}
|
||
|
|
||
|
int to_c_string(PascalString s) {
|
||
|
|
||
|
}
|
||
|
|
||
|
void line() {
|
||
|
println("===================================");
|
||
|
}
|
||
|
|
||
|
int main(int argc, char** argv, char** envp) {
|
||
|
|
||
|
PascalString s = {3, '1', '0', '0'};
|
||
|
PascalString s2 = {4, 'f', 'f', 'f', 'f'};
|
||
|
println(hexStringToInt(s));
|
||
|
line();
|
||
|
println(hexStringToInt(s2));
|
||
|
line();
|
||
|
println(hexDigitToInt('d'));
|
||
|
line();
|
||
|
println(hexDigitToInt('9'));
|
||
|
line();
|
||
|
println(hexDigitToInt('2'));
|
||
|
|
||
|
printPascalString(s2);
|
||
|
line();
|
||
|
|
||
|
int controlRegister = 128;
|
||
|
controlRegister |= 64+32;
|
||
|
controlRegister ^=16;
|
||
|
controlRegister &= 128+64;
|
||
|
controlRegister <<= 1;
|
||
|
|
||
|
println(controlRegister);
|
||
|
line();
|
||
|
println(intToHexChar(6));
|
||
|
line();
|
||
|
println(intToHexChar(10));
|
||
|
line();
|
||
|
printPascalString(intToDual(4106));
|
||
|
line();
|
||
|
printPascalString(intToHex(965));
|
||
|
line();
|
||
|
printPascalString(intToHex(1956));
|
||
|
|
||
|
line();
|
||
|
printPascalString(bitwiseDualAnd({3, '1', '1', '0'}, {3, '1', '1', '1'}));
|
||
|
line();
|
||
|
printPascalString(bitwiseDualAnd({3, '1', '1', '1'}, {3, '1', '1', '1'}));
|
||
|
line();
|
||
|
printPascalString(bitwiseDualAnd({3, '0', '1', '0'}, {3, '1', '0', '1'}));
|
||
|
line();
|
||
|
printPascalString(bitwiseDualAnd({3, '1', '0', '0'}, {3, '1', '1', '1'}));
|
||
|
line();
|
||
|
printPascalString(bitwiseOctalAnd({2, '6', '3'}, {2, '1', '2'}));
|
||
|
|
||
|
|
||
|
line();
|
||
|
printPascalString(bitwiseHexAnd({2, 'A', '1'}, {2, 'C', '2'}));
|
||
|
|
||
|
return 0;
|
||
|
}
|
||
|
|