至尊部分-代码随笔

Delay 200刚符我个

Dimenv 小瞬移热键

Delay 200刚符我个

End Event End Event13

Form1.Hotkey1.Register Truesdaq1

End Event

Event Form1.Hotkey1.Change

小瞬移热键=Form1.Hotkey1.VirtualKey

Call Plugin.File.WriteINI("瞬移热键", "小瞬移", 小瞬移热键,"c:\dftq\Config.ini" )

TracePrint 小瞬移热键

Form1.Hotkey1.Register True

End Event

Event Form1.Hotkey2.Hotkey

If Form1.OptionBox4.value = 1 Then

If Form1.ComboBox1.ListIndex =0 Then

// Form1.Hotkey2.Register False

Call 大瞬移操作码

TracePrint "轻甲大瞬移启动"

// Delay 300

// Form1.Hotkey2.Register True

ElseIf Form1.ComboBox1.ListIndex = 1 Then

Form1.Hotkey2.Register False

Call 大瞬移操作码2

TracePrint "重甲大瞬移启动"

// Delay 300

// Form1.Hotkey2.Register True

End If

Delay 300

Form1.Hotkey2.Register True

End Event

Event Form1.Hotkey2.Change

大瞬移热键=Form1.Hotkey2.VirtualKey

Call Plugin.File.WriteINI("瞬移热键", "大瞬移", 大瞬移热键,"c:\dftq\Config.ini" )

TracePrint 大瞬移热键

Form1.Hotkey2.Register True

End Event

Event Form1.Hotkey3.Hotkey

//Set dm = createobject("dm.dmsoft")

//dm_ret = dm.SetPath("c:\dftq")

//回车光标检测地址 = "[<tiejiclient.exe>+02e39528]+264"

//回车光标检测 = dm.ReadInt(dftq, 回车光标检测地址, 0)

Form1.Hotkey3.Register False

回车光标检测 = Cint(Plugin.DBSoft.ReadMemEX(dftq, &H3239528, 3, &H264))

If Form1.OptionBox6.value = 1 Then

If Form1.ComboBox1.ListIndex =0 Then

// Form1.Hotkey3.Register False

Call 慢瞬移操作码

TracePrint "轻甲慢瞬移启动"

// Delay 400

// Form1.Hotkey3.Register True

ElseIf Form1.ComboBox1.ListIndex = 1 Then

// Form1.Hotkey3.Register False

Call 慢瞬移操作码2

TracePrint "重甲慢瞬移启动"

// Delay 400

// Form1.Hotkey3.Register True

End If

Delay 400

Form1.Hotkey3.Register True

End Event

Event Form1.Hotkey3.Change

慢瞬移热键=Form1.Hotkey3.VirtualKey

Call Plugin.File.WriteINI("瞬移热键", "慢瞬移", 慢瞬移热键,"c:\dftq\Config.ini" )

TracePrint 慢瞬移热键

Form1.Hotkey3.Register True

End Event

Event Form1.Hotkey4.Hotkey

//Set dm = createobject("dm.dmsoft")

//dm_ret = dm.SetPath("c:\dftq")

//回车光标检测地址 = "[<tiejiclient.exe>+02e39528]+264"

//回车光标检测 = dm.ReadInt(dftq, 回车光标检测地址, 0)

Form1.Hotkey4.Register True

回车光标检测 = Cint(Plugin.DBSoft.ReadMemEX(dftq, &H3239528, 3, &H264))

If Form1.OptionBox8.value = 1 Then

If Form1.ComboBox1.ListIndex =0 Then

// Form1.Hotkey4.Register False

Call 超级跳操作码

TracePrint "轻甲超级跳启动"

// Delay 300

// Form1.Hotkey4.Register True

ElseIf Form1.ComboBox1.ListIndex = 1 Then

Form1.Hotkey4.Register False

Call 超级跳操作码2

TracePrint "重甲超级跳启动"

// Delay 300

// Form1.Hotkey4.Register True

End If

Delay 300

Form1.Hotkey4.Register True

End Event

Event Form1.Hotkey4.Change

