论坛风格切换切换到宽版
  • 5556阅读
  • 19回复

A类业余电台操作证书2013年10月31日最新题库以及答案整理文本版可直接打印 [复制链接]

上一主题 下一主题
离线李峥
 
只看楼主 倒序阅读 0楼 发表于: 2013-11-12
RT,终于可以报考呼号了,可在网上找到的都是老版本的题库。
无奈下自己根据CRAC的考试软件整理出来一份独立的A类业余电台操作证书题库和答案。370题完整版。

描述:A类业余电台操作证书题库20131031版370题
附件: A类题库.rar (31 K) 下载次数:110
描述:A类业余电台操作证书题库20131031版370题对应答案
附件: daan.txt (20 K) 下载次数:83
离线BA7CK
发帖
76060
只看该作者 1楼 发表于: 2013-11-12
楼主,文字版题库在crac网站已经公开的。

内容来自Android手机客户端

离线李峥
只看该作者 2楼 发表于: 2013-11-12
答案也公布的么? 求链 多谢!
离线BA7CK
发帖
76060
只看该作者 3楼 发表于: 2013-11-12
离线李峥
只看该作者 4楼 发表于: 2013-11-12

啊.....   昨天很早 就把370题 从总题库里挑出来了  
昨天写了很久的脚本用来从考试程序里采集正确答案....现在才知道A就是正确答案.....
昨天几个小时的功夫都白费了 还在服务器挂很久才搞齐370题
小白伤不起 求安慰...
离线李峥
只看该作者 5楼 发表于: 2013-11-12
  1. #[HOTKEY]F11
  2. function main
  3. while true
  4. Wait(10)    
  5. if not FindWindow("机上答卷",ziid) then
  6.     if FindWindow("业余电台操作技术能力认定考核系统 CRAC-ArExam-CSB(模拟考试版) 20130601",zhuid) then
  7.     ActiveWindow(zhuid)
  8.     KeyPress("RETURN")
  9.     wait(100)
  10.     end if
  11. end if
  12. if FindWindow("机上答卷",ziid) then
  13.     GetChildWindows(ziid, childWins)
  14.     GetChildWindows(childWins[8], daan)
  15.     GetChildWindows(childWins[13], jieshu)
  16.     GetChildWindows(childWins[7], tihao)
  17.     GetChildWindows(childWins[5], daanid)
  18.     GetChildWindows(childWins[10], chakanbenti)
  19.     GetChildWindows(chakanbenti[2], shitidaima)
  20.     GetChildWindows(tihao[1], dqtihao)
  21.     if CNum(GetTextBoxContent(dqtihao[1])) < 30 then
  22.         SendWindowMessage(tihao[3], &H0201, 0, 0)
  23.         Wait(10)
  24.         SendWindowMessage(tihao[3], &H0202, 0, 0)  
  25.         Wait(10)
  26.         SendWindowMessage(chakanbenti[1], &H0201, 0, 0)
  27.         Wait(10)
  28.         SendWindowMessage(chakanbenti[1], &H0202, 0, 0)  
  29.         stdm=GetTextBoxContent(shitidaima[1])
  30.         daan=GetTextBoxContent(daan[5-CNum(GetTextBoxContent(daanid[1]))])
  31.         WriteTextToFile("答案采集.txt", chr(13)&chr(10), true)
  32.         WriteTextToFile("答案采集.txt", stdm&"答案:"&daan, true)
  33.         Wait(10)
  34.     else
  35.         SendWindowMessage(jieshu[1], &H0201, 0, 0)
  36.         Wait(10)
  37.         SendWindowMessage(jieshu[1], &H0202, 0, 0)  
  38.     
  39.     end if
  40. end if
  41. if FindWindow("操作证考试",cwid) then
  42.     GetChildWindows(cwid, jieshu)
  43.     if GetTextBoxContent(jieshu[1])="确定" then
  44.         ret1=DllCall("user32.dll","int","GetWindowThreadProcessId","int",cwid,"int_ret",pid)
  45.         ret2=DLLCALL("kernel32","int","OpenProcess","int",2035711,"int",0,"int",pid)
  46.         ret3=DLLCALL("kernel32","int","TerminateProcess","int",ret2,"int",0)
  47.         RunApp("C:\Program Files\CRAC_HamSoft\ArExam\ArExamCSB\ArExamCSB.exe")
  48.         Wait(3000)
  49.     end if
  50. end if
  51. wend
  52. end function
  53. function duqu()
  54.     FindWindow("机上答卷",ziid)
  55.     GetChildWindows(ziid, childWins)
  56.     GetChildWindows(childWins[8], daan)
  57.     GetChildWindows(childWins[7], tihao)
  58.     GetChildWindows(tihao[1], dqtihao)
  59.     GetChildWindows(childWins[5], daanid)
  60.     GetChildWindows(childWins[10], chakanbenti)
  61.     GetChildWindows(chakanbenti[2], shitidaima)
  62.     Print("当前题号")
  63.     print(CNum(GetTextBoxContent(dqtihao[1])))
  64.     Print("试题代码")
  65.     print(GetTextBoxContent(shitidaima[1]))
  66.     Print("答案")
  67.     print(GetTextBoxContent(daan[5-CNum(GetTextBoxContent(daanid[1]))]))
  68. end function
  69. function GetTextBoxContent(winID)
  70.     ret = 256
  71.     DllCall("user32.dll", "int", "SendMessageA", "int", winID, "int", 13, "int", 256, "str_ret", ret)
  72.     GetTextBoxContent = ret
  73. end function

