git-svn-id: https://spexeah.com:8443/svn/Asuro@582 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
		
							
								
								
									
										
											BIN
										
									
								
								bin/kernel.bin
									
									
									
									
									
								
							
							
						
						
									
										
											BIN
										
									
								
								bin/kernel.bin
									
									
									
									
									
								
							
										
											Binary file not shown.
										
									
								
							
										
											Binary file not shown.
										
									
								
							
							
								
								
									
										
											BIN
										
									
								
								lib/RTC.ppu
									
									
									
									
									
								
							
							
						
						
									
										
											BIN
										
									
								
								lib/RTC.ppu
									
									
									
									
									
								
							
										
											Binary file not shown.
										
									
								
							
							
								
								
									
										
											BIN
										
									
								
								lib/asuro.ppu
									
									
									
									
									
								
							
							
						
						
									
										
											BIN
										
									
								
								lib/asuro.ppu
									
									
									
									
									
								
							
										
											Binary file not shown.
										
									
								
							
							
								
								
									
										
											BIN
										
									
								
								lib/kernel.ppu
									
									
									
									
									
								
							
							
						
						
									
										
											BIN
										
									
								
								lib/kernel.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.
										
									
								
							| @@ -17,13 +17,14 @@ type | ||||
|         Century : uint8; | ||||
|     end; | ||||
|  | ||||
| var | ||||
|     DateTime : TDateTime; | ||||
|  | ||||
| procedure init; | ||||
| function getDateTime : TDateTime; | ||||
|  | ||||
| implementation | ||||
|  | ||||
| var | ||||
|     DateTime : TDateTime; | ||||
|  | ||||
| function is_update_in_progress : boolean; | ||||
| var | ||||
|     bin : uint8; | ||||
| @@ -79,6 +80,12 @@ begin | ||||
|     io_wait(); | ||||
| end; | ||||
|  | ||||
| function getDateTime : TDateTime; | ||||
| begin | ||||
|     update(); | ||||
|     getDateTime:= DateTime; | ||||
| end; | ||||
|  | ||||
| procedure init; | ||||
| var | ||||
|     prev : uint8; | ||||
| @@ -104,7 +111,7 @@ begin | ||||
|     inb($71); | ||||
|      | ||||
|     //isrmanager.registerISR(32 + 8, @update); | ||||
|     TMR_0_ISR.hook(uint32(@update)); | ||||
|     //TMR_0_ISR.hook(uint32(@update)); | ||||
| end; | ||||
|  | ||||
| end. | ||||
| @@ -3,11 +3,11 @@ unit asuro; | ||||
| interface | ||||
|   | ||||
| const | ||||
|      VERSION       = '1.0.0-579a'; | ||||
|      VERSION       = '1.0.0-580a'; | ||||
|      VERSION_MAJOR = '1'; | ||||
|      VERSION_MINOR = '0'; | ||||
|      VERSION_SUB   = '0'; | ||||
|      REVISION      = '579'; | ||||
|      REVISION      = '580'; | ||||
|      RELEASE       = 'a'; | ||||
|   | ||||
| implementation | ||||
|   | ||||
| @@ -278,9 +278,9 @@ begin | ||||
|      console.writestringln('Press any key to boot in to Asuro Terminal...'); | ||||
|      tracer.pop_trace; | ||||
|  | ||||
|      writeint(DateTime.Hours); | ||||
|      writestring(':'); | ||||
|      writeintln(DateTime.Minutes); | ||||
|      //writeint(DateTime.Hours); | ||||
|      //writestring(':'); | ||||
|      //writeintln(DateTime.Minutes); | ||||
|  | ||||
|      tracer.push_trace('kmain.KEYHOOK'); | ||||
|      keyboard.hook(@temphook); | ||||
|   | ||||
| @@ -251,7 +251,11 @@ begin | ||||
| end; | ||||
|  | ||||
| procedure printTime(Params : PParamList); | ||||
| var | ||||
|     DateTime : TDateTime; | ||||
|  | ||||
| begin | ||||
|      DateTime:= getDateTime; | ||||
|      writeIntWND(DateTime.Day, TERMINAL_HWND);      | ||||
|      writeStringWND('/', TERMINAL_HWND); | ||||
|      writeIntWND(DateTime.Month, TERMINAL_HWND); | ||||
|   | ||||
		Reference in New Issue
	
	Block a user
	 kieron
					kieron