QQ登录

只需一步,快速开始

登录 | 立即注册 | 找回密码

主题

帖子

荣誉

新鱼友

Rank: 1

积分
16
查看: 192|回复: 2

求转换delphi格式代码

[复制链接]
最佳答案
0 
累计签到:21 天
连续签到:10 天
hdingguo20 发表于 2018-6-1 10:02:36 1922 | 显示全部楼层 |阅读模式

马上注册加入鱼C,享用更多服务吧^_^

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
这个不知道是什么语言写的求大师帮忙转成delphi格式
///////////////////////////////////////////////////////////////////////////////////////////////
code += input + 'V';
for (uint o = 0; o < len_output; ++o)
{
    code += outputs[o] + ',';
}
code.resize(code.length() - 1);
code += '.';
///////////////////////////////////////////////////////////////////////////////////////////////
code += input + 'X';
for (uint o = 0; o < len_output; ++o)
{
   code += outputs[o] + '&';
}
code.resize(code.length() - 1);
///////////////////////////////////////////////////////////////////////////////////////////////
uint8 inp = input-1;
uint8 len = len_output*2 + 2;
uint8 check =  0x96 + 0x01 + 0x01 + 0xA0 + len;
string str;
for (uint o = 0; o < len_output; ++o)
{
    uint8 outp = outputs[o] - 1;
    str+= chr(outp) + chr(inp);
    check += outp + inp;
}
check = 0xff&check;
if (0x96 == check) check = 0x6A;
code += mem(0x960101) + chr(len) + chr(0xA0) + str + mem(check);
///////////////////////////////////////////////////////////////////////////////////////////////
code +=  '*' + fmt(input, '0', 2) + 'R';
for (uint o = 0; o < len_output; ++o)
{
    code +=  fmt(outputs[o], '0', 2) + ',';
}
code.resize(code.length() - 1);
///////////////////////////////////////////////////////////////////////////////////////////////
楼层
跳转到指定楼层
最佳答案
0 
累计签到:21 天
连续签到:10 天
hdingguo20  楼主| 发表于 2018-6-2 08:47:11 | 显示全部楼层
自己做沙发
最佳答案
0 
累计签到:21 天
连续签到:10 天
hdingguo20  楼主| 发表于 2018-6-3 20:48:07 | 显示全部楼层

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

小甲鱼强烈推荐 上一条 /1 下一条

    移动客户端下载(未启用)
    微信公众号

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备11014136号

Copyright 2018 鱼C论坛 版权所有 All Rights Reserved.

Powered by Discuz! X3.3 Copyright
© 2001-2018 Comsenz Inc.    All Rights Reserved.

小黑屋|手机版|Archiver|鱼C工作室 ( 粤公网安备 44051102000370号 | 粤ICP备11014136号

GMT+8, 2018-6-21 23:48

快速回复 返回顶部 返回列表