『壹』 CF自動射擊腳本源代碼

|//定義變數
VBS Dim yanshi,qiangji
//自定義變數(射擊時間間隔和單次設計子彈內次數)
UserVar yanshi=DropList{60毫秒:60|70毫秒:70|80毫秒:80}=1 延時容設置
UserVar qiangji=DropList{1次:1|2次:2|3次:3}=1 射擊次數
//腳本內容
Rem 開始
//循環檢測加好延時
Delay 10
//檢測區域色點
VBSCall FindColorEx(350,300,450,375,"174AF2",1,0.9,intX,intY)
If intX>0 and intY>0
//表達方式成立進入自動射擊後返回重新檢測色點,更好的把握設計精準度
Delay yanshi
For qiangji
Delay 1
LeftClick 1
EndFor
Delay 1
Goto 開始
Else
//表達方式不成立返回重新找色
Delay 1
Goto 開始
EndIf
EndScript
//腳本結束,原創290256,如果滿意請頂下帖子!~

『貳』 CF源代碼是多少啊

知道源代碼我就去TX公司了

『叄』 誰能給我個cf代碼 　

去代碼基地看看吧！包括
ASP
源代碼
┊
PHP
源代回碼
┊
JSP
源代碼
┊
CGI
源代碼
┊
.NET源代碼
┊
矢量素答材基地
┊
psd素材基地
┊
C#源代碼
┊
Java源代碼
┊
VB源代碼
┊
VC/C++源代碼
┊
Delphi源代碼
┊
FLASH源代碼
等等代碼都有，蠻實用的。

『肆』 怎麼修改穿越火線的網頁源代碼

我也是新手，剛學C語言。如果你會讀程序的話，就仔細看，在它的量運算那裡改一下，生成的源代碼就會不一樣的。這個需要技術的，最起碼要會C語言才能修改源文件改變源代碼。我這個方法提供給你參考。

『伍』 誰有CF的源代碼

ABC......XYZ

『陸』 cf源碼誰有

CF自動開槍源碼

|
瀏覽：3249
|
更新：
2013-12-26 14:34
1
2
3
4
5
分步閱讀
CF自動開槍
工具/原料
按鍵精靈
方法/步驟
1
將以下代碼復制

UserVar Var1=30 "開槍頻率"

UserVar Var2=1 "單次開槍子彈數量"

UserVar Var3=0 "第一槍延遲"

UserVar Var4=55 "壓槍延遲"

//定義變數

DimEnv iWidth ,iHeight //int 屏幕解析度

DimEnv iFD //開槍頻率

iFD=Var1

DimEnv iFN //幾發連射

iFN=Var2

DimEnv iFFD //第一槍延遲

iFFD=Var3

DimEnv iND //壓槍延遲

iND=Var4

//調用主函數

Call Main()

//**Main

//程序入口主函數

Sub Main()

//int 四個角的坐標

Dim iLT,iRT,iLB,iRB

//臨時對象

Dim vTemp

Dim bCanShoot

Dim sStr

//得到解析度(四個坐標)

sStr=getParameter()

//把返回的坐標分割成數組

vTemp=Split(sStr, "|", -1, 1)

iLT=vTemp(0)

iRT=vTemp(1)

iLB=vTemp(2)

iRB=vTemp(3)

//啟用設置開槍頻率線程

BeginThread setFireDelay

//循環腳本

While True

Delay 1

//搜索射程內的敵人

bCanShoot=findFoe(iLT,iRT,iLB,iRB)

//進入射程

If bCanShoot

//第一槍延遲

Delay iFFD

//射擊

Call shootFoe()

//如果沒有命中就壓槍

If Bingo

Delay iND

End If

End If

Wend

End Sub

//**Function

//功能:判斷屏幕解析度

//返回:四個坐標的字元串

Function getParameter()

Dim iLT,iRT,iLB,iRB //int 四個角的坐標

iWidth = Plugin.Sys.GetScRX() //得到屏幕的寬度

iHeight = Plugin.Sys.GetScRY() //得到屏幕的高度

If iWidth=800 Then

iLT=0

iRT=0

iLB=0

iRB=0

ElseIf iWidth=1024 Then

iLT=112 //加上坐標偏移

iRT=84

iLB=112

iRB=84

ElseIf iWidth=1280 Then

iLT=240 //加上坐標偏移

iRT=100

iLB=240

iRB=100

End If

iLT=iLT+380 //LeftTop 左上角

iRT=iRT+345 //RightTop 右上角

