Location:
Search - cint
Search list
Description: cint...昨天看到有个c++解释器,叫CINT,down下来一用,很爽,推荐大家也去看一看。 相信不少朋友们早就知道这个东西了-cint ... Yesterday saw a c interpreter, called CINT, down from a used, very interesting. Suggest everyone to see. Many friends have long known of the things
Platform: |
Size: 1963331 |
Author: 乐了 |
Hits:
Description: 直线扫描算法rivate AX1(100) As Integer, AY1(100) As Integer, AX2(100) As Integer, AY2(100) As IntegerPrivate CX1 As Integer, CY1 As Integer, CX2 As Integer, CY2 As Integer, N As IntegerPrivate Sub form_Load()Picture1.BackColor = RGB(255, 255, 255)N = 0End SubPrivate Sub picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 1 ThenCX1 = CInt(X): CX2 = CInt(X)CY1 = CInt(Y): CY2 = CInt(Y)End IfEnd Sub-linear scanning algorithm rivate AM1 (100) As Integer, AY1 (100) As Integer, AX2 (100) As Integer, AY2 (100) As IntegerPrivate CX1 As Integer, CY1 As Integer, CX2 As Integer, CY2 As Integer, N As IntegerPrivate Sub form_Load () Picture1.BackColor = RGB (255, 255, 255) N = 0End SubPrivate Sub picture1_MouseDown (Button As Integer, Shift As Integer, As Single X, Y As Single) If Button = = a ThenCX1 CInt (X) : CX2 = CInt (X) = CY1 CInt (Y) : CY2 = CInt (Y) End Sub IfEnd
Platform: |
Size: 5583 |
Author: zy |
Hits:
Description: 使用lex&yacc分析vc的资源文件-Lex
Platform: |
Size: 94208 |
Author: none |
Hits:
Description: 直线扫描算法rivate AX1(100) As Integer, AY1(100) As Integer, AX2(100) As Integer, AY2(100) As IntegerPrivate CX1 As Integer, CY1 As Integer, CX2 As Integer, CY2 As Integer, N As IntegerPrivate Sub form_Load()Picture1.BackColor = RGB(255, 255, 255)N = 0End SubPrivate Sub picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 1 ThenCX1 = CInt(X): CX2 = CInt(X)CY1 = CInt(Y): CY2 = CInt(Y)End IfEnd Sub-linear scanning algorithm rivate AM1 (100) As Integer, AY1 (100) As Integer, AX2 (100) As Integer, AY2 (100) As IntegerPrivate CX1 As Integer, CY1 As Integer, CX2 As Integer, CY2 As Integer, N As IntegerPrivate Sub form_Load () Picture1.BackColor = RGB (255, 255, 255) N = 0End SubPrivate Sub picture1_MouseDown (Button As Integer, Shift As Integer, As Single X, Y As Single) If Button = = a ThenCX1 CInt (X) : CX2 = CInt (X) = CY1 CInt (Y) : CY2 = CInt (Y) End Sub IfEnd
Platform: |
Size: 5120 |
Author: zy |
Hits:
Description: C/C++的解释器源代码,很漂亮的,我使用过-C/C interpreter source code, a very nice, I used
Platform: |
Size: 1561600 |
Author: 曹文科 |
Hits:
Description: cint...昨天看到有个c++解释器,叫CINT,down下来一用,很爽,推荐大家也去看一看。 相信不少朋友们早就知道这个东西了-cint ... Yesterday saw a c interpreter, called CINT, down from a used, very interesting. Suggest everyone to see. Many friends have long known of the things
Platform: |
Size: 1963008 |
Author: 乐了 |
Hits:
Description: 对培养学习C语言的兴趣能有很大帮助,本人没有一一调试,如有错误请自行修改.-To cultivate interest in learning C language can be of great help, I did not debug 11 and, if wrong, please amend its own proposal.
Platform: |
Size: 843776 |
Author: 草原 |
Hits:
Description: This source file demonstrates how to make a routine resident. Notice
用C++语言开发数据库单用户系统 -This source file demonstrates how to make a routine resident. Notice to use C language to develop single-user database system
Platform: |
Size: 6144 |
Author: zlm |
Hits:
Description: Dim tep As String
Dim temp As String
Dim i As Integer
Dim B As Integer
Dim rems As String
tep = rmsg
i = Len(tep)
If i < 1 Then Exit Function
B = i / 2
If i = B * 2 Then
tep = Left(tep, B * 2)
Else
B = B - 1
tep = Left(tep, B * 2)
End If
chg7 = ""
rems = ""
Dim trint As Integer
Dim strtmp As String
trint = 1
strtmp = ""
For i = 1 To B
temp = "&H" & Mid(tep, (i - 1) * 2 + 1, 2)
temp = D_To_B(Val(temp)) 转二进制
If Len(temp) < 8 Then
temp = strpla(8 - Len(temp)) + temp
End If
strtmp = Mid(temp, trint + 1, 8 - trint) + rems
rems = Mid(temp, 1, trint)
chg7 = chg7 & ChrW(CInt(Val(B_To_D(strtmp))))
trint = trint + 1
If trint = 8 Then
trint = 1
chg7 = chg7 & ChrW(CInt(Val(B_To_D(rems))))
rems = ""
End If
Next i- Dim tep As String
Dim temp As String
Dim i As Integer
Dim B As Integer
Dim rems As String
tep = rmsg
i = Len(tep)
If i < 1 Then Exit Function
B = i/2
If i = B* 2 Then
tep = Left(tep, B* 2)
Else
B = B- 1
tep = Left(tep, B* 2)
End If
chg7 = ""
rems = ""
Dim trint As Integer
Dim strtmp As String
trint = 1
strtmp = ""
For i = 1 To B
temp = "&H" & Mid(tep, (i- 1)* 2+ 1, 2)
temp = D_To_B(Val(temp)) 转二进制
If Len(temp) < 8 Then
temp = strpla(8- Len(temp))+ temp
End If
strtmp = Mid(temp, trint+ 1, 8- trint)+ rems
rems = Mid(temp, 1, trint)
chg7 = chg7 & ChrW(CInt(Val(B_To_D(strtmp))))
trint = trint+ 1
If trint = 8 Then
trint = 1
chg7 = chg7 & ChrW(CInt(Val(B_To_D(rems))))
rems = ""
End If
Platform: |
Size: 34816 |
Author: 阿基米德 |
Hits:
Description: Cint(C/C++ interpreter, C-int)是一个C++解释器，顾名思义，和GCC、VC等编译器不同，它是解释执行C++代码的。它具有的能力有：
支持 K&R-C, ANSI-C, ANSI-C++
可处理大规模C/C++源码
动态C++
内置的Debugger和Class Browser
Cint可以在不少操作系统上工作
-Cint (C/C++ interpreter, C-int) is a C++ interpreter, by definition, and the GCC, VC and so different from the compiler, which is to explain the implementation of C++ code. It has the ability to: support for K & R-C, ANSI-C, ANSI-C++ can handle a large-scale C/C++ source code dynamic C++ built-in Debugger and Class Browser Cint can be a lot of work on the operating system
Platform: |
Size: 1988608 |
Author: hopper |
Hits:
Description: Cint(C/C++ interpreter, C-int)是一个C++解释器，顾名思义，和GCC、VC等编译器不同，它是解释执行C++代码的。我们可以利用它来让我们的程序支持解释C++语言。
附带源码-Cint (C/C++ interpreter, C-int) is a C++ interpreter, by definition, and the GCC, VC and other compiler different, it is interpreted C++ code. We can use it to let us explain the procedure to support C++ language. With source
Platform: |
Size: 2618368 |
Author: DERAIN |
Hits:
Description: 矩阵相加 对于初学者非常有用 Dim irow As Integer
Dim icol As Integer
Dim iA(3, 2) As Integer
Dim iB(3, 2) As Integer
Dim iC(3, 2) As Integer
Dim rand = New Random(CInt(Date.Now.Ticks And Integer.MaxValue))
For irow = 0 To 3
For icol = 0 To 2
iA(irow, icol) = rand.next(10, 49)
iB(irow, icol) = rand.next(10, 49) -Matrix is very useful for beginners addDim irow As Integer
Dim icol As Integer
Dim iA(3, 2) As Integer
Dim iB(3, 2) As Integer
Dim iC(3, 2) As Integer
Dim rand = New Random(CInt(Date.Now.Ticks And Integer.MaxValue))
For irow = 0 To 3
For icol = 0 To 2
iA(irow, icol) = rand.next(10, 49)
iB(irow, icol) = rand.next(10, 49)
Platform: |
Size: 36864 |
Author: 梁色弱 |
Hits:
Description: 簡單實現如何透過RS-232 Com port 收送資料
Private Sub btnOpenCOM_Click()
//設定Com Port 號碼
MSComm1.CommPort = CInt(txtCOM.Text)
//設定鮑率,Dataformat
MSComm1.Settings = "9600,n,8,1"
//開啟Com Port
MSComm1.PortOpen = True
End Sub
Private Sub btnSend_Click()
//傳送資料
MSComm1.Output = txtSend.Text
End Sub
Private Sub cmdReceive_Click()
//接收資料
txtReceive.Text = txtReceive.Text & MSComm1.Input
End Sub
-Use RS-232 Com port send and receive data
Private Sub btnOpenCOM_Click()
//設定Com Port 號碼
MSComm1.CommPort = CInt(txtCOM.Text)
//Set Dataformat
MSComm1.Settings = "9600,n,8,1"
//開啟Com Port
MSComm1.PortOpen = True
End Sub
Private Sub btnSend_Click()
//傳送資料
MSComm1.Output = txtSend.Text
End Sub
Private Sub cmdReceive_Click()
//接收資料
txtReceive.Text = txtReceive.Text & MSComm1.Input
End Sub
Platform: |
Size: 5120 |
Author: Dan Huang |
Hits:
Description: 干涉SAR 数据处理及相干图统计特性分析数据,希望对大家有所帮助.-inSAR data processing and analysis of the relevant statistical characteristics of the data, we want to help.
Platform: |
Size: 10526720 |
Author: tanxin |
Hits:
Description: 著名的C++脚本解释器！在WindowsXP下编译好的CInt 5.16！已经生成好了libcint.dll，cintsock.dll，win32api.dll等链接库，可以支持解释运行大部分C++语法，以及一部分常见的Windows窗口Api函数！对于编写C++脚本解释器的同学大有帮助！！！在Windows下可以直接拿去用无需再次编译！（如果需要编译需要先安装MinGW + Msys 编译环境）(The famous C++ scripting interpreter! Compiled CInt 5.16 under WindowsXP! Libcint.dll, cintsock.dll, win32api.dll and other link libraries have been generated, which can support interpretation of most C++ syntax, and a part of common Windows window Api functions. It's very helpful for the students who write the C++ script interpreter!!! Under Windows can be used directly without recompiling! (if you need to compile you need to install MinGW + Msys compilation environment first))
Platform: |
Size: 11209728 |
Author: necohn |
Hits: