test.pb

来自「利用春节七天在家里写的PureBasic示例代码.基本按照C教程的章节编排.适合」· PB 代码 · 共 22 行

;//////////////////////////////////
; Amlinger
;                   by 2008 02 06
;描述:一个要输入注册码的模拟程序
;目标:用于测试演示 补丁程序的原理
;//////////////////////////////////


;提示需要注册
MessageRequester("共享软件","请注册")
;获取用户输入的序列号
serial.s=InputRequester("共享软件","序列号:","")
;对比
If serial.s="Amlinger"
MessageRequester("共享软件","序列号正确")
Else
MessageRequester("共享软件","序列号不对")
EndIf
; IDE Options = PureBasic 4.10 (Windows - x86)
; CursorPosition = 4
; Folding = -
; Executable = C:\Documents and Settings\fjolle\Skrivebord\test.exe