Back|Forward

DCL:GRPH1:SGPACK: User Interface:Explanation of Subroutines: Tone Primitives

2.9.3 SGSTNP

1.

Function

Sets the tone pattern index used in SGTNU, SGTNV, and SGTNR.

2.

Call

CALL SGSTNP(ITPAT)

3.

Explanation of Parameters

ITPAT

(I)

The tone pattern index (Initial value is 1.) 8.1.4- See Section 8.1.10.

4.

Notes

(a)

ITPAT must be larger than 1. When ITPAT is 0, a message is printed, and no other steps are taken.

(b)

The validity of ITPAT is not checked in this routine. It is checked when SGTNU, SGTNV, or SGTNR is called.

(c)

The current tone pattern index can be inquired by

CALL SGQTNP(ITPAT).