极客工坊

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 12499|回复: 3

代码高亮测试

[复制链接]
发表于 2011-11-27 22:13:29 | 显示全部楼层 |阅读模式
本帖最后由 Ansifa 于 2012-10-8 09:37 编辑

pde

  1. #include <Wire.h>
  2. #include <HMC5883L.h>
  3. HMC5883L compass;
  4. int error = 0;
  5. void setup()
  6. {
  7.   Serial.begin(57600);
  8.   Wire.begin();
  9.   compass = HMC5883L();
  10.   error = compass.SetScale(1.3);
  11.   compass.SetMeasurementMode(Measurement_Continuous);
  12. }
  13. void loop()
  14. {
  15.   MagnetometerRaw raw = compass.ReadRawAxis();
  16.   MagnetometerScaled scaled = compass.ReadScaledAxis();
  17.   float xHeading = atan2(scaled.YAxis, scaled.XAxis);
  18.   float yHeading = atan2(scaled.ZAxis, scaled.XAxis);
  19.   float zHeading = atan2(scaled.ZAxis, scaled.YAxis);
  20.   xHeading += 0.0457;
  21.   if(xHeading < 0)    xHeading += 2*PI;
  22.   if(xHeading > 2*PI)    xHeading -= 2*PI;
  23.   if(yHeading < 0)    yHeading += 2*PI;
  24.   if(yHeading > 2*PI)    yHeading -= 2*PI;
  25.   if(zHeading < 0)    zHeading += 2*PI;
  26.   if(zHeading > 2*PI)    zHeading -= 2*PI;
  27.   float xDegrees = xHeading * 180/M_PI;
  28.   float yDegrees = yHeading * 180/M_PI;
  29.   float zDegrees = zHeading * 180/M_PI;
  30.   Serial.print(xDegrees);
  31.   Serial.print(",");
  32.   Serial.print(yDegrees);
  33.   Serial.print(",");
  34.   Serial.print(zDegrees);
  35.   Serial.println(";");
  36.   delay(100);
  37. }

复制代码
-----

vb

  1. Imports System.IO
  2. Imports System.Data
  3. Imports System.Data.OleDb

  4. Public Class LoginForm

  5.     Dim cn As New OleDbConnection
  6.     Dim cd As New OleDbCommand
  7.     Dim rd As OleDbDataReader
  8.     Dim ad As New OleDbDataAdapter
  9.     Dim ds As DataSet '当登录窗体载入时,设置连接字符串

  10.     Private Sub LoginForm_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
  11.         Dim s As String = Directory.GetCurrentDirectory
  12.         cn.ConnectionString = "provider=Microsoft.Jet.OleDB.4.0;data source=" & s & "\db.mdb"
  13.         cd.Connection = cn
  14.     End Sub
  15.     '当单击确定按钮时,连接数据库用户表,验证用户名和密码,
  16.     '若一致则登录成功,显示主界面
  17.     Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnlogin.Click

  18.         Dim userType As Integer
  19.         If Me.Text = "管理员" Then
  20.             userType = 1
  21.         Else
  22.             userType = 2
  23.         End If

  24.         cd.CommandText = "Select * FROM [User] Where User_Name='" & txbUserName.Text & "' And User_Password='" & txbPassword.Text & "'" '设置SQL命令,从用户表中获取用户名与密码与数据库一致的记录

  25.         cd.Connection.Open() '打开连接
  26.         rd = cd.ExecuteReader '执行命令,并将返回值赋值给DataReader对象rd
  27.         rd.Read() '执行DataReader的Read方法,读取记录
  28.         '若数据读取器中有记录,则将ID,密码和用户类型赋值给三个公有变量,传递到主窗体中
  29.         '否则提示错误信息
  30.         If rd.HasRows Then
  31.             界面选择.Show()
  32.         Else
  33.             MsgBox("用户名或密码错误。")
  34.             Exit Sub
  35.         End If
  36.         cd.Connection.Close()
  37.         界面选择.Show()

  38.     End Sub
  39.     Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCancel.Click
  40.         Me.Close()
  41.     End Sub
  42. End Class
