X-Git-Url: https://git.ucc.asn.au/?p=uccvend-snackrom.git;a=blobdiff_plain;f=ROM2%2Fmain_basic.c;fp=ROM2%2Fmain_basic.c;h=230c5fbf3f3c01bf8eb60f7117ee96a947290062;hp=feb5bee0eb5a87cefb3d42223b6cf5bbecf41601;hb=1ea971e82ffacb9a1cba2ecf7241e1f747290ca3;hpb=c0863797291ed5ab439e0d213cc26a2c62b00376 diff --git a/ROM2/main_basic.c b/ROM2/main_basic.c index feb5bee..230c5fb 100644 --- a/ROM2/main_basic.c +++ b/ROM2/main_basic.c @@ -354,9 +354,8 @@ void about() { return; } send_string( - "------------------------------------------------------------" CRLF + CRLF " ROM2 (C) 2004 Bernard Blackham " CRLF - "------------------------------------------------------------" CRLF " Revision: " VERSION_STRING " Built: " DATEBUILT_STRING CRLF "" CRLF CRLF " This snack machine was brought to you by " CRLF " Bernard Blackham" CRLF @@ -405,6 +404,12 @@ void moo() { ); } +void identify() { + send_string( + "086 ROM " VERSION_STRING " " DATEBUILT_STRING CRLF + ); +} + void help() { send_string( "Valid commands are:" CRLF @@ -415,6 +420,7 @@ void help() { " ECHO {ON|OFF} turn echo on or off" CRLF " GETROM download the ROM source code using xmodem" CRLF " H[...] this help screen" CRLF + " IDENTIFY report ROM version" CRLF "*JUMPxxxx jumps to a subroutine at location xxxx" CRLF "*PEEKxxxx returns the value of the byte at location xxxx" CRLF "*POKExxxxyy sets the value of location xxxx to yy" CRLF @@ -612,6 +618,9 @@ int main() { case 'H': help(); break; + case 'I': + identify(); + break; case 'M': moo(); break;