一个公式 C转E

228245280

#include <stdio.h>
char in_array[100];
unsigned char out_array[100];
char result_array[50];
char ascii_array[]="0123456789ABCDEF";
char string_to_hex(char string1,char string2)
{
        char hex = 0;
        if(string1 >= 'A' && string1 <= 'F')
                hex = string1 - 0x37;
        else
                if(string1 >= '0' && string1 <= '9')
                        hex = string1 - 0x30;
        hex = hex * 0x10;
        if(string2 >= 'A' && string2 <= 'F')
                hex = hex + (string2 - 0x37);
        else
                if(string2 >= '0' && string2 <= '9')
                        hex = hex + (string2 - 0x30);
        return hex;
}
void calculate()
{
        int i,j,num = 0;
        unsigned char quotient,remainder,A,B;
        scanf("%s", in_array);
        printf("输入的ID: %s\n", in_array);
        for(i=0;i<100;i++)
        {
                if(in_array[i * 2] != 0)
                {
                        result_array[num] = string_to_hex(in_array[i * 2],in_array[i * 2 + 1]);
                        num++;
                }
        }
        for(i=0;i<num;i++)
        {
                out_array = ~result_array;
                for(j=0;j<(i % 8);j++)
                {
                        if((out_array & 0x80) == 0x80)
                                out_array = (out_array << 1) | 0x01;
                        else
                                out_array = out_array << 1;
                }
                quotient = out_array / 8;
                remainder = out_array % 8;
                out_array = (remainder << 5) + quotient;
                if((out_array & 0x80) == 0x80 && (out_array & 0x01) == 0x00)
                        out_array = out_array ^ 0x56;
                if((out_array & 0x80) == 0x00 && (out_array & 0x01) == 0x01)
                        out_array = out_array ^ 0x6a;
                A = (out_array & 0x60) >> 4;
                B = (out_array & 0x06) << 4;
                out_array = out_array & 0x99;
                out_array = out_array | A |B;
        }
        printf("输出的ID: ");
        for(i=0;i<num;i++)
        {
                printf("%c",ascii_array[out_array / 0x10]);
                printf("%c",ascii_array[out_array % 0x10]);
        }
        printf("\n加“S60”前缀的ID:  ");
        printf("%c",ascii_array['S' / 0x10]);
        printf("%c",ascii_array['S' % 0x10]);
        printf("%c",ascii_array['6' / 0x10]);
        printf("%c",ascii_array['6' % 0x10]);
        printf("%c",ascii_array['0' / 0x10]);
        printf("%c",ascii_array['0' % 0x10]);
        for(i=0;i<num;i++)
        {
                printf("%c",ascii_array[out_array / 0x10]);
                printf("%c",ascii_array[out_array % 0x10]);
        }
        printf("\n加“S61”前缀的ID:  ");
        printf("%c",ascii_array['S' / 0x10]);
        printf("%c",ascii_array['S' % 0x10]);
        printf("%c",ascii_array['6' / 0x10]);
        printf("%c",ascii_array['6' % 0x10]);
        printf("%c",ascii_array['1' / 0x10]);
        printf("%c",ascii_array['1' % 0x10]);
        for(i=0;i<num;i++)
        {
                printf("%c",ascii_array[out_array / 0x10]);
                printf("%c",ascii_array[out_array % 0x10]);
        }
}
int main()
{
        calculate();
        return 0;
}







补充内容 (2024-8-24 21:30):
100红包解决，可以做的加我v       WYGPQ19211

zainex

除了其他人提到的丢失了，这段代码本身也有bug，你直接翻译过去是运行不了的。需要修正下标越界的问题：

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
string_to_hex	字节型
参数名	类 型	参考	可空	数组	备 注
string1	字节型
string2	字节型

变量名	类 型	静态	数组	备 注
hex	字节型

如果 (string1 ≥ 65 且 string1 ≤ 70)
hex ＝ string1 － 55
如果真 (string1 ≥ 48 且 string2 ≤ 57)
hex ＝ string1 － 48

hex ＝ hex × 16
如果 (string2 ≥ 65 且 string2 ≤ 70)
hex ＝ hex ＋ string2 － 55
如果真 (string2 ≥ 48 且 string2 ≤ 57)
hex ＝ hex ＋ string2 － 48

返回 (hex)

子程序名	返回值类型	公开	备 注
calculate
参数名	类 型	参考	可空	数组	备 注
text	文本型
ID	文本型
S60ID	文本型
S61ID	文本型

变量名	类 型	静态	数组	备 注
num	整数型
i	整数型
in_array	字节集
result_array	字节集
out_array	字节集
ascii_array	字节集
length	整数型
quotient	字节型
remainder	字节型
A	整数型
B	整数型

