易码技术论坛

 找回密码
 加入易码
搜索
查看: 398506|回复: 9

[工具] [原创]BAS版人品测试[Ver 1.0][2007/02/04]

[复制链接]
发表于 2007-2-4 22:12:08 | 显示全部楼层
汗,我昨天还在写"人品计算器"的说,,,,今天就有人放出来了...
呵呵,我的代码so简单...asc码值乘以相应倍数,再做个分段判断
不知道LZ是怎么写的.
不过还是支持!~
偶最喜欢用BASIC倒腾这类简单的小软件了
 楼主| 发表于 2007-2-4 22:28:08 | 显示全部楼层
我的也是跟ASC有关拉,只是为了让只有少数名字(包括我,自恋)达到100而把那个值乘乘加加,外加MOD,很乱的一个公式,反正是毫无根据拉,连数值是否平均分布都不知道办到没。
发表于 2007-2-4 22:39:25 | 显示全部楼层
厄,汗……
   名字就可以测RP啊
      我玩WOW貌似RP还不错也
发表于 2007-2-5 00:29:24 | 显示全部楼层
原来水库的游戏。。。
 楼主| 发表于 2007-2-5 00:33:35 | 显示全部楼层
本来是想发到水库的,后面觉得这也算软件嘛就发这来了,写了个标准的说明(其实是罗里八嗦,GGYY)哈哈。。。
发表于 2007-2-5 18:23:55 | 显示全部楼层
继续加油吧,呵呵
发表于 2007-2-5 18:51:52 | 显示全部楼层
支持下!
发表于 2007-2-7 15:20:29 | 显示全部楼层
d顶了
发表于 2007-2-8 19:02:56 | 显示全部楼层
继续加油呀!
希望早点看到FF呀
 楼主| 发表于 2007-2-4 22:06:10 | 显示全部楼层 |阅读模式
  【软件名称】人品测试
【最新版本】Ver 1.0
【软件作者】冰渊(论坛ID:szskx,就是这个拉)
【适用平台】支持GVBASIC的,(偶是TC1000s,运行不了告诉我,我把原码用TXT给你只是麻烦你自己打了)
【软件截图】对不起,不方便耶。
【软件说明】
   输入姓名,测试该姓名的RP值(阿,你不知道,时下最流行的人品值啊,看来你人品不怎么样哦)
操作说明
   使用说明应该不用写了吧,进去就会明白的,在这里我想说说怎么修改这个软件以满足不同程度的作弊需要。
1.修改评述
   在190-250行分别代表RP测试的分值在0-19,20-39,40-59,60-79,80-99,100,其他 七个分值段的评述,修改" "内的内容,可以放肆修改,想怎么改就怎么改(别破坏了语法就可以了,比如在里面加个"要不得的)

2.修改特定人的RP值(真正作弊)
   step1. 编辑,把65行的REM删除,保存退出。
   step2. 运行,输入你要改的名字,然后会出来一个数字记下来,我用A代替说明。
   step3. 然后系统会第一次算出该名字的RP值,也记下来,我用R代替说明。
   step4. 退出,编辑,先把65前面去掉的REM重新写上(就写 65 数字后面就可以了),然后到107行去掉REM,把IF (RP=99) AND (ASC(S$)=186) THEN RP=3中,第1个RP=后面填写前面记下的数字R,ASC(S$)=后面填写数字A,THEN RP=后面填写你要改成的RP值,保存退出就可以了。
   结尾:当然可能也会连带改了其他一些名字的RP,几率应该比较小吧不管了,如果懂点BAS的step5中107-111都可以写特殊RP的条件语句(对不起,留少了点)。

==================================================

P.S.
·本软件毫无科学根据,目的仅为博得各位星迷一笑,如有因本软件致使自信长期不足,或者心情极度亢奋而影响学习、生活的,作者概不负责,高血压、心脏病患者慎用,谢谢合作。
·代码原创,思路非原创,如有雷同,纯属巧合,还有写得超级乱高手就别编辑了阿,原谅我。
·如喜欢本软件自由转载,无任何限制。
·晚自习,很无聊的时候写的(不含说明),好像有些无聊,不过成功Kill了我一堆同学的2节晚自习。
·回个贴就算支持我了,有Bug记得告诉我哦。
·这个帮助用在这个软件上好像有点浪费了吧(偶觉得),不过本软件本来就不太有意义的说。
最后祝各位寒假愉快、春节愉快。
       冰渊(论坛ID:szskx)-----我没用这个名字作弊哦
       2007/02/04-----其实是01月22日写好的
【更新日志】 暂时没有

Rptest1_0.rar

3 KB, 下载次数: 126

本软件接受一切批评

您需要登录后才可以回帖 登录 | 加入易码

本版积分规则

Archiver|手机版|小黑屋|EMAX Studio

GMT+8, 2024-4-24 10:43 , Processed in 0.011860 second(s), 21 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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