Splash screen

[Tom]

Ik heb op http://www.afralisp.com/lispa/lisp59.htm iets gevonden van een splash screen.

wanneer ik deze lisp probeer geeft hij altijd volgende fout:
; error: no function definition: DOS_SPLASH

Weet iemand hoe zo een splash screen werkt ?

Alvast bedankt

Tom

[HofCAD]

Ik heb op http://www.afralisp.com/lispa/lisp59.htm iets gevonden van een splash screen.

wanneer ik deze lisp probeer geeft hij altijd volgende fout:
; error: no function definition: DOS_SPLASH

Weet iemand hoe zo een splash screen werkt ?

Alvast bedankt

Tom

Beste Tom,

Beschik je ook over DOSLib.Arx, en heb je die ook geladen?

Groetjes HofCAD CSI

[Tom]

De ARX file is geladen. hij geeft wel een kader om een tekening te openen, maar een splash screen komt er niet op.
in onderstaand deel van die lisproutine van op die site staat doslib13.arx doslib14.arx en doslib2k.arx maar ik heb enkel doslib15.arx en doslib16.arx. Ik wil enkel bij het opstarten van AutoCAD zo een splash screen laten komen.

(cond
     ((= (atoi (substr (getvar "acadver") 1 2)) 13)
       (if (not (member "doslib13.arx" (arx)))
         (arxload (findfile "doslib13.arx"))))
     ((= (atoi (substr (getvar "acadver") 1 2)) 14)
       (if (not (member "doslib14.arx" (arx)))
         (arxload (findfile "doslib14.arx"))))
     ((= (atoi (substr (getvar "acadver") 1 2)) 15)
       (if (not (member "doslib2k.arx" (arx)))
         (arxload (findfile "doslib2k.arx"))))
   );cond

[Joop]

Op de volgende site kun je de juiste doslib downloaden: DOSLIB6.1
http://download.mcneel.com/download.asp?id=doslib

Wijzif de code in:

(cond
((= (atoi (substr (getvar "acadver") 1 2)) 13)
(if (not (member "doslib13.arx" (arx)))
(arxload (findfile "doslib13.arx"))))
((= (atoi (substr (getvar "acadver") 1 2)) 14)
(if (not (member "doslib14.arx" (arx)))
(arxload (findfile "doslib14.arx"))))
((= (atoi (substr (getvar "acadver") 1 2)) 15)
(if (not (member "doslib61.arx" (arx)))
(arxload (findfile "doslib61.arx"))))
);cond

[Tom]

ik laad de arx bestanden en als ik dan zo een splashscreen op het scherm wil latenkomen dan komt er niets op het scherm

(dos_splash "afralisp.bmp" 5)

bij dit commando komt er gewoon een nil terug.

[Joop]

Eerst een correctie:  
De wijziging die ik eerder heb opgegeven moet zijn doslib15.arx.


Staat de afralisp,bmp in het zoekpad?
De bmp die je wilt tonen moet namelijk in het zoekpad staan OF je moet het hele pad opgeven.
b.v.:
(dos_splash "c://program Files//AutoCAD2002//bmp//afralisp.bmp" 5)

Zowel bij succes als bij fout krijg je melding nil.
(zie help van doslib)

[Tom]

bedankt voor jullie hulp. het werkt zeer goed

Tom