传奇部落

GOM引擎传奇服务端随机抽奖脚本的制作教程

[复制链接]
发表于 2023-6-9 20:59:38 | 显示全部楼层 |阅读模式
QQ截图20230609201345.jpg 3 e; @+ k1 M5 ?; o

3 Z7 W9 u4 M: [8 @0 O$ I! j5 x" Q' E5 B8 R4 ]  `' R
; D  {; |) D9 z- s, M* a
% o3 o8 j: q) k! G
[@main]- z/ u, e+ X  C! [$ z' _) n3 a( E7 }
#IF
( Y- o, i  u) A* ^& O1 z$ E#Act; Q9 W2 l1 x6 |3 w6 P
#say
% \3 q6 I+ [+ L<><Img:174:13:0:0>[<金刚石抽奖/SCOLOR=254>]<人命天定,点高点背,全靠上天注定,真的是很看脸啊~/SCOLOR=250><Img:174:13:0:0>\, ^0 A6 f- ^( r( I# w
<>-------------------------------------------------------------\# B+ L0 m  [; K" M

6 K0 [1 o! s! j( P! W# u$ L

; z0 ?2 P  `. ~  |<>  <抽奖物品说明:/SCOLOR=87>   本游戏抽奖几率较低,请玩家认真对待!\3 `5 P( u# Q- M* R8 J# r
<><PlayImg:13:170:2:200:0:0:0> <抽中经验几率80%:/SCOLOR=150> <各种经验[100000经验-30000000经验]!/SCOLOR=251>\
) p/ {& R+ u. h& U( M+ j<><PlayImg:13:170:2:200:0:0:0> <抽中装备几率50%:/SCOLOR=150> <所有装备,包括上古装备,钻石会员在内!/SCOLOR=250>\
3 L, A: n. [) _7 o3 {- X/ o<><PlayImg:13:170:2:200:0:0:0> <抽中特殊几率30%:/SCOLOR=150> <稀有宝贝/SCOLOR=253>[<夺命§兽魂/SCOLOR=253>]<超强属性等你来拿!/SCOLOR=253>\
5 G% ~9 d% k: Y* X8 U! y$ R" G7 \( A<>-------------------------------------------------------------\
2 s/ Z; q, o3 S2 t5 H: z/ T<><PlayImg:13:170:2:200:0:0:0> [<使用金刚石抽奖/@使用金刚石抽奖>] <PlayImg:13:170:2:200:0:0:0> <250元宝抽取一次/SCOLOR=251>  →  <[每日不限制次数]/SCOLOR=249>\& N7 B8 n! T8 z9 P
<><PlayImg:13:170:2:200:0:0:0> [< 魔力§玫瑰 /@金刚石兑换元宝>] <PlayImg:13:170:2:200:0:0:0> 需要<夺命§兽魂/SCOLOR=253>1个+<神界水晶/SCOLOR=254>10块即可合成!\, |- u9 j) K9 K9 _( W$ y3 Z0 A7 L
0 a' p+ V. _, j4 o) a+ \% l
  M8 b/ M; c7 o( u) c. ?, I
[@金刚石兑换元宝]' G5 Y5 P! ]" B* l8 A4 k
#IF
+ n0 U3 ^+ c) K5 Tcheckitem 夺命§兽魂 1
2 n# [# a3 w' `8 K1 d$ b2 I. }CHECKITEM 神界水晶 10
4 g# [  H3 d% a& K) e/ V1 j  r#ACT* d' o* c* J+ R' P
take 夺命§兽魂 1
+ l) g0 o1 \; I' l1 ~TAKE 神界水晶 108 j% j/ d7 v4 Q
give 魔力§玫瑰 1
6 J* a# e2 Z  s" j! ]) [) NGuildNoticeMsg 244 151 玩家{[%s]|250:0:1}成功合成了{[魔力§玫瑰]|254:0:1}...
8 v. J" ^; l5 b: H+ e$ F( O* jGuildNoticeMsg 244 151 玩家{[%s]|250:0:1}成功合成了{[魔力§玫瑰]|254:0:1}...
6 \) ]7 t" t+ W/ D) R4 }/ X#elseact
  m! i6 o. Z6 e* P$ Q5 E7 yMESSAGEBOX 合成失败:\\缺少必须材料,请确认你的材料..., C( D! k6 }3 }( s3 w4 t
break
! j( j9 ], @' S6 g5 a5 ^
: b' N0 ^0 M. {: w- l! s3 _  m

& Z2 O  x& X7 g# X- y[@使用金刚石抽奖]- Q+ Y# H+ q: y
#IF
" p  `; S( W3 s7 C( q3 _0 QCHECKGAMEGOLD < 2508 t3 S5 k4 v) p
#ACT
( X2 x* J, X4 w; s' k/ BMESSAGEBOX \\抽奖失败!您的元宝不足250颗,
- @1 o" T9 ^, O, }2 O& Sbreak7 p* h' h& X3 I
- v1 q, X0 \: L- I4 H7 @

2 a. @3 N5 C+ b( ~+ x#IF- |; |* u' N5 }+ G' D
CHECKLEVELEX < 80
# G$ V8 {% B5 O9 R8 m& o#ACT
' M* a( Y. u& q( v  R; iGOTO @79抽奖
% Y% u- `+ q  @- K1 ~' gbreak3 b/ w7 |) A/ V: n, ?" \  U6 \
! |% A( i% c3 X2 l$ r+ K2 J
+ h2 J0 a+ G% k
#IF
4 g$ F  x& N( D+ v2 C% o  \. qCHECKLEVELEX > 797 r+ R/ G% r$ e" [1 r4 S" F
#ACT$ I/ J* P& Q# g) C
GOTO @80抽奖
& N9 l2 W$ n  D- zbreak
  E5 c& J. }1 u# _& W# U
3 A. ]  @  I# X7 w" g7 A

9 B" f8 }1 C* Q[@80抽奖]1 |9 z' _- p/ V6 M7 E
#IF
+ i7 y: v8 L. J. l* crandom 20; G5 e7 H# W% G" T/ Y6 I3 k
CHECKGAMEGOLD > 2496 ?2 \$ L+ ^  Z$ ]! ^
#ACT
9 A" s- U- w% O# w1 I9 @' qGOTO @抽奖材料7 h6 q2 L+ ?, o4 X
break5 y& s6 q5 V5 F  j# x

# E/ n$ D0 K) u! s
6 C1 h: [7 J. O3 D1 O" {) P: K+ d
#IF
7 }# c3 t6 Y1 i; c* h7 P6 ^random 5
" ^+ x/ U' R, g) X4 lCHECKGAMEGOLD > 249
2 R7 F+ q) C9 }6 K! X#ACT
; s# r4 g9 F  F' u" L: N2 iGOTO @抽奖中级装备
. Q- n) g  X$ _8 ^break
- Q# m; _) o6 s- C* p2 K" A8 I5 O" }' O1 @

/ q( b6 U8 z2 O#IF
4 O" r0 n$ i/ N' k. D' w& ^7 rrandom 1
* C6 s& |- b2 B* FCHECKGAMEGOLD > 249
. X7 r- m4 A. h" C! G: _6 r- B. Z#ACT
4 Y6 Z# m2 t" ~GOTO @抽奖随机奖励A
' Z# O9 M6 j6 K+ H/ a) ^break1 r! w4 y5 z1 L. V& q/ v" O% E( r

$ G( O" U( r  v  k
3 ?, G( Z1 @; n  f8 s: r
[@79抽奖]
' a; t5 d( c8 l; M$ h; L2 ?: `#IF+ w9 U6 l- ?, \4 D$ I# U
random 40. a& j( U, k! m5 r9 c4 |3 y3 o  Y7 S
CHECKGAMEGOLD > 249- {: b3 _0 t) o! S4 i2 T4 b5 z0 I
#ACT! r8 b% \& h8 a" Y& s9 r, `
GOTO @抽奖高级经验  y, r. i' Q& j1 M/ e
break
( y: s8 f, L. C* U# m* X0 k$ Q: s  M+ Y5 i* E* x$ p$ N( M

$ Z0 z) E: n  i# h#IF
3 Z+ F4 h  T( W' N' b. E* wrandom 20
  w$ `% Q6 I0 _- oCHECKGAMEGOLD > 2496 Z6 \7 Q5 {/ I1 c  W+ W
#ACT
& C& K5 v2 f$ i5 n) E0 BGOTO @抽奖材料0 a2 C4 I# e6 v  {+ L
break4 ?8 w" i& h2 g7 ?' \
: g0 {7 M, H) w0 y% G

  }8 T' s! U7 K0 K; \#IF' w, K+ D+ T' b% M; L9 h5 ?
random 5
0 G( B7 |6 x9 k3 }0 JCHECKGAMEGOLD > 249+ I) b, Z$ Q! A, ?
#ACT0 h+ N8 B0 ~' K: J
GOTO @抽奖中级装备8 l0 y8 R% B6 v9 i" w
break
7 V. e: I% t% i
4 G8 v) Z: W6 D; d& m0 D3 C! D6 }; K
1 o& S% B# ?" _6 k8 c
#IF
) p$ h% R' M# L1 X" I7 Urandom 3
* N1 U. X4 r5 ^) w1 B  VCHECKGAMEGOLD > 249
+ H- H, s4 q, i& i1 l#ACT
0 r  v( y5 H9 J3 B6 f  f. bGOTO @抽奖中级经验0 }7 \. [  Q; p( _" k% Z
break/ q' I4 \3 t: W6 Z2 b  G( g( D
) O$ z4 }6 k# P! G
' I4 P. X/ o7 W! @4 o
#IF
2 W$ O/ o8 J9 Brandom 1
7 Y* w4 D5 y$ e# o1 h6 N# TCHECKGAMEGOLD > 249
; O- l* w) v3 h' C#ACT# J  Y0 F. _5 ^7 C3 N5 l
GOTO @抽奖随机奖励0 D+ L$ n! q7 N  m  c
break
0 ^% \" u# o7 ~; e5 _# y6 f, W1 F& h" R- a6 f3 R0 o  P: _

6 m- x9 U( |3 F3 |5 y) F[@抽奖随机奖励A]
, d( A' q6 w: N- U: K7 b7 {! o+ F#IF
% W8 L! E# o) W7 k; trandom 23 g; U% E* G/ q
CHECKGAMEGOLD > 249
( M! i8 z! @$ l#ACT- g* W) J1 k" M& D3 @1 g
GAMEGOLD - 250
& Y. j8 z) D1 D" LMOV S10 0
( @7 p9 m8 m8 y# sGetRandomText ..\QuestDiary\数据文件\金刚石抽奖\抽奖低级材料.txt S10+ U! S6 \1 ?! T9 ]
GIVE <$STR(S10)> 1
" k- x" z$ n3 t  {8 w1 lSendMsg 7 系统:恭喜玩家[{%s|250:0:1}]抽奖获得了物品[{<$STR(S10)>|251:0:1}]...  ?) q; T" B7 ~) c, b$ ?) G+ h- L
break
) `  {& C3 J; h% ^& t6 C- Q1 P- V: ?, y' F
! _4 C+ I- T* ^
#IF
& l/ v- D$ q& \; R. a3 jrandom 1: n  U* C4 z' I
CHECKGAMEGOLD > 2497 N& r* j( S  Q; r3 }9 o
#ACT4 A! ?. K+ R: f6 I7 s4 i
GAMEGOLD - 250
. E; a. P* k& PMOV S10 0
! n/ E3 b! p" Y0 s; r0 q$ gGetRandomText ..\QuestDiary\数据文件\金刚石抽奖\抽奖低级装备.txt S10/ T8 }3 }( b9 |
GIVE <$STR(S10)> 1# N  w/ T7 m) V3 P  D. R: A
SendMsg 7 系统:恭喜玩家[{%s|250:0:1}]抽奖获得了物品[{<$STR(S10)>|251:0:1}]...
/ @6 K8 g, z. ?* m; f# ?: nbreak
" ^+ J4 d2 \, F! u: c/ J" `, U# P; G5 T# G) J5 ?0 L
5 \. S* S$ {$ ^
[@抽奖随机奖励]$ o/ @$ E. t! W+ a
#IF
6 H9 F3 ~5 p2 G5 t" Yrandom 32 b" Y) m- P% W! V. C; E  J9 \5 [  ^
CHECKGAMEGOLD > 2498 p9 U, S) W; G/ g7 F9 X
#ACT
% t- d9 a+ X* T2 f+ G$ vGAMEGOLD - 250
. G& `  ~1 G3 h% NMOV S10 0
1 x4 F, C$ k7 T4 A+ V, s! AGetRandomText ..\QuestDiary\数据文件\金刚石抽奖\抽奖低级材料.txt S10
/ D, N; r0 T* b. IGIVE <$STR(S10)> 1
/ ~" J6 z* W6 C. VSendMsg 7 系统:恭喜玩家[{%s|250:0:1}]抽奖获得了物品[{<$STR(S10)>|251:0:1}]...! ?5 Y5 f, u2 J. q# v: C0 I( S% r4 ]
break- p9 l  \. x: a* |9 l0 K, e

1 d* p& P( C" n, W

) U, h' D7 i: }% U0 a* X#IF
# w2 O9 j; {9 o7 n0 ~! T( Arandom 2
1 |% R- O: b2 a0 B  c  t  \9 @, fCHECKGAMEGOLD > 249
0 e+ q/ c6 G$ ]2 u4 J#ACT% [( ]" `* p( O
GAMEGOLD - 250
+ b3 }* e7 _2 `3 fMOV S10 0
0 c& N% D/ e' V; dGetRandomText ..\QuestDiary\数据文件\金刚石抽奖\抽奖低级装备.txt S10
$ {/ E1 o" }5 P' lGIVE <$STR(S10)> 1
, h- C& D3 `2 p' k- _; ~SendMsg 7 系统:恭喜玩家[{%s|250:0:1}]抽奖获得了物品[{<$STR(S10)>|251:0:1}]...3 e, \" _4 g) ~- R( O- G+ Z  Z9 h
break) C$ D3 L9 F2 O! t7 q9 ^. o' Z2 n

- ~' k! z) k% F* Y; ?: F

  g$ U9 U) P( V* I/ g0 s#IF7 u# h2 d, @6 J$ a# Y. [/ {6 U
random 1
2 c1 ^' m0 j0 N' i* ]5 wCHECKGAMEGOLD > 249
& K+ D& }! P, f#ACT
+ ~1 R4 j  X7 [3 ^, x, MGAMEGOLD - 250
& u: j4 s& [8 j. ?- PMOV S10 03 J3 V( v6 b' Y
GetRandomText ..\QuestDiary\数据文件\金刚石抽奖\抽奖低级经验.txt S10
  m$ Y( v9 [/ N3 MCHANGEEXP + <$STR(S10)>
# W+ ^* }2 Y) B8 p; cSendMsg 7 系统:恭喜玩家[%s]使用金刚石抽奖获得了经验[<$STR(S10)>]
4 n& p" C5 p. [8 ^  Abreak+ k& N" q1 |! y2 J
9 ~) g3 F6 u& w; r4 o( X

. R2 V5 \# l* H/ b[@抽奖中级经验]
" O3 U* _1 _. E  J$ T4 j#IF. \! w) J' L% |: R6 h6 ^$ U7 g/ x
CHECKGAMEGOLD > 249( F) L$ z/ _' _& n; N' R; P' q
#ACT
4 e7 c2 M. O  M2 X/ p5 bGAMEGOLD - 250
) B/ t* ~" S$ V; o  ?9 O) f0 cMOV S10 0
+ g& i- Y4 g' \' F- I+ k% MGetRandomText ..\QuestDiary\数据文件\金刚石抽奖\中级经验.txt S10: T+ c# d1 \8 Y8 j& C- u
CHANGEEXP + <$STR(S10)>) z4 c% P% |9 }
SendMsg 0 151 249 系统:恭喜玩家[%s]使用金刚石抽奖获得了经验[<$STR(S10)>]
- I* `, E: W. o8 \* c& C; X8 qbreak
6 c; }# V! o: \: ]( Q3 [  ?! m
+ I. g  ]' i7 ]/ [' {* G
/ j% V. ^. ]% T' j+ f$ R
[@抽奖高级经验]
) l" N" A$ ~2 i+ P( {/ J#IF) ^" z3 a. X$ F  [
CHECKGAMEGOLD > 249  G, z% v! d1 T  ?: k" S$ z
#ACT
7 e# L- X  a( x. h5 VGAMEGOLD - 250* P. H. b7 g# l# `
MOV S10 0. W# v, v$ t: r5 [, j
GetRandomText ..\QuestDiary\数据文件\金刚石抽奖\高级经验.txt S10
# S) X! O( n' ZCHANGEEXP + <$STR(S10)>$ z' ~6 I* c4 F/ B/ T* Q. L9 k# K
SendMsg 0 151 249 系统:恭喜玩家[%s]使用金刚石抽奖获得了经验[<$STR(S10)>]7 {! O, B7 L% W' g. g% ]
break( M2 N5 C) v5 r8 z/ p% S8 ^/ u2 L
) ]; s8 {9 e: P8 {

% G$ s" p% I# G* |4 f[@抽奖中级装备]3 I  A: j, u, Y/ _2 V  p1 f
#IF: p4 }$ F, m1 e6 t$ y# `$ ^
CHECKGAMEGOLD > 249
% u& }, {1 B2 n1 h& g. \  u#ACT+ X* I: k2 J# M  ^: L- r! X0 \7 [
GAMEGOLD - 250- o/ |8 V0 X' l: i1 T3 ^: f
MOV S10 0
$ v5 a- I; c( S- m/ x5 {/ X: YGetRandomText ..\QuestDiary\数据文件\金刚石抽奖\中级装备.txt S100 M$ b% [" M* G+ z  r* ?
GIVE <$STR(S10)> 1. `7 x3 F. o# A4 G0 c
SendMsg 0 玩家[{%s|250:0:1}]抽中了物品{[<$STR(S10)>]|251:0:1}...
5 U2 [  K. U1 J  Tbreak0 H! Q6 m4 e8 J
/ _8 f- {" Q) E& t
6 K# c% D3 Z- R
[@抽奖高级装备]
  |& e$ M: g& X0 R! {! Z5 ^#IF
1 i8 b6 C8 n" F* o, W7 ]CHECKGAMEGOLD > 2492 Y* ^- K( S* x, n: G7 Y9 ]" r# T( m
#ACT; W* k: F0 a. [+ I* \& O* r) R
GAMEGOLD - 250- ]# i6 H# g, j3 Y! E. C, X! J
MOV S10 0: z5 h# V$ }+ F/ i8 u4 b3 r
GetRandomText ..\QuestDiary\数据文件\金刚石抽奖\高级装备.txt S10* Y4 X1 K- F5 O, P
GIVE <$STR(S10)> 14 ~* F7 v' B  o$ _) }  m7 N+ p
SendMsg 0 玩家[{%s|250:0:1}]抽中了物品{[<$STR(S10)>]|254:0:1}...# G1 w* R  W1 R; J1 Y
SendMsg 0 玩家[{%s|250:0:1}]抽中了物品{[<$STR(S10)>]|254:0:1}...
& c1 S( V6 U' {( A8 n* tSendMsg 0 玩家[{%s|250:0:1}]抽中了物品{[<$STR(S10)>]|254:0:1}...1 H' R' U; G5 `7 N0 p
SendMsg 0 玩家[{%s|250:0:1}]抽中了物品{[<$STR(S10)>]|254:0:1}...0 z/ g/ w0 ]/ p! I! f. x* K
SendMsg 0 玩家[{%s|250:0:1}]抽中了物品{[<$STR(S10)>]|254:0:1}...* e3 D( \3 ?8 _( |9 s# F
SendMsg 0 玩家[{%s|250:0:1}]抽中了物品{[<$STR(S10)>]|254:0:1}...$ _9 g$ _. t- L  q+ P/ C
SendMsg 0 玩家[{%s|250:0:1}]抽中了物品{[<$STR(S10)>]|254:0:1}...5 w/ {! ]) l/ P4 a9 O- @* J
SendMsg 0 玩家[{%s|250:0:1}]抽中了物品{[<$STR(S10)>]|254:0:1}...
4 ]; d" m0 T) ^/ \2 f. ubreak& _9 z, E- M7 B$ E  N

3 I/ J/ _+ f& m3 B* T

' a4 m$ z. x; g2 v- ~2 m[@抽奖材料]
; @# u7 X6 U( u+ @: B* b" {( ?#IF
: n/ {/ ?1 }+ q  z; ACHECKGAMEGOLD > 2494 e$ q" o9 k! m- G
#ACT
: W+ m7 ~, P3 D( v$ c. N: r) ZGAMEGOLD - 250
7 V' H" k+ e# ^- W) \$ T+ \3 GMOV S10 0+ M/ w; C4 W* q8 {8 n2 r
GetRandomText ..\QuestDiary\数据文件\金刚石抽奖\抽奖材料.txt S10  T1 k0 O7 g( p( }: Q* {) ?4 r6 J# A
GIVE <$STR(S10)> 1
6 r0 F+ u2 y2 c  NSendMsg 0 玩家[{%s|250:0:1}]抽中了物品{[<$STR(S10)>]|154:0:1}...
5 T7 a" h$ g# ^. b/ V) Hbreak' |' n* E' N- `1 H
, [  U+ G; Y! D# Z; Y4 m* b
站长承接传奇一切业务,小问题免费咨询。站长QQ137919001
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|小黑屋|网站地图|皖ICP备18020244号-7|传奇部落

GMT+8, 2026-9-10 19:58 , Processed in 皖公网安备:34112402000394号 0.194092 second(s), 26 queries .