Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2002.08.12;
Скачать: [xml.tar.bz2];

Вниз

BIOS&Timer   Найти похожие ветки 

 
Apocalypsys   (2002-04-24 18:07) [0]

Братья!!!
Как из Windows установить таймер в BIOS на включение компа?
Помогите, ОЧЧЕНЬ НУЖНО!!!


 
Doom   (2002-04-27 16:57) [1]

Тоже этим занимался но так ничего не нарыл может кто поможет? а то каждый раз для этого надо комп перегружать.


 
VEG   (2002-04-27 23:58) [2]

А комп сам НЕ может включаться. (Если он выключен)


 
Doom   (2002-04-28 14:24) [3]


> VEG © (27.04.02 23:58)


Это у тебя комп довоенный :))))
Ошибаешься
Меня комп как будильник будит в 7 утра.
В автозагрузку кидаю ярлык на МР3 и вот так вот.
А в биосе ставится время включения компа.


 
AlexKniga   (2002-04-29 14:03) [4]

Поищи на сайте производителя бивиса спецификацию.
У Феникса точно лежит, у других не искал.


 
AlexKniga   (2002-05-22 17:52) [5]

Я заитересовался возможностью: комп как будильник.
Возможность хорошая, но каждый раз перегружать машину не радует :(

Облазил сайты www.ami.com (мой бивис) www.microstar.ru (моя мать) спецификации не нашел :((

А у Феникса вместе с bios.bin можно скачать его спецификацию.
В ней даже сказано по каким адресам пароль лежит !!!
(Он располагался в не стандартном месте, и обычные проги-взломщики паролей BIOS не помогали)

У кого какие идеи, где можно найти спецификацию AMI BIOS"а?


 
AlexKniga   (2002-05-22 18:54) [6]

Вот я еще нарыл:
http://forum.ixbt.com/0026/006755.html


 
a_k_v   (2002-05-24 06:50) [7]

Я для award bios нашел где хранятся часы и минуты
пробудки, это 3 и 5 байт CMOS


и накропал тулзу, ловите кому треба
работает на award и у меня на ноуте
с интеловским биосом на ami не юзал не имею

Только нужна библиотека zlportio
кому надо, качайте на торри или еще где

---------------юнит----------------------------
unit UWakeUp;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls, StdCtrls, Buttons, ComCtrls,Zlportio;

type
TForm1 = class(TForm)
Panel1: TPanel;
Edit1: TEdit;
UpDown2: TUpDown;
Edit2: TEdit;
UpDown1: TUpDown;
Label1: TLabel;
Label2: TLabel;
BitBtn1: TBitBtn;
Label3: TLabel;
procedure FormCreate(Sender: TObject);
procedure BitBtn1Click(Sender: TObject);
procedure UpDown1ChangingEx(Sender: TObject; var AllowChange: Boolean;
NewValue: Smallint; Direction: TUpDownDirection);
procedure UpDown2ChangingEx(Sender: TObject; var AllowChange: Boolean;
NewValue: Smallint; Direction: TUpDownDirection);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
implementation

{$R *.DFM}

{перевод байта из CMOS в нормальное значение}
function Hex2Byte(B: Byte): Byte;
begin
Result := (B div 16)*10 + (B mod 16)
end;

{перевод простого байта в формат CMOS}
function Byte2Hex(B: Byte): Byte;
begin
Result := (B div 10)*16 + (B mod 10)
end;


procedure TForm1.FormCreate(Sender: TObject);
begin
{Читаем из CMOS часы подъема}
portwriteb($70,5);
UpDown1.Position := Hex2Byte(portreadb($71));
{Читаем из CMOS минуты подъема}
portwriteb($70,3);
UpDown2.Position := Hex2Byte(portreadb($71));
{Отображаем в едитах}
Edit1.Text := IntToStr(UpDown1.Position);
Edit2.Text := IntToStr(UpDown2.Position);
end;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
{Пишем в CMOS часы}
portwriteb($70,5);
portwriteb($71, Byte2Hex(UpDown1.Position));
{Пишем в CMOS минуты}
portwriteb($70,3);
portwriteb($71, Byte2Hex(UpDown2.Position));
end;

procedure TForm1.UpDown1ChangingEx(Sender: TObject;
var AllowChange: Boolean; NewValue: Smallint;
Direction: TUpDownDirection);
begin
if (NewValue <> -1) and (NewValue < 24) then
Edit1.Text := IntToStr(NewValue);
end;

procedure TForm1.UpDown2ChangingEx(Sender: TObject;
var AllowChange: Boolean; NewValue: Smallint;
Direction: TUpDownDirection);
begin
if (NewValue <> -1) and (NewValue < 60) then
Edit2.Text := IntToStr(NewValue);
end;

end.
-----------------форма------------------------------
object Form1: TForm1
Left = 323
Top = 208
Width = 215
Height = 123
Caption = "Подними свой комп"
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = "MS Sans Serif"
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 207
Height = 96
Align = alClient
BevelInner = bvLowered
BorderStyle = bsSingle
TabOrder = 0
object Label1: TLabel
Left = 14
Top = 8
Width = 23
Height = 13
Caption = "ЧЧ:"
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = "MS Sans Serif"
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 68
Top = 8
Width = 25
Height = 13
Caption = "ММ:"
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = "MS Sans Serif"
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 19
Top = 57
Width = 168
Height = 26
Caption = "Прога позволяет менять время "#13#10"подъема компа. для Award BIOS "
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = "MS Sans Serif"
Font.Style = []
ParentFont = False
end
object Edit1: TEdit
Left = 8
Top = 24
Width = 25
Height = 21
ReadOnly = True
TabOrder = 0
Text = "6"
end
object UpDown2: TUpDown
Left = 87
Top = 23
Width = 16
Height = 24
Min = 0
Max = 60
Position = 0
TabOrder = 1
Wrap = False
OnChangingEx = UpDown2ChangingEx
end
object Edit2: TEdit
Left = 60
Top = 24
Width = 25
Height = 21
ReadOnly = True
TabOrder = 2
Text = "0"
end
object UpDown1: TUpDown
Left = 36
Top = 23
Width = 16
Height = 24
Min = 0
Max = 23
Position = 6
TabOrder = 3
Wrap = False
OnChangingEx = UpDown1ChangingEx
end
object BitBtn1: TBitBtn
Left = 111
Top = 22
Width = 82
Height = 25
TabOrder = 4
OnClick = BitBtn1Click
Kind = bkOK
end
end
end


 
SAND   (2002-05-26 16:31) [8]

Есть отличная прога Byalarm!!! Проверено, работает.
Можно найти здесь alenza.hotmail.ru. Удачи!!!


 
SuperUmnik   (2002-05-28 13:44) [9]

У меня есть покороче алгоритм пишите если надо


 
Snake2000   (2002-05-28 18:51) [10]

Ну неужели ты так часто меняешь время пробудки, что тебе влом даже машину перезагрузить!?!?


 
Snake2000   (2002-05-28 18:55) [11]

А у меня в биосе такие опции:
Включение по паролю (просто набиваешь его на клаве и все)
Включение по событию мышки
Включение по телефонному звонку - может кто знает зачем это нужно - работает отлично, но какой смысл?


 
Евгения   (2002-05-28 21:15) [12]

Включение по телефонному звонку может пригодиться, если использовать комп еще и как автоответчит для записи звонков (речи)


 
-=Sergeante=-   (2002-05-29 11:16) [13]

Включение по тел. звонку может очень пригодиться, если ты в другом месте хочешь поработать со своим компом.


 
AlexKniga   (2002-05-29 14:49) [14]

Snake2000
Когда машина вкл, я часто использую комп как будильник.
Нпр: "Поставил чайник", "Посмотреть фильм", пр.
Пользуюся Alarm++ for Windows.

А тут как то, поздно ложился, но рано вставать. И я вспомнил про BIOS Setup\Power Management Setup\Resume by RTC Alarm. Поставил в NT autologon, включил звуки Windows, в autorun запихал winamp с бодрящей песенкой, для надежности. Регуляторы громкости на максимум. Меняю Sven-988 (акустика достаточно мощная и на х/х гудят) на пассивные колонки, чтоб спать в тишине. Перезагружаюсь, вхожу в BIOS Setup, устанавливаю пробудку в 6.00, Перезагружаюсь.
На живчике (SB Live!), даже на пассивных колонках, Звук Microsoft был, я бы сказал, не тихим в два часа ночи. А следом и Rammstein.


 
AlexKniga   (2002-05-29 14:57) [15]

Кроме Resume by Alarm, есть еще:
Resume On Ring/LAN (модем/сетевуха)
Resume On PME# (Power Management Event) - шоето такое я не знаю.



 
SuperUmnik   (2002-05-30 07:20) [16]

Люди! не убивайте меня! пообещал что есть короче алгоритм, перерыл весь Комп но блин не нашел! хотя помню что сохранял! т.к. эта тема обсуждалась еще два года назад в Дельфи.нюъс.ру. и меня заинтересовала и там было много вариантов предложено! Сыплю пеплом голову! Больше не буду хвастать! не убедившись.!


 
SuperUmnik   (2002-05-30 07:28) [17]

Кстати объясняю зачем нужен переустановка биоса из под виндов.
Предположим есть автономная метеостанция (За 1500 км.) на аккомуляторах компутер нужен лишь для передачи данных по модему. Круглые сутки его гонять аккомулятор скоро сдохнет. надо данные передавать три раза в сутки. поэтому в программе закладываешь возможность изменения времени пробудки и после очередного сеанса связи его меняешь. тогда нужно в очередной сеанс только выставить новое время!


 
SuperUmnik   (2002-05-30 07:35) [18]

Пробудка по сетевой прикольно когда ты ухал из офиса и утебя есть удаленный доступ с ноутбука в сеть и вдруг тебе (в 2 часа ночи) срочно понадобилось что то скачать со своей машины! просто влазишь в офисную сеть стучишся в свою машину и ждешь! она будится минуты три и все! могеш работать.
С пробуждением по модему так удобно работать с домашней машиной!надо только кол-во звонков настроить! из офиса звонишь домой и вот она чудо техники! связь работает а дома то некого нет!



Страницы: 1 вся ветка

Форум: "Система";
Текущий архив: 2002.08.12;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.5 MB
Время: 0.006 c
1-35282
TAN_K
2002-07-31 15:46
2002.08.12
Помогите начинающему в Delphi


1-35317
SemFLY
2002-07-24 01:17
2002.08.12
Заполнение текстового документа из программы...


4-35503
Yuri Btr
2002-05-31 15:01
2002.08.12
Убить приложение зная только его исполняемый файл


4-35510
Poirot
2002-06-04 20:11
2002.08.12
Элементы диалогов (см res файл)


1-35356
GenaPL
2002-07-30 14:34
2002.08.12
Подскажите хороший редактор баз данных.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский