English Amiga Board

Go Back   English Amiga Board > Support > support.Apps

Thread Tools
Old 19 August 2009, 18:49   #1
Registered User
Join Date: Apr 2007
Location: Poland
Posts: 337
Few questions about HSPascal [solved]

Hello. I edit this post because I solved all my problem with HSPascal. Here is solution for
all of them. I know it is old language but maybe someone other also need example code.

The begining of program.
program test;
  AmigaDOS, Dos, Exec, Utility;
  Cmd : string;
  TagArray : Array[0..6] of TTagItem;
  Res : integer;
  FileName : string;
  Ok : boolean;
To run a file or command
  Cmd := 'assign T: Ram:' +#0;
  TagArray[0].Ti_Tag := SYS_Asynch;
  TagArray[0].Ti_Data := 0;
  TagArray[1].Ti_Tag := SYS_Input;
  TagArray[2].Ti_Tag := NP_StackSize;
  TagArray[2].Ti_Data := 0;
  TagArray[3].Ti_Tag := NP_Priority;
  TagArray[3].Ti_Data := 0;
  TagArray[4].Ti_Tag := SYS_Output;
  TagArray[4].Ti_Data := 0;
  TagArray[5].Ti_Tag := SYS_UserShell;
  TagArray[5].Ti_Data := True_;
  TagArray[6].Ti_Tag := TAG_end;
  Res := SystemTagList(@Cmd[1], @TagArray);
To delete file
  FileName := 'Dir:Filename.exe';
  Ok := DeleteFile(@FileName[1]);
To make 3000 miliseconds delay - know in Object Pascal as Sleep:
Geting env variable is not needed because we can handle program command line parameters
like in most of Pascal Compilers do using ParamStr(1) etc or all Parameters in ParamCount
   if (ParamStr(1) = '') then

Last edited by olesio; 20 August 2009 at 06:02. Reason: Solved my problems :)
olesio is offline  
AdSense AdSense  
AdSense AdSense  

Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
Thread Tools

Similar Threads
Thread Thread Starter Forum Replies Last Post
A few questions Muzer project.ClassicWB 10 12 September 2009 15:14
C/C++ questions pmc Coders. General 26 22 May 2007 04:22
Three Little Questions. mindjoker support.Hardware 2 16 March 2003 04:38
Two questions Drakon request.Old Rare Games 7 19 November 2002 20:33
A few questions! One1 New to Emulation or Amiga scene 2 30 October 2002 18:41

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

All times are GMT +2. The time now is 15:59.

Powered by vBulletin® Version 3.8.8 Beta 1
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Page generated in 0.12912 seconds with 11 queries