夜观天下的个人资料

求镇魂图加点。路过的给点意见吧，小女子先拜谢了！我没有小鬼泣，扔瓶子也闲麻烦，所以走的还是传统的王姐流但是刷镇魂图还是有点吃力，准备洗点重新加。先说下装备情况，防具都是+30智力宝珠的3s假紫和一件野猪上衣，杖子强10的亲妈，左槽罗恩和灵魂猎者还有艾尔文都是+10的红智。右槽青龙石。装备还可以啦，比上不足，比下有余。我现在的加点情况如下，个位先看下，再给点指导意见吧： >>>>>通用技能<<<<< 后跳：Lv 基础精通：Lv8 魔法暴击：Lv10 >>>>>个性技能<<<<< 强化 - HP恢复：Lv25 强化 - 智力：Lv33 强化 - 命中：Lv20 强化 - 魔法暴击率：Lv8 强化 - 属性强化：Lv13 强化 - 独立攻击：Lv13 >>>>>普通技能<<<<< 暗影夜猫：Lv1 契约召唤：赫德尔：Lv1 鞭挞：Lv38 天击：Lv1 魔法护盾：Lv1 替身草人：Lv1 魔法星弹：Lv1 挑衅人偶：舒露露：Lv1 召唤师布甲精通：Lv1 召唤兽强化：Lv24 解除召唤：Lv1 契约召唤：弗利特：Lv5 精灵召唤：亚德炎：Lv5 精灵召唤：冰奈斯：Lv5 精灵召唤：瑟冥特克：Lv5 召唤兽跟随：Lv1 小火龙满了契约召唤：桑德尔：Lv31 契约召唤：袄索：Lv0 魔力印记：Lv31 精灵召唤：亡魂默克尔：Lv28 精灵召唤：冰影阿奎利斯：Lv28 精灵召唤：火焰赫瑞克：Lv28 精灵召唤：极光格雷林：Lv28 契约召唤：路易丝：Lv26 精灵召唤：伊伽贝拉：Lv26 召唤兽狂化：Lv1 灵魂支配：Lv13 契约召唤：卡西亚斯：Lv8 精灵召唤：瑟利斯特：Lv6 精灵召唤：希德：Lv2 束缚印记：Lv9 >>>>>特性技能<<<<< 基础精通满了强化 - 契约召唤路易丝：Lv2 精灵召唤：伊伽贝拉：Lv2 精灵召唤：极光格雷林：Lv1 强化 - 火焰赫瑞克：Lv1 强化 - 冰影阿奎利斯：Lv1 强化 - 亡魂默克尔：Lv1 ———————————————————————————————————— 现在的加点情况就是这样，因为上位全满了，所以总共能招8个上位，应该不比群招小火差了吧？我想满一个花妖或者中位暗。但是sp又不够。想问下中位暗满几级能瞎镇魂怪啊？还有，花妖不点满行吗？它只是干扰的，也不是要它去输出。不点满的情况下，sp勉强够。最后，求大神指导下，怎么改加点。

关于花妖和中位暗的问题？求大神帮忙解答下？镇魂图中位暗点到多少级才有用啊？才能瞎掉魂图怪？要点满不？还有魂图中位暗和花妖哪个好一些？是不是只能2选1 ，不然sp不够哇？要是花妖不点满的话，花妖还有用吗？本人海1召唤师智力2014魔攻1131，但刷魂图还是吃力啊，不知道那些碾压流是怎么刷的，求解。我说下我的技能情况，王姐满了 4上火龙小骑士鞭子满丸子10级束缚5级中位火满强化和灵魂支配满花妖26级 TP点了4上位王姐各加了2级花妖1级求大神该怎么修改技能加点啊本人没有小鬼泣也手残不想扔瓶子所以下位就舍了。

正弦稳态多频输入功率问题求解。谢谢！希望大神能重点讲解下解题思路。

不含源线性电阻双口网络，求解。先谢啦！如题，怎么求啊，跪求？