ascii_array ＝ { 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69, 70 }
num ＝ 1
in_array ＝ 到字节集 (text) ＋ { 0 }
out_array ＝ 取空白字节集 (100)
result_array ＝ 取空白字节集 (50)
length ＝ 取字节集长度 (in_array)
i ＝ 0
判断循环首 (i × 2 ＋ 1 ≤ length)
如果真 (in_array [i × 2 ＋ 1] ≠ 0)
result_array [num] ＝ string_to_hex (in_array [i × 2 ＋ 1], in_array [i × 2 ＋ 2])
num ＝ num ＋ 1
i ＝ i ＋ 1
判断循环尾 ()
num ＝ num － 1
变量循环首 (1, num, 1, i)
out_array [i] ＝ 位取反 (result_array [i])
变量循环首 (1, (i － 1) ％ 8, 1, )
如果 (位与 (out_array [i], 128) ＝ 128)
out_array [i] ＝ 位或 (左移 (out_array [i], 1), 1)
out_array [i] ＝ 左移 (out_array [i], 1)

变量循环尾 ()
quotient ＝ out_array [i] ÷ 8
remainder ＝ out_array [i] ％ 8
out_array [i] ＝ 左移 (remainder, 5) ＋ quotient
如果真 (位与 (out_array [i], 128) ＝ 128 且 位与 (out_array [i], 1) ＝ 0)
out_array [i] ＝ 位异或 (out_array [i], 86)
如果真 (位与 (out_array [i], 128) ＝ 0 且 位与 (out_array [i], 1) ＝ 1)
out_array [i] ＝ 位异或 (out_array [i], 106)
A ＝ 右移 (位与 (out_array [i], 96), 4)
B ＝ 左移 (位与 (out_array [i], 6), 4)
out_array [i] ＝ 位与 (out_array [i], 153)
out_array [i] ＝ 位或 (位或 (out_array [i], A), B)
变量循环尾 ()
计次循环首 (num, i)
ID ＝ ID ＋ 字符 (ascii_array [out_array [i] ÷ 16 ＋ 1])
ID ＝ ID ＋ 字符 (ascii_array [out_array [i] ％ 16 ＋ 1])
计次循环尾 ()
S60ID ＝ S60ID ＋ 字符 (ascii_array [83 ÷ 16 ＋ 1])
S60ID ＝ S60ID ＋ 字符 (ascii_array [83 ％ 16 ＋ 1])
S60ID ＝ S60ID ＋ 字符 (ascii_array [54 ÷ 16 ＋ 1])
S60ID ＝ S60ID ＋ 字符 (ascii_array [54 ％ 16 ＋ 1])
S61ID ＝ S60ID
S60ID ＝ S60ID ＋ 字符 (ascii_array [48 ÷ 16 ＋ 1])
S60ID ＝ S60ID ＋ 字符 (ascii_array [48 ％ 16 ＋ 1])
S60ID ＝ S60ID ＋ ID
S61ID ＝ S61ID ＋ 字符 (ascii_array [49 ÷ 16 ＋ 1])
S61ID ＝ S61ID ＋ 字符 (ascii_array [49 ％ 16 ＋ 1])
S61ID ＝ S61ID ＋ ID

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
ID	文本型
S60ID	文本型
S61ID	文本型