超级跳热键=Form1.Hotkey4.VirtualKey

Call Plugin.File.WriteINI("跳跃设置热键", "超级跳", 超级跳热键,"c:\dftq\Config.ini" )

TracePrint 超级跳热键

Form1.Hotkey4.Register True

End Event

Event Form1.Hotkey5.Hotkey

//Set dm = createobject("dm.dmsoft")

//dm_ret = dm.SetPath("c:\dftq")

If Form1.OptionBox10.value = 1 Then

If Form1.ComboBox1.ListIndex =0 Then

// Form1.Hotkey5.Register False

Call 大超级跳操作码

TracePrint "轻甲大超级跳启动"

// Delay 300

// Form1.Hotkey5.Register True

ElseIf Form1.ComboBox1.ListIndex = 1 Then

Form1.Hotkey5.Register False

Call 大超级跳操作码2

TracePrint "重甲大超级跳启动"

// Delay 300

// Form1.Hotkey5.Register True

End If

Delay 300

Form1.Hotkey5.Register True

End Event

Event Form1.Hotkey5.Change

大超级跳热键=Form1.Hotkey5.VirtualKey

Call Plugin.File.WriteINI("跳跃设置热键", "大超级跳", 大超级跳热键,"c:\dftq\Config.ini" )

TracePrint 大超级跳热键

Form1.Hotkey5.Register True

End Event

Event Form1.Hotkey6.Hotkey

//Set dm = createobject("dm.dmsoft")

Form1.Hotkey6.Register True

TracePrint "按下了瞬移跳热键"

If Form1.OptionBox12.value = 1 Then

If Form1.ComboBox1.ListIndex =0 Then

// Form1.Hotkey6.Register False

Call 瞬移跳操作码

TracePrint "轻甲瞬移跳启动"

// Delay 300

// Form1.Hotkey6.Register True

ElseIf Form1.ComboBox1.ListIndex = 1 Then

Form1.Hotkey6.Register False

Call 瞬移跳操作码2

TracePrint "重甲瞬移跳启动"

// Delay 300

// Form1.Hotkey6.Register True

End If

Delay 300

Form1.Hotkey6.Register True

End Event

Event Form1.Hotkey7.Hotkey

If Form1.OptionBox15.value = 1 Then

Call 五十倍伤害操作码

// Delay 1630

// Form1.Hotkey7.Register True

End If

Delay 500

Form1.Hotkey7.Register True

End Event

Event Form1.Hotkey7.Change

五十倍伤害热键=Form1.Hotkey7.VirtualKey

Call Plugin.File.WriteINI("PVE设置热键", "五十倍伤害", 五十倍伤害热键,"c:\dftq\Config.ini" )

TracePrint 瞬移跳热键

Form1.Hotkey7.Register True

End Event

Case 10049

// Form1.Hotkey1.Register False

Call 小瞬移操作码

TracePrint "轻甲小瞬移启动"

Delay 200

// Form1.Hotkey1.Register True

ElseIf Form1.ComboBox1.ListIndex = 1 Then

Form1.Hotkey1.Register False

Call 小瞬移操作码2

TracePrint "重甲小瞬移启动"

// Delay 200

// Form1.Hotkey1.Register True

End If

Delay 200

Form1.Hotkey1.Register True

End Event

Event Form1.Hotkey1.Change

小瞬移热键=Form1.Hotkey1.VirtualKey

Call Plugin.File.WriteINI("瞬移热键", "小瞬移", 小瞬移热键,"c:\dftq\Config.ini" )

TracePrint 小瞬移热键

Form1.Hotkey1.Register True

End Event

Event Form1.Hotkey2.Hotkey

If Form1.OptionBox4.value = 1 Then

If Form1.ComboBox1.ListIndex =0 Then

// Form1.Hotkey2.Register False

Call 大瞬移操作码

TracePrint "轻甲大瞬移启动"

// Delay 300

// Form1.Hotkey2.Register True

ElseIf Form1.ComboBox1.ListIndex = 1 Then

Form1.Hotkey2.Register False

Call 大瞬移操作码2

If Form1.ComboBox1.ListIndex =0 Then

// Form1.Hotkey3.Register False

Call 慢瞬移操作码

TracePrint "轻甲慢瞬移启动"

// Delay 400

// Form1.Hotkey3.Register True

ElseIf Form1.ComboBox1.ListIndex = 1 Then

// Form1.Hotkey3.Register False

Call 慢瞬移操作码2

TracePrint "重甲慢瞬移启动"

// Delay 400

// Form1.Hotkey3.Register True

End If

Delay 400

Form1.Hotkey3.Register True

End Event

Event Form1.Hotkey3.Change

慢瞬移热键=Form1.Hotkey3.VirtualKey

Call Plugin.File.WriteINI("瞬移热键", "慢瞬移", 慢瞬移热键,"c:\dftq\Config.ini" )

TracePrint 慢瞬移热键

Form1.Hotkey3.Register True

End Event

If Form1.OptionBox8.value = 1 Then

If Form1.ComboBox1.ListIndex =0 Then

// Form1.Hotkey4.Register False

Call 超级跳操作码

TracePrint "轻甲超级跳启动"

// Delay 300

// Form1.Hotkey4.Register True

ElseIf Form1.ComboBox1.ListIndex = 1 Then

Form1.Hotkey4.Register False

Call 超级跳操作码2

TracePrint "重甲超级跳启动"

// Delay 300

// Form1.Hotkey4.Register True

Call Plugin.File.WriteINI("跳跃设置热键", "超级跳", 超级跳热键,"c:\dftq\Config.ini" )

TracePrint 超级跳热键

Form1.Hotkey4.Register True

End Event

Event Form1.Hotkey5.Hotkey

//Set dm = createobject("dm.dmsoft")

//dm_ret = dm.SetPath("c:\dftq")

//回车光标检测地址 = "[<tiejiclient.exe>+02e39528]+264"

If Form1.OptionBox10.value = 1 Then

If Form1.ComboBox1.ListIndex =0 Then

// Form1.Hotkey5.Register False

Call 大超级跳操作码

TracePrint "轻甲大超级跳启动"

// Delay 300

// Form1.Hotkey5.Register True

ElseIf Form1.ComboBox1.ListIndex = 1 Then

Form1.Hotkey5.Register False

Call 大超级跳操作码2

TracePrint "重甲大超级跳启动"

// Delay 300

// Form1.Hotkey5.Register True

End If

Delay 300

Form1.Hotkey5.Register True

End Event

Event Form1.Hotkey5.Change

大超级跳热键=Form1.Hotkey5.VirtualKey

Call Plugin.File.WriteINI("跳跃设置热键", "大超级跳", 大超级跳热键,"c:\dftq\Config.ini" )

TracePrint 大超级跳热键

Form1.Hotkey5.Register True

End Event

Event Form1.Hotkey6.Hotkey

If Form1.ComboBox1.ListIndex =0 Then

// Form1.Hotkey6.Register False

Call 瞬移跳操作码

TracePrint "轻甲瞬移跳启动"

// Delay 300

// Form1.Hotkey6.Register True

ElseIf Form1.ComboBox1.ListIndex = 1 Then

Form1.Hotkey6.Register False

Call 瞬移跳操作码2

TracePrint "重甲瞬移跳启动"

// Delay 300

// Form1.Hotkey6.Register True

// Delay 1630

// Form1.Hotkey7.Register True

End If

Delay 500

Form1.Hotkey7.Register True

End Event

Event Form1.Hotkey7.Change

五十倍伤害热键=Form1.Hotkey7.VirtualKey

Call Plugin.File.WriteINI("PVE设置热键", "五十倍伤害", 五十倍伤害热键,"c:\dftq\Config.ini" )

TracePrint 瞬移跳热键

Form1.Hotkey7.Register True

End Event

Event Form1.Hotkey9.Change

悬浮框热键=Form1.Hotkey9.VirtualKey

Call Plugin.File.WriteINI("悬浮框热键", "悬浮框", 悬浮框热键,"c:\dftq\Config.ini" )

TracePrint 悬浮框热键

Form1.Hotkey9.Register True

End Event

Event Form1.Hotkey9.Hotkey //悬浮框

//dftq = Plugin.Window.Find("_GE_WINDOW_", "刀锋铁骑")

TracePrint "热键开启信息框"

悬浮框状态=悬浮框状态*-1

If 悬浮框状态=1 Then

StopThread (透明显示线程ID)

Call 关闭信息显示

透明显示线程ID = BeginThread(透明显示)

dim MyArray

//下面这句是得到窗口句柄的客户区大小

sRect = Plugin.Window.GetClientRect(bg)

//MsgBox "得到窗口句柄的客户区大小为："& sRect

//下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串

//下面这句将字符串转换成数值

L = Clng(MyArray(0)): T = Clng(MyArray(1))

R = Clng(MyArray(2)) : B = Clng(MyArray(3))

W1 = Clng(MyArray(0)): H1 = Clng(MyArray(1))

W2 = Clng(MyArray(2)): H2 = Clng(MyArray(3))

TracePrint "左" & L & ",右 " & R & ",上" & T & ",下" & B

TracePrint "边框大小： " & W2 - W1 & " " & H2 - H1

End If

If 悬浮框状态 = - 1 Then

StopThread (透明显示线程ID)

Call 关闭信息显示

End If

End Event

Else

MessageBox "请输入数字"

Form1.InputBox9.Text = ""

End If

End Event

Event Form1.InputBox12.Change

txt = Form1.InputBox9.Text

For i = 1 To len(txt)

tt = Asc(mid(txt, i, 1))

If tt >= 48 and tt <= 57 Then

Else

MessageBox "请输入数字"

Form1.InputBox9.Text = ""

End If

End Event

Event Form1.Button9.Click

Dim MyPos1,MyPos2,a,text,lenth,去括号的坐标结构体,坐标结构体

//人传送状态 = 人传送状态 * (- 1 )

If Form1.TabControl2.Tab=0 Then

Select Case 人传送状态

Case 0

//If 人传送状态 = 1 Then

//If 人传送状态 = 0 Then

Form1.Button9.NormalColor="0000FF"

Form1.Button9.BackColor="0000FF"

Form1.Button9.Caption="停止传送"

Form1.Button9.OverColor="0000FF"

a = Form1.ListBox4.ListIndex//a为选中的列表框元素序号

text = Form1.ListBox4.List//倒出所有元素框内容

预存的坐标们 = split(text, "|")//数组

TracePrint 预存的坐标们(a) //选中的坐标

MyPos1 = Instr(1, 预存的坐标们(a), "(", 1)

MyPos2 = Instr(1, 预存的坐标们(a), ")", 1)

TracePrint MyPos1

TracePrint MyPos2

lenth=MyPos2-MyPos1-1

去括号的坐标结构体 = Mid(预存的坐标们(a), MyPos1+1, lenth)

TracePrint 去括号的坐标结构体

坐标结构体 = split(去括号的坐标结构体, ",")

人传送x坐标=坐标结构体(0)

人传送y坐标=坐标结构体(1)

人传送z坐标=坐标结构体(2)

//StopThread 人传送线程ID

//If 人传送x坐标<>"" and 人传送y坐标<>"" and 人传送z坐标<>"" Then

//人传送线程ID = BeginThread(人传送)

//Delay 1000

Form1.Timer人传送.Enabled=1

人传送状态 = 1

//End If

//If 人传送状态 = - 1 Then

//If 人传送状态 = 1 Then

Case 1

//StopThread 人传送线程ID

Form1.Timer人传送.Enabled=0

人传送状态 = 0

Form1.Timer人传送.Enabled=0

Form1.Button9.NormalColor="5EAB25"

Form1.Button9.BackColor = "68B62F"

Form1.Button9.OverColor="68BF34"

Form1.Button9.Caption="传送"

//End If

End Select

End If

If Form1.TabControl2.Tab=1 Then

//If 人传送状态 = 1 Then

