13.07.2015 Views

Turbo Basic

Turbo Basic

Turbo Basic

SHOW MORE
SHOW LESS
  • No tags were found...

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

See AlsoExampleREG as a function returns the value of the selected element inthe register buffer:PRINT REG(2) Iprint value in BX of register buffer.The programmer is responsible for preserving the Data Segment(DS), Base Pointer (BP), Stack Segment (SS), and Stack Pointer(SP) registers.CALL INTERRUPTDEFSEGREGDEFINT a-zDIM a(100)DIM FillRoutine(10)FillRoutine (0) = &HF2FCFillRoutine (1) = &HCBAAREG 1, -1REG 3, 101 * 2REG 9, VARSEG(a(O»REG 6, VARPTR(a(O»DEF SEG = VARSEG(FillRoutine(O»PRINT a (1)WHILE NOT INSTAT : WENDFillAdr = VARPTR(FillRoutine(O»CALL ABSOLUTE FillAdr I (REG)PRINT a (1)END<strong>Turbo</strong> <strong>Basic</strong> Reference Directory 141

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!