复制代码
sql
  1. DROP TABLE IF EXISTS `cj_alibaba_company_new`;
  2. CREATE TABLE `cj_alibaba_company_new` (
  3.   `company_id` mediumint(20) unsigned NOT NULL AUTO_INCREMENT,
  4.   `model` varchar(255) COLLATE utf8_unicode_ci DEFAULT NULL,
  5.   `address` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  6.   `established` mediumint(20) unsigned NOT NULL,
  7.   `anunal` mediumint(20) unsigned NOT NULL,
  8.   `management` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  9.   `custmers` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  10.   `export` mediumint(20) unsigned NOT NULL,
  11.   `bank` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  12.   `oem` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  13.   `account` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  14.   `quality_control` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  15.   `in_amount` mediumint(20) unsigned NOT NULL,
  16.   `out_amount` mediumint(20) unsigned NOT NULL,
  17.   `number` mediumint(20) unsigned NOT NULL,
  18.   `factory_area` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  19.   `monthly` mediumint(20) unsigned NOT NULL,
  20.   `page` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  21.   `lndustry` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  22.   `c_type` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  23.   `reg_capital` mediumint(20) unsigned NOT NULL,
  24.   `employees` mediumint(10) unsigned NOT NULL,
  25.   `legal` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  26.   `certification` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  27.   `from_url` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  28.   `info` text COLLATE utf8_unicode_ci NOT NULL,
  29.   `place` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  30.   `markets` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  31.   `logo` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  32.   `hao` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  33.   `m_phone` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  34.   `p_place` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  35.   `fax` text COLLATE utf8_unicode_ci NOT NULL,
  36.   `name` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
  37.   `from_id` int(255) unsigned NOT NULL,
  38.   PRIMARY KEY (`company_id`)
  39. ) ENGINE=MyISAM AUTO_INCREMENT=7240 DEFAULT CHARSET=utf8 COLLATE=utf8_unicode_ci;
复制代码
php
  1. <?php
  2. set_time_limit(0);
  3. require_once 'Client.php';   //pear HTTP_Client
  4. $url = 'http://www.paipai.com/man/?PTAG=20034.2.3';  //表单action url
  5. $vars = array(   //传输字段, '字段名'=>'值'
  6. 'KeyWord'=>'服装',
  7. );
  8. echo "vuyri";
  9. $client = & new HTTP_Client();  //实例化HTTP_Client
  10. $a=$client->post($url, $vars);  //提交表单
  11. echo $url;
  12. echo "vuyri";
  13. ?>
复制代码
html
  1. <html>
  2. <head>
  3.     <style>
  4.         .f {
  5.             float: right;
  6.         }
  7.     </style>
  8. </head>
  9. <body>
  10.     <form action="action" method="get">
  11.         <input type="text" name="abc">
  12.         <div id="buttons">
  13.             <input type="submit" class="f" name="next" value="Next">
  14.             <input type="submit" class="f" name="prev" value="Prev">
  15.             <div style="clear:both"></div><!-- Need this to have the buttons actually inside div#buttons -->
  16.         </div>
  17.     </form>
  18. </body>
  19. </html>
复制代码
回复

使用道具 举报