Select Case 人传送状态

Case 0

Form1.Button9.NormalColor="0000FF"

Form1.Button9.BackColor="0000FF"

Form1.Button9.Caption="停止传送"

Form1.Button9.OverColor="0000FF"

a = Form1.ListBox5.ListIndex//a为选中的列表框元素序号

text = Form1.ListBox5.List//倒出所有元素框内容

预存的坐标们 = split(text, "|")//数组

TracePrint 预存的坐标们(a) //选中的坐标

MyPos1 = Instr(1, 预存的坐标们(a), "(", 1)

MyPos2 = Instr(1, 预存的坐标们(a), ")", 1)

TracePrint MyPos1

TracePrint MyPos2

lenth=MyPos2-MyPos1-1

去括号的坐标结构体 = Mid(预存的坐标们(a), MyPos1+1, lenth)

TracePrint 去括号的坐标结构体

坐标结构体 = split(去括号的坐标结构体, ",")

人传送x坐标=坐标结构体(0)

人传送y坐标=坐标结构体(1)

人传送z坐标=坐标结构体(2)

//StopThread 人传送线程ID

If 人传送x坐标<>"" and 人传送y坐标<>"" and 人传送z坐标<>"" Then

//人传送线程ID = BeginThread(人传送)

Form1.Timer人传送.Enabled = 1

人传送状态 = 1

//Delay 1000

End If

//End If

//If 人传送状态 = - 1 Then

//If 人传送状态 = 1 Then

//StopThread 人传送线程ID

Case 1

Form1.Timer人传送.Enabled = 0

人传送状态 =0

Form1.Button9.NormalColor="5EAB25"

Form1.Button9.BackColor = "68B62F"

Form1.Button9.OverColor="68BF34"

Form1.Button9.Caption="传送"

//End If

End Select

End If

End Event

// StopThread 双管加速双击鼠标线程ID

// StopThread 只按r键线程ID

//End If

回车光标检测 = int(Plugin.DBSoft.ReadMemEX(dftq, &H3239528, 3, &H264))

If Form1.ComboBox2.ListIndex=1 and 回车光标检测=0 Then

火炮状态 = 火炮状态 * - 1

TracePrint 火炮状态

If 火炮状态 = 1 Then

TracePrint "开启单管火炮加速"

// MsgBox "开启单管火炮加速"

StopThread 一直按R键线程ID

// Delay 1000

// StopThread 鼠标左右键一起按线程ID

一直按R键线程ID = BeginThread(一直按R键)

Delay 2000

End If

If 火炮状态 = -1 Then

Do验明作者身份和功能演示")

KeyDown 17, 1

KeyPress 86, 1

KeyUp 17, 1

KeyPress "Enter", 1

Delay 10000

Loop

Event Form1.微调加.Hotkey 延迟 (50 + int(微调系数))

//微调系数=Form1.InputBox8.Text

微调系数 = 微调系数 + 1

//Form1.InputBox8.Text = 微调系数

Form1.Label34.Caption = Cint(微调系数)

End Event

Event Form1.微调减.Hotkey

//微调系数=Form1.InputBox8.Text

微调系数 = 微调系数 - 1

//Form1.InputBox8.Text = 微调系数

Form1.Label34.Caption = Cint(微调系数)

End Event

Plugin.Bkgnd.KeyUp dftq,68

延迟 (50 + int(微调系数))

Plugin.Bkgnd.KeyUp dftq,83

Plugin.Bkgnd.KeyUp dftq,68

Form1.OptionBox10.value = 0

// Form1.OptionBox9.value = 0

Form1.Hotkey5.Register False

Form1.OptionBox12.Enabled=0

Form1.OptionBox12.value = 0

Form1.Hotkey6.Register False

// Form1.OptionBox11.value = 0

Form1.Button17.Enabled = 0

Form1.Button18.Enabled = 0

Form1.Button9.Enabled = 0

Form1.Button10.Enabled = 0

Form1.Button15.Enabled = 0

Form1.Button16.Enabled = 0

Form1.Button17.Enabled = 0

Form1.Button18.Enabled = 0

//DimEnv dftq

Set dm = createobject("dm.dmsoft")

dm_ret = dm.SetPath("c:\dftq")

dftq = Plugin.Window.Find("_GE_WINDOW_", "刀锋铁骑")

//下面这句是得到窗口句柄的客户区大小

sRect = Plugin.Window.GetClientRect(dftq)

//MsgBox "得到窗口句柄的客户区大小为："& sRect

//下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串

dim MyArray

MyArray = Split(sRect, "|")

//下面这句将字符串转换成数值

L = Clng(MyArray(0)): T = Clng(MyArray(1))

R = Clng(MyArray(2)) : B = Clng(MyArray(3))

W1 = Clng(MyArray(0)): H1 = Clng(MyArray(1))

W2 = Clng(MyArray(2)): H2 = Clng(MyArray(3))

TracePrint "左" & L & ",右 " & R & ",上" & T & ",下" & B

TracePrint "边框大小： " & W2-W1 & " " & H2-H1

If 火炮状态 = 1 Then

TracePrint "开启双管火炮加速"

// Call 火炮双管加速操作码

火炮双管操作码线程ID = BeginThread(火炮双管操作码)

Delay 2000

End If

If 火炮状态 = - 1 Then

StopThread 火炮双管操作码线程ID

StopThread 双管加速双击鼠标线程ID

StopThread 只按r键线程ID

TracePrint "关闭双单管"

End If

DimEnv 小瞬移热键, 大瞬移热键, 慢瞬移热键, 超级跳热键, 大超级跳热键, 瞬移跳热键, 五十倍伤害热键

Dimenv 鼠标指向的窗口句柄

DimEnv 用户总数

DimEnv 微调系数

End If

Delay 400

Form1.Hotkey8.Register True

Form4.Close

End Event

Event Form5.Button1.Click

Form5.Close

End Event

【/test/test123/自己的号/852912998/9999-08-30/9999-08-15/1/1111111111111/】

【/test2/test123/自己的号/1717028168/9999-08-30/9999-08-15/1/1111111111111//】

【/admin/test123/自己的号/852912998/9999-12-31/9999-12-31/1/1111111111111/】

【/admin2/test123/自己的号/1717028168/9999-12-31/9999-12-31/1/1111111111111/】

【/qq1197232261/aaa2233993/su/174474297/9999-12-31/9999-12-31/1/1111111111111/】

【/fadaisanmiao/midea444/fd三秒/-166643832/9999-12-31/9999-12-31/1/1111111111111/】

【/yumantang/123456/绅士大人/-1239541579/2021-01-23/2020-01-23/1/00000000000000/】

【/851126/851126/小子别狂/-658536568/2021-01-01/2020-01-01/1/00000000000000/】

【/13044263438/chenshisheng/迷途的羔羊/-693589082/2021-01-29/2021-01-29/1/0000000000000/】丢

【/353998868/zhaoyan..521/麒麟丨主宰/1344581108/2021-03-11/2021-03-11/1/】

【/13390802728/gaorong1/rongye/2050393133/2021-01-16/2021-01-16/1/00000000000000/】

【/hahu/hahu123456/哈虎殿下/-2110092082/2021-01-18/2021-01-18/1/0000000000000】

【/weixiao123/123456/微笑/411924016/2021-01-29/2021-01-29/1/0000000000000】

【/aaa123456789/112233/普/-266645760/2021-02-02/2021-02-02/1/0000000000000】

【/34253534666/wc/龙赖/-1469720263/2021-02-16/2021-02-16/1/0000000000000】

【/jiruxue2/jiruxue1234/自己的号/-255012911/2021-01-29/2021-01-29/1/0000000000000/】

最后编辑于：2021.03.08 18:25:38

