DRAFTER2-10
| (pour ) | (switch) | (anything ) | (à ) | (this ) | (disquette) | (choisir) | (le ) | (SOFTWARE-BUTTON) | (Bureau) | (ensuite ) | (DOUBLE-CLICK) | (le ) | (floppy disk) |
| FOR | SWITCH | ANYTHING | TO | THISDET | DISK | CHOOSE | DEFINITE-DET-MASC | LEX432 | DESKTOP-BUTTON | THEN | LEX433 | DEFINITE-DET-MASC | FLOPPY-DISK |
(EXAMPLE
:NAME DRAFTER2-10
:GENERATEDFORM "pour switch anything à this disquette, choisir le SOFTWARE-BUTTON Bureau, ensuite DOUBLE-CLICK le floppy disk."
:GLOSS ( :ENGLISH NIL)
:TARGETFORM "To switch to another drive, THIS CRASHES......"
:LOGICALFORM
(S1 / RST-PURPOSE
:DOMAIN
(RST1 / RST-SEQUENCE
:DOMAIN
(CHOOSE1 / DISPOSITIVE-MATERIAL-ACTION
:LEX CHOOSE
:ACTOR (HEARER / READER )
:ACTEE
(SB1 / DECOMPOSABLE-OBJECT
:LEX SOFTWARE-BUTTON
:DETERMINER THE
:PROPERTY-ASCRIPTION
(DT1 / DECOMPOSABLE-OBJECT
:NAME DESKTOP-BUTTON )
)
:SPEECHACT IMPERATIVE )
:RANGE
(DC1 / DISPOSITIVE-MATERIAL-ACTION
:LEX DOUBLE-CLICK
:ACTOR (HEARER / READER )
:ACTEE
(DD1 / SOFTWARE-BUTTON
:LEX FLOPPY-DISK
:DETERMINER THE )
:SPEECHACT IMPERATIVE )
)
:RANGE
(SWITCH1 / DISPOSITIVE-MATERIAL-ACTION
:LEX SWITCH
:ACTOR (HEARER / READER )
:DESTINATION
(D1 / ZERO-D-LOCATION
:LEX DISK
:DETERMINER THIS )
)
:THEME SWITCH1 )
:EXPANSIONS ((1 THEME\#1 DEPENDENT)
(2 PREDICATOR\#2 VOICE LEXVERB)
(2 THEME\#2 SUBORDINATOR)
(11 PREDICATOR\#11 VOICE LEXVERB)
(20 PREDICATOR\#20 VOICE LEXVERB))
:SET-NAME |isolde1|
)