发表于 2011-11-30 16:57:49 | 显示全部楼层
[code=cpp]jssc.oSyntaxList.cpp={title:"C++",aliases:["cpp","c++"],keyWords:" break case continue default do else for goto if return switch throw while "+"NULL false true enum errno EDOM "+"ERANGE FLT_RADIX FLT_ROUNDS FLT_DIG DBL_DIG LDBL_DIG "+"FLT_EPSILON DBL_EPSILON LDBL_EPSILON FLT_MANT_DIG DBL_MANT_DIG "+"LDBL_MANT_DIG FLT_MAX DBL_MAX LDBL_MAX FLT_MAX_EXP DBL_MAX_EXP "+"LDBL_MAX_EXP FLT_MIN DBL_MIN LDBL_MIN FLT_MIN_EXP DBL_MIN_EXP "+"LDBL_MIN_EXP CHAR_BIT CHAR_MAX CHAR_MIN SCHAR_MAX SCHAR_MIN "+"UCHAR_MAX SHRT_MAX SHRT_MIN USHRT_MAX INT_MAX INT_MIN "+"UINT_MAX LONG_MAX LONG_MIN ULONG_MAX HUGE_VAL SIGABRT "+"SIGFPE SIGILL SIGINT SIGSEGV SIGTERM SIG_DFL SIG_ERR "+"SIG_IGN BUFSIZ EOF FILENAME_MAX FOPEN_MAX L_tmpnam NULL "+"SEEK_CUR SEEK_END SEEK_SET TMP_MAX stdin stdout stderr "+"EXIT_FAILURE EXIT_SUCCESS RAND_MAX CLOCKS_PER_SEC "+"virtual public private protected template using namespace "+"try catch inline dynamic_cast const_cast reinterpret_cast "+"static_cast explicit friend wchar_t typename typeid class ",Funcs:" cin cerr clog cout delete new this "+"printf fprintf snprintf sprintf assert "+"isalnum isalpha isdigit iscntrl isgraph islower isprint "+"ispunct isspace ispunct isupper isxdigit tolower toupper "+"exp log log10 pow sqrt ceil floor fabs ldexp "+"frexp modf fmod sin cos tan asin acos atan atan2 "+"sinh cosh tanh setjmp longjmp asin acos atan atan2 "+"va_start va_arg va_end offsetof sizeof fopen freopen "+"fflush fclose remove rename tmpfile tmpname setvbuf "+"setbuf vfprintf vprintf vsprintf fscanf scanf sscanf "+"fgetc fgets fputc fputs getc getchar gets putc "+"putchar puts ungetc fread fwrite fseek ftell rewind "+"fgetpos fsetpos clearerr feof ferror perror abs labs "+"div ldiv atof atoi atol strtod strtol strtoul calloc "+"malloc realloc free abort exit atexit system getenv "+"bsearch qsort rand srand strcpy strncpy strcat strncat "+"strcmp strncmp strcoll strchr strrchr strspn strcspn "+"strpbrk strstr strlen strerror strtok strxfrm memcpy "+"memmove memcmp memchr memset clock time difftime mktime "+"asctime ctime gmtime localtime strftime "+"auto bool char const double float int long longint "+"register short shortint signed static struct "+"typedef union unsigned void volatile extern jmp_buf "+"signal raise va_list ptrdiff_t size_t FILE fpos_t "+"div_t ldiv_t clock_t time_t tm ",regLib:[{index:"//",reg:new RegExp("^//.*$"),css:"comment"},{index:"#",reg:new RegExp("^#[^<]*"),css:"sign"},{index:"<",reg:new RegExp("^\\s*<\\w+\\.\\w+>s*$"),css:"string"},{index:"/*",end:"*/",css:"comment",multiLine:true,escape:false},{index:"\"",end:"\"",css:"string",multiLine:true,escape:true},{index:"'",end:"'",css:"char",multiLine:true,escape:true},{index:"&",reg:new RegExp("\\&\\w+\\b"),css:"char"},{index:"!",reg:new RegExp("\\!\\="),css:"symbol"},{index:"=",reg:new RegExp("\\="),css:"symbol"},{index:"(",reg:new RegExp("\\("),css:"symbol"},{index:")",reg:new RegExp("\\)"),css:"symbol"},{index:"[",reg:new RegExp("\\["),css:"symbol"},{index:"]",reg:new RegExp("\\]"),css:"symbol"},{index:"-",reg:new RegExp("\\->"),css:"symbol"},{index:";",reg:new RegExp(";"),css:"symbol"},{index:".",reg:jssc.regDecimal,css:"num"}],collapse:{type:"sign",start:"{",end:"}"}}[/code]
回复 支持 反对

使用道具 举报

发表于 2011-11-30 20:05:09 | 显示全部楼层
没有基础,表示看不懂
回复 支持 反对

使用道具 举报

发表于 2013-7-31 10:54:13 | 显示全部楼层
我也看不懂
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 需要先绑定手机号

Archiver|联系我们|极客工坊

GMT+8, 2024-4-24 02:44 , Processed in 0.041934 second(s), 20 queries .

Powered by Discuz! X3.4 Licensed

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表