人面猴
序言：七十年代末，一起剥皮案震惊了整个滨河市，随后出现的几起案子，更是在滨河造成了极大的恐慌，老刑警刘岩，带你破解...
沈念sama阅读 214,658评论 6赞 496
死咒
序言：滨河连续发生了三起死亡事件，死亡现场离奇诡异，居然都是意外死亡，警方通过查阅死者的电脑和手机，发现死者居然都...
沈念sama阅读 91,482评论 3赞 389
救了他两次的神仙让他今天三更去死
文/潘晓璐我一进店门，熙熙楼的掌柜王于贵愁眉苦脸地迎上来，“玉大人，你说我怎么就摊上这事。” “怎么了？”我有些...
开封第一讲书人阅读 160,213评论 0赞 350
道士缉凶录：失踪的卖姜人
文/不坏的土叔我叫张陵，是天一观的道长。经常有香客问我，道长，这世上最难降的妖魔是什么？我笑而不...
开封第一讲书人阅读 57,395评论 1赞 288
港岛之恋（遗憾婚礼）
正文为了忘掉前任，我火速办了婚礼，结果婚礼上，老公的妹妹穿的比我还像新娘。我一直安慰自己，他们只是感情好，可当我...
茶点故事阅读 66,487评论 6赞 386
恶毒庶女顶嫁案：这布局不是一般人想出来的
文/花漫我一把揭开白布。她就那样静静地躺着，像睡着了一般。火红的嫁衣衬着肌肤如雪。梳的纹丝不乱的头发上，一...
开封第一讲书人阅读 50,523评论 1赞 293
城市分裂传说
那天，我揣着相机与录音，去河边找鬼。笑死，一个胖子当着我的面吹牛，可吹牛的内容都是我干的。我是一名探鬼主播，决...
沈念sama阅读 39,525评论 3赞 414
双鸳鸯连环套：你想象不到人心有多黑
文/苍兰香墨我猛地睁开眼，长吁一口气：“原来是场噩梦啊……” “哼！你这毒妇竟也来了？” 一声冷哼从身侧响起，我...
开封第一讲书人阅读 38,300评论 0赞 270
万荣杀人案实录
序言：老挝万荣一对情侣失踪，失踪者是张志新（化名）和其女友刘颖，没想到半个月后，有当地人在树林里发现了一具尸体，经...
沈念sama阅读 44,753评论 1赞 307
护林员之死
正文独居荒郊野岭守林人离奇死亡，尸身上长有42处带血的脓包…… 初始之章·张勋以下内容为张勋视角年9月15日...
茶点故事阅读 37,048评论 2赞 330
白月光启示录
正文我和宋清朗相恋三年，在试婚纱的时候发现自己被绿了。大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
茶点故事阅读 39,223评论 1赞 343
活死人
序言：一个原本活蹦乱跳的男人离奇死亡，死状恐怖，灵堂内的尸体忽然破棺而出，到底是诈尸还是另有隐情，我是刑警宁泽，带...
沈念sama阅读 34,905评论 5赞 338
日本核电站爆炸内幕
正文年R本政府宣布，位于F岛的核电站，受9级特大地震影响，放射性物质发生泄漏。R本人自食恶果不足惜，却给世界环境...
茶点故事阅读 40,541评论 3赞 322
男人毒药：我在死后第九天来索命
文/蒙蒙一、第九天我趴在偏房一处隐蔽的房顶上张望。院中可真热闹，春花似锦、人声如沸。这庄子的主人今日做“春日...
开封第一讲书人阅读 31,168评论 0赞 21
一桩弑父案，背后竟有这般阴谋
文/苍兰香墨我抬头看了看天上的太阳。三九已至，却和暖如春，着一层夹袄步出监牢的瞬间，已是汗流浃背。一阵脚步声响...
开封第一讲书人阅读 32,417评论 1赞 268
情欲美人皮
我被黑心中介骗来泰国打工，没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留，地道东北人。一个月前我还...
沈念sama阅读 47,094评论 2赞 365
代替公主和亲
正文我出身青楼，却偏偏与公主长得像，于是被迫代替她去往敌国和亲。传闻我的和亲对象是个残疾皇子，可洞房花烛夜当晚...
茶点故事阅读 44,088评论 2赞 352

至尊部分-代码随笔

推荐阅读更多精彩内容