home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / hensa / music / coconizer_1 / !Coconizer / !RunMemory (.txt) < prev    next >
RISC OS BBC BASIC V Source  |  1994-09-25  |  484b  |  19 lines
  1.  > !Run2
  2.  Basic nahm sich kompletten Speicher, davon nun 160K Screen wegnehmen...
  3. min%=300*1024
  4. pic%=160*1024
  5.  "OS_CheckModeValid",35 
  6.  ok%<>35 
  7.  "RMload <Obey$Dir>.Modes.Vidc2_35"
  8.  "OS_ReadDynamicArea",2 
  9.  ,size%
  10.  "Wimp_SlotSize",-1,-1 
  11.  ,,free%
  12. 6real%=size%+free% :
  13.  real%<pic% 
  14. -(pic%-real%)
  15.  "Wimp_SlotSize",-1,-1 
  16.  curr%
  17.  curr%>=min% 
  18.  1,"Coco needs at least 300K plus 160K screen to start up"
  19.