Türkiye'nin en eski ve aktif online oyun platformu, Ultima Online, Counter-Strike ve diğer online oyunlar hakkında Türkçe haber, bilgi ve forum sunuyor. Türkiye'nin en eski ve aktif online oyun platformu, Ultima Online, Counter-Strike ve diğer online oyunlar hakkında Türkçe haber, bilgi ve forum sunuyor.
  • ANASAYFA
  • ULTIMA ONLINE
    • Ultima Online Oyuncu Rehberi

      Ultima Online Oyuncu Rehberi

      Oyunu hakkında tanıcı bilgiler ve ipuçları

    • Ultima Online Server List

      Ultima Online Server List

      Önemli özellikleri ve online oyuncu sayıları

    • Ultima Online Script

      Ultima Online Script

      Sphere, RunUO, Razor scriptleri

    • Ultima Online Forum

      Ultima Online Forum

      UO hakkında görüş alışverişi

  • FORUM
  • DOKÜMAN
  • İNDİR
  • DISCORD 51
   Üye ol    Giriş
168
  1. UO Scriptleri
  2. Sphere Scripts
  3. Events
  4. Paintball
Massacre

Paintball

  • Massacre
  • 2008-10-26 22:02
  • 0 Yorumlar
  • 1038 Görüntüleme

Coded by SHS-Shaku
Edited by Comrade
Bütün Bugları Fixlenmiştir
[email protected]

[FUNCTION paintball]
SRC.SYSMESSAGE Welcome, when you click the okay on the paintball entry stone you will be sent to your teams HQ. When you shoot somone they will be returned to their HQ and you will receive 1 point.
SRC.SYSMESSAGE You double click your teams score stone to deposit the your score there. You can double click the enemy score stone to take their flag, you then double click your score stone to capture the flag.

[ITEMDEF pballblue]
ID=i_crossbow
TYPE=15
NAME=Paintball Gun (Blue)
DAM=1
SKILL=Archery
REQSTR=10
TWOHANDS=Y
WEIGHT=0
TDATA3=i_paintball
TDATA4=i_paintball

on=@create
COLOR=4
Hitpoints=500
ATTR=4

ON=@EQUIP
SRC.TAG.OARCHERY=<SRC.ARCHERY>
SRC.ARCHERY=0
LINK=<SRC.UID>

ON=@UNEQUIP
SRC.ARCHERY=<SRC.TAG.OARCHERY>

ON=@DAMAGE
IF !(<SRC.FINDLAYER(22).COLOR> === 02)
LINK.TAG.SCORE=<LINK.TAG.SCORE> +1
SRC.GO=<SRC.TAG.BASE>
SRC.SYSMESSAGE You have been hit!
SRC.FINDLAYER(20).REMOVE
SRC.TAG.FLAG=0
ELSE
SRC.SYSMESSAGE You were shot by your own team!
SRC.FINDLAYER(20).REMOVE
SRC.TAG.FLAG=0
ENDIF

[ITEMDEF pballred]
ID=i_crossbow
TYPE=15
NAME=Paintball Gun (Red)
DAM=5
REQSTR=10
TWOHANDS=Y
WEIGHT=0
TDATA3=i_paintball
TDATA4=i_paintball

on=@create
COLOR=020
Hitpoints=500
ATTR=4

ON=@EQUIP
SRC.TAG.OARCHERY=<SRC.ARCHERY>
SRC.ARCHERY=0
LINK=<SRC.UID>

ON=@UNEQUIP
SRC.ARCHERY=<SRC.TAG.OARCHERY>

ON=@DAMAGE
IF !(<SRC.FINDLAYER(22).COLOR> === 020)
SRC.FINDLAYER(20).REMOVE
LINK.TAG.SCORE=<LINK.TAG.SCORE> +1
SRC.TAG.FLAG=0
SRC.GO=<SRC.TAG.BASE>
ELSE
SRC.SYSMESSAGE You were shot by your own team!
SRC.FINDLAYER(20).REMOVE
SRC.TAG.FLAG=0
SRC.GO=<SRC.TAG.BASE>
ENDIF