iLB=iLB+420 //LeftBottom 左下角

iRB=iRB+355 //RightBottom 右下角

getParameter=iLT&"|"&iRT&"|"&iLB&"|"&iRB //返回字元串

End Function

//**Function

//功能:判斷射程內是否有敵人

//返回:是True,否False

Function findFoe(iLT,iRT,iLB,iRB)

Dim sColor(3) //Array(string) 用於存放顏色的數組

Dim i //int 循環變數

Dim iX,iY //int 得到顏色的坐標

Dim bHave //boolean 是否找到敵人

//初始化顏色

sColor(0)="303AA5"

sColor(1)="2A3EB8"

sColor(2)="1849F0"

sColor(3)="1849F0"

bHave=false //初始化

//找顏色

For i=0 to 3 step 1

Call FindColorEx(iLT,iRT,iLB,iRB,sColor(i),1,0.7,iX,iY)

If iX>0 And iY>0

bHave=true //找到了

KeyPress 44, 1

Goto rHave //跳出

End If

Next

Rem rHave

findFoe=bHave//Return 函數返回值

End Function

//**Function

//功能:判斷是否沒有命中敵人

//返回:是True,否False

Function noBingo()

Dim iX,iY //int 得到顏色的坐標

Call FindColorEx(iWidth/2-5,iHeight/2-5,iWidth/2+5,iHeight+5,"7E7EC0",1,0.7,iX,iY)

If iX > 0 Then

noBingo=True

Else

noBingo=False

End If

End Function

//**Sub

//功能:射擊

Sub shootFoe()

//------------------------------------------------------------
//下面是破cf230錯誤機槍開槍源碼
s = Plugin.Sys.GetTime()
xs=int(s/1000/60/60)
fz=int(s/1000/60)-xs*60
m=Clng(s/1000)-fz*60-xs*60*60
//下面是我計算的獲取毫秒用於開槍調用
hm=int(s-xs*60*60*1000-fz*1000*60-m*1000)+500
//下面是800毫秒正常開槍，不出230可以再往上調，反之往下調
If hm<800 Then
SetSimMode 2
LeftClick iFN
End If

Delay iFD //延遲 * 毫秒

End Sub

//**Sun

//參數(字元串,秒,第幾行)

//功能:顯示字元串

Sub showStr(str,n,row)

For n*100

Delay 1

Call Plugin.Msg.ShowScrTXT(0, (row-1)*19, 120, 19, str, "0000FF")

Next

End Sub

//**Sun

//功能:設置開槍延遲

//# 多線程啟動

Sub setFireDelay()

Dim key

While True

key=WaitKey()

If key=37

iFD=iFD-1 //縮小開槍延遲

Call showStr("開槍頻率為"&iFD&"毫秒",5,1)

ElseIf key=39 //方向鍵 右

iFD=iFD+1 //增加開槍延遲

Call showStr("開槍頻率為"&iFD&"毫秒",5,1)

ElseIf key=38 //方向鍵 右

iFD=iFD+5 //增加開槍延遲

Call showStr("開槍頻率為"&iFD&"毫秒",5,1)

ElseIf key=40 //方向鍵 右

iFD=iFD-5 //增加開槍延遲

Call showStr("開槍頻率為"&iFD&"毫秒",5,1)

End If

Wend

End Sub

2
復制上面的代碼，打開按鍵精靈點擊新建。

3
點擊源文件，並粘貼。

4
點擊調試

5
這時它會問你是否保存，如果你想保存的話那就點擊是。我這里點擊是。

6
點擊啟動，然後打開CF游戲。這樣就實現了自動開槍。

END
注意事項
我們只需要改
UserVar Var1=30 "開槍頻率"

UserVar Var2=1 "單次開槍子彈數量"

UserVar Var3=0 "第一槍延遲"

UserVar Var4=55 "壓槍延遲"
我們只要修改這些參數就好了
其他源碼就來9秒社團,與300000源碼愛好者一起｜微站源碼
望點贊

『柒』 cf的源代碼可以改嗎

可以的，你在下載CF的時候就可以改了，但是你必須有技術，一般人還是隨其自然把，還有，CF代碼改改之後應該會有所不同，（只是猜測）

『捌』 求CF源碼

《訣締仮擊》的要嗎 這游戲也不錯

『玖』 手游cf源代碼

你想知道源代碼?
你問問老馬同意不，畢竟馬化騰公司的人不是吃素的

『拾』 cf有源碼，但是怎麼用

你得會源碼對應的編程軟體。最常見的易語言