离线刘玉卿
只看该作者 6楼 发表于: 2013-11-12
李铮 我终于上来了啊
离线李峥
只看该作者 7楼 发表于: 2013-11-12
刘玉卿 哈,我也是刚刚注册的,这里是好地方,一起学习哈!
离线bg4ajd
发帖
240
只看该作者 8楼 发表于: 2013-11-12
哈哈,你是不是把那个模拟考试软件给破解了?
-----
BH1RJC  ex OP of [B]BY4AJT[/B]---上海交通大学集体电台
离线bd4jk
发帖
4452
只看该作者 9楼 发表于: 2013-11-13
crac网站
BG4-2-066(1993年-        )
BG4JK(1996年-2000年)
BD4JK(2000年-        )
AF5QM(2014年-       )
bd4jk@163.com  
杜新桐  
QQ:526140674      
TEL:13562826548
QTH:山东省新泰市青云路860号
新泰市中医医院  271200  
GL:OM85VV
离线李峥
只看该作者 10楼 发表于: 2013-11-13
回 bg4ajd 的帖子
bg4ajd:哈哈,你是不是把那个模拟考试软件给破解了? (2013-11-12 23:47) 

是从crac公布的总题库里分离出来
离线BG6QCB
发帖
5262
只看该作者 11楼 发表于: 2013-11-13
怎么样打一不开的
莱鸟      
BG6QCB
E-mail;BG6QCB@126.com
           BG6QCB@tom.com
QQ.   151772849
13707155268
离线bg4hyk
发帖
1876
只看该作者 12楼 发表于: 2013-11-13
好人那。
欢迎加入 快乐无线电GLHAM 224850911QQ群
离线bg8tic
只看该作者 13楼 发表于: 2013-11-21
楼主,你太强大了。我一直想单独弄出来 ,都不知道从哪里下手。

好像那个答案还真是A啊
离线BH4TXN
发帖
15095
只看该作者 14楼 发表于: 2013-11-23
唉!没事干的孩子伤不起啊~这文字版不是早就公开了吗?还费那么大功夫?
微信公众号BH4TXN
----------------
野外穿越、搜救必备--北斗终端海聊产品授权代理商
E文网站代理群:368045942   DIGI模式群:152930364 免费算APRS-IS验证码
淘宝小店:https://bh4txn.taobao.com 英文网站注册及日志代理                
指纹密码刷卡智能锁 智能家居 900兆:要奇奇陆吧三铃摇摇就散
扣扣:肆肆叁壹肆玖壹壹陆  支付宝:bh4txn艾特gmail.com  微信:BH4TXN_AF5QP  QTH:无锡市梁溪区家乐苑25-1号
离线邱奎
发帖
13
只看该作者 15楼 发表于: 2013-12-02
楼主费心了,辛苦了
离线bg6rxl
发帖
86
只看该作者 16楼 发表于: 2013-12-02
楼主费心了, 答案网上早就有了,我是今天刚注册进来的,回的第一个贴,
离线BD7KAV
发帖
12
只看该作者 17楼 发表于: 2013-12-09
太好了,谢谢楼主分享,不用我混着ABC一起看了
离线爱不交租
发帖
12360
只看该作者 18楼 发表于: 2013-12-17
我是来学习脚本的 不过弱弱地问下楼主,脚本是基于什么环境用的?VC吗?
[ 此帖被爱不交租在2013-12-17 14:27重新编辑 ]
我读书少  不要骗我
离线BD7MXF
发帖
120
只看该作者 19楼 发表于: 2014-02-26
楼主费心了,辛苦了