[FUNCTION showscore]
SRC.SYSMESSAGE You have <EVAL <SRC.TAG.SCORE>>. Go to your base stone and double click it to deposite your points!

[ITEMDEF i_exitstone]
ID=i_grave_stone
NAME=Paintball Exit Stone
TYPE 00

ON=@DCLICK
src.MENU m_exit
src.move 1
return 1

[MENU m_exit]
Cikacak misiniz paintballdan?
ON=0 Leave Arena
SRC.TAG.SCORE 0
SRC.EVENTS -e_blueteam
SRC.EVENTS -e_redteam
SRC.FINDLAYER(21).REMOVE
SRC.FINDLAYER(22).REMOVE
SRC.FINDLAYER(2).REMOVE
SRC.GO=6032,400,22
SRC.NEWITEM i_gold
SRC.ACT.BOUNCE
SRC.SYSMESSAGE You have retired from your day of paintballing.
RETURN 1
ON=0 Cancel
RETURN 1



[ITEMDEF i_enterstone]
ID=i_grave_stone
NAME=Paintball Entry Stone
TYPE 00

ON=@DCLICK
DIALOG d_paintballentry
RETURN 1

[DIALOG d_paintballentry]
100, 100
noclose
nomove
PAGE 0
resizepic 25 25 5054 335 200
resizepic 35 35 3000 315 180
text 55 42 32 0
text 55 60 152 1
text 55 75 152 2
text 55 90 152 3
text 55 105 152 4
text 55 120 152 5
button 104 150 243 241 1 0 1
button 238 148 2311 2312 1 0 2
text 64 190 162 6

[DIALOG d_paintballentry TEXT]
-=-=-=-=-=-= WARNING =-=-=-=-=-=-
Clicking okay will remove all items
you are wearing and all items in your
back pack. If you have something that
you wish to keep click cancel do not
click okay!
Paintball System by SHS Shaku


[DIALOG d_paintballentry BUTTON]
on=1
SRC.BANK
SRC.SYSMESSAGE Here is your bank use the stone again when you are ready to enter.
RETURN 1

on=2
IF (<EVAL <MOREX>> === 1)
MOREX=0
SRC.EVENTS -e_blueteam
SRC.FINDLAYER(25).REMOVE
SRC.FINDLAYER(13).REMOVE
SRC.FINDLAYER(6).REMOVE
SRC.FINDLAYER(19).REMOVE
SRC.FINDLAYER(4).REMOVE
SRC.FINDLAYER(10).REMOVE
SRC.FINDLAYER(7).REMOVE
SRC.FINDLAYER(24).REMOVE
SRC.NEWITEM=pballred
SRC.ACT.EQUIP
SRC.NEWITEM=i_robe
SRC.ACT.NAME=Paintball Robe [Red]
SRC.ACT.COLOR=020
SRC.ACT.EQUIP
SRC.FINDLAYER(21).REMOVE
SRC.GO=6123,403,22 // --------------- RED TEAM
SRC.EVENTS e_redteam
SRC.TAG.BASE=6123,403,22 // ------ RED TEAM
SRC.NEWITEM=i_paintball
SRC.ACT.AMOUNT 1000
SRC.ACT.COLOR=020
SRC.ACT.BOUNCE
RETURN 1
ELSE
MOREX=1
SRC.EVENTS -e_redteam
SRC.FINDLAYER(25).REMOVE
SRC.FINDLAYER(13).REMOVE
SRC.FINDLAYER(6).REMOVE
SRC.FINDLAYER(19).REMOVE
SRC.FINDLAYER(4).REMOVE
SRC.FINDLAYER(10).REMOVE
SRC.FINDLAYER(7).REMOVE
SRC.FINDLAYER(24).REMOVE
SRC.NEWITEM=pballblue
SRC.ACT.EQUIP
SRC.NEWITEM=i_robe
SRC.ACT.NAME=Paintball Robe [Blue]
SRC.ACT.COLOR=02
SRC.ACT.EQUIP
SRC.FINDLAYER(21).REMOVE
SRC.GO=6037,490,22 // --------------- BLUE TEAM
SRC.EVENTS e_blueteam
SRC.TAG.BASE=6037,490,22 // ------ BLUE TEAM
SRC.NEWITEM=i_paintball
SRC.ACT.AMOUNT 1000
SRC.ACT.BOUNCE
RETURN 1
ENDIF

