API tools faq
paste
Z3r0Grav1t1

SKIDRELEASE 1.01 - CHECK THE LASTEST SCENE RELEASES

Z3r0Grav1t1
Sep 16th, 2022
92
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 56.14 KB | Gaming | 0 0
raw download clone embed print report
  1. ;;;;SKIDRELEASE 1.01;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  2. ;;;;IN SKIDROWRELOADED WE TRUST;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  3. ;;;;UNDER THE BLACK FLAG WE SHALL SAIL;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  4. ;;;;https://www.mediafire.com/file/v7yh7tqicsb4bky/SKIDRELEASE1.01.rar/file;;;;;;;;;;;;;;;;;
  5. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  6. ;CHECK OUT THE LATEST GAMES RELEASED ON SKIDROWRELOADED.COM;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  7. ;CHECK THE NEXT GAMES TO BE UPLOADED;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  8. ;FIND YOUR FAVORITE GAMES WITH THE SEARCH FUNCTION;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  9. ;BE THE FIRST TO GET YOUR HANDS ON THE GAME;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  10. ;RECEIVE AN ALERT ON YOUR PC OR ON YOUR PHONE AS SOON AS YOUR HOLY GRAIL IS AVALAIBLE;;;;;;;
  11. ;RECEIVE AN ALERT NO MATTER WHERE YOU ARE EVEN IF YOU ARE DISCONNECTED FROM THE INTERNET;;;;
  12. ;VISUAL-AUDIO-MAIL-CALL ALERT, CHOOSE THE WAY YOU WANT TO BE NOTIFIED;;;;;;;;;;;;;;;;;;;;;;;
  13. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  14. ;SENSITIVE INFORMATIONS;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  15. ;AS YOU WILL NEED A USERNAME AND A PASSWORD FOR REACHING THE MAIL SERVER (OUTLOOK\GMAIL);;;;
  16. ;SKIDRELEASE WILL NEED TO STORE YOUR INFORMATION LOCALLY;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  17. ;SKIDRELEASE HAVE HIS OWN PROPER QR CODE WHO RENDER A DOCUMENT COMPLETELY INVISIBLE;;;;;;;;;
  18. ;THEN YOUR INFORMATION WILL NEVER BE READ OR STOLEN AND WILL ALWAYS BE SAFE;;;;;;;;;;;;;;;;;
  19. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  20. ;THE QR SYSTEM CAN BE REUSED FOR SAVING YOUR DAILY PASSWORD;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  21. ;OR TO SEND A MESSAGE TO SOMEONE WITH THE UTMOST DISCRETION;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  22. ;GRAB THE KEY IN THE CAP FOLDER;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  23. ;//SAFESTORAGE KEYNAME TEXT2RENDER
  24. ;//SAFESTORAGE.SHAKE.KEY.REVERSE PATH2THEKEYFILE
  25. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  26. ;INSTALLATION;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  27. ;PUT THE SKIDRELEASE FOLDER IN THE $MIRCDIR FOLDER (:\USERS\YOURNAME\APPDATA\ROAMING\MIRC\);
  28. ;LOAD THE APP WITH //LOAD -RS SKIDRELEASE\SKIDRELEASE
  29. ;SKIDRELEASE WILL CREATE A SHORTCUT ON YOUR DESKTOP, IF IT DOESN'T RIGHT CLICK;;;;;;;;;;;;;;
  30. ;ON THE STATUS WINDOW OR LAUNCH THE PROGRAM MANUALY WITH //SKIDRELEASE
  31. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  32. ;ADMINISTRATOR ACCOUNT;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  33. ;TO AVOID UNEXPECTED ERRORS PLEASE MAKE SURE YOU RUN THIS PROGRAM WITH;;;;;;;;;;;;;;;;;;;;;;
  34. ;FULL ADMINISTRATOR RIGHTS;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  35. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  36. ;ADD MORE PHONE SERVICE PROVIDER;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  37. ;ONLY KNOWN ESSENTIAL TELEPHONE PROVIDERS HAVE BEEN ADDED TO THE LIST;;;;;;;;;;;;;;;;;;;;;;;
  38. ;TO ADD A TELEPHONE PROVIDER ADD ITS NAME WITH THE PREFIX ; IN THE GATEWAY.INI FILE;;;;;;;;;
  39. ;THEN MODIFY THE GATEWAY FILE WITHOUT EXTENSION WITH THE FORMAT NAME=ADDRESS;;;;;;;;;;;;;;;;
  40. ;ADDRESS IN THE GATEWAY FILE CAN BE OUT TO DATE OR NO MORE VALID;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  41. ;DONT FORGET THE INTERNATIONAL CODE IN YOUR PHONE NUMBER;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  42. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  43. ;SYSTRAY;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  44. ;YOU SHOULD HIDING THE MAIN PROGRAM IN SYSTRAY;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  45. ;ALT + O > DIPLAY-OPTIONS > TRAY... > AND CHECK PLACE AND ON STARTUP CASE;;;;;;;;;;;;;;;;;;;
  46. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  47. ;SHAREWARE;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  48. ;THE MAIN PROGRAM WHO RENDER THE LOGIC OF THE SCRIPT ARE NOT A FREE SOFTWARE ANYMORE;;;;;;;;
  49. ;THIS IS WHY YOU CAN FIND A LINK JUST HERE FOR THE CRACKED VERSION;;;;;;;;;;;;;;;;;;;;;;;;;;
  50. ;WE ARE ALL PIRATE AFTER ALL;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  51. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  52. ;https://www.mediafire.com/file/wjwlx6cnogg6u1n/mIRC_7.zip/file;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  53. ;INSTALL - REPLACE THE EXECUTABLE - USE THE SERIAL IN ZIP;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  54. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  55. ;DOWNLOAD LINKS;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  56. ;THIS PROGRAM LEAD TO SKIDROWRELOADED.COM PAGES AND WILL ALWAIS LEAD TO SKIDROWRELOADED.COM;
  57. ;THIS PROGRAM WILL NEVER CONTAIN ANY DIRECT LINK TO DOWNLOAD THE GAME YOU LOOK UP;;;;;;;;;;;
  58. ;NEVER ASK ME TO DO AN UPDATE ABOUT THAT;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  59. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  60. ;SHORTCUT;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  61. ;PRESS SPACE BAR TO SWITCH ON WINDOW MODE;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  62. ;PRESS RIGHT CLICK TO LEAVE THE PROGRAM;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  63. ;PRESS ENTER TO START A SEARCH (SEARCH TAB);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  64. ;PRESS SHIFT TO ADD A NEW KEYWORD (SEARCH TAB);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  65. ;PRESS CTRL TO ACCESS SETTINGS (SEARCH TAB);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  66. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  67. alias skidrelease {
  68.  skid.memory
  69.  skid.ui $iif($cb(1) == fullframe,1)
  70.  skid.intro
  71.  skid.quit
  72. }
  73.  
  74. on *:close:@skidrelease:{
  75.  .timer.* off
  76.  hfree skid
  77. }
  78.  
  79. alias skid.quit .timer.skid.quit.timer -m 0 100 skid.quit.timer
  80.  
  81. alias skid.quit.timer {
  82.  if !$window(@skidrelease) {
  83.  .timer.* off
  84.  hfree skid
  85.  }
  86. }
  87.  
  88. alias skid.memory {
  89.  if $hget(skid) { hfree skid }
  90.  hmake skid 8192
  91.  hadd skid ui $iif($cb(1) == fullframe,$ifmatch,noborder)
  92. }
  93.  
  94. alias skid.ui {
  95.  window $+(-dp,$iif($1,k0)) $iif(!$1,+d) @skidrelease 736 267 $iif($1,417,400) $iif($1,647,600)
  96.  drawrect -f @skidrelease 0 1 0 0 400 600
  97. }
  98.  
  99. on *:keyup:@skidrelease:32:{
  100.  if $skid(tab) != search.alert && !$skid(menu.lock) {
  101.   if $skid(ui) == noborder {
  102.   hadd skid ui fullframe
  103.   .timer.* off
  104.   hfree skid
  105.   clipboard fullframe
  106.   window -c @skidrelease
  107.   skidrelease
  108.   halt
  109.   }
  110.    if $skid(ui) == fullframe {
  111.    hadd skid ui nonorder
  112.    .timer.* off
  113.    hfree skid
  114.    clipboard $chr(0)
  115.    window -c @skidrelease
  116.    skidrelease
  117.   }
  118.  }
  119. }
  120.  
  121. alias skid.pic return $+(skidrelease\resources\img\,$1,\,$2,.png)
  122.  
  123. alias skid.cap return $mircdirskidrelease\resources\cap\
  124.  
  125. alias skid.intro {
  126.  hadd skid intro.pic 1
  127.  hadd skid intro.speed 1
  128.  
  129.  while $skid(intro.pic) <= 8 {
  130.  $+(.timer.intro.,$skid(intro.pic)) -m 1 $calc($skid(intro.speed) * 120) drawpic @skidrelease 44 80 $skid.pic(intro,$skid(intro.pic))
  131.  hinc skid intro.pic
  132.  hinc skid intro.speed
  133.  }
  134.   hdels intro.pic intro.speed
  135.   skid.read.last.upload
  136.   skid.url
  137.   skid.read.upcoming
  138.   .timer.intro.text -h 1 840 drawtext -r @skidrelease $rgb(15,15,15) sylfaen 36 44 350 Welcome back pirate
  139. }
  140.  
  141. alias skid.main {
  142.  drawrect -f @skidrelease 0 1 0 0 400 600
  143.  drawrect -rf @skidrelease 0 1 0 40 400 1
  144.  drawrect -rf @skidrelease 0 1 133 0 1 40
  145.  drawrect -rf @skidrelease 0 1 266 0 1 40
  146.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 40 3 New
  147.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 141 3 Upcoming
  148.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 20 273 9 Search\Alert
  149.  skid.separator
  150.  skid.tab
  151.  skid.new
  152.  skid.mouseover
  153.  if $lines($skid.keyword.file) { .timer.alert 0 60 skid.alert }
  154. }
  155.  
  156. alias skid.mouseover {
  157.  .timer.skidmouseover -h 0 100 skid.new.mouseover
  158.  .timer.skidmouseover.upcoming -h 0 100 skid.upcoming.mouseover
  159.  .timer.new.menu -h 0 100 skid.new.menu.mouseover
  160.  .timer.searchalert.menu -h 0 100 skid.alert.menu.mouseover
  161.  }
  162.  
  163. alias skid.upcoming.mouseover {
  164.  if $upcoming.position && !$skid(upcoming.mouseover) {
  165.  hadd skid upcoming.mouseover 1
  166.  drawrect -rf @skidrelease $rgb(255,255,255) 1 0 0 133 40
  167.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 40 3 New
  168.  drawrect -rf @skidrelease $rgb(0,162,232) 1 134 0 132 40
  169.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 141 3 Upcoming
  170.  drawrect -rf @skidrelease $rgb(255,255,255) 1 267 0 133 40
  171.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 20 273 9 Search\Alert
  172.  }
  173.   if !$upcoming.position && $skid(upcoming.mouseover) {
  174.   hdel skid upcoming.mouseover
  175.   skid.highlight.menu
  176.  }
  177. }
  178.  
  179. alias skid.highlight.menu {
  180.  if $skid(tab) == new {
  181.  drawrect -rf @skidrelease $rgb(255,255,255) 1 134 0 132 40
  182.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 141 3 Upcoming
  183.  drawrect -rf @skidrelease $rgb(0,162,232) 1 0 0 133 40
  184.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 40 3 New
  185.  drawrect -rf @skidrelease $rgb(255,255,255) 1 267 0 133 40
  186.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 20 273 9 Search\Alert
  187.  }
  188.   if upcoming isin $skid(tab) {
  189.   drawrect -rf @skidrelease $rgb(0,162,232) 1 134 0 132 40
  190.   drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 141 3 Upcoming
  191.   drawrect -rf @skidrelease $rgb(255,255,255) 1 0 0 133 40
  192.   drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 40 3 New
  193.   drawrect -rf @skidrelease $rgb(255,255,255) 1 267 0 133 40
  194.   drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 20 273 9 Search\Alert
  195.   }
  196.    if $skid(tab) == search.alert {
  197.    drawrect -rf @skidrelease $rgb(255,255,255) 1 134 0 132 40
  198.    drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 141 3 Upcoming
  199.    drawrect -rf @skidrelease $rgb(255,255,255) 1 0 0 133 40
  200.    drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 40 3 New
  201.    drawrect -rf @skidrelease $rgb(0,162,232) 1 267 0 133 40
  202.    drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 20 273 9 Search\Alert
  203.    }
  204. }
  205.  
  206. alias skid.alert.menu.mouseover {
  207.  if $alert.position && !$skid(skid.alert.menu.mouseover) {
  208.  hadd skid skid.alert.menu.mouseover 1
  209.  drawrect -rf @skidrelease $rgb(255,255,255) 1 134 0 132 40
  210.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 141 3 Upcoming
  211.  drawrect -rf @skidrelease $rgb(255,255,255) 1 0 0 133 40
  212.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 40 3 New
  213.  drawrect -rf @skidrelease $rgb(0,162,232) 1 267 0 133 40
  214.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 20 273 9 Search\Alert
  215.  }
  216.   if !$alert.position && $skid(skid.alert.menu.mouseover) {
  217.   hdel skid skid.alert.menu.mouseover
  218.   skid.highlight.menu
  219.  }
  220. }
  221.  
  222. alias skid.new.menu.mouseover {
  223.  if $new.position && !$skid(new.menu.mouseover) {
  224.  hadd skid new.menu.mouseover 1
  225.  drawrect -rf @skidrelease $rgb(255,255,255) 1 134 0 132 40
  226.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 141 3 Upcoming
  227.  drawrect -rf @skidrelease $rgb(0,162,232) 1 0 0 133 40
  228.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 40 3 New
  229.  drawrect -rf @skidrelease $rgb(255,255,255) 1 267 0 133 40
  230.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 20 273 9 Search\Alert
  231.  }
  232.   if !$new.position && $skid(new.menu.mouseover) {
  233.   hdel skid new.menu.mouseover
  234.   skid.highlight.menu
  235.  }
  236. }
  237.  
  238. alias skid.name.url return $iif($replace($remove($mid($skid($+(game.url,$skid(new.mouseover))),$pos($skid($+(game.url,$skid(new.mouseover))),/,3)),$chr(47)),$chr(45),$chr(32)),$ifmatch,$chr(160))
  239.  
  240. alias skid.new.mouseover {
  241.  hadd skid new.mouseover 1
  242.  
  243.   while $skid(new.mouseover) <= $iif($skid.search.total && $skid.search.total != 9,$skid.search.total,9) {
  244.   if $new.mouseover.page == 3 && $calc($skid(new.mouseover) + ($new.mouseover.page * 8)) > 28 { halt }
  245.  
  246.   if $eval($+($,game.position.,$skid(new.mouseover)),2) && !$skid($+(position.,$skid(new.mouseover))) {
  247.   hadd skid $+(position.,$skid(new.mouseover)) 1
  248.  
  249.   hadd skid game.mouseover $remove($iif(upcoming isin $skid(tab) && $skid(new.mouseover) == 9,$+($str($chr(160),18),Page,$chr(32),$iifs($skid(tab),==,upcoming,2,$skid(tab),==,upcoming.2,3,$skid(tab),==,upcoming.3,4)),$iif($iif($len($skid($+(game, $iif(search isin $skid(tab),.localsearch,$iif(upcoming isin $skid(tab),.upcoming)),$calc($skid(new.mouseover) + ($new.mouseover.page * 8))))) > 29,$+($left($skid($+(game,$iif(search isin $skid(tab),.localsearch,$iif(upcoming isin $skid(tab),.upcoming)),$calc($skid(new.mouseover) + ($new.mouseover.page * 8)))),29),$chr(32),..),$left($skid($+(game,$iif(search isin $skid(tab),.localsearch,$iif(upcoming isin $skid(tab),.upcoming)),$calc($skid(new.mouseover) + ($new.mouseover.page * 8)))),29)),$ifmatch,$iif((upcoming isin $skid(tab) && $new.mouseover.page == 3) || !$len($eval($+($,game.localsearch,$skid(new.mouseover)),2)),$chr(160),$skid.name.url))),$chr(58))
  250.  
  251.   drawrect -rf @skidrelease $rgb(153,217,234) 1 0 $calc($skid.new.y($skid(new.mouseover)) + (($skid(new.mouseover) - 1) * $iif($skid(new.mouseover) == 2,64,63))) 400 $iif($skid(new.mouseover) == 1,63,61)
  252.  
  253.   drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 22 30 $calc(58 + (($skid(new.mouseover) - 1) * 62)) $skid(game.mouseover)
  254.   hadd skid new.mouseover.current $skid(new.mouseover)
  255.  
  256.   if $len($skid(game.mouseover)) > 29 && !$timer(.game.slide) {
  257.    hadd skid game.slide 2  
  258.   .timer.game.slide -m 0 240 skid.game.slide
  259.   }  
  260.  
  261.   }
  262.   if !$eval($+($,game.position.,$skid(new.mouseover)),2) && $skid($+(position.,$skid(new.mouseover))) {
  263.   .timer.game.slide off
  264.   hdel skid $+(position.,$skid(new.mouseover))
  265.   drawrect -rf @skidrelease $rgb(255,255,255) 1 0 $calc($skid.new.y($skid(new.mouseover)) + (($skid(new.mouseover) - 1) * $iif($skid(new.mouseover) == 2,64,63))) 400 $iif($skid(new.mouseover) == 1,63,61)
  266.   drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 22 30 $calc(58 + (($skid(new.mouseover) - 1) * 62)) $remove($iif(upcoming isin $skid(tab) && $skid(new.mouseover) == 9,$+($str($chr(160),18),Page,$chr(32),$iifs($skid(tab),==,upcoming,2,$skid(tab),==,upcoming.2,3,$skid(tab),==,upcoming.3,4)),$iif($iif($len($skid($+(game,$iif(search isin $skid(tab),.localsearch,$iif(upcoming isin $skid(tab),.upcoming)),$calc($skid(new.mouseover) + ($new.mouseover.page * 8))))) > 29,$+($left($skid($+(game,$iif(search isin $skid(tab),.localsearch,$iif(upcoming isin $skid(tab),.upcoming)),$calc($skid(new.mouseover) + ($new.mouseover.page * 8)))),29),$chr(32),..),$left($skid($+(game,$iif(search isin $skid(tab),.localsearch,$iif(upcoming isin $skid(tab),.upcoming)),$calc($skid(new.mouseover) + ($new.mouseover.page * 8)))),29)),$ifmatch,$iif((upcoming isin $skid(tab) && $new.mouseover.page == 3) || !$len($eval($+($,game.localsearch,$skid(new.mouseover)),2)),$chr(160),$skid.name.url))),$chr(58))
  267.   }
  268.    hinc skid new.mouseover $iif(upcoming isin $skid(tab),2)
  269.  }
  270. }
  271.  
  272. alias skid.game.slide {
  273.   if $skid(game.slide) >= $calc($len($skid($+(game,$iif(upcoming isin $skid(tab),.upcoming),$iif(search isin $skid(tab),.localsearch),$calc($skid(new.mouseover.current) + ($new.mouseover.page * 8))))) + 2) { hadd skid game.slide 1 | halt }
  274.  
  275.   drawrect -rf @skidrelease $rgb(153,217,234) 1 0 $calc($skid.new.y($skid(new.mouseover.current)) + (($skid(new.mouseover.current) - 1) * $iif($skid(new.mouseover.current) == 2,64,63))) 400 $iif($skid(new.mouseover.current) == 1,63,61)
  276.  
  277.   drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 22 30 $calc(58 + (($skid(new.mouseover.current) - 1) * 62)) $iif($mid($skid($+(game,$iif(upcoming isin $skid(tab),.upcoming),$iif(search isin $skid(tab),.localsearch),$calc($skid(new.mouseover.current) + ($new.mouseover.page * 8)))),$skid(game.slide),29),$ifmatch,$chr(160))
  278.  
  279.   hinc skid game.slide
  280. }
  281.  
  282. alias new.mouseover.page return $replace($calc($gettok($skid(tab),2,46) -1),-1,0)
  283.  
  284. alias skid.new.y {
  285.  hadd skid new.y 1
  286.  hadd skid new.y.value 41-41-41-40-39-38-37-36-35
  287.  
  288.   while $skid(new.y) <= 9 {
  289.   if $1 == $skid(new.y) { return $gettok($skid(new.y.value),$skid(new.y),45) }
  290.   hinc skid new.y
  291.   }
  292.    hdels new.y.value new.y
  293. }
  294.  
  295. alias skid.new {
  296.  hadd skid new $iif(!$3 && $2,1,$iif($2,$2,1))
  297.  hadd skid new.y 58
  298.  
  299.   while $skid(new) <= $iif($skid(game.localsearch1),$skid.search.total,$iif(!$3 && $2,$2,$iif($3,$3,9))) {
  300.   drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 22 30 $skid(new.y) $remove($iif($skid(tab) == upcoming && $skid(new) == 9,$+($str($chr(160),18),Page,$chr(32),$iifs($skid(tab),==,upcoming,2,$skid(tab),==,upcoming.2,3,$skid(tab),==,upcoming.3,4)),$iif($iif($len($skid($+(game,$iif($1,$1),$skid(new)))) > 29,$+($left($skid($+(game,$iif($1,$1),$skid(new))),29),$chr(32),..),$left($skid($+(game,$iif($1,$1),$skid(new))),29)),$ifmatch,$iif(upcoming isin $skid(tab) && $new.mouseover.page == 3,$chr(160),$skid.name.url))),$chr(58))
  301.   hinc skid new
  302.   hinc skid search.result
  303.   hinc skid new.y 62
  304.   }
  305.    hdels skid new new.y
  306. }
  307.  
  308. alias skid.search.total {
  309.   hdel skid search.total.result  
  310.   hadd skid search.total 1
  311.  
  312.    while $skid(search.total) <= 9 {  
  313.    if $skid($+(game.localsearch,$skid(search.total))) {
  314.    hinc skid search.total.result
  315.    }
  316.      hinc skid search.total
  317.    }
  318.     return $iif($skid(search.total.result),$ifmatch,0)
  319. }
  320.  
  321. alias user.desktop return $+($envvar(homedrive),$envvar(homepath),\desktop)
  322.  
  323. alias popups.settings return scripts\popups.ini
  324.  
  325. alias popups.settings.next return $+(n,$calc($ini($popups.settings,mpopup,0) + 1))
  326.  
  327. alias skid.popups {
  328.  writeini $popups.settings mpopup $popups.settings.next .SKIDRELEASE:/skidrelease
  329.  .load -ps $popups.settings
  330. }
  331.  
  332. alias iifs {
  333.  if $chr(46) isin $calc($0 / 4) { halt }
  334.  if $1 $2 $3 { return $4 }
  335.  if !$5 { halt }
  336.  if $5 $6 $7 { return $8 }
  337.  if !$9 { halt }
  338.  if $9 $10 $11 { return $12 }
  339.  if !$13 { halt }
  340.  if $13 $14 $15 { return $16 }
  341.  if !$17 { halt }
  342.  if $17 $18 $19 { return $20 }
  343. }
  344.  
  345. alias skid.separator {
  346.  hadd skid separator 1
  347.  hadd skid separator.y 104
  348.  
  349.   while $skid(separator) <= 8 {
  350.   drawrect -rf @skidrelease $rgb(0,162,232) 1 132 $skid(separator.y) 137 1
  351.   hinc skid separator
  352.   hinc skid separator.y 62
  353.   }
  354. }
  355.  
  356. alias skid.tab {
  357.  if !$skid(tab) {
  358.  hadd skid tab new
  359.  drawrect -rf @skidrelease $rgb(0,162,232) 1 0 0 133 40
  360.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 40 3 New
  361.  }
  362. }
  363.  
  364. alias skid return $hget(skid,$1)
  365.  
  366. alias hdels {
  367.  hadd skid hdels 1
  368.  
  369.   while $skid(hdels) <= $0 {
  370.   hdel skid $eval($+($,$skid(hdels)),2)
  371.   hinc skid hdels
  372.   }
  373.    hdel skid hdels
  374. }
  375.  
  376. menu @skidrelease {
  377. sclick:{
  378.  if $skid(tab) == settings {
  379.   sclick.ctrl.sound
  380.   sclick.ctrl.popup
  381.   sclick.ctrl.run
  382.   sclick.ctrl.mail
  383.   sclick.ctrl.sms
  384.   sclick.ctrl.keyword
  385.   sclick.ctrl.mailtest
  386.   sclick.ctrl.mobiletest
  387.  }
  388.  if !$skid(menu.lock) {
  389.   sclick.game
  390.   sclick.upcoming
  391.   sclick.new
  392.   sclick.alert
  393.  }
  394. }
  395. rclick:{
  396.  .timer.* off
  397.  hfree skid
  398.  window -c @skidrelease
  399.  }
  400. }
  401.  
  402. alias sclick.ctrl.mobiletest if $mobiletest.position && $settings.read(ctrl.sms) { skid.reaction.mail mobiletest }
  403.  
  404. alias sclick.ctrl.mailtest if $mailtest.position && $settings.read(ctrl.mail) { skid.reaction.mail mailtest }
  405.  
  406. alias sclick.ctrl.keyword if $ctrl.keyword.position { run $skid.keyword.file }
  407.  
  408. alias sclick.ctrl.sms {
  409.  if $skid(tab) == settings && $ctrl.sms.position && !$skid(ctrl.sms) {
  410.  
  411.   if !$smtp.confirm {
  412.   hadd skid gateway.wait 1  
  413.   run $skid.settings.smtp.file
  414.   .timer.settings.gateway -m 0 100 skid.gateway
  415.   .timer.settings.smtp -m 0 100 skid.settings.smtp
  416.   halt
  417.   }
  418.   else { run $skid.settings.gateway }  
  419.   settings ctrl.sms 1
  420.   .timer.settings.gateway -m 0 100 skid.gateway
  421.   halt
  422.  }
  423.   if $skid(tab) == settings && $ctrl.sms.position && $skid(ctrl.sms) {
  424.   hdel skid ctrl.sms
  425.   settings ctrl.sms remove
  426.   drawrect -rfd @skidrelease $rgb(255,255,255) 1 30 188 16 16 8 8  
  427.   drawrect -rd @skidrelease $rgb(15,15,15) 1 30 188 16 16 8 8
  428.  }
  429. }
  430.  
  431. alias skid.gateway {
  432.  if $gateway.confirm {
  433.  .timer.settings.gateway off
  434.  hadd skid ctrl.sms 1
  435.  delete.cap gateway
  436.  safestorage gateway $settings.gateway.read(phone)
  437.  .remini $skid.settings.gateway gateway phone
  438.  write -il10 $skid.settings.gateway phone=
  439.  settings ctrl.sms 1
  440.  settings cap.phone $skid(shake)
  441.  drawrect -rfd @skidrelease $rgb(15,15,15) 1 30 188 16 16 8 8
  442.  drawrect -rf @skidrelease $rgb(255,255,255) 1 286 542 92 40
  443.  drawrect -r @skidrelease $iif($settings.read(ctrl.sms),$rgb(15,15,15),$rgb(222,222,222)) 1 294 550 80 28
  444.  drawtext -ro @skidrelease $iif($settings.read(ctrl.sms),$rgb(15,15,15),$rgb(222,222,222)) sylfaen 14 298 554 mobile test
  445.  process.kill notepad.exe
  446.  process.kill wordpad.exe
  447.  beep 2
  448.  }
  449. }
  450.  
  451. alias gateway.confirm return $iif($onlynum($settings.gateway.read(phone)) isnum && $len($settings.gateway.read(phone)) >= 8 && $read($skid.settings.gateway, w,$+(;,$settings.gateway.read(provider))),1,0)
  452.  
  453. alias onlynum {
  454.  hdel skid onlynum.result
  455.  hadd skid onlynum 1
  456.  
  457.   while $skid(onlynum) <= $len($1) {
  458.   if $mid($1,$skid(onlynum),1) isnum { hadd skid onlynum.result $+($skid(onlynum.result),$mid($1,$skid(onlynum),1)) }
  459.   hinc skid onlynum
  460.   }
  461.    return $iif($skid(onlynum.result),$ifmatch,0)
  462. }
  463.  
  464. alias skid.settings.gateway return skidrelease\resources\gateway.ini
  465. alias skid.address.gateway return skidrelease\resources\gateway
  466.  
  467. alias process.kill {
  468.  var %process $+(cmd,$ticks)
  469.  .comopen %process Wscript.Shell
  470. if !$comerr { .comclose %process $com(%process,run,1,bstr,cmd.exe /c taskkill /f /im $1- /t,uint,7,bool,true) }
  471.  }
  472.  
  473. alias smtpformat return $iif($len($gettok($1,1,46)) >= 3 && $len($gettok($1,2,46)) >= 3 && $len($gettok($1,3,46)) >= 2 && $count($1,$chr(46)) == 2,1,0)
  474.  
  475. alias mailformat return $iif($regex($1,(?:[a-z0-9!#$%&'*+/=?^_`{|}~-]+(?:\.[a-z0-9!#$%&'*+/=?^_`{|}~-]+)*|"(?:[\x01-\x08\x0b\x0c\x0e-\x1f\x21\x23-\x5b\x5d-\x7f]|\\[\x01-\x09\x0b\x0c\x0e-\x7f])*")@(?:(?:[a-z0-9](?:[a-z0-9-]*[a-z0-9])?\.)+[a-z0-9](?:[a-z0-9-]*[a-z0-9])?|\[(?:(?:(2(5[0-5]|[0-4][0-9])|1[0-9][0-9]|[1-9]?[0-9]))\.){3}(?:(2(5[0-5]|[0-4][0-9])|1[0-9][0-9]|[1-9]?[0-9])|[a-z0-9-]*[a-z0-9]:(?:[\x01-\x08\x0b\x0c\x0e-\x1f\x21-\x5a\x53-\x7f]|\\[\x01-\x09\x0b\x0c\x0e-\x7f])+)\])),1,0)
  476.  
  477. alias skid.settings.smtp {
  478. if $smtp.confirm {
  479. .timer.settings.smtp off
  480. smtp.hello
  481.  }
  482. }
  483.  
  484. alias smtp.confirm return $iif($mailformat($settings.smtp.read(user)) && $mailformat($settings.smtp.read(sendalertto)) && $smtpformat($settings.smtp.read(server)) && ($len($settings.smtp.read(password)) >= 6 || $skid(gateway.wait)) && $smtpformat($settings.smtp.read(port)) isnum,1,0)
  485.  
  486. alias smtp.hello {
  487.  if $sock(smtp.hello) { sockclose smtp.hello }
  488.  sockopen smtp.hello $settings.smtp.read(server) $settings.smtp.read(port)
  489. }
  490.  
  491. on *:sockopen:smtp.hello:{
  492.  if $sockerr { halt }
  493.  else {  
  494.  if $skid(gateway.wait) { goto smtp_hello }
  495.  delete.cap smtp
  496.  hadd skid ctrl.mail 1
  497.  safestorage smtp $settings.smtp.read(password)
  498.  .remini $skid.settings.smtp.file mail password
  499.  write -il21 $skid.settings.smtp.file password=
  500.  settings cap $skid(shake)
  501.  settings ctrl.mail 1
  502.  drawrect -rfd @skidrelease $rgb(15,15,15) 1 30 156 16 16 8 8
  503.  drawrect -rf @skidrelease $rgb(255,255,255) 1 288 508 92 40
  504.  drawrect -r @skidrelease $iif($settings.read(ctrl.mail),$rgb(15,15,15),$rgb(222,222,222)) 1 294 510 80 28
  505.  drawtext -ro @skidrelease $iif($settings.read(ctrl.mail),$rgb(15,15,15),$rgb(222,222,222)) sylfaen 14 306 514 mail test
  506.  sockclose smtp.hello
  507. : smtp_hello
  508.  process.kill notepad.exe
  509.  process.kill wordpad.exe
  510.  
  511.   if $skid(gateway.wait) {  
  512.   hdel skid gateway.wait  
  513.   run $skid.settings.gateway
  514.   }
  515.    else { beep 2 }
  516.  }
  517. }
  518.  
  519. alias delete.cap {  
  520.  hadd skid delete.cap $findfile($skid.cap,$+($iif($1,$1,*),.*),0)
  521.   if $skid(delete.cap) {  
  522.   hadd skid delete.cap.file $skid(delete.cap)
  523.    
  524.    while $skid(delete.cap.file) >= 1 {
  525.    .remove $findfile($skid.cap,$+($iif($1,$1,*),.*),$skid(delete.cap.file))
  526.    hdec skid delete.cap.file
  527.    }
  528.   }
  529.     if $1 == smtp { settings cap remove }
  530.     if $1 == smtp { settings cap.phone remove }
  531.     hdel -w skid delete*
  532. }
  533.  
  534. alias sclick.ctrl.mail {
  535.  if $skid(tab) == settings && $ctrl.mail.position && !$skid(ctrl.mail) {
  536.  run $skid.settings.smtp.file
  537.  .timer.settings.smtp -m 0 100 skid.settings.smtp
  538.   halt
  539.  }
  540.   if $skid(tab) == settings && $ctrl.mail.position && $skid(ctrl.mail) {
  541.   hdel skid ctrl.mail
  542.   settings ctrl.mail remove
  543.   drawrect -rfd @skidrelease $rgb(255,255,255) 1 30 156 16 16 8 8  
  544.   drawrect -rd @skidrelease $rgb(15,15,15) 1 30 156 16 16 8 8
  545.  }
  546. }
  547.  
  548. alias skid.mail {
  549.  var %mail $+(cmd,$ticks)
  550.  .comopen %mail Wscript.Shell
  551. if !$comerr { .comclose %mail $com(%mail,run,1,bstr,cmd.exe /c $mircdirskidrelease\resources\bin\mail.mail $1-,uint,7,bool,true) }
  552.  }
  553.  
  554. alias sclick.ctrl.sound {
  555.  if $skid(tab) == settings && $ctrl.sound.position && !$skid(ctrl.sound) {
  556.  hdel skid alert.sound
  557.  hadd skid alert.sound $sfile($envvar(homedrive),MP3-WAV-OGG,Select a sound for the alert)
  558.  if !$exists($skid(alert.sound)) || $right($skid(alert.sound),3) !isin mp3-wav-ogg { halt }
  559.  drawrect -rfd @skidrelease $rgb(15,15,15) 1 30 124 16 16 8 8
  560.  hadd skid ctrl.sound 1
  561.  settings ctrl.sound $skid(alert.sound)
  562.  halt
  563.  }
  564.   if $skid(tab) == settings && $ctrl.sound.position && $skid(ctrl.sound) {
  565.   drawrect -rfd @skidrelease $rgb(255,255,255) 1 30 124 16 16 8 8  
  566.   drawrect -rd @skidrelease $rgb(15,15,15) 1 30 124 16 16 8 8
  567.   hdel skid ctrl.sound
  568.   settings ctrl.sound remove
  569.   halt
  570.  }
  571. }
  572.  
  573. alias sclick.ctrl.popup {
  574.  if $skid(tab) == settings && $ctrl.popup.position && !$skid(ctrl.popup) {
  575.  drawrect -rfd @skidrelease $rgb(15,15,15) 1 30 92 16 16 8 8
  576.  hadd skid ctrl.popup 1
  577.  settings ctrl.popup 1
  578.  halt
  579.  }
  580.   if $skid(tab) == settings && $ctrl.popup.position && $skid(ctrl.popup) {
  581.   drawrect -rfd @skidrelease $rgb(255,255,255) 1 30 92 16 16 8 8  
  582.   drawrect -rd @skidrelease $rgb(15,15,15) 1 30 92 16 16 8 8
  583.   hdel skid ctrl.popup
  584.   settings ctrl.popup remove
  585.   halt
  586.  }
  587. }
  588.  
  589. alias sclick.ctrl.run {
  590.  if $skid(tab) == settings && $ctrl.run.position && !$skid(ctrl.run) {
  591.  drawrect -rfd @skidrelease $rgb(15,15,15) 1 30 60 16 16 8 8
  592.  hadd skid ctrl.run 1
  593.  settings ctrl.run 1
  594.  halt
  595.  }
  596.   if $skid(tab) == settings && $ctrl.run.position && $skid(ctrl.run) {
  597.   drawrect -rfd @skidrelease $rgb(255,255,255) 1 30 60 16 16 8 8  
  598.   drawrect -rd @skidrelease $rgb(15,15,15) 1 30 60 16 16 8 8
  599.   hdel skid ctrl.run
  600.   settings ctrl.run remove
  601.   halt
  602.  }
  603. }
  604.  
  605. alias skid.settings.file return skidrelease\resources\settings
  606.  
  607. alias skid.settings.smtp.file return skidrelease\resources\smtp.ini
  608.  
  609. alias settings $iif($2 == remove,remini,writeini) $skid.settings.file settings $1-
  610.  
  611. alias keydown.search.common {
  612.  if ($1 == 32 || $chr($1) isalnum) && $skid(tab) == search.alert && $len($skid(search)) <= 200 && !$skid(menu.lock) {
  613.  search.char.abuse
  614.  hadd skid blink.stop 1
  615.  hadd skid search $lower($replace($+($skid(search),$chr($1)),$chr(32),$chr(43)))
  616.  hadd skid lastpixel.search $last.pixel.search
  617.  drawrect -rf @skidrelease $rgb(255,255,255) 1 22 58 400 40
  618.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 28 29 57 $iif($skid(lastpixel.search) <= 360 && !$skid(search.border),$skid(search),$right($skid(search),20))
  619.  if $skid(lastpixel.search) >= 360 { hadd skid search.border 1 }
  620.  halt
  621.  }
  622. }
  623.  
  624. alias keydown.search.backspace {
  625.   if $1 == 8 && $skid(tab) == search.alert && $len($skid(search)) {
  626.     hadd skid lastpixel.search $last.pixel.search
  627.     hadd skid search $left($skid(search),$calc($len($skid(search)) -1))
  628.     drawrect -rf @skidrelease $rgb(255,255,255) 1 22 58 400 40
  629.       if $len($skid(search)) {
  630.       drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 28 29 57 $iif($skid(lastpixel.search) <= 360 && !$skid(search.border),$skid(search),$right($skid(search),20))
  631.       }
  632.         if !$timer(.search.blink) && !$skid(game.localsearch1) { .timer.search.blink -m 0 100 skid.timer.blink }
  633.         halt
  634.     }
  635. }
  636.  
  637. alias keydown.search.enter {
  638.  if $1 == 13 && $skid(tab) == search.alert && $len($skid(search)) >= 3 {
  639.  hdel skid search.result
  640.  hadd skid menu.lock 1
  641.  skid.clear
  642.  drawtext -ro @skidrelease $rgb(222,222,222) sylfaen 42 132 44 Wait...
  643.  skid.read.search
  644.  halt
  645.  }
  646. }
  647.  
  648. on *:keydown:@skidrelease:*:{
  649.  keydown.search.common $keyval
  650.  keydown.search.backspace $keyval    
  651.  keydown.search.enter $keyval
  652.  keydown.search.shift $keyval
  653.  keydown.search.ctrl $keyval
  654. }
  655.  
  656. alias keydown.search.ctrl {
  657.  if ($1 == 17 || $1 == 223) && search isin $skid(tab) && !$skid(game.localsearch1) {
  658.  drawrect -rf @skidrelease $rgb(255,255,255) 1 0 42 400 558
  659.  hadd skid blink.stop 1
  660.  hadd skid tab settings
  661.  ctrl.check
  662.  drawrect $+(-rd,$iif($settings.read(ctrl.run),f)) @skidrelease $rgb(15,15,15) 1 30 60 16 16 8 8
  663.  drawrect $+(-rd,$iif($settings.read(ctrl.popup),f)) @skidrelease $rgb(15,15,15) 1 30 92 16 16 8 8
  664.  drawrect $+(-rd,$iif($settings.read(ctrl.sound),f)) @skidrelease $rgb(15,15,15) 1 30 124 16 16 8 8
  665.  drawrect $+(-rd,$iif($settings.read(ctrl.mail),f)) @skidrelease $rgb(15,15,15) 1 30 156 16 16 8 8
  666.  drawrect $+(-rd,$iif($settings.read(ctrl.sms),f)) @skidrelease $rgb(15,15,15) 1 30 188 16 16 8 8
  667.  drawrect $+(-rd,$iif($settings.read(ctrl.keyword),f)) @skidrelease $rgb(15,15,15) 1 30 220 16 16 8 8
  668.  drawtext -ro @skidrelease $rgb(155,155,155) sylfaen 16 60 55 open the game page as soon is it online
  669.  drawtext -ro @skidrelease $rgb(155,155,155) sylfaen 16 60 87 notify me with a popup
  670.  drawtext -ro @skidrelease $rgb(155,155,155) sylfaen 16 60 119 play a sound too
  671.  drawtext -ro @skidrelease $rgb(155,155,155) sylfaen 16 60 151 why not an email whit that
  672.  drawtext -ro @skidrelease $rgb(155,155,155) sylfaen 16 60 183 Go ahead ! Text me bro
  673.  drawtext -ro @skidrelease $rgb(155,155,155) sylfaen 16 60 215 Edit keyword file
  674.  drawrect -r @skidrelease $iif($settings.read(ctrl.mail),$rgb(15,15,15),$rgb(222,222,222)) 1 294 510 80 28
  675.  drawtext -ro @skidrelease $iif($settings.read(ctrl.mail),$rgb(15,15,15),$rgb(222,222,222)) sylfaen 14 306 514 mail test
  676.  drawrect -r @skidrelease $iif($settings.read(ctrl.sms),$rgb(15,15,15),$rgb(222,222,222)) 1 294 550 80 28
  677.  drawtext -ro @skidrelease $iif($settings.read(ctrl.sms),$rgb(15,15,15),$rgb(222,222,222)) sylfaen 14 298 554 mobile test
  678.  
  679.  if $settings.read(ctrl.run) { hadd skid ctrl.run 1 }
  680.  if $settings.read(ctrl.popup) { hadd skid ctrl.popup 1 }
  681.  }
  682. }
  683.  
  684. alias ctrl.check {
  685.  hadd skid ctrl.check 1
  686.  hadd skid ctrl.check.list ctrl.run-ctrl.popup-ctrl.sound-ctrl.mail-ctrl.sms-ctrl.keyword
  687.  
  688.   while $skid(ctrl.check) <= 6 {
  689.   if $settings.read($gettok($skid(ctrl.check.list),$skid(ctrl.check),45)) { hadd skid $gettok($skid(ctrl.check.list),$skid(ctrl.check),45) 1 }
  690.   hinc skid ctrl.check
  691.   }
  692.     hdel -w skid ctrl.check*
  693.  }
  694.  
  695.  
  696.  
  697. alias settings.read return $readini($skid.settings.file,settings,$1-)
  698. alias settings.smtp.read return $readini($skid.settings.smtp.file,mail,$1-)
  699. alias settings.gateway.read return $readini($skid.settings.gateway,gateway,$1-)
  700.  
  701. alias skid.alert {    
  702.  if !$lines($skid.keyword.file) { .timer.alert off | halt }
  703.  keyword.compare.game
  704.  skid.read.last.upload
  705.  skid.read.url
  706. }
  707.  
  708. alias keyword.compare.game {
  709.   if !$lines($skid.keyword.file) { .timer.alert off }
  710.   hadd skid compare.game 1
  711.  
  712.    while $skid(compare.game) <= $lines($skid.keyword.file) {  
  713.    if $read($skid.keyword.file,$skid(compare.game)) isin $+($skid(game1),*,$skid(game2),*,$skid(game3),*,$skid(game4),*,$skid(game5),*,$skid(game6),*,$skid(game7),*,$skid(game8),*,$skid(game9)) {
  714.    game.id
  715.    write $+(-dl,$skid(compare.game)) $skid.keyword.file
  716.    skid.reaction
  717.    halt
  718.    }
  719.     hinc skid compare.game
  720.    }
  721.      hdel skid compare.game
  722. }
  723.  
  724. alias game.id {
  725.  hdel skid game.up
  726.  hadd skid game.id 1
  727.  
  728.   while $skid(game.id) <= 9 {  
  729.   if $read($skid.keyword.file,$skid(compare.game)) isin $skid($+(game,$skid(game.id))) {  
  730.   hadd skid game.up $skid(game.id)
  731.   hadd skid game.id 10
  732.   }
  733.    hinc skid game.id
  734.   }
  735. }
  736.    
  737. alias skid.reaction {    
  738.  if $settings.read(ctrl.run) { skid.reaction.run }
  739.  if $settings.read(ctrl.popup) { skid.reaction.popup }
  740.  if $exists($settings.read(ctrl.sound)) { skid.reaction.sound }
  741.  if $settings.read(ctrl.mail) { skid.reaction.mail }
  742.  if $settings.read(ctrl.sms) { skid.reaction.mail sms }
  743. }
  744.  
  745. alias skid.reaction.mail {
  746.  safestorage.shake.key.reverse $+($skid.cap,smtp.,$settings.read(cap))
  747.  hadd skid mail.auth2 $hget(safestorage,safestorage)
  748.  hdel safestorage safestorage
  749.      if $1 isin mobiletest.sms {
  750.      safestorage.shake.key.reverse $+($skid.cap,gateway.,$settings.read(cap.phone))
  751.      hadd skid mail.to $+($hget(safestorage,safestorage),@,$readini($skid.address.gateway,gateway,$readini($skid.settings.gateway,gateway,provider)))
  752.      }
  753.      else { hadd skid mail.to $settings.smtp.read(sendalertto) }
  754.      
  755.  hadd skid mail.from $settings.smtp.read(user)
  756.  hadd skid mail.title $iif(test isin $1,Congrat pirate ! an ocean of games awaits you now on skidrowreloaded.com,Your game $+(",$skid($+(game,$skid(game.up))),") is available)
  757.  hadd skid mail.body $iif(test isin $1,Under a black flag we shall sail !,$+(Good news pirate,$chr(44)) the game you want more than anything is now available\n\nFollow the link below for download\n\n $skid($+(game.url,$skid(game.up))))
  758.  hadd skid mail.server $settings.smtp.read(server)
  759.  hadd skid mail.port $settings.smtp.read(port)
  760.  hadd skid mail.auth $settings.smtp.read(user)
  761.  
  762.  hfree safestorage
  763.  skid.mail.send
  764.  hdel -w skid mail*
  765. }
  766.  
  767. alias skid.mail.send skid.mail -f $skid(mail.from) -t $skid(mail.to) -u $skid(mail.title) -m $skid(mail.body) -s $+($skid(mail.server),:,$skid(mail.port)) $+(-o tls=,$settings.smtp.read(tls)) -xu $skid(mail.auth) -xp $skid(mail.auth2)
  768.  
  769. alias skid.reaction.sound splay -m $shortfn($settings.read(ctrl.sound))
  770.  
  771. alias skid.reaction.popup {
  772.  window -dpo +d @skidpopup $calc($window(-1).w - 200) $calc($window(-1).h - 200) 200 200
  773.  skid.reaction.popup.text  
  774.  .timer.skid.reaction 0 5 skid.reaction.popup.text
  775. }
  776.  
  777. alias skid.reaction.popup.text {  
  778.  hadd skid game.name $skid($+(game,$skid(game.up)))
  779.  drawrect -rf @skidpopup $rgb(255,0,0) 1 0 0 200 200
  780.  drawtext -ro @skidpopup $rgb(15,15,15) arial 18 16 40 Skidrelease Alert !!!
  781.  .timer.popup.delay -m 1 500 drawrect -rf @skidpopup $rgb(0,255,0) 1 0 0 200 200
  782.  .timer.popup.delay.b -m 1 500 drawtext -ro @skidpopup $rgb(15,15,15) arial 18 16 40 Skidrelease Alert !!!
  783.  .timer.popup.delay.c 1 1 drawrect -rf @skidpopup $rgb(255,242,0) 1 0 0 200 200
  784.  .timer.popup.delay.d 1 1 drawtext -ro @skidpopup $rgb(15,15,15) arial 14 12 60 $skid(game.name)
  785.  .timer.popup.delay.e -m 1 1500 drawrect -rf @skidpopup $rgb(255,127,30) 1 0 0 200 200
  786.  .timer.popup.delay.f -m 1 1500 drawtext -ro @skidpopup $rgb(15,15,15) arial 14 12 60 $skid(game.name)
  787.  .timer.popup.delay.g 1 2 drawrect -rf @skidpopup $rgb(153,217,234) 1 0 0 200 200
  788.  .timer.popup.delay.h 1 2 drawtext -ro @skidpopup $rgb(15,15,15) arial 22 30 60 IS AVAILABLE
  789.  }
  790.  
  791. menu @skidpopup {
  792. sclick:{
  793.  .timer.popup* off
  794.  .timer.skid.reaction off
  795.  window -c @skidpopup
  796.  skid.reaction.run
  797.  if $insong.fname { splay stop }
  798.  }
  799. }
  800.  
  801. alias skid.reaction.run run $skid($+(game.url,$skid(game.up)))
  802.  
  803. alias keydown.search.shift {
  804.  if search isin $skid(tab) && $1 == 16 && $len($skid(search)) >= 3 {
  805.   if !$skid.keyword($skid(search)) {
  806.   write $skid.keyword.file $replace($skid(search),$chr(43),$chr(32))
  807.   skid.clear
  808.   drawtext -ro @skidrelease $rgb(222,222,222) sylfaen 42 54 44 $iif($read($skid.keyword.file,$lines($skid.keyword.file)) == $skid(search),keyword added !,$chr(160))
  809.   .timer.keydown.delay 1 3 keydown.search.delay
  810.   skid.alert
  811.   if !$timer(.alert) { .timer.alert 0 60 skid.alert }
  812.   }
  813.    else {
  814.    skid.clear
  815.    drawtext -ro @skidrelease $rgb(222,222,222) sylfaen 42 54 44 Already added
  816.    .timer.keydown.delay 1 3 keydown.search.delay
  817.    }
  818.  }
  819. }
  820.  
  821. alias keydown.search.delay {
  822.  skid.clear
  823.  hadd skid search.empty 1
  824.  hdel skid search
  825.  sclick.alert
  826.  skid.clear
  827.  if $skid(tab) != settings { drawtext -ro @skidrelease $rgb(222,222,222) sylfaen 42 80 44 Search\alert }
  828.  .timer.searchalert.blink -m 0 650 skid.searchalert.blink
  829. }
  830.  
  831. alias skid.keyword return $iif($read($skid.keyword.file, w,$1),1,0)
  832.  
  833. alias skid.keyword.file return skidrelease\resources\keyword.ini
  834.  
  835. alias skid.timer.blink {  
  836.  if !$len($skid(search)) {  
  837.   hdel skid blink.stop
  838.  .timer.search.blink off
  839.     if !$skid(game.localsearch1) {
  840.     .timer.searchalert.blink -m 0 650 skid.searchalert.blink
  841.     if $skid(tab) != settings { .timer.searchalert.empty -m 1 650 drawtext -ro @skidrelease $rgb(222,222,222) sylfaen 42 80 44 Search\alert }
  842.     }
  843.   }
  844. }
  845.  
  846. alias search.char.abuse {
  847.  if $count($skid(search),$chr(119)) > 7 {
  848.  hdel -w skid search
  849.  halt
  850.  }
  851. }
  852.  
  853. ; last.pixel window color x1 x2 y
  854. alias last.pixel {
  855.  hdel skid lastpixel.result
  856.  hadd skid lastpixel $3
  857.  
  858.   while $skid(lastpixel) <= $4 {
  859.   if $getdot($1,$skid(lastpixel),$5) == $2 { hadd skid lastpixel.result $skid(lastpixel) }
  860.   hinc skid lastpixel
  861.   }
  862.    return $iif($skid(lastpixel.result),$ifmatch,0)
  863. }
  864.  
  865. alias between return $iif($1 >= $2 && $1 <= $3,1,0)
  866.  
  867. alias last.pixel.search return $last.pixel(@skidrelease,986895,380,400,80)
  868.  
  869. alias sclick.alert {
  870.  if ($alert.position || $skid(search.noresult)) && !$skid(sclick.delay) {
  871.  .timer.skidmouseover off
  872.  hadd -z skid sclick.delay 1
  873.  hadd skid tab search.alert
  874.  hdel skid blink.stop
  875.  hdel skid localsearch
  876.  hdel -w skid search*
  877.  hdel -w skid game.localsearch*
  878.  drawrect -rf @skidrelease $rgb(255,255,255) 1 134 0 132 40
  879.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 141 3 Upcoming
  880.  drawrect -rf @skidrelease $rgb(255,255,255) 1 0 0 133 40
  881.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 40 3 New
  882.  drawrect -rf @skidrelease $rgb(0,162,232) 1 267 0 133 40
  883.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 20 273 9 Search\Alert
  884.  skid.clear
  885.  .timer.searchalert.blink -m 0 650 skid.searchalert.blink
  886.  skid.searchalert.tab
  887.  halt
  888.  }
  889. }
  890.  
  891. alias skid.searchalert.tab {
  892.  drawtext -ro @skidrelease $rgb(222,222,222) sylfaen 42 80 44 Search\alert
  893.  drawtext -ro @skidrelease $rgb(222,222,222) sylfaen 42 80 104 Enter : Search
  894.  drawtext -ro @skidrelease $rgb(222,222,222) sylfaen 42 80 168 Shift $+($chr(160),:) Alert
  895.  drawtext -ro @skidrelease $rgb(222,222,222) sylfaen 42 80 228 Ctrl $+($str($chr(160),2),:) Settings
  896. }
  897.  
  898. alias skid.searchalert.blink {
  899.   if $skid(blink.stop) {
  900.   .timer.searchalert.blink off
  901.   hdel skid blink.stop
  902.   drawrect -rf @skidrelease $rgb(255,255,255) 1 20 60 2 30
  903.   halt
  904.   }
  905.    hinc skid search.alert.blink
  906.    drawrect -rf @skidrelease $iif($pair($skid(search.alert.blink)),$rgb(15,15,15),$rgb(255,255,255)) 1 20 60 2 30
  907. }
  908.  
  909. alias pair return $iif($chr(46) !isin $calc($1 / 2),1,0)
  910.  
  911. alias sclick.new {
  912.  if $new.position && !$skid(sclick.delay.new) {
  913.  hdel -w skid search*
  914.  hdel -w skid game.localsearch*
  915.  hadd skid tab new
  916.  hadd skid blink.stop 1
  917.  hadd -z skid sclick.delay.new 1
  918.  drawrect -rf @skidrelease $rgb(255,255,255) 1 134 0 132 40
  919.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 141 3 Upcoming
  920.  skid.main
  921.  drawrect -rf @skidrelease $rgb(0,162,232) 1 0 0 133 40
  922.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 40 3 New
  923.  }
  924. }
  925.  
  926. alias skid.empty.websearch return $iif($right($iif(upcoming isin $skid(tab) && $skid(game.position) == 9,$skid.upcoming.page,run $iif(upcoming isin $skid(tab),$+(https://www.google.com/search?q=,$replace($skid($+(game.upcoming,$calc($skid(game.position) + ($new.mouseover.page * 8)))),$chr(32),$chr(43))),$skid($+(game.url,$skid(game.position))))),1) == $chr(61),1,0)
  927.  
  928. alias sclick.game {
  929.  if $skid(tab) != settings {
  930.  
  931.  hadd skid game.position 1
  932.  
  933.  while $skid(game.position) <= 9 {
  934.   if $eval($+($,game.position.,$skid(game.position)),2) {
  935.   if $skid.empty.websearch || ($pair($skid(game.position)) && upcoming isin $skid(tab)) { halt }
  936.   $iif(upcoming isin $skid(tab) && $skid(game.position) == 9,$skid.upcoming.page,run $iif(upcoming isin $skid(tab),$+(https://www.google.com/search?q=,$replace($skid($+(game.upcoming,$calc($skid(game.position) + ($new.mouseover.page * 8)))),$chr(32),$chr(43))),$iif($skid($+(game,$iif(search isin $skid(tab),.localsearch),.url,$skid(game.position))),$ifmatch,shell32)))
  937.   }
  938.    hinc skid game.position $iif($skid(tab) == upcoming,2)
  939.   }
  940.  }
  941. }
  942.  
  943. alias skid.upcoming.page.2 {
  944.  skid.clear
  945.  hadd skid tab upcoming.2
  946.  skid.new .upcoming 9 16
  947. }
  948.  
  949. alias skid.upcoming.page.3 {
  950.  skid.clear
  951.  hadd skid tab upcoming.3
  952.  skid.new .upcoming 17 24
  953. }
  954.  
  955. alias skid.upcoming.page.4 {
  956.  skid.clear
  957.  hadd skid tab upcoming.4
  958.  skid.new .upcoming 25 28
  959. }
  960.  
  961. alias skid.clear {
  962.  drawrect -rf @skidrelease $rgb(255,255,255) 1 0 42 400 558
  963.  skid.separator
  964. }
  965.  
  966. alias skid.upcoming.page {
  967.  if $skid(tab) == upcoming { return skid.upcoming.page.2 }
  968.  if $skid(tab) == upcoming.2 { return skid.upcoming.page.3 }
  969.  if $skid(tab) == upcoming.3 { return skid.upcoming.page.4 }
  970. }
  971.  
  972. alias sclick.upcoming {
  973.  if $upcoming.position && !$skid(sclick.delay.upcoming) {
  974.  hdel -w skid search*
  975.  hdel -w skid game.local*
  976.  hadd skid tab upcoming
  977.  hadd skid blink.stop 1
  978.  hadd -z skid sclick.delay.upcoming 1
  979.  drawrect -rf @skidrelease $rgb(255,255,255) 1 0 0 133 40
  980.  drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 26 40 3 New
  981.  if !$timer(.skidmouseover) { .timer.skidmouseover -m 0 100 skid.new.mouseover }
  982.  skid.clear
  983.  skid.new .upcoming
  984.  }
  985. }
  986.  
  987. alias sockget {
  988.   hadd skid socket $iif($2,$2,$+(sockget.,$r(1,100000)))
  989.   if $sock($hget(skid,socket)) { sockclose $hget(skid,socket) }
  990.  
  991.   hadd skid sock.address $1
  992.   hadd skid sock.link $+($chr(47),$gettok($hget(skid,sock.address),3-,47))
  993.   hadd skid sock.host $gettok($hget(skid,sock.address),2,47)
  994.  
  995.   if $right($hget(skid,sock.address),1) == $chr(47)) && $right($hget(skid,sock.link),1) != $chr(47) { hadd skid sock.link $+($hget(skid,sock.link),$chr(47)) }
  996.  
  997.   if *https* iswm $hget(skid,sock.address) { sockopen -e $hget(skid,socket) $hget(skid,sock.host) 443 }
  998.   else { sockopen $hget(skid,socket) $hget(skid,sock.host) 80 }
  999.  
  1000.   sockmark $hget(skid,socket) $hget(skid,sock.link)
  1001.   hdel skid socket
  1002.   hdel skid sock.address
  1003.   hdel skid sock.link
  1004.   hdel skid sock.host
  1005. }
  1006.  
  1007. alias sockinit {
  1008.  sockwrite -nt $1 GET $sock($sockname).mark HTTP/1.1
  1009.  sockwrite -n $1 Host: $sock($sockname).addr
  1010.  sockwrite -n $1 User-Agent: */*
  1011.  sockwrite -n $1 Connection: Close
  1012.  sockwrite -nt $1 $crlf
  1013. }
  1014.  
  1015. alias skid.read.last.upload sockget https://www.skidrowreloaded.com skid
  1016. alias skid.read.url sockget https://www.skidrowreloaded.com skid.url
  1017. alias skid.read.upcoming sockget https://www.skidrowreloaded.com skid.upcoming
  1018. alias skid.read.search sockget $+(https://www.skidrowreloaded.com/?s=,$skid(search)) skid.search
  1019. alias skid.read.search.url sockget $+(https://www.skidrowreloaded.com/?s=,$skid(search)) skid.search.url
  1020.  
  1021. on *:sockopen:skid.search.url:{
  1022.  if !$sockerr { sockinit skid.search.url }
  1023.  else { skid.sockerr }
  1024. }
  1025.  
  1026. on *:sockopen:skid.search:{
  1027.  if !$sockerr {
  1028.  hdel -w skid game.localsearch*
  1029.  sockinit skid.search
  1030.  }
  1031.  else { skid.sockerr }
  1032. }
  1033.  
  1034. on *:sockread:skid.search.url:{
  1035.  set %skid.search.url
  1036.  sockread %skid.search.url
  1037.  if main-content isin %skid.search.url { hadd skid skid.search.url.start 1 }
  1038.  if End main-content isin %skid.search.url { hdel skid skid.search.url.start }
  1039.   if $skid(skid.search.url.start) && href isin %skid.search.url && rel= isin %skid.search.url && request !isin %skid.search.url && category !isin %skid.search.url {
  1040.   hadd skid localsearch.href $mid(%skid.search.url,$pos(%skid.search.url,href=",1),$pos(%skid.search.url,</a>,1))
  1041.   hinc skid localsearch.url
  1042.   hadd skid $+(game.localsearch.url,$skid(localsearch.url)) $remove($mid($skid(localsearch.href),$pos($skid(localsearch.href),",1),$pos($skid(localsearch.href),",2)),",rel=)
  1043.   }
  1044.  }
  1045.  
  1046.  on *:sockclose:skid.search.url:{  
  1047.   skid.clear
  1048.    if $skid(game.localsearch1) {
  1049.    skid.new .localsearch
  1050.    .timer.skidmouseover -m 0 100 skid.new.mouseover
  1051.    }
  1052.     else {
  1053.     skid.clear
  1054.     hadd skid search.noresult 1
  1055.     drawtext -ro @skidrelease $rgb(222,222,222) sylfaen 36 11 48 No Search results found
  1056.     .timer.search.noresult.clear 1 3 skid.clear
  1057.     .timer.search.noresult 1 3 sclick.alert
  1058.     .timer.search.noresult.blink 1 3 .timer.search.blink -m 0 100 skid.timer.blink
  1059.     .timer.search.noresult.edit 1 3 skid.search.url.settings
  1060.     }
  1061.   hdel -w skid search*
  1062.   hdel -w skid skid.search*
  1063.   hdel skid localsearch
  1064.   hdel skid menu.lock
  1065.  }
  1066.  
  1067.  alias skid.search.url.settings if $skid(tab) != settings { drawtext -ro @skidrelease $rgb(222,222,222) sylfaen 42 80 44 Search\alert }
  1068.  
  1069. on *:sockread:skid.search:{
  1070.  set %skid.search
  1071.  sockread %skid.search
  1072.  if search results for " isin %skid.search { hadd skid skid.search.start 1 }
  1073.  if pagenavi isin %skid.search { hdel skid skid.search.start }
  1074.    if $skid(skid.search.start) && &# !isin $notag(%skid.search) && Posted !isin $notag(%skid.search) && Read !isin $notag(%skid.search) && more& !isin $notag(%skid.search) && div class !isin %skid.search && search results !isin %skid.search && welcome != %skid.search  && !$base16(%skid.search) {
  1075.  
  1076.     if $left($remove($notag(%skid.search),$chr(9)),1) isalpha && $len($remove($notag(%skid.search),$chr(9))) <= 100 && $skid.search.except {
  1077.     hinc skid localsearch
  1078.     hadd skid $+(game.localsearch,$skid(localsearch)) $remove($notag(%skid.search),$chr(9))
  1079.    }
  1080.   }
  1081. }
  1082.  
  1083. alias skid.search.except {
  1084.  hdel skid search.except.count
  1085.  hadd skid search.except 1
  1086.  hadd skid search.except.list alt=*">*DMCA*copyright*DisableSelection*width=*script>*request*game up*game repack*pc repack*game updates*donate*pc games*excerpt*class=*t>*a>*comments*height*-wrap-
  1087.  
  1088.   while $skid(search.except) <= 21 {
  1089.   if $gettok($skid(search.except.list),$skid(search.except),42) !isin $remove($notag(%skid.search),$chr(9)) { hinc skid search.except.count }
  1090.   hinc skid search.except
  1091.   }
  1092.    return $iif($skid(search.except.count) == 21,1,0)
  1093. }
  1094.  
  1095. alias skid.search.err {
  1096.  hadd skid search.err.good 1
  1097.  hadd skid search.err.bad 61
  1098.  hadd skid search.err.del 10
  1099.  
  1100.   while $skid(search.err.bad) <= 69 {
  1101.   hadd skid $+(game.localsearch,$skid(search.err.good)) $skid($+(game.localsearch,$skid(search.err.bad)))
  1102.   hinc skid search.err.good
  1103.   hinc skid search.err.bad
  1104.   }
  1105.      while $skid(search.err.del) <= 69 {
  1106.      hdel skid $+(game.localsearch,$skid(search.err.del))
  1107.      hinc skid search.err.del
  1108.      }
  1109.  hdel -w skid search.err.*
  1110. }
  1111.  
  1112. on *:sockclose:skid.search:{
  1113.  hdel -w skid localsearch.*
  1114.  unset %skid.search
  1115.  if $skid(game.localsearch60) { skid.search.err }
  1116.  skid.read.search.url
  1117. }
  1118.  
  1119. on *:sockopen:skid:{
  1120.  if !$sockerr { sockinit skid }
  1121.  else { skid.sockerr }
  1122. }
  1123.  
  1124. alias skid.sockerr {
  1125. hadd skid sockerr 1
  1126. .timer.sockerr.1 1 1 drawrect -f @skidrelease 0 1 0 0 400 600
  1127. .timer.sockerr.2 1 1 drawpic @skidrelease 40 224 $skid.pic(intro,9)
  1128. .timer.sockerr.3 1 1 drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 52 100 50 Internet ?
  1129. .timer.sockerr.4 1 1 drawtext -ro @skidrelease $rgb(15,15,15) sylfaen 32 28 120 is it something i can eat ?
  1130. }
  1131.  
  1132. on *:sockopen:skid.url:if !$sockerr { sockinit skid.url } | else { skid.sockerr }
  1133. on *:sockopen:skid.upcoming:if !$sockerr { sockinit skid.upcoming } | else { skid.sockerr }
  1134.  
  1135. on *:sockread:skid.upcoming:{
  1136.  hdel skid next.keyword
  1137.  set %skid.upcoming
  1138.  sockread %skid.upcoming
  1139.   if UPCOMING GAMES: isin %skid.upcoming {
  1140.   hadd skid upcoming 1
  1141.   hadd skid next.keyword 1
  1142.   }
  1143.  
  1144.  if </div> isin %skid.upcoming && !$skid(next.keyword) { hdel skid upcoming }
  1145.  if $skid(upcoming) && !$base16 { hadd skid $+(game.upcoming,$calc($game.last.up +1)) $remove($notag(%skid.upcoming),UPCOMING GAMES:,$chr(9),$chr(58)) }
  1146. }
  1147.  
  1148. alias game.last.up {
  1149.  hadd skid game.last.up 32
  1150.  
  1151.   while $skid(game.last.up) >= 1 {
  1152.   if $skid($+(game.upcoming,$skid(game.last.up))) { return $skid(game.last.up) }
  1153.   hdec skid game.last.up
  1154.   }
  1155.    hdel skid game.last.up
  1156. }
  1157.  
  1158. alias base16 return $iif($left($1,1) isnum && $chr(32) !isin $1,1,0)
  1159.  
  1160. on *:sockread:skid:{
  1161. set %skid
  1162. sockread %skid
  1163.  if src="data:image/gif;base64 isin %skid && <p><p> isin %skid {
  1164.  hinc skid game
  1165.  hadd skid $+(game,$skid(game)) $remove($left($mid(%skid,$pos(%skid,alt=,1)),$pos($mid(%skid,$pos(%skid,alt=,1)),",2)),alt=,")
  1166.  }
  1167.   if <div class="wp-pagenavi"> isin %skid {
  1168.   sockclose skid
  1169.   if !$timer(.alert) { .timer.main 1 2 skid.main }
  1170.   }
  1171. }
  1172.  
  1173. on *:sockread:skid.url:{
  1174. set %skid.url
  1175. sockread %skid.url
  1176.  if src="data:image/gif;base64 isin %skid.url && <p><p> isin %skid.url {
  1177.  hinc skid game.url
  1178.  hadd skid $+(game.url,$skid(game.url)) $left($remove($mid(%skid.url,$pos(%skid.url,",1),$pos(%skid.url,",2)),"),$pos($remove($mid(%skid.url,$pos(%skid.url,",1),$pos(%skid.url,",2)),"),/,4))
  1179.  }
  1180.   if <div class="wp-pagenavi"> isin %skid.url {
  1181.   if $timer(.alert) { keyword.compare.game }
  1182.   sockclose skid.url
  1183.   }
  1184. }
  1185.  
  1186. alias skid.last.upload {
  1187.  hdels game1 game2 game3 game4 game5 game6 game7 game8 game9
  1188.  skid.read.last.upload
  1189. }
  1190.  
  1191. alias skid.url {
  1192.  hdels game.url1 game.url2 game.url3 game.url4 game.url5 game.url6 game.url7 game.url8 game.url9
  1193.  skid.read.url
  1194. }
  1195.  
  1196. alias skid.mouse return $iif($mouse.x >= $1 && $mouse.x <= $2 && $mouse.y >= $3 && $mouse.y <= $4,1,0)
  1197.  
  1198. alias notag return $regsubex($1-,/<.+?>/g,)
  1199.  
  1200. alias game.position.1 return $iif($skid.mouse(0,400,41,104),1,0)
  1201. alias game.position.2 return $iif($skid.mouse(0,400,106,166),1,0)
  1202. alias game.position.3 return $iif($skid.mouse(0,400,167,226),1,0)
  1203. alias game.position.4 return $iif($skid.mouse(0,400,228,285),1,0)
  1204. alias game.position.5 return $iif($skid.mouse(0,400,289,355),1,0)
  1205. alias game.position.6 return $iif($skid.mouse(0,400,357,414),1,0)
  1206. alias game.position.7 return $iif($skid.mouse(0,400,416,473),1,0)
  1207. alias game.position.8 return $iif($skid.mouse(0,400,475,532),1,0)
  1208. alias game.position.9 return $iif($skid.mouse(0,400,534,593),1,0)
  1209. alias alert.position return $iif($skid.mouse(279,421,0,40),1,0)
  1210. alias upcoming.position return $iif($skid.mouse(124,277,0,40),1,0)
  1211. alias new.position return $iif($skid.mouse(0,133,0,40),1,0)
  1212. alias ctrl.run.position return $iif($skid.mouse(30,46,60,76),1,0)
  1213. alias ctrl.popup.position return $iif($skid.mouse(30,46,92,108),1,0)
  1214. alias ctrl.sound.position return $iif($skid.mouse(30,46,124,140),1,0)
  1215. alias ctrl.mail.position return $iif($skid.mouse(30,46,156,172),1,0)
  1216. alias ctrl.sms.position return $iif($skid.mouse(30,46,188,204),1,0)
  1217. alias ctrl.keyword.position return $iif($skid.mouse(30,46,220,236),1,0)
  1218. alias mailtest.position return $iif($skid.mouse(294,374,510,538),1,0)
  1219. alias mobiletest.position return $iif($skid.mouse(294,374,550,578),1,0)
  1220.  
  1221. alias f5 .timer.* off | skidrelease
  1222.  
  1223. alias safeStorage {
  1224.  safeStorage.create.key
  1225.  safeStorage.invisible.cap $1 $2-
  1226.  safeStorage.shake.key $1
  1227. }
  1228.  
  1229. alias safestorage.create.KEY {
  1230.  if $hget(safestorage) { hfree safestorage }
  1231.  if !$hget(skid) { hmake skid 8192 }
  1232.  hmake safestorage 8192
  1233.  hadd safestorage safestorage.char 32
  1234.  hadd safestorage safestorage.space 1-2-3-4-5-6-7-8-9-10-11-12-13-14-15-16-17-18-19-20-21-22-23-24-25-26-27-28-29-30-31-32-33-34-35-36-37-38-39-40-41-42-43-44-45-46-47-48-49-50-51-52-53-54-55-56-57-58-59-60-61-62-63-64-65-66-67-68-69-70-71-72-73-74-75-76-77-78-79-80-81-82-83-84-85-86-87-88-89-90-91-92-93-94
  1235.  hadd safestorage safestorage.space.Left 94
  1236.  
  1237.   while $hget(safestorage,safestorage.char) <= 126 {
  1238.   hadd safestorage safestorage.space.r $r(1,$hget(safestorage,safestorage.Space.Left))
  1239.   hadd safestorage safestorage.space.r $ntonn($hget(safestorage,safestorage.Space.R))
  1240.   hadd safestorage safestorage.key $+($hget(safestorage,safestorage.key),$ntonn($gettok($hget(safestorage,safestorage.Space),$hget(safestorage,safestorage.space.r),45)),-)
  1241.   hadd safestorage safestorage.Space $deltok($hget(safestorage,safestorage.space),$ntonn($hget(safestorage,safestorage.space.r)),45)
  1242.   hinc safestorage safestorage.Char
  1243.   hdec safestorage safestorage.space.left
  1244.   }
  1245.  }
  1246.  
  1247. alias safestorage.shake.key {
  1248.  if $len($remove($hget(safestorage,safestorage.key),$chr(45))) == 188 && $remove($hget(safestorage,safestorage.key),$chr(45)) isnum {
  1249.  hdel safestorage safestorage.key.shake
  1250.  hadd safestorage safestorage.convert 1
  1251.  hadd safestorage safestorage.shake $r(3,12)
  1252.  hadd safestorage safestorage.key.shake $hget(safestorage,safestorage.key)
  1253.  
  1254.   while $hget(safestorage,safestorage.convert) <= $hget(safestorage,safestorage.shake) {
  1255.   hadd safestorage safestorage.key.shake $encode($hget(safestorage,safestorage.key.shake),m)
  1256.   hinc safestorage safestorage.convert
  1257.   }
  1258.    hadd skid shake $hget(safestorage,safestorage.shake)
  1259.    write $+($skid.cap,$1,.,$hget(safestorage,safestorage.shake)) $hget(safestorage,safestorage.key.shake)
  1260.  }
  1261. }
  1262.  
  1263. alias ntonn return $iif($len($1) == 1,$+(0,$1),$1-)
  1264.  
  1265. alias safestorage.invisible.cap {
  1266.   hadd safestorage length.cap 1
  1267.  
  1268.     while $hget(safestorage,length.cap) <= $len($2-) {
  1269.     write $+($skid.cap,$1,.cap) $str($chr(160),$gettok($hget(safestorage,safestorage.key),$calc($asc($mid($2-,$hget(safestorage,length.cap),1)) -32),45))
  1270.     hinc safestorage length.cap
  1271.     }
  1272.  }
  1273.  
  1274.  alias hash.find {
  1275.   if $hget($1,$2) {
  1276.   hdel safestorage hash.result
  1277.   hadd safestorage hash.find 1
  1278.  
  1279.   while $hget(safestorage,hash.find) <= 94 {
  1280.   if $gettok($hget($1,$2),$hget(safestorage,hash.find),45) == $3 { hadd safestorage hash.Result $hget(safestorage,hash.find) }
  1281.   hinc safestorage hash.Find
  1282.   }
  1283.     return $hget(safestorage,hash.result)
  1284.  }
  1285. }
  1286.  
  1287. alias safestorage.shake.reverse {
  1288.  if $len($remove($hget(safestorage,safestorage.key),$chr(45))) == 188 && $remove($hget(safestorage,safestorage.key),$chr(45)) isnum {
  1289.  hadd safestorage safestorage.reverse 1
  1290.  
  1291.   while $hget(safestorage,safestorage.reverse) <= $lines($1) {
  1292.   hadd safestorage safestorage $+($hget(safestorage,safestorage),$chr($calc($hash.find(safestorage,safestorage.key,$len($read($1,$hget(safestorage,safestorage.reverse)))) +32)))
  1293.   hinc safestorage safestorage.reverse
  1294.   }
  1295.   }
  1296. }
  1297.  
  1298. alias safestorage.shake.key.reverse {
  1299.  if $exists($1) {
  1300.  if !$hget(safestorage) { hmake safestorage 8192 }
  1301.  hadd safestorage safestorage.shake.reverse 1
  1302.  hadd safestorage safestorage.key $decode($read($1,1),m)
  1303.  
  1304.   while $hget(safestorage,safestorage.shake.reverse) <= $calc($gettok($nopath($1),2,46) -1) {
  1305.   hadd safestorage safestorage.key $decode($hget(safestorage,safestorage.key),m)
  1306.   hinc safestorage safestorage.shake.reverse
  1307.   }
  1308.    safestorage.shake.reverse $+($nofile($1),$gettok($nopath($1),1,46),.cap)
  1309.  }
  1310. }
  1311.  
  1312. alias irc2cmd return $hget(irc2cmd,$1-)
  1313.  
  1314. alias irc2cmd.launch .timerirc2cmd 0 1 irc2cmd.Detect
  1315.  
  1316. alias irc2cmd.recept return $mircdirskidrelease\irc2cmd
  1317.  
  1318. alias irc2cmd.detect {
  1319.   if $lines($irc2cmd.recept) && !$irc2cmd(detect.delay) {
  1320.      if $hget(irc2cmd) { hfree irc2cmd }
  1321.      hmake irc2cmd 100
  1322.      hadd irc2cmd detect 1
  1323.      hadd irc2cmd detect.delay 1
  1324.  
  1325.     while $irc2cmd(detect) <= $lines($irc2cmd.recept) {
  1326.       $read($irc2cmd.recept,$irc2cmd(detect))
  1327.       window -r @skidrelease
  1328.       hinc irc2cmd detect
  1329.     }
  1330.     write -c $irc2cmd.recept
  1331.   }
  1332.     if $irc2cmd(detect.delay) { hdel irc2cmd detect.delay }
  1333. }
  1334.  
  1335. alias irc2cmd.convert {
  1336.   if $lines($1) {
  1337.     hadd irc2cmd convert 1
  1338.  
  1339.     while $irc2cmd(convert) <= $lines($1) {
  1340.       write $+($nofile($1),$gettok($nopath($1),1,46),.bat) echo off
  1341.       write $+($nofile($1),$gettok($nopath($1),1,46),.bat) echo $read($1,$irc2cmd(convert)) >> $irc2cmd.recept
  1342.       hinc irc2cmd convert
  1343.     }
  1344.     write $+($nofile($1),$gettok($nopath($1),1,46),.bat) cls
  1345.   }
  1346. }
  1347.  
  1348. on *:start:skid.start.load
  1349. on *:load:skid.start.load
  1350.  
  1351. alias skid.start.load {
  1352. irc2cmd.launch
  1353.  if !$settings.read(first.launch) {    
  1354.  skid.popups
  1355.  skid.vbs.icon
  1356.  settings first.launch 1
  1357.  }
  1358. }
  1359.  
  1360. alias vbs write $+(-l,$calc($lines($skid.icon) +1)) $skid.icon $1-
  1361.  
  1362. alias skid.icon return skidrelease\resources\icon.vbs
  1363. alias skid.ico return $mircdirskidrelease\resources\img\skidrelease.ico
  1364. alias skid.bat return $mircdirskidrelease\resources\irc2cmd.bat
  1365.  
  1366. alias skid.vbs.icon {
  1367.  if !$exists($skid.icon) {
  1368.  var %skid.function $+(Shortcut,$chr(40),$remove($+(" $skid.bat ",$chr(44),"skidrelease",$chr(44)," $skid.ico "),$chr(32)),$chr(41))
  1369.  vbs Call %skid.function
  1370.  vbs Sub Shortcut(ApplicationPath,Name,Icon)
  1371.  vbs Dim objShell,DesktopPath,objShortCut,MyTab
  1372.  vbs Set objShell = CreateObject("WScript.Shell")
  1373.  vbs MyTab = Split(ApplicationPath,"\")
  1374.  vbs If Name = "" Then
  1375.  vbs Name = MyTab(UBound(MyTab))
  1376.  vbs End if
  1377.  vbs DesktopPath = objShell.SpecialFolders("Desktop")
  1378.  vbs Set objShortCut = objShell.CreateShortcut(DesktopPath & "\" & Name & ".lnk")
  1379.  vbs objShortCut.TargetPath = Dblquote(ApplicationPath)
  1380.  vbs ObjShortCut.IconLocation = Icon
  1381.  vbs objShortCut.Save
  1382.  vbs End Sub
  1383.  vbs Function DblQuote(Str)
  1384.  vbs DblQuote = Chr(34) & Str & Chr(34)
  1385.  vbs End Function
  1386.  }
  1387.    run $skid.icon
  1388.   .remove $skid.icon
  1389. }
  1390.  
Tags: game Gaming search scene actuality release UPCOMING
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!