mirror of
https://github.com/Zeal-Operating-System/ZealOS.git
synced 2025-06-07 08:14:48 +00:00
AOnce -> ZOnce
This commit is contained in:
parent
06b4387a43
commit
0147db1d84
Binary file not shown.
Binary file not shown.
@ -56,7 +56,7 @@ public U0 TOSPromptAndCopyDrive()
|
|||||||
|
|
||||||
U0 DistroPrep()
|
U0 DistroPrep()
|
||||||
{
|
{
|
||||||
AOnceFlush; //Don't want in Registry
|
ZOnceFlush; //Don't want in Registry
|
||||||
OnceFlush;
|
OnceFlush;
|
||||||
|
|
||||||
Del("/Home/Demo*");
|
Del("/Home/Demo*");
|
||||||
|
@ -9,4 +9,4 @@ U0 OnceDemo()
|
|||||||
|
|
||||||
OnceDemo;
|
OnceDemo;
|
||||||
|
|
||||||
//There are variants for zenith $LK,"AOnce",A="MN:AOnce"$().
|
//There are variants for zenith $LK,"ZOnce",A="MN:ZOnce"$().
|
||||||
|
@ -6,9 +6,9 @@ $WW,1$$LK,"KMain",A="MN:KMain"$()
|
|||||||
includes $LK,"~/Once.CC"$
|
includes $LK,"~/Once.CC"$
|
||||||
calls $LK,"OnceExe",A="MN:OnceExe"$().
|
calls $LK,"OnceExe",A="MN:OnceExe"$().
|
||||||
|
|
||||||
$LK,"AOnce",A="MN:AOnce"$() appends src code to $LK,"~/Registry.CC"$ $FG,2$Once/Zenith$FG$ tree, executed at next boot by $FG,2$Zenith$FG$.
|
$LK,"ZOnce",A="MN:ZOnce"$() appends src code to $LK,"~/Registry.CC"$ $FG,2$Once/Zenith$FG$ tree, executed at next boot by $FG,2$Zenith$FG$.
|
||||||
|
|
||||||
$LK,"Once",A="MN:Once"$() appends src code to $LK,"~/Registry.CC"$ $FG,2$Once/User$FG$ tree, executed at next boot by first $FG,2$User$FG$ term.
|
$LK,"Once",A="MN:Once"$() appends src code to $LK,"~/Registry.CC"$ $FG,2$Once/User$FG$ tree, executed at next boot by first $FG,2$User$FG$ term.
|
||||||
|
|
||||||
At boot, $LK,"OnceExe",A="MN:OnceExe"$(), executes $FG,2$Once/Zenith$FG$ tree, $LK,"AOnceFlush",A="MN:AOnceFlush"$()s it,
|
At boot, $LK,"OnceExe",A="MN:OnceExe"$(), executes $FG,2$Once/Zenith$FG$ tree, $LK,"ZOnceFlush",A="MN:ZOnceFlush"$()s it,
|
||||||
executes $FG,2$Once/User$FG$ tree and $LK,"OnceFlush",A="MN:OnceFlush"$()s.
|
executes $FG,2$Once/User$FG$ tree and $LK,"OnceFlush",A="MN:OnceFlush"$()s.
|
||||||
|
@ -81,7 +81,7 @@ $LK,"ExePrint",A="MN:ExePrint"$(U8 *format,...) compiles and execute a string.
|
|||||||
|
|
||||||
$LK,"Once",A="MN:Once"$(U8 *format,...) Writes User code to $LK,"Registry",A="FI:~/Registry.CC"$ to be executed next boot.
|
$LK,"Once",A="MN:Once"$(U8 *format,...) Writes User code to $LK,"Registry",A="FI:~/Registry.CC"$ to be executed next boot.
|
||||||
|
|
||||||
$LK,"AOnce",A="MN:AOnce"$(U8 *format,...) Writes Zenith code to $LK,"Registry",A="FI:~/Registry.CC"$ to be executed next boot.
|
$LK,"ZOnce",A="MN:ZOnce"$(U8 *format,...) Writes Zenith code to $LK,"Registry",A="FI:~/Registry.CC"$ to be executed next boot.
|
||||||
|
|
||||||
$LK,"InPrint",A="MN:InPrint"$(I64 mS,U8 *format,...) $LK,"PutChars",A="MN:PutChars"$()s one at a time with a delay.
|
$LK,"InPrint",A="MN:InPrint"$(I64 mS,U8 *format,...) $LK,"PutChars",A="MN:PutChars"$()s one at a time with a delay.
|
||||||
|
|
||||||
|
BIN
src/Kernel.BIN.C
BIN
src/Kernel.BIN.C
Binary file not shown.
Binary file not shown.
@ -122,8 +122,8 @@ U0 RegInit()
|
|||||||
#help_index "Boot/Once;Registry/Once"
|
#help_index "Boot/Once;Registry/Once"
|
||||||
#help_file "::/Doc/Once"
|
#help_file "::/Doc/Once"
|
||||||
|
|
||||||
public U0 AOnceFlush()
|
public U0 ZOnceFlush()
|
||||||
{//Flush AOnce() buf.
|
{//Flush ZOnce() buf.
|
||||||
RegWrite("Once/Zenith","");
|
RegWrite("Once/Zenith","");
|
||||||
}
|
}
|
||||||
|
|
||||||
@ -132,11 +132,11 @@ public U0 OnceFlush()
|
|||||||
RegWrite("Once/User","");
|
RegWrite("Once/User","");
|
||||||
}
|
}
|
||||||
|
|
||||||
public U0 AOnce(U8 *format,...)
|
public U0 ZOnce(U8 *format,...)
|
||||||
{//Add Zenith code to $LK,"~/Registry.CC"$, executed next boot.
|
{//Add Zenith code to $LK,"~/Registry.CC"$, executed next boot.
|
||||||
U8 *buf=StrPrintJoin(NULL,format,argc,argv);
|
U8 *buf=StrPrintJoin(NULL,format,argc,argv);
|
||||||
if (!Bt(&sys_run_level,RLf_ONCE_ZENITH))
|
if (!Bt(&sys_run_level,RLf_ONCE_ZENITH))
|
||||||
AOnceFlush;
|
ZOnceFlush;
|
||||||
RegAppend("Once/Zenith","%s\n",buf);
|
RegAppend("Once/Zenith","%s\n",buf);
|
||||||
Free(buf);
|
Free(buf);
|
||||||
}
|
}
|
||||||
@ -150,14 +150,14 @@ public U0 Once(U8 *format,...)
|
|||||||
Free(buf);
|
Free(buf);
|
||||||
}
|
}
|
||||||
|
|
||||||
public U0 AOnceDrive(U8 drv_let=0,U8 *format,...)
|
public U0 ZOnceDrive(U8 drv_let=0,U8 *format,...)
|
||||||
{//Add Zenith code to drv $LK,"~/Registry.CC"$, executed next boot.
|
{//Add Zenith code to drv $LK,"~/Registry.CC"$, executed next boot.
|
||||||
U8 *buf=StrPrintJoin(NULL,format,argc,argv);
|
U8 *buf=StrPrintJoin(NULL,format,argc,argv);
|
||||||
I64 old_drive_let=*sys_registry_doc->filename.name;
|
I64 old_drive_let=*sys_registry_doc->filename.name;
|
||||||
if (drv_let)
|
if (drv_let)
|
||||||
*sys_registry_doc->filename.name=drv_let;
|
*sys_registry_doc->filename.name=drv_let;
|
||||||
if (!Bt(&sys_run_level,RLf_ONCE_ZENITH))
|
if (!Bt(&sys_run_level,RLf_ONCE_ZENITH))
|
||||||
AOnceFlush;
|
ZOnceFlush;
|
||||||
RegAppend("Once/Zenith","%s\n",buf);
|
RegAppend("Once/Zenith","%s\n",buf);
|
||||||
Free(buf);
|
Free(buf);
|
||||||
*sys_registry_doc->filename.name=old_drive_let;
|
*sys_registry_doc->filename.name=old_drive_let;
|
||||||
@ -183,7 +183,7 @@ public U0 OnceExe()
|
|||||||
RegDefault("Once/Zenith","");
|
RegDefault("Once/Zenith","");
|
||||||
if (RegCount("Once/Zenith")>2) {
|
if (RegCount("Once/Zenith")>2) {
|
||||||
Zenith("RegExe(\"Once/Zenith\");");
|
Zenith("RegExe(\"Once/Zenith\");");
|
||||||
AOnceFlush;
|
ZOnceFlush;
|
||||||
}
|
}
|
||||||
LBts(&sys_run_level,RLf_ONCE_ZENITH);
|
LBts(&sys_run_level,RLf_ONCE_ZENITH);
|
||||||
|
|
||||||
@ -195,7 +195,7 @@ public U0 OnceExe()
|
|||||||
LBts(&sys_run_level,RLf_ONCE_USER);
|
LBts(&sys_run_level,RLf_ONCE_USER);
|
||||||
|
|
||||||
} catch {
|
} catch {
|
||||||
AOnceFlush;
|
ZOnceFlush;
|
||||||
LBts(&sys_run_level,RLf_ONCE_ZENITH);
|
LBts(&sys_run_level,RLf_ONCE_ZENITH);
|
||||||
OnceFlush;
|
OnceFlush;
|
||||||
LBts(&sys_run_level,RLf_ONCE_USER);
|
LBts(&sys_run_level,RLf_ONCE_USER);
|
||||||
|
Loading…
x
Reference in New Issue
Block a user