今天打算下php100的教程~，虽然不看但下下来先留着，省的等想找的时候找不到。
打开PHP100shipinjiaocheng我去100个？汗，每个都要打开下载打开下载，打开4、5个，发现下载地址有规律，我笑了~在一看左下角VM开着呢~疯狂了，直接写个小循环生成链接地址不就得了~最少简单不少
有继续打开了一些下载地址，发现在41~81直接是没有多大规律的~想了想，还是可以实现下载的。不过太多了~不过shell现在也很强大，应该还是可以实现~现在没空先不弄哈哈(上传的人也挺聪明的，改了些包名，不然)
嘿嘿~
注释：红色为无规律下载地址（并不全）[……]
通过“vmrun -T server -h https://IP:端口/sdk -u 用户名 -p 密码 list”查看：如图1
（图1），找出规则~定义变量！
#!/bin/bash
####Server 定义变量
VM_RUN='vmrun -T server -h https://IP:端口/sdk -u 用户名 -p 密码'
TD='Win2000_TD/Win2000_TD.vmx'
BREW='WinXP_Brew/WinXP.vmx'
MTK='WinXP[……]
高手请飘过，此文只为记录
REM “调用变量script及编译”
call set.bat
mkdir %sj%
%c320%debug
%s%
%c%
%n%_240x320_%d%
%mv%
%c320%Release
%s%
%c%
%n%_240x320_%r%
%[……]
‘建立Shell对象
set sh=WScript.CreateObject("WScript.Shell")
WScript.Sleep 1000
‘启动telnet，注意要保证telnet.exe程序所在的路径如c:\winnt\system32在path环境变量中
sh.Run "telnet.exe"
WScript.Sleep 1000
‘向telnet发送我们平时录入的命令
sh.SendKeys "open 192.168.10.120"
WScript.Slee[……]
在批处理中，set的功能有点繁杂：设置变量、显示环境变量的名及值、做算术运算、等待用户的输入、字符串截取、替换字符串，是我们常用的命令之一。
在字符串截取方面，新手因为没能注意到偏移量的问题，很容易提取到错误的字符串，因此，特开此帖，详细解释 set 截取字符的用法。
我们先来看一个例子：
set str=123456789
现在，我需要提取变量 str 中的第一个字符，那么，该怎么写命令呢？
set var=%str:~1,1%？我想，这很可能是很多粗懂set用法的新手们的第一反应，实际上，这条语句提取到的是字符"2"，并不是我们想要的&q[……]
Private Sub Command1_Click()
Dim a(1 To 10) As Integer
Dim i As Integer
Dim sum As Integer, strpj As Integer
For i = 1 To 10
suiji = Int(100 * Rnd + 1)
Print suiji
a(i) = suiji
sum = sum + a(i)
Next i
Print ,
Text1.Text = sum
End Sub
[……]
CODE SEGMENT
ASSUME CS:CODE
MAIN: MOV AH,1
INT 21H
MOV BL,AL
INT 21H
MOV CL,AL
INT 21H[……]
code segment
assume cs:code
main:mov ah,1
int 21h
MOV BL,AL
MOV AH,2
MOV DL,13
INT 21H
MOV D[……]
data segment
buf db 100,101 dup(0)
buf1 db ‘qing shu ru’,13,10,'(ge shu zai 100 yi nei)=’,’$’
data ends
code segment
assume ds:data,cs:code
main:mov dx,data
mov ds,dx
lea dx,[buf1]
&[……]
data segment
int1 db ‘935797238’,13,10,24h
int2 db ‘843758912’,13,10,24hdata ends
code segment
assume cs:code,ds:data
main: mov ax,data
mov ds,ax
lea dx,[int1][……]
；设变量int1和int2的定义如下
；int1 ‘935797238’
；int2 ‘843758912’
；编写程序段把int1和int2中以字符串形式存放的两个长整数相加，结果仍然以同样的形式放会变量int1中，不计溢出！
data segment
int1 db ‘935797238’,13,10,24h
int2 db ‘843758912’,13,10,24h
data ends
code segment
assume cs:code,ds:data[……]
data segment
buf db ‘THE ASCII CODE OF[‘,’$’
buf1 db ‘] IS ‘,’$’
buf2 db 13,10,’$’
data ends
code segment
assume cs:code,ds:data
main:mov ax,data
mov ds,ax
lea dx,[buf]
mov ah,9;输入提示
int 21h[……]
data segment
int1 db 30,31 dup(0),’$’
int2 db 30,31 dup(0),’$’
space db 13,10,’$’
data ends
code segment
assume cs:code,ds:data
main:mov dx,data
mov ds,dx
lea dx,[i[……]
data segment
buf1 db ‘shu ru yi ge dan ci,jieguo:huo ba kong ge shan diao’,13,10,’$’
int1 db 100,101 dup(0),’$’
buf db 100,101 dup(0),’$’
data ends
code segment
assume cs:code,ds:data
main:mov dx,data
mov ds,dx[……]
stack1 segment stack
dw 32 dup(0)
stack1 ends
code segment
assume cs:code,ss:stack1
main:mov cx,5
mov si,5
mov bx,9
main1:call space
call string
[……]
玩趣儿
最新评语