Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Blame | Last modification | View Log | Download | RSS feed

  1. #pragma option OST
  2. #pragma option ON
  3. #pragma option cri-
  4. #pragma option -CPA
  5. #initallvar 0
  6. #jumptomain FALSE
  7.  
  8. #startaddress 0x0000
  9.  
  10.  
  11. char   os_name[8]   = {'M','E','N','U','E','T','0','1'};
  12. dword  os_version   = 0x00000001;
  13. dword  start_addr   = #____INIT____;
  14. dword  final_addr   = #____STOP____+32;
  15. dword  alloc_mem    = 4*1024*1024;
  16. dword  x86esp_reg   = 4*1024*1024;
  17. dword  I_Param      = #param;
  18. dword  I_Path       = #program_path;
  19. char param[4096];
  20. char program_path[4096];
  21.  
  22.  
  23. void ExitProcess()
  24. {
  25.         EAX = -1;
  26.         $int 0x40
  27. }
  28.  
  29. dword eaxFunctionDestroy(){RETURN 0;}
  30. eaxFunctionDestroyEnd:
  31.  
  32. void ____INIT____()
  33. {
  34.  
  35. //    Disable door kernel
  36.         EAX = 81;
  37.         EBX = 81;
  38.         ECX = #eaxFunctionDestroy;
  39.         EDX = #eaxFunctionDestroyEnd-#eaxFunctionDestroy;
  40.         $int 0x40
  41.    
  42.         ExitProcess();
  43. }
  44.  
  45. void ____STOP____()
  46. {
  47.         ExitProcess();
  48. }
  49.