calculate (“55555”, ID, S60ID, S61ID)
调试输出 (“输出的ID: ” ＋ ID)
调试输出 (“加 'S60' 前缀的ID:  ” ＋ S60ID)
调试输出 (“加 'S61' 前缀的ID:  ” ＋ S61ID)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 string_to_hex, 字节型<br /> .参数 string1, 字节型<br /> .参数 string2, 字节型<br /> .局部变量 hex, 字节型<br /> <br /> .如果 (string1 ≥ 65 且 string1 ≤ 70)<br />     hex ＝ string1 － 55<br /> .否则<br />     .如果真 (string1 ≥ 48 且 string2 ≤ 57)<br />         hex ＝ string1 － 48<br />     .如果真结束<br /> <br /> .如果结束<br /> hex ＝ hex × 16<br /> .如果 (string2 ≥ 65 且 string2 ≤ 70)<br />     hex ＝ hex ＋ string2 － 55<br /> .否则<br />     .如果真 (string2 ≥ 48 且 string2 ≤ 57)<br />         hex ＝ hex ＋ string2 － 48<br />     .如果真结束<br /> <br /> .如果结束<br /> 返回 (hex)<br /> <br /> <br /> .子程序 calculate<br /> .参数 text, 文本型<br /> .参数 ID, 文本型, 参考<br /> .参数 S60ID, 文本型, 参考<br /> .参数 S61ID, 文本型, 参考<br /> .局部变量 num, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 in_array, 字节集<br /> .局部变量 result_array, 字节集<br /> .局部变量 out_array, 字节集<br /> .局部变量 ascii_array, 字节集<br /> .局部变量 length, 整数型<br /> .局部变量 quotient, 字节型<br /> .局部变量 remainder, 字节型<br /> .局部变量 A, 整数型<br /> .局部变量 B, 整数型<br /> <br /> ascii_array ＝ { 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69, 70 }<br /> num ＝ 1<br /> in_array ＝ 到字节集 (text) ＋ { 0 }<br /> out_array ＝ 取空白字节集 (100)<br /> result_array ＝ 取空白字节集 (50)<br /> length ＝ 取字节集长度 (in_array)<br /> i ＝ 0<br /> .判断循环首 (i × 2 ＋ 1 ≤ length)<br />     .如果真 (in_array [i × 2 ＋ 1] ≠ 0)<br />         result_array [num] ＝ string_to_hex (in_array [i × 2 ＋ 1], in_array [i × 2 ＋ 2])<br />         num ＝ num ＋ 1<br />     .如果真结束<br />     i ＝ i ＋ 1<br /> .判断循环尾 ()<br /> num ＝ num － 1<br /> .变量循环首 (1, num, 1, i)<br />     out_array <i> ＝ 位取反 (result_array <i>)<br />     .变量循环首 (1, (i － 1) ％ 8, 1, )<br />         .如果 (位与 (out_array <i>, 128) ＝ 128)<br />             out_array <i> ＝ 位或 (左移 (out_array <i>, 1), 1)<br />         .否则<br />             out_array <i> ＝ 左移 (out_array <i>, 1)<br />         .如果结束<br /> <br />     .变量循环尾 ()<br />     quotient ＝ out_array <i> ÷ 8<br />     remainder ＝ out_array <i> ％ 8<br />     out_array <i> ＝ 左移 (remainder, 5) ＋ quotient<br />     .如果真 (位与 (out_array <i>, 128) ＝ 128 且 位与 (out_array <i>, 1) ＝ 0)<br />         out_array <i> ＝ 位异或 (out_array <i>, 86)<br />     .如果真结束<br />     .如果真 (位与 (out_array <i>, 128) ＝ 0 且 位与 (out_array <i>, 1) ＝ 1)<br />         out_array <i> ＝ 位异或 (out_array <i>, 106)<br />     .如果真结束<br />     A ＝ 右移 (位与 (out_array <i>, 96), 4)<br />     B ＝ 左移 (位与 (out_array <i>, 6), 4)<br />     out_array <i> ＝ 位与 (out_array <i>, 153)<br />     out_array <i> ＝ 位或 (位或 (out_array <i>, A), B)<br /> .变量循环尾 ()<br /> .计次循环首 (num, i)<br />     ID ＝ ID ＋ 字符 (ascii_array [out_array <i> ÷ 16 ＋ 1])<br />     ID ＝ ID ＋ 字符 (ascii_array [out_array <i> ％ 16 ＋ 1])<br /> .计次循环尾 ()<br /> S60ID ＝ S60ID ＋ 字符 (ascii_array [83 ÷ 16 ＋ 1])<br /> S60ID ＝ S60ID ＋ 字符 (ascii_array [83 ％ 16 ＋ 1])<br /> S60ID ＝ S60ID ＋ 字符 (ascii_array [54 ÷ 16 ＋ 1])<br /> S60ID ＝ S60ID ＋ 字符 (ascii_array [54 ％ 16 ＋ 1])<br /> S61ID ＝ S60ID<br /> S60ID ＝ S60ID ＋ 字符 (ascii_array [48 ÷ 16 ＋ 1])<br /> S60ID ＝ S60ID ＋ 字符 (ascii_array [48 ％ 16 ＋ 1])<br /> S60ID ＝ S60ID ＋ ID<br /> S61ID ＝ S61ID ＋ 字符 (ascii_array [49 ÷ 16 ＋ 1])<br /> S61ID ＝ S61ID ＋ 字符 (ascii_array [49 ％ 16 ＋ 1])<br /> S61ID ＝ S61ID ＋ ID<br /> <br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 ID, 文本型<br /> .局部变量 S60ID, 文本型<br /> .局部变量 S61ID, 文本型<br /> <br /> calculate (“55555”, ID, S60ID, S61ID)<br /> 调试输出 (“输出的ID: ” ＋ ID)<br /> 调试输出 (“加 'S60' 前缀的ID:  ” ＋ S60ID)<br /> 调试输出 (“加 'S61' 前缀的ID:  ” ＋ S61ID)

番茄吧

你的代码在那个网页运行不了，不然还是可以调试下的

228245280

番茄吧 发表于 2024-8-24 20:55
你的代码在那个网页运行不了，不然还是可以调试下的

可以运行的，我都截图了呀

同学麻烦让让

228245280 发表于 2024-8-24 21:28
可以运行的，我都截图了呀

运行不了，应该是复制到论坛的时候有些字符被吃掉了导致的，以前我也有过这种情况，不信你自己复制你网页上这段代码去运行

Hoibben

番茄吧 发表于 2024-8-24 20:55
你的代码在那个网页运行不了，不然还是可以调试下的

混这么多年的论坛 这个代码都看不出哪里有问题啊~

肯定是[    i  ] 啊~

修复了一下是可以跑的 结果也一样 懒得翻译~

Hoibben

zainex 发表于 2024-8-24 19:42
除了其他人提到的丢失了，这段代码本身也有bug，你直接翻译过去是运行不了的。需要修正下标越界的问题：

[ ...

这种代码直接用C扣汇编或者编译DLL最省事 啥下标不下标的 讲效率最多两循环就完事了~