[Neoscript-development] neoscript/ADDONS personalstats.mrc,1.1.1.1,1.2
Brought to you by:
mjgreen
Menu
▾
▴
[Neoscript-development] neoscript/ADDONS personalstats.mrc,1.1.1.1,1.2
|
From: <mor...@us...> - 2002-08-31 08:26:31
|
Update of /cvsroot/neoscript/neoscript/ADDONS
In directory usw-pr-cvs1:/tmp/cvs-serv32506/ADDONS
Modified Files:
personalstats.mrc
Log Message:
removed more unncessary files
Index: personalstats.mrc
===================================================================
RCS file: /cvsroot/neoscript/neoscript/ADDONS/personalstats.mrc,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -C2 -d -r1.1.1.1 -r1.2
*** personalstats.mrc 29 Aug 2002 18:14:02 -0000 1.1.1.1
--- personalstats.mrc 31 Aug 2002 08:26:28 -0000 1.2
***************
*** 1,50 ****
on *:load: {
! if (%personal.stats.record.uptime == $null) || (%personal.stats.record.uptime.counter == $null) {
! echo -a 7Prepairing for a new installation
! unset %personal.stats.*
! set %personal.stats.record.uptime.counter 0.0
! set statsloaded 1
! }
! else {
! echo -a 4-8-7Keeping current uptime statistics 4-8-
! }
! personalsetup
! echo -a 4-8- 7Set current Internet Connection as %personal.stats.connection 4-8-
! timerrecorduptime -o 0 1 recorduptime
}
on *:START: {
! if (%personal.stats.record.uptime.counter == $null) { set %personal.stats.record.uptime.counter 0.0 }
! else {
! if ($timer(recorduptime) != 1) {
! timerrecorduptime -o 0 1 recorduptime }
! }
}
alias personalsetup {
! set %personal.stats.connection.temp $?!"Are you on a high-speed connection?"
! if (%personal.stats.connection.temp == $true) { set %personal.stats.connection.temp1 $?!"Are you on a T1 or T3 connection?" }
! if (%personal.stats.connection.temp == $false) { set %personal.stats.connection Dialup }
! if (%personal.stats.connection.temp1 == $true) { set %personal.stats.connection.temp2 $?!"Are you on a T1 connection?" }
! if (%personal.stats.connection.temp1 == $false) { set %personal.stats.connection.temp3 $?!"Are you on a DSL connection?" }
! if (%personal.stats.connection.temp2 == $true) { set %personal.stats.connection T1 }
! if (%personal.stats.connection.temp2 == $false) { set %personal.stats.connection T3 }
! if (%personal.stats.connection.temp3 == $true) { set %personal.stats.connection DSL }
! if (%personal.stats.connection.temp3 == $false) { set %personal.stats.connection Cable }
! unset %personal.stats.connection.temp*
}
alias recorduptime {
! if ($calc($ticks / 1000) > %personal.stats.record.uptime.counter) {
! set %personal.stats.record.uptime.counter $calc($ticks / 1000)
! set %personal.stats.record.uptime $replace($duration($calc($ticks / 1000)),sec, Second,secs, Seconds,min, Minute,mins, Minutes,hr, Hour,hrs, Hours,day, Day,days, Days,wk, Week,wks, Weeks))))
! }
}
alias psstats {
! msg $active 14I am using4 $dll(mem.dll,osinfo,_)
! msg $active 14Running with memory4 $mid($dll(mem.dll,meminfo,_), 7, 20)
! hdd
! msg $active 14I am on a4 %personal.stats.connection 14connection.
! msg $active 14My computer is running a4 $dll(mem.dll,cpuinfo,_)
! msg $active 14My computer hasnt been restarted in4 $replace($duration($calc($ticks / 1000)),sec, Second,secs, Seconds,min, Minute,mins, Minutes,hr, Hour,hrs, Hours,day, Day,days, Days,wk, Week,wks, Weeks)))) $+ 10.
! msg $active 14My record uptime is4 %personal.stats.record.uptime
}
alias hdd {
--- 1,49 ----
on *:load: {
! if (%personal.stats.record.uptime == $null) || (%personal.stats.record.uptime.counter == $null) {
! echo -a 7Prepairing for a new installation
! unset %personal.stats.*
! set %personal.stats.record.uptime.counter 0.0
! }
! else {
! echo -a 4-8-7Keeping current uptime statistics 4-8-
! }
! personalsetup
! echo -a 4-8- 7Set current Internet Connection as %personal.stats.connection 4-8-
! timerrecorduptime -o 0 1 recorduptime
}
on *:START: {
! if (%personal.stats.record.uptime.counter == $null) { set %personal.stats.record.uptime.counter 0.0 }
! else {
! if ($timer(recorduptime) != 1) {
! timerrecorduptime -o 0 1 recorduptime }
! }
}
alias personalsetup {
! set %personal.stats.connection.temp $?!"Are you on a high-speed connection?"
! if (%personal.stats.connection.temp == $true) { set %personal.stats.connection.temp1 $?!"Are you on a T1 or T3 connection?" }
! if (%personal.stats.connection.temp == $false) { set %personal.stats.connection Dialup }
! if (%personal.stats.connection.temp1 == $true) { set %personal.stats.connection.temp2 $?!"Are you on a T1 connection?" }
! if (%personal.stats.connection.temp1 == $false) { set %personal.stats.connection.temp3 $?!"Are you on a DSL connection?" }
! if (%personal.stats.connection.temp2 == $true) { set %personal.stats.connection T1 }
! if (%personal.stats.connection.temp2 == $false) { set %personal.stats.connection T3 }
! if (%personal.stats.connection.temp3 == $true) { set %personal.stats.connection DSL }
! if (%personal.stats.connection.temp3 == $false) { set %personal.stats.connection Cable }
! unset %personal.stats.connection.temp*
}
alias recorduptime {
! if ($calc($ticks / 1000) > %personal.stats.record.uptime.counter) {
! set %personal.stats.record.uptime.counter $calc($ticks / 1000)
! set %personal.stats.record.uptime $replace($duration($calc($ticks / 1000)),sec, Second,secs, Seconds,min, Minute,mins, Minutes,hr, Hour,hrs, Hours,day, Day,days, Days,wk, Week,wks, Weeks))))
! }
}
alias psstats {
! msg $active 14I am using4 $dll(mem.dll,osinfo,_)
! msg $active 14Running with memory4 $mid($dll(mem.dll,meminfo,_), 7, 20)
! hdd
! msg $active 14I am on a4 %personal.stats.connection 14connection.
! msg $active 14My computer is running a4 $dll(mem.dll,cpuinfo,_)
! msg $active 14My computer hasnt been restarted in4 $replace($duration($calc($ticks / 1000)),sec, Second,secs, Seconds,min, Minute,mins, Minutes,hr, Hour,hrs, Hours,day, Day,days, Days,wk, Week,wks, Weeks)))) $+ 10.
! msg $active 14My record uptime is4 %personal.stats.record.uptime
}
alias hdd {
***************
*** 73,76 ****
menu @Personal Statistics {
! Close Window:window -c @Personal Statistics
}
--- 72,75 ----
menu @Personal Statistics {
! Close Window:window -c @Personal Statistics
}
|
