Subversion Repositories Kolibri OS

Rev

Rev 4867 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. : >asciiz + 0 SWAP C! ;
  2. : >path
  3.         finfo @ 20 + 0 finfo @ 8 + ! DUP >R SWAP DUP >R CMOVE R> R> SWAP >asciiz ;
  4. : >param
  5.         OVER finfo @ 8 + ! >asciiz ;
  6. : exec
  7.         16 finfo @ ! finfo @ 58 sys2 ." started, code=" . CR 5 sys2 DROP ;
  8. S" /RD/1/GRSCREEN" >path 99 exec
  9. S" /RD/1/@RB" >path 30 exec
  10. S" /RD/1/@SS" >path 30 exec
  11. S" /RD/1/@TASKBAR" >path 30 exec
  12. S" /RD/1/SETUP" >path S" BOOT" >param 30 exec
  13. S" /RD/1/ICON2" >path S" BOOT" >param 10 exec
  14. S" /RD/1/board" >path 25 exec
  15. BYE
  16.