All pastes #740182 Raw Edit

Mine

public text v1 · immutable
·published 2007-10-17 19:15 UTC
rendered paste body
2F*

*Script-Addon* Version 1.32
Progress Bar Made By Foshizzle
--
Syntax: /drawpbar

*/
;----
;Copy this into script then modify it and your script so it works. If you need help with this please read the ReadMe or email me
;-
alias pb2 {
  /window -pkod +b @LG2 300 300 300 32
  /clear @LG2
  /dpbprc
}
alias dpbprc {
  /clear @LG2
  /set %lo 0
  /drawrect -rf @LG2 $rgb(240,240,240) 1 0 0 300 31
  /drawrect -rf @LG2 $rgb(250,250,250) 1 0 0 300 10
  window -pkod +b @PRC $calc 300 331 40 20
  window -pkod +b @PRC2 $calc 340 331 80 20
  window -pkod +b @PRC3 $calc 420 331 45 20
  :Reload
  /var %percent $calc(%lo / 3)
  clear @PRC
  clear @PRC2
  clear @PRC3
  $iif(%percent < 100, /drawtext @PRC 3 tahoma 12 2 1 $ceil(%percent) $+ %, /drawtext @PRC 3 tahoma 12 2 1 100%)
  $iif(%percent < 100, /drawtext @PRC2 3 tahoma 12 2 1 %percent $+ %, /drawtext @PRC2 3 tahoma 12 2 1 100%)
  $iif(%percent < 100, /drawtext @PRC3 3 tahoma 12 2 1 $round(%percent,1) $+ %, /drawtext @PRC3 3 tahoma 12 2 1 100%)
  if (%lo <= 300) {
    /drawline -rf @LG2 $rgb(150,255,150) 1 %lo 1 %lo 5
    /drawline -rf @LG2 $rgb(125,243,125) 1 %lo 5 %lo 10
    /drawline -rf @LG2 $rgb(100,230,100) 1 %lo 10 %lo 15
    /drawline -rf @LG2 $rgb(75,220,75) 1 %lo 15 %lo 20
    /drawline -rf @LG2 $rgb(50,210,50) 1 %lo 20 %lo 25
    /drawline -rf @LG2 $rgb(25,200,25) 1 %lo 25 %lo 30
    /drawtext @LG2 1 tahoma 15 12 5 Loading...
    /inc %lo 0.211
    goto Reload
  }
  ;else { .timer -om 1 500 /window -c @LG2 | .timer -om 1 500 /window -c @PRC | .timer -om 1 500 /window -c @PRC2 | .timer -om 1 500 /window -c @PRC3 }
  else { .timer -om 1 500 /window -pkod +b @LGC 465 331 20 20 | .timer -om 1 505 /drawpic -t @LGC $rgb(0,0,0) 0 0 " $+ $scriptdir $+ \cancel.png"
    /clear @LG2
    /drawrect -rf @LG2 $rgb(150,255,150) 1 0 1 301 5
    /drawrect -rf @LG2 $rgb(125,243,125) 1 0 5 301 10
    /drawrect -rf @LG2 $rgb(100,230,100) 1 0 10 301 15
    /drawrect -rf @LG2 $rgb(75,220,75) 1 0 15 301 20
    /drawrect -rf @LG2 $rgb(50,210,50) 1 0 20 301 25
    /drawrect -rf @LG2 $rgb(25,200,25) 1 0 25 301 30
    /drawtext @LG2 0 tahoma 15 12 5 Load Complete.
  }
}
menu @LGC {
  sclick: { /window -c @LGC | /window -c @PRC | /window -c @PRC2 | /window -c @LG2 | /window -c @PRC3 }
}
;----
alias progressbar {
  /window -pkd +b @LG 300 300 300 32
  /clear @LG
  /drawpbar
}
alias drawpbar {
  /var %lo 0
  /drawrect -rf @LG $rgb(240,240,240) 1 0 0 300 31
  /drawrect -rf @LG $rgb(245,245,245) 1 0 0 200 15
  /drawrect -rf @LG $rgb(250,250,250) 1 0 0 300 10
  :Reload
  if (%lo <= 300) {
    /drawline -rf @LG $rgb(150,255,150) 1 %lo 1 %lo 5
    /drawline -rf @LG $rgb(125,243,125) 1 %lo 5 %lo 10
    /drawline -rf @LG $rgb(100,230,100) 1 %lo 10 %lo 15
    /drawline -rf @LG $rgb(75,220,75) 1 %lo 15 %lo 20
    /drawline -rf @LG $rgb(50,210,50) 1 %lo 20 %lo 25
    /drawline -rf @LG $rgb(25,200,25) 1 %lo 25 %lo 30
    /drawtext @LG 1 tahoma 15 12 5 What did you want to load again?...
    /inc %lo 0.12
    goto Reload
  }
  else { .timer -om 1 200 /window -c @LG }
}