[EVENTS e_blueteam]

ON=@CLICK
IF (<SRC.TAG.FLAG> === 1)
MESSAGE <NAME> [Blue]
MESSAGE [FLAG]
SRC.HITS=<SRC.STR>
MESSAGE [Score: <EVAL <TAG.SCORE>>]
RETURN 1
ELSE
MESSAGE <NAME> [Blue]
SRC.HITS=<SRC.STR>
MESSAGE [Score: <EVAL <TAG.SCORE>>]
RETURN 1

[EVENTS e_redteam]

ON=@CLICK
IF (<SRC.TAG.FLAG> === 1)
MESSAGE <NAME> [Red]
MESSAGE [FLAG]
SRC.HITS=<SRC.STR>
MESSAGE [Score: <EVAL <TAG.SCORE>>]
RETURN 1
ELSE
MESSAGE <NAME> [Red]
SRC.HITS=<SRC.STR>
MESSAGE [Score: <EVAL <TAG.SCORE>>]
RETURN 1

[ITEMDEF i_paintball]
ID=i_gold
NAME=paintball
TYPE=00

ON=@CREATE
COLOR=02

ON=@DCLICK
RETURN 1

[ITEMDEF i_score_stone]
ID=0db
NAME=Paintball Score Stone
TYPE=00

ON=@CLICK
IF (<COLOR> === 02) && !(<EVAL <MOREZ>> === 1)
MESSAGE [Team Score: <EVAL <MOREX>>]
MESSAGE [FLAG]
NAME=Blue Teams Score Stone
ELSEIF (<COLOR> === 020) && !(<EVAL <MOREZ>> === 1)
MESSAGE [Team Score: <EVAL <MOREX>>]
MESSAGE [FLAG]
NAME=Red Teams Score Stone
ELSEIF (<COLOR> === 020) && (<EVAL <MOREZ>> === 1)
MESSAGE [Team Score: <EVAL <MOREX>>]
NAME=Red Teams Score Stone
ELSEIF (<COLOR> === 02) && (<EVAL <MOREZ>> === 1)
MESSAGE [Team Score: <EVAL <MOREX>>]
NAME=Blue Teams Score Stone
ENDIF

ON=@DCLICK
IF (<COLOR> === <SRC.FINDLAYER(22).COLOR>) && !(<SRC.TAG.FLAG> === 1)
MOREX=<MOREX> +<EVAL <SRC.TAG.SCORE>>
SRC.TAG.SCORE=0
SRC.SYSMESSAGE Your points have been deposited!
RETURN 1
ELSEIF (<COLOR> === <SRC.FINDLAYER(22).COLOR>) && (<SRC.TAG.FLAG> === 1)
SRC.TAG.FLAG 0
SRC.SYSMESSAGE YOU CAPTURED THE FLAG! 15 team points!
MOREX=<EVAL <MOREX>> +15
SRC.FINDLAYER(20).REMOVE
SRC.TAG.FLAG 0
RETURN 1
ELSEIF !(<COLOR> === <SRC.FINDLAYER(22).COLOR>) && !(<SRC.TAG.FLAG> === 1) && !(<EVAL <MOREZ>> === 1)
SRC.SYSMESSAGE You Grabbed the flag!
SRC.NEWITEM i_cape
SRC.ACT.COLOR=<COLOR>
SRC.ACT.NAME=a flag
SRC.ACT.ATTR=08000
SRC.ACT.EQUIP
SRC.TAG.FLAG=1
LINK=<SRC.UID>
MOREZ=1
TIMER=1
RETURN 1
ELSEIF (<EVAL <MOREZ>> === 1)
SRC.SYSMESSAGE Your team already has the flag!
RETURN 1
ENDIF

