灌水成绩
等级头衔
ID : 1
管理员
积分成就
威望 : 999899
点
贡献 : 9999 次
下载币 : 11628 枚
在线时间 : 1361 小时
注册时间 : 2013-9-5
最后登录 : 2026-3-4
就是服务器开启，然后玩家进入游戏会在一个特定的地图，设定的开服时间未到无法离开的脚本！感觉很多人应该用的到！
9 I, f) x( c3 F! w7 }, _6 {3 x0 G
, P+ n, q: Z' \) a8 z
mapinfo.txt内加入这行内容
0 z, }2 [; L1 e9 o/ W/ N. E# F. U
[0139~22 开区等待间 0] SAFE NORECALL NORANDOMMOVE NODRUG BLACKROOM 复制代码 - Y7 I3 v8 H" o& z& G: Y' t LogonQuest.pas内加入这行内容
: o+ p9 G/ E# @% L, {) o+ q! y5 }
1 `- x7 Z1 X: ^7 v8 `1 n" O if (GetMonth = 5) and (GetDay = 1) and (GetHour < 1) and (This_Player.MapName <> '0139~22')then% {3 P/ d+ X2 d4 \8 i3 A) H" W This_Player.RandomFlyTo('0139~22');9 F! O( f' \6 O: n7 h1 m) K }6 C) S: n! W0 ]9 W7 L program mir2;2 Z+ k# Z( }4 `" h! j6 X procedure _letgo;" {, x5 b8 {% j* ^ var! E$ x+ I6 O1 F6 y4 m: d i: integer;6 P$ c5 l# k7 v* P6 o! ^6 R. Y# y begin1 r* ?: |% I& L1 X: J/ d: C if (GetHour >= 1) or (GetDay <> 1) then //GetHour代表开区的整点，GetDay代表开区是几号，改这2个就可以了。 1 ]" A" N- M' A' }; @, Y begin. w9 ]3 X# z) }' ^0 q9 o* g' M3 ? i := Random(1);" w9 w+ `" @# D, A S) \( L- A" ~ if i = 1 then& T# E( }6 f& J& D7 `5 I This_Player.Flyto('0', 650, 626)) `/ x& T, n% b# T+ f% W S else$ f7 z3 |' G# a$ h This_Player.Flyto('0', 290, 617);7 ^! y7 g) p: b0 [ end; I; T1 Y; @" v. _& c else) Q/ f9 F7 K% n5 N W This_Player.PlayerNotice('必须到1点才可以离开！', 0);# \$ c9 J. Q9 Q# V( y/ ]- q end;; f; ]' ^3 H# b# A8 _( ~% D0 P begin3 }! z, a. i. T/ \ This_NPC.NpcDialog(This_Player, '墨鱼传奇于1号1点正式开区，届时你才可以离开等待间。 \' +4 a) G$ G3 E2 W3 O8 ^7 C4 o* F '|{cmd}<我要出去/@letgo>\');1 x L7 E- l5 k. _6 j: q& j; b: e8 o end. 复制代码 * x0 t3 W0 j8 l. D. i" X" j
1 b- A9 |( \# E
8 _# |2 K, ~# j) r4 R# W5 C% Z9 Y ! G( @+ s- F, ]. }! _" l
/ f; J/ b8 m7 {1 y 3 {( j1 e$ x% D4 B# S3 m5 L
" P3 X; z: i6 v! u# J
发表于 2025-11-13 22:24:45
! G( @+ s- F, ]. }! _" l