China DOS Union

-- Unite DOS · Advance DOS · Grow DOS --

Union site: www.cn-dos.net Forum site: www.cn-dos.net/forum
DOS stands for freedom, openness and progress. Let us work hard, learn from the openness and GNU spirit of FreeDOS and Linux, and together build and grow a free GNU GPL world!

中国DOS联盟论坛
The time now is 2026-08-06 05:01
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » Programmers, how to express love to the beloved MM View 3,474 Replies 35
Floor 16 Posted 2007-04-25 05:13 ·  中国 广西 玉林 博白县 电信
金牌会员
★★★★
Credits 3,687
Posts 1,467
Joined 2005-08-08 12:00
20-year member
UID 44210
Status Offline
Just use batch processing

::zh159@bbs.cn-dos.net
::The "%" character needs to be processed with "%%", and the "|" character is used as a line break character.
::The characters "" and ":" cannot be processed.
@echo off
title XX's confession to XX
mode con cols=60 lines=15
color fc
set "str= ~!@#$%%^&*()_+{}<>?Test,|Test Test Test Test|Test Test Test!"
>sleep.vbs echo wscript.sleep 100
set N=0
echo.

:loop
sleep.vbs
call set "var=%%str:~%N%,1%%"
if "%var%" == "" goto end
if "%var%" == "|" set var= &echo.
set /p"=%var%"<nul
set /a N+=1
goto loop

:end
del sleep.vbs
echo.
echo.
pause
Recent Ratings for This Post ( 1 in total) Click for details
RaterScoreTime
jmz573515 +8 2007-04-25 09:39
Floor 17 Posted 2007-04-25 09:41 ·  中国 辽宁 本溪 联通
银牌会员
★★★
Credits 1,212
Posts 464
Joined 2006-12-13 21:11
19-year member
UID 73417
Gender Male
Status Offline
Hello! Unfortunately, I know nothing about batches at all~~...
Floor 18 Posted 2007-04-25 10:10 ·  中国 广东 广州 电信
新手上路
Credits 6
Posts 2
Joined 2007-04-24 06:19
19-year member
UID 86261
Gender Male
Status Offline
Floor 19 Posted 2007-04-26 09:00 ·  中国 上海 闵行区 电信
新手上路
Credits 5
Posts 3
Joined 2006-06-03 23:27
20-year member
UID 56508
Status Offline
Very interesting VBS learning
Floor 20 Posted 2007-04-26 10:32 ·  中国 广东 广州 电信
初级用户
Credits 26
Posts 14
Joined 2006-01-14 22:35
20-year member
UID 48984
Status Offline
Haha. You can also input in the QQ chat window!!
Floor 21 Posted 2007-05-04 22:37 ·  中国 广东 肇庆 电信
新手上路
Credits 4
Posts 11
Joined 2006-06-20 19:51
20-year member
UID 57321
Status Offline
Floor 22 Posted 2007-05-07 20:05 ·  中国 北京 利达宽带
中级用户
★★
Credits 273
Posts 91
Joined 2007-05-07 18:12
19-year member
UID 87770
Gender Male
Status Offline
Set ie = CreateObject("InternetExplorer.Application")
' Set IE object
ie.Navigate "about:blank"
ie.fullscreen = true
ie.Width = 270
ie.Height = 50
ie.left = fix((ie.document.parentwindow.screen.availwidth - ie.width) / 2) 'Center horizontally'
ie.top = fix((ie.document.parentwindow.screen.availheight - ie.height) / 2) 'Center vertically'
ie.Visible = True

str = "Sorry girl: I think I...don't love you"
Num = Len(str)
ie.document.write "<body scroll=no><b><span id=show></span></b></body>"

for i = 1 to Num
Input = Left(str, i)
ie.Document.all.show.innerhtml = Input
wscript.sleep 500
Next
wscript.sleep 10000
ie.quit
set ie = nothing


[ Last edited by sonicandy on 2007-5-7 at 09:22 PM ]
Recent Ratings for This Post ( 2 in total) Click for details
RaterScoreTime
zhoushijay +8 2007-05-08 11:36
wert123 +2 2007-06-24 21:10
Floor 23 Posted 2007-05-08 08:24 ·  中国 重庆 沙坪坝区 联通
贫困用户
Credits -2
Posts 1
Joined 2006-11-12 13:00
19-year member
UID 70340
Gender Male
Status Offline
12312312sdfdsfs


─────────────────── Moderation Record ────────────────────
Performed by: lxmxn
Action: Spam, deducted 2 points of reputation.
─────────────────── Moderation Record ────────────────────


[ Last edited by lxmxn on 2007-5-8 at 09:01 AM ]
Recent Ratings for This Post ( 1 in total) Click for details
RaterScoreTime
lxmxn -2 2007-05-08 08:59
Floor 24 Posted 2007-05-10 17:15 ·  中国 河南 南阳 联通
新手上路
Credits 15
Posts 6
Joined 2007-05-10 15:21
19-year member
UID 88080
Gender Male
Status Offline
Hehe.. Interesting.. Fun, right~
Floor 25 Posted 2007-05-10 18:40 ·  中国 福建 泉州 德化县 电信
初级用户
Credits 40
Posts 16
Joined 2006-12-03 05:20
19-year member
UID 72433
Gender Male
Status Offline
Floor 26 Posted 2007-06-16 23:53 ·  中国 广东 广州 鹏博士宽带
初级用户
★★
Credits 176
Posts 78
Joined 2007-04-15 10:53
19-year member
UID 85268
Gender Male
Status Offline
Typing Chinese characters can directly adjust the encoding characters, and then press the CTRL+SHIFT keys before inputting, but this personality setting is too dependent, the code in building 22 is collected...
Floor 27 Posted 2007-06-19 23:26 ·  中国 湖北 武汉 电信
初级用户
★★
Credits 108
Posts 56
Joined 2007-05-07 16:00
19-year member
UID 87758
Gender Male
Status Offline
Floor 28 Posted 2007-06-20 01:12 ·  中国 湖南 长沙 电信
初级用户
★★
Credits 182
Posts 75
Joined 2006-10-11 00:10
19-year member
UID 65220
Gender Male
Status Offline
The expert on floor 22 is amazing. There are tricks. Hehe.
Floor 29 Posted 2007-06-20 09:28 ·  中国 山西 晋城 联通
新手上路
Credits 5
Posts 3
Joined 2007-05-25 01:52
19-year member
UID 89229
Gender Male
Status Offline
Ask, how to input ?????? in the QQ chat window
Floor 30 Posted 2007-10-11 16:40 ·  中国 江西 南昌 电信
中级用户
★★
Credits 206
Posts 100
Joined 2007-07-09 20:51
19-year member
UID 93566
Gender Male
Status Offline
Heh
Forum Jump: