[פרסום] קיצור דרך לקונטר סטרייק - Cs Shortcut

[DanniM]

שם הקוד: קיצור דרך לקונטר סטרייק - Cs Shortcut
יוצר: Danni-M
גירסה: 1.0.1
תאור: אחרי שלא התעסקתי הרבה זמן במירק סקריפטינג, הכנתי סקריפט קטן לאימון ורענון.
הסקריפט הזה בעצם מקצר לכם את תהליך הכניסה לשרת הקונטר ע''י דיאלוג פשוט.
בדיאלוג יש לשונית לשמירת שרתים, נגיד המשתמש בסקריפט משחק בגאטרים ובאותם השרתים, אז הוא יכול לשמור את השרתים
בשביל לא להקליד מחדש כל פעם את האייפי.
ויש לשונית כמובן, שבוחרים אחד מהשרתים השמורים, במידה ורוצים סיסמא מסמנים את הכפתור שליד הPASSWORD, ומקלידים אותה.
הפעלה: להעתיק לרימוט ואז מקש ימיני>Cs Shortcut
אם מישהו נתקל בבעיה יכול להיכנס לערוץ האתר ולחפש אותי, או לערוץ שלי שמצוין בדיאלוג של הבוט.
אם למישהו יש הערות/הצעות לשיפור בבקשה פה.
הקוד:

קוד: בחר הכל

````````````````````````````````````````````````````````````````````````````
````````````````````````````````````````````````````````````````````````````
````````````````````````````````````````````````````````````````````````````
````````````````````````` Cs Shortcut By Danni-M ```````````````````````````
```````````````````````````````  #Danni-M` `````````````````````````````````
````````````````````````````````````````````````````````````````````````````
````````````````````````````````````````````````````````````````````````````
dialog fastCS {
  title "CS Shortcut"
  size -1 -1 110 137
  option dbu
  text "By Danni-M", 6, 1 129 37 8
  link "IGOnline.co.il", 7, 77 129 42 8
  tab "Connect", 2, -1 -1 113 139
  radio "", 8, 1 70 6 10, tab 2
  box "Password:", 4, 8 64 93 19, tab 2
  button "Connect", 5, 33 91 37 12, tab 2
  edit "", 3, 10 70 89 10, disable tab 2 pass
  list 1, 16 16 79 28, tab 2 size
  tab "Servers", 9
  combo 10, 5 25 100 65, tab 9 size
  button "Add", 11, 7 95 37 12, tab 9
  button "Delete", 12, 67 95 37 12, tab 9
  button "Clear", 13, 37 111 37 12, tab 9
}


on *:dialog:fastCS:*:*:{
  if ($devent == init) {
    var %x = 1
    while ($read(csservers.ini,%x)) { did -a $dname 1 $ini(csservers.ini,%x) | did -a $dname 10 $ini(csservers.ini,%x) | inc %x }
  }
  elseif ($devent == sclick) {
    if ($did == 7) { url http://igonline.co.il/ }
    elseif ($did == 8) { did -e $dname 3 | inc -u20 %cspass }
    elseif ($did == 5) {
      if (!$did(1).seltext) { noop $input(Please select a server from the list,w,ERROR) }
      elseif ($did(1).seltext) && (%cspass == 1) && (!$did(3)) { noop $input(Please enter a password,w,ERROR) }
      elseif ($did(1).seltext) && (%cspass == 1) && ($did(3)) {
        inc -u5 %csServ $did(1).seltext
        inc -u5 %csPass $did(3)
        run steam://connect/ $+ %csServ $+ / $+ %csPass
        dialog -x fastCS fastCS
      }
      elseif ($did(1).seltext) && (!%cspass) {
        inc -u5 %csServ $did(1).seltext
        run steam://connect/ $+ %csServ
        dialog -x fastCS fastCS
      }
    }
    elseif ($did == 11) {
      var %servip = $did(10)
      if (!%servip) { noop $input(Please enter a IPort) }) }
      elseif (%servip) && ($read(csservers.ini,w,* $+ %servip $+ *)) { noop $input(Server is allready on record,w,ERROR) }
      elseif (%servip) && (!$read(csservers.ini,w,* $+ %servip $+ *)) { noop $input(Server added successfully!,i,Attention) | did -a $dname 10 %servip | did -a $dname 1 %servip | writeini csservers.ini %servip IPort %servip }
    }
    elseif ($did == 12) {
      var %servip = $did(10)
      if (!%servip) { noop $input(Please select a IPort from the list) }
      elseif (%servip) && ($input(Are you sure you want to delete this IPort?,y,Delete Server)) {
        remini csservers.ini %servip
        var %csdelete = $did(10).sel
        did -d $dname 10 %csdelete
        did -d $dname 1 %csdelete
      }
    }
    elseif ($did == 13) {
      var %csclear = $input(Are you sure you want to clear all IPorts?,y,Clear Servers) {
        if (%csclear) {
          write -c csservers.ini
          did -r $dname 10 %csclear
          did -r $dname 1 %csclear
        }
      }
    }
  }
}
menu * {
  CS Shortcut { dialog -m fastCS fastCS }
}

ת''ב.

[ZxoR]

מעבר לזה שמדובר בבין הסקריפטים הכי פחות שימושיים שנוצרו אי פעם למירק, אני די בטוח שיש שיטות (ולא מעט) קצת יותר חכמות לביצוע הקוד הזה בצורה יעילה יותר, חכמה יותר, ומקצועית יותר.
קח לדוגמא: HOTLINK.

קוד: בחר הכל

on ^*:hotlink:*.*.*.*:*: if ($mouse.key == 1) if ($?!="Are you sure you want to join the server $1 via STEAM?") { run $+(steam://connect/,$1) | halt }
אגב הייתי משתמש ברגאקס הבא במקום:
\b(?:(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.){3}(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\b

יענו:
on ^*:hotlink:*:*: if ($mouse.key == 1) && ($regex($1,/\b(?:(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.){3}(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\b/)) if ($?!="Are you sure you want to join the server $1 via STEAM?") { run $+(steam://connect/,$1) | halt }



קח לדוגמא, דיאלוג שנפתח בלחיצה על אייפי.
קח לדוגמא, אפשרות לקבלת מידע על השרתים.

או בקיצור, לא שימושי נכון לעכשיו.

אגב לא צריך לכתוב תשם שלך ותקישור לקהילה שלך בכל מקום, לא יזיק אם הדיאלוג יהיה נקי מקרדיטים ומקישורים מטופשים.

[DanniM]

טוב, תודה רבה על התגובה הבונה יונתן.

[SinteL]

משהו שהוא קצת יותר יעיל: viewtopic.php?f=6&t=622
אבל בכל זאת עבודה טובה.

[ZxoR]

כמו ש SinteL אמר, יש לנו באתר קוד מועיל יותר ולכן אין צורך בכפילות יתר בקודים.
יועבר בהמשך השבוע למחסן.