自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+

原创 delphi调用LUA函数来处理一些逻辑

替同事做了个洛奇英雄传自动染色程序,关于屏幕取色的.因为里面他对颜色的要求比较复杂,改动也比较大,于是我让他把逻辑写在 lua 脚本里面.uses LUA, LUALIB;function lua_CheckColor(r,g,b:Integer):Boolean; var Lua : TLua;...

2012-05-04 11:31:32 6970 7

原创 golang 根据IP获取真实地址(不联网,单机版)

package main import ( "fmt" "github.com/yangtizi/cz88" ) func main() { fmt.Println(cz88.GetAddress("47.56.100.100"...

2020-05-05 18:06:02 69 0

原创 双点医院治疗成功率修改

//Token:0x06001984RID:6532 publicstaticTreatmentCalculationBreakdownCalculateEstimatedTreatmentOutcome(Patientpatient,Staffstaff,Roomroom) { floatdia...

2020-01-30 00:14:05 108 0

转载 WinAPI: SetLayeredWindowAttributes - 设置窗口的透明

WinAPI: SetLayeredWindowAttributes - 设置窗口的透明 这是来宾 Dolby 在http://www.cnblogs.com/del/archive/2008/03/08/1081295.html#1096814询问的问题. //声明: SetL...

2019-11-30 19:12:11 44 0

原创 从100个男人里面挑选37个, 问这里面存在最优秀的男人的概率是多少?

-- 随机种子. 根据当前时间来获取随机 math.randomseed(os.time()) -- 男人数量 local nManCount = 100; -- 挑选数量 local nPick = 37; -- 随机次数 local nTotalCount = 1000000 -- ...

2019-11-30 13:58:49 96 0

转载 纯LUA的Json库

-- -- json.lua -- -- Copyright (c) 2019 rxi -- -- Permission is hereby granted, free of charge, to any person obtaining a copy of -- this software an...

2019-11-19 17:31:29 132 0

原创 Delphi Base32 的加密和解密

const ValidChars = 'ABCDEFGHIJKLMNOPQRSTUVWXYZ234567'; // Base32解码 function Base32Decode(const source: string): string; var UpperSourc...

2019-11-19 17:04:35 47 0

原创 Delphi 启动程序

program Project1; uses Winapi.Windows, System.IOUtils; {$R *.res} procedure myCreateProcess(); var StartupInfo: Winapi.Windows.TStartupInfo; ...

2019-11-08 16:11:07 34 0

原创 设置环境变量批处理

@echo off rem 获取当前路径 set CurrentPath=%~dp0 echo %CurrentPath% rem cd /d %CurrentPath% rem ======================================================== re...

2019-11-05 17:21:09 128 0

原创 LUA 生成随机字符串

math.randomseed(os.time()) function getRandom(n) local t = { "0","1","2","3","4","5&quo...

2019-10-18 15:55:31 395 0

转载 从MySQL到MongoDB(添加MongoDB循环插入数据方法)

转载自NoSQLFan,查看原文 本文描述了MySQL中的常用SQL语句在MongoDB中的写法,如果你长期使用MySQL而对MongoDB跃跃欲试,这篇简单的文章可以帮助你更快的进入角色。 查询: MySQL: SELECT * FROM user Mongo: db.user.find()...

2019-10-14 19:33:49 51 0

原创 golang.org 无法访问的问题

使用说明 windows下 git clone https://gitee.com/warrially/golang.org.git %GOPATH%/src/golang.org linux下 git clone https://gitee.com/warrially/gol...

2019-09-29 13:55:18 55 0

原创 golang 解决SQL 空值Null 的问题

type TRows struct { rows *sql.Rows } func NewRows(rows *sql.Rows) *TRows { r := &TRows{} r.rows = rows return r } func (self *TRows) Scan(a...

2019-09-26 21:09:47 218 0

原创 vcpkg 下载包

git clone https://github.com/Microsoft/vcpkg.git cd vcpkg ./bootstrap-vcpkg.bat ./vcpkg.exe install openssl:x86-windows zlib:x86-windows

2019-09-13 20:05:33 378 0

原创 计算文件的MD5值

#include "stdafx.h" #include <string> #include <Windows.h> #include <wincrypt.h> using namespace std; string ComputeFil...

2019-08-31 10:39:09 154 0

原创 开机启动

把文件的快捷方式放在这个里面就可以了 %USERPROFILE%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup

2019-08-29 17:14:20 17 0

原创 golang unicode形态的[]byte, 转行成utf8形态的string

func u16To8(u16 []byte) string { log.Println("u16 = ", u16) if len(u16)%2 != 0 { log.Println("err len", len(u16)) return &q...

2019-08-23 21:07:54 1931 0

原创 Delphi 简单Post

unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.F...

2019-07-16 15:30:29 332 0

原创 Delphi 如何简单的做一个登录窗体

1. 在 工程文件里不要创建 loginFORM Application.Initialize; Application.MainFormOnTaskbar := True; Application.CreateForm(TMainForm, MainForm); Applicatio...

2019-06-14 11:51:42 338 0

原创 碰撞圆周率

#include "stdafx.h" #include <iostream> // 碰撞后速度 void txpz(double m1, double m2, double & v1, double & v2) { double v1_ = ...

2019-04-17 11:19:44 1240 2

原创 golang制作一个斗地主游戏服务器[15]:再写打牌和跟牌(下)

本来两个文章想叠加写在一起的,发现内容有点多, 拆分一下 前面讲了客户端发送协议的, 现在就要讲服务器如何接收到协议 // 大部分还是抄袭23协议的内容 case 26: // 26 是打掉具体手牌的 req := pack.GetOutCardReq() log.P...

2019-04-09 18:38:05 266 0

原创 golang制作一个斗地主游戏服务器[14]:再写打牌和跟牌(上)

golang制作一个斗地主游戏服务器[6]:打牌和跟牌 前面叫地主和抢地主结束了, 本篇基本上就是属于打牌的范畴了. 首先把超时的时间延长起来. 不要再超时了. 一定等着我们操作完再继续 select { case <-ch: log.Println("模拟打牌&q...

2019-04-03 18:59:31 354 0

原创 golang制作一个斗地主游戏服务器[13]:再写叫地主抢地主

golang制作一个斗地主游戏服务器[4]:叫地主和抢地主 之前的叫地主和抢地主, 都是通过golang 的协程去模拟的 我们现在已经有正牌的客户端了. 首先要把超时时间从原先的5秒钟, 暂时延长到足够长的1000秒 然后去掉协程中的模拟. 改成通过服务器收到客户端消息来判断模拟 首先...

2019-03-29 18:38:24 240 0

原创 golang制作一个斗地主游戏服务器[12]:再写发牌

前面已经写过一个发牌的逻辑了 golang制作一个斗地主游戏服务器[3]:斗地主给其他三家玩家发牌 这时要在上面稍微添加一些逻辑.主要是 1. 把实际玩家关联进去 2. 给玩家发送手牌数据 // dealcard 发牌阶段 func (self *TDDZ) dealcard()...

2019-03-27 18:03:33 316 0

原创 golang制作一个斗地主游戏服务器[11]:快速加入

//"服务器, 我想加入XXX号桌子 / 服务器, 帮我快速找一个空位座下吧?" message TJoinTableReq { optional int32 TableIndex = 1; // 需要加入的桌子编号, 不填就快速加入 optional s...

2019-03-27 12:02:22 402 2

原创 golang制作一个斗地主游戏服务器[10]:房间、桌子、玩家

什么房间那些先暂时不管吧. 最简单的方法就是先快速加入桌子, 也不要准备了. 加入就算自动准备, 断线重连什么的也都不管, 现在的目标就是先跑通流程 一个斗地主房间 (高级场 中级场 初级场, 通常是倍率不同) 里面有很多桌子 package main import "log...

2019-03-25 18:41:41 556 0

原创 golang制作一个斗地主游戏服务器[9]:pb基础

根据前面文章的协议 golang制作一个斗地主游戏服务器[7]:服务器和协议的一些想法 message TDDZ { message THeader { 头部应该包含很多内容, 目前先不填 } optional THeader ...

2019-03-25 17:30:12 236 0

原创 golang制作一个斗地主游戏服务器[8]:先开一个服务器再说

golang的游戏服务器框架有挺多的, 大体上一个游戏成品的客户端, 都需要接入账号系统和其他分类的系统. 这里为了简单化, 先开一个最简单的TCPServer服务器端(网络上的各种服务器框架大同小异, 这里选择用266的tcp框架. 其实是一个意思) package main impor...

2019-03-25 15:59:52 309 0

原创 golang制作一个斗地主游戏服务器[7]:服务器和协议的一些想法

一个客户端过来, 首先要校验自己的身份(去自己的账号系统里面校验), 校验结束以后数据暂时存在中心服务器里 客户端这个时候进入斗地主的服务器, 这个时候 客户端会先向斗地主服务器进行一些简单的交流 "服务器你好, 请问你是什么版本的? 你里面现在大概有多少人?" &qu...

2019-03-18 18:40:06 606 5

原创 golang制作一个斗地主游戏服务器[6]:打牌和跟牌

终于到了最重要(其实也是最不重要)的打牌环节了. 打牌的逻辑其实很简单 选完地主以后 由地主开牌 判断手牌是否消耗完毕 -> -> 开牌 -> 有人跟牌 -> 无人跟牌 -> 循环一圈会到自己 -> 本轮结束 -> 游戏结束 ...

2019-03-18 18:13:02 309 3

原创 golang制作一个斗地主游戏服务器[5]:牌型

下面就该进入打牌环节了 打牌之前, 首先应该定义牌的类型有哪些. 斗地主里面分成 单牌, 对子, 三不带, 三带一 拖拉机, 顺子, 飞机 王炸 其中, 拖拉机最多10对, 顺子至少5张 最多12张 飞机内容比较多 我们先把所有可能出现的牌型列举出来 // 牌型 const...

2019-03-18 11:36:49 318 0

原创 golang制作一个斗地主游戏服务器[4]:叫地主和抢地主

发牌结束以后, 就是三家依次进行叫地主和抢地主了 所以逻辑是 叫地主/不要 -&gt; 抢地主/不要 -&gt; 抢地主/不要 -&gt; 抢回来/不要 在这里可以用golang 自身的一个特性就是, 通过select 来很方便的执行超时逻辑. 玩家正常选择的时候, 执...

2019-03-15 10:13:19 361 0

原创 golang制作一个斗地主游戏服务器[3]:斗地主给其他三家玩家发牌

接下来需要做一个简单的给三家发牌的逻辑 package main // TDDZ ----------------------------------------------------- // 斗地主执行 type TDDZ struct { pHandCardList1 TCard...

2019-03-14 22:18:27 372 0

原创 golang制作一个斗地主游戏服务器[2]:一副扑克牌

前一章写的是单张的扑克牌, 这里要写一整副扑克牌 首先定义一个扑克牌的切片 // TCards type TCards []*TCard 新建卡牌的时候, 分配空间, 并且随机洗牌 package main import ( "log" "math...

2019-03-14 22:10:52 579 0

原创 golang制作一个斗地主游戏服务器[1]:从扑克牌开始

打牌, 首先就应该从最基础的扑克牌类入手 单个牌来说 斗地主3最小, 然后依次是 ... K, A, 2, 小王, 大王 // 花色 const ( flowerNIL int = iota // 留空 flowerHEITAO // 黑桃(小王)...

2019-03-14 19:08:09 3412 6

原创 golang制作一个斗地主游戏服务器[0]:前言

原先用C++写的服务器, 现在打算翻译一份golang版的, 顺带整理下思路 代码会放在git上托管, 边写边更吧 git 地址 http://github.com/后面你们猜 -------------------------------------------------------...

2019-03-14 16:31:59 794 1

转载 Delphi 的接口自动回收内存

unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl....

2019-02-25 10:48:05 218 0

原创 sublime 无法使用 package control 2019

An error occurred installing package control  please check the Console for details visit https://packagecontrol.io/docs/troubleshooting for help ...

2019-02-15 17:54:18 474 0

原创 error C2447: “{”: 缺少函数标题(是否是老式的形式表?)

 error C2447: “{”: 缺少函数标题(是否是老式的形式表?)   这个BUG是以为在win7上使用了 LF 的格式编码导致的.   使用Notepad++ 修改成 BOM-UTF8 和  windows 的 CR LF 格式一切正常...

2019-02-09 20:09:48 8155 1

原创 今天放了个低级失误

(_Ptr_user &amp; (_BIG_ALLOCATION_ALIGNMENT - 1)) == 0   程序运行中报了这个错误 上网查了下都说什么openCV的错误, 还有vector的错误.     结果是  返回值出了问题.   函数定义了返回值是 string ...

2019-01-29 11:08:16 73 0

提示
确定要删除当前文章?
取消 删除