电路真题求大神帮忙，双电感出现割集的问题。（附福利一张..）. 如图所示，表示一下我的疑惑。电路出现纯电感割集，电流肯定要跃变，关键是怎么求0+值啊？！根据磁链守恒，可以列出电感回路方程，但是只能列出一个方超啊，i1未知，所以i2和i3的0+值求不出来啊，要是左边电压源换成电流源就好了。不懂，求解？小女子在线等答案，谢谢了！

VB串口通信，怎么读取仪表数据？？？？毕业设计，急急急急！跪求 '串口初始化 '在窗体的 Load 事件中加入下列代码对串口进行初始化: Private Sub Form_Load() MSComm1.CommPort = 9 MSComm1.InputMode = 1 MSComm1.RThreshold = 1 MSComm1.SThreshold = 1 MSComm1.Settings = "4800,n,8,1" MSComm1.PortOpen = True End Sub '开始采集 Private Sub Cmdstart_Click() Timer1.Enabled = True End Sub '停止采集 Private Sub Cmdstop_Click() Timer1.Enabled = False End Sub '每隔 1000ms 像仪表发送读数据命令串 '每台仪表有一个仪表号来识别网上的多台仪表 '程序中仪表号（即地址代号）要与仪表设定值一致，否则不能返回数据 Private Sub Timer1_Timer() MSComm1.Output = Chr(&H8282) & Chr(&H52) & Chr(&HC) End Sub '获取温度测量值并显示 '没法送一次指令，触发下面事件，返回数据串 Private Sub MSComm1_OnCmm() Dim Inbyte() As Byte 上面程序哪一句是读仪表指令啊？？？？程序编好了，但没有反应，不懂通信协议是怎么回事啊，谁会啊，能帮我调好，价钱好商量啊！QQ373797211

VB做串口通信，遇到的问题，跪求帮忙啊！急急急急，毕业设计程序如下。 '定义窗体级变量 '在显示、绘图、报警等过程中使用 Dim datatemp(1000) As Single '用于存储温度采样值 Dim num As Integer '用于存储采样值个数 '串口初始化 '在窗体的 Load 事件中加入下列代码对串口进行初始化: Private Sub Form_Load() MSComm1.CommPort = 9 MSComm1.InputMode = 1 MSComm1.RThreshold = 1 MSComm1.SThreshold = 1 MSComm1.Settings = "4800,n,8,1" MSComm1.PortOpen = True End Sub '开始采集 Private Sub Cmdstart_Click() Timer1.Enabled = True End Sub '停止采集 Private Sub Cmdstop_Click() Timer1.Enabled = False End Sub '每隔 1000ms 像仪表发送读数据命令串 '每台仪表有一个仪表号来识别网上的多台仪表 '程序中仪表号（即地址代号）要与仪表设定值一致，否则不能返回数据 Private Sub Timer1_Timer() MSComm1.Output = Chr(&H8282) & Chr(&H52) & Chr(&HC) End Sub '获取温度测量值并显示 '没法送一次指令，触发下面事件，返回数据串 Private Sub MSComm1_OnCmm() Dim Inbyte() As Byte Dim buffer As String Dim datatemp2a, datatemp2b As String Dim datatemp2 As String If num > 199 Then Call renew '读取仪表返回数据串 Select Case MSComm1.CommEvent Case comEvReceive Inbyte = MSComm1.Input For i = LBound(Inbyte) To UBound(Inbyte) buffer = buffer + Hex(Inbyte(i)) + Chr(32) Next i Case comEvSend End Select '获取十进制测量数据 If Len(Trim(Mid(buffer, 1, 2))) = 1 Then datatemp(num) = Val("&H" & Mid(buffer, 3, 2) & Str("0") & Mid(buffer, 1, 2)) * 0.1 Else datatemp(num) = Val("&H" & Mid(buffer, 3, 2) & Mid(buffer, 1, 2)) * 0.1 End If '获取十六进制测量数据 If Len(Trim(Mid(buffer, 1, 2))) = 1 Then datatemp2a = Str("0") & Trim(Mid(buffer, 1, 2)) Else datatemp2a = Mid(buffer, 1, 2) End If If Len(Trim(Mid(buffer, 3, 2))) = 1 Then datatemp2b = Str("0") & Trim(Mid(buffer, 3, 2)) Else datatemp2b = Mid(buffer, 3, 2) End If datatemp2 = datatemp2a & "" & datatemp2b '显示测量温度值 If datatemp(num) <> 0 Then TempText = Format$(datatemp(num), "0") '十进制显示 'Text2.Text=datatemp2 '十六进制显示 num = num + 1 Call cal '调用计算极值、平均值子程序 Call draw '调用绘曲线过程 End If End Sub '计算极值、平均值 Sub cal() On Error GoTo hh Sum = 0 Max = datatemp(0): Min = Max For i = 0 To num - 1 If datatemp(i) >= Max Then Max = datatemp(i) If datatemp(i) <= Min Then Min = datatemp(i) Sum = Sum + datatemp(i) Next i aver = Sum / Sum MaxText.Text = Format$(Max, "0.0") MinText.Text = Format$(Min, "0.0") AverText.Text = Format$(aver, "0.0") hh: Exit Sub End Sub '绘制温度实时变化曲线 Private Sub draw() Picture1.Cls Picture1.DrawWidth = 1 Picture1.BackColor = QBColor(15) Picture1.Scale (0, 50)-(200, 0) For i = 1 To num - 1 X1 = (i - 1): Y1 = datatemp(i = 1) X2 = i: Y2 = datatemp(i) Picture1.Line (X1, Y1)-(X2, Y2), QBColor(0) Next i End Sub '刷新 Private Sub renew() If num = 0 Then Exit Sub TempText.Text = "": AverText.Text = "" MinText.Text = "": MaxText.Text = "" Picture1.Cls For i = 0 To num - 1 datatemp(i) = 0 Next i num = 0 End Sub '当退出程序时，关闭串口行 Private Sub Cmdquit_Click() Unload Me End Sub Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) MSComm1.PortOpen = False '关闭串口 End Sub —— 通信协议为 1、如果向仪表读取参数代号在表格中参数以外，则仪表不会返回任何数据。 2、XMT-808系列1AH为手动输出值mV。当参数run=0，可通过写该参数来调节手动输出值。读/写指令分别如下：读：地址代号+52H（82）+要读参数的代号+0+0+CRC校验码写：地址代号+43H（67）+要写参数的代号+写入数低字节+写入数高字节+CRC校验码读指令的CRC校验码为：要读参数的代号*256+82+Addr Addr是仪表地址参数值，范围是0-100（注意不要加上80H）。CRC为以上数做二进制，16位整数加法后得到的余数（溢出部分不处理），余数为2个字节，其低字节在前，高字节在后。写指令的CRC校验码规则为：要写的参数代号*256+67+要写的参数值+Addr。要写的参数值用16位二进制整数表示。无论是读还是写，仪表都返回以下数据：测量值PV+给定值SV+输出值mV及报警状态+所读/写参数值其中PV、SV及所读参数值均为整数格式，各占2个字节，MV占一个字节，数值范围0-220，报警状态占一个字节，CRC校验码占2个字节，共10个字节。 CRC校验码为PV+SV+（报警状态*256+mV）+参数值+Addr，按整数加法相加后得到的余数。每2个8位数据代表一个16位整数，低位字节在前，高位字节在后，各温度值采用补码表示，热电偶或热电阻输入时其单位都是0.1℃,1-5V或0-5V等线性输入时,单位都是线性最小单位。因为传递的是16位二进制数，所以无法表示小数点，要求用户在上位机处理。上位机每向仪表发一个指令，仪表返回一个数据。编写上位机软件时，注意每条有效指令，仪表在0-0.2秒内作出应答,而上位机也必须等仪表返回数据后,才能发新的指令。否则将引起错误。如果仪表超过最大响应时间仍没应答，则原因可能无效指令、通讯线路故障，仪表没有开机，通讯地址不合等，此时上位机应重发指令。

阜阳师范学院跪求自习室座位，我是一大三学生，物电的，考研但没自习室座位，求好心的学哥学姐留座位，非常感谢！！qq373797211手机18955844690！！！！