git-svn-id: https://spexeah.com:8443/svn/Asuro@588 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
parent
07f8dd5e4d
commit
4da90a4647
BIN
bin/kernel.bin
BIN
bin/kernel.bin
Binary file not shown.
Binary file not shown.
BIN
lib/asuro.ppu
BIN
lib/asuro.ppu
Binary file not shown.
Binary file not shown.
Binary file not shown.
BIN
lib/libpsystem.a
BIN
lib/libpsystem.a
Binary file not shown.
BIN
lib/terminal.ppu
BIN
lib/terminal.ppu
Binary file not shown.
@ -3,11 +3,11 @@ unit asuro;
|
|||||||
interface
|
interface
|
||||||
|
|
||||||
const
|
const
|
||||||
VERSION = '1.0.0-584a';
|
VERSION = '1.0.0-587a';
|
||||||
VERSION_MAJOR = '1';
|
VERSION_MAJOR = '1';
|
||||||
VERSION_MINOR = '0';
|
VERSION_MINOR = '0';
|
||||||
VERSION_SUB = '0';
|
VERSION_SUB = '0';
|
||||||
REVISION = '584';
|
REVISION = '587';
|
||||||
RELEASE = 'a';
|
RELEASE = 'a';
|
||||||
|
|
||||||
implementation
|
implementation
|
||||||
|
@ -388,6 +388,8 @@ begin
|
|||||||
success:= success AND Serial.Send(uint8('R'), COM1, 100000);
|
success:= success AND Serial.Send(uint8('R'), COM1, 100000);
|
||||||
success:= success AND Serial.Send(uint8('L'), COM1, 100000);
|
success:= success AND Serial.Send(uint8('L'), COM1, 100000);
|
||||||
success:= success AND Serial.Send(uint8('D'), COM1, 100000);
|
success:= success AND Serial.Send(uint8('D'), COM1, 100000);
|
||||||
|
success:= success AND Serial.Send(10, COM1, 100000);
|
||||||
|
success:= success AND Serial.Send(0, COM1, 100000);
|
||||||
if success then begin
|
if success then begin
|
||||||
console.writestringlnWND('Send Success!', TERMINAL_HWND);
|
console.writestringlnWND('Send Success!', TERMINAL_HWND);
|
||||||
end else begin
|
end else begin
|
||||||
|
Loading…
x
Reference in New Issue
Block a user