home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / GFX / Raytracing / Raytracer / WZD-REF4.LHA / ref / install / skripte.lha / GrößeÄndern.SKR < prev    next >
Encoding:
Text File  |  1996-03-11  |  373 b   |  20 lines
  1. REFSKRIPT
  2. PRINT Tool Größe ändern
  3. GET_PARAM_NR 1
  4. GET_RESULT objektname
  5. OBJ_ERLAUBT objektname GEO_CHANGE
  6. GET_RESULT erlaubt
  7. IF_STR_EQUAL_GOTO erlaubt NEIN exit
  8. GET_REAL Faktor?
  9. RETURN_IF_ABBRUCH 0
  10. GET_RESULT wert
  11. GEO_SIZE objektname wert
  12. PRINT objektname um Faktor wert vergrößert/verkleinert.
  13. PLOT_PKL
  14. RETURN 0
  15.  
  16. >exit:
  17. MELDUNG Größenänderung nicht erlaubt!
  18. PRINT
  19. RETURN 0
  20.