ON=@TIMER
IF (<LINK.TAG.FLAG> === 1)
TIMER 1
RETURN 1
ELSE
MOREZ 0
RETURN 1
ENDIF

[EOF]

Değerlendirmeler

0 0

Total votes: 0

Üye Ol veya Giriş Yap

Bu içeriğe yorum atmak istiyorsanız hemen üye olun veya giriş yapın.

Discord ile Bağlan
Twitch ile Bağlan
Steam ile Bağlan
Google ile Bağlan

Yorumlar (0)

Henüz yorum yapılmamış
Sadece kayıtlı kullanıcılar yeni yorum yapabilir.


Ultima-Strike Discord
Benzer Sayfalar

Bulunamadı.



  • Son Forumlar
  • Sayfalar
  • Vanq
    Yapay zekayla UO kodlamaya çalışan var mı? Cursor...

    Sphere Scripting 2 hafta önce

  • Osman3007
    CS 1.6 P0ndenush Config

    CS 1.6 2 hafta önce

  • TSuN@Mi
    Counter-Strike 1.6 İndir - Tek Link Hızlı-

    Counter-Strike 2 hafta önce

  • sarhos7573
    Ev Yapmak istiyorum

    Sphere Scripting 2 hafta önce

  • Zerox
    Üyeliği 15 yıl ve üzerinde olanlar.

    Ultima Online 3 hafta önce

  • Gökhan Çelikörs
    NightUO

    Sunucular 1 ay önce

  • Vanq
    Discord'a alternatif olarak basit sesli sohbet...

    Off Topic 1 ay önce

  • Furkan Yurtseven
    CS2 Topluluk Sunucumuza Ücretli Yetkili Aranıyor!

    Counter-Strike 2 1 ay önce

  • Nefrelius
    Alcor UO Reborn

    Sunucular 2 ay önce

  • System_Error
    Client Patlaması

    Ultima Online 2 ay önce

  • georgm15
    CS2 turnuvaları tartışmalı başladı.

    Counter-Strike 2 2 ay önce

  • Cihangir algın
    Razor Kullanımı

    RunUo Scripting 3 ay önce

  • Lucretius
    Rampage Pvp

    Sunucular 3 ay önce

  • Lucretius
    Nephilim Pvp

    Sunucular 3 ay önce

  • Cengiz MERDİT
    Sphere 56T Nightly Sürümü

    Ultima Online 3 ay önce

  • Skill seçimlerinizi planlamak artık çok daha kolay

    Ultima Online Karakter Yapılandırma Aracı Bölümü Açıldı!

    2024-10-31 22:47

  • Ultima Online topluluğu, ClassicUO'nun sadece web client olarak kullanılabileceğinin açıklanmasının ardından tepkili.

    Resmi UO, Oyuncuları İkiye Böldü: Web Client Yeterli mi?

    2024-10-14 17:45

  • Ultima Online, ClassicUO ile resmi işbirliği yapıyor! Performans iyileştirmeleri, geniş oyun penceresi ve daha fazlası geliyor.

    Ultima Online, ClassicUO ile Resmi İşbirliğine Gidiyor

    2024-09-26 14:21

  • Centred#

    2024-07-08 22:50

  • CentrED+ 7.9

    2024-07-08 22:34

  • Distance(uzaklık) Sorgusu Hakkında

    2024-06-19 22:05

  • UoFiddler

    2024-06-01 02:19

  • UoFiddler ile Map Kopyalama

    2024-05-31 21:17

Menü
  • ANASAYFA
  • FORUM
  • DOKÜMAN
  • İNDİR
  • İLETİŞİM
  • Bağlantılar
  • CS 1.6 indir
  • CS 1.6 Türkçe
  • CS 1.6 Bot
  • CS 1.6 CFG
  • CS 1.6 Rate Ayarları
  • UO Server
  • Ghost Mouse indir
  • FPS Nedir?
  • Ultima Online PVP Server
  • Makroman
  • UO Karakter Yapılandırma
    © 2004 - 2025 Ultima-Strike. Her hakkı saklıdır.