New and improved SICK project

[eoredson]

So you are not declaring an error, or just that it works?

[mnrvovrfc]

Everything is fine at the moment.

[eoredson]

Here is the latest Sick program updates:

Code: (Select All)

Version v64.0a r8.0a:
  Improves opening/closing token (, [, and { in SwapData and Assignment.
  Adds some ; delimiter parsing to , tokens.
  Doubles the number of sound file extensions from 15 to 31.

[eoredson]

Now that QB64PE v4.0.0 has rolled out, here is a few Sick features:

Increases sound file support to 31 extensions, adds some _SndPlay support.

Removes $Unstable:Midi and $MidiSoundFont;Default

Thanks, Erik.

[eoredson]

Try this sample .sic program to display files:
Store as Filespec.sic not .bas

Code: (Select All)

10  color 15, 0
20  input "File spec", x$
30  gosub 300
40  f$=dir$(x$)
50  while len(f$)
60    color 14, 0
70    print f$;space$(13-len(f$));" ";
80    print filedate(f$);" ";filetime(f$);" ";
90    if and(fileattr(f$),010h)=010h then
100      r=r+1
110      print "<dir>"
120    else
130      print formatS$(filesize(f$))
140      q=q+1
150    endif
160    x=x+filesize(f$)
170    z=z+1
180    if z=21 then
190      gosub 340
200      z=0
210      gosub 300
220    endif
230    f$=dir$("")
240 wend
250 if z then
260    gosub 340
270 endif
280 gosub 480
290 end
300 color 15, 0
310 print "filename.ext  date      time    size"
320 print "------------------------------------------"
330 return
340 color 15, 0
350 print "-more-";
360 do
370    z$=inkey$
380    if len(z$) then
390      exit do
400    endif
410 loop
420 print
430 if lcase$(z$)="n" Then
440    gosub 480
450    end
460 endif
470 return
480 print "Total dirs ";r
490 print "Total files ";q
500 print "Total bytes ";formatS$(x)
510 return

[eoredson]

Try this sample .sic program to display primes and factors:
Store as Prime.sic not .bas 

Code: (Select All)

10  if stdinenabled then
20    r=10
30    goto 110
40  endif
50  print "Enter upper prime";
60  input r
70  r=int(r)
80  if r<2 then
90    end
100 endif
110 z=2
120 print " 2 = (prime)" ' first prime is 2
130 do until z>=r ' display factored numbers
140    x$=inkey$
150    if x$=chr$(27) Then
160      end
170    endif
180    z=z+1
190    x=z
200    print x;"=";
210    l=1
220    q=0
230    do until x=1
240      l=l+1
250      do while mod(x,l)=0 ' continue to divide number
260          q=q+1
270          if q>1 then
280            print " *";
290          endif
300          print l;
310          x=x/l
320      loop
330      if l>int(z/2) then ' test for maximum divisor
340          exit do
350      endif
360      if l>int(sqr(x)) then ' test maximum divisor is prime
370          if q=0 then
380            exit do
390          endif
400      endif
410    loop
420    if q=0 then ' display number is prime
430      print " (prime)";
440    endif
450    print
460 loop
470 stop

[eoredson]

Here is the latest Sick program updates:

Code: (Select All)

Version v64.0a r8.0a:
  Improves opening/closing token (, [, and { in SwapData and Assignment.
  Adds some ; delimiter parsing to , tokens.
  Doubles the number of sound file extensions from 15 to 31.

Code: (Select All)

Version v64.0a r8.1a:
  Detects some QB64 versions to affect Midi sound fonts.
  Adds an array of 8 soundfont file extensions.
  Adds Play Font to load a soundfont file.
  Adds Chron and Chroff to toggle low ascii prints.
  Adds more constants such as CR, LF, and CRLF.
  Detects v4.0.0 version for constants and soundfont.
Version v64.0a r8.2a:
  Adds ubound array element redim increase.
  Adds custom command$ function.
  Fixes Shell "CMD" to drop to DOS.

Code: (Select All)

Version v64.0a r8.3a:
  Fixes multiple filename on command line when in quotes.
  Adds BootUsageError to display filename error on command line.
  Adds /R command line switch to disable quitbox when quiting.
  Adds /U command line switch to disable menu5.doc display file.
  Adds /W command line switch to disable startbox when starting.
  Adds StartMenuIgnore, StartBoxIgnore, and QuitBoxIgnore
    to config file and ToggleMenu and Environment.
  Adds Beep [<n>] number of beeps.
  Adds functions Delay, Limit, and Slice.

  New feature!
    The Keymap function allows mapping of ascii/extended keys.

Code: (Select All)

Version v64.0a r8.4a:

  Fixes ?= when calling Assignment.
  Adds color constants to parser.

  New feature!
    Adds multichar variables into assignment and arrays.
    Extends arrays to 1024 elements for multichar variables.
    Extends arrays in debug commands for multichar break variables.
     Variables extended to multichar such as: (also in Sub InputExpression)
      A0-Z0 to A9-Z9, A0(n)-A9(n) to Z0(n)-Z9(n), A0$-A9$ to Z0$-Z9$.

Code: (Select All)

Version v64.0a r8.5a:
   Fixes bad input variable in Sub InputExpression.
   Fixes parameter type mismatch in Function CreateDirectoryA.
   Adds Reboot and Shutdown command to shell to Shutdown.exe in Windows.

Code: (Select All)

Version v64.0a r8.6a:
   Fixes .key filename in Keymapper.
   Adds custom Inkeyz$ function for Keymapper.
   Traps Ctrl-C during Ctrl-Break in Keymapper.
   Fixes PutRecord for binary file writes.
   Now verifies the validity of Field in OpenField.
   Adds line number to end of $Include: statement.
   New drive features:
     Extends [FLOPPY] DriveType to [FLOPPY A] and [FLOPPY B].
     Adds Sub UsedSpace to extend TotalSpace and FreeSpace.
     Adds UDRV(<exp$>) function to call UsedSpace.

Code: (Select All)

Version v64.0a r8.7a:
   New constant features:
     Adds optional parameter to SLICE constant.
     Adds LimitValue constant to all _Limit function calls.
     Adds DelayValue constant to all _Delay function calls.
     Adds TrapValue constant to _Exit trap function.

Version v64.0a r8.8a:
   New features!
     Adds recent filelist for loading and storing a list of files.
     Adds constant variable assignments and retrieval.

Version v64.0a r8.9a:
   Adds constants to SwapData subroutine.
   Adds underscore to parsed token list.

[eoredson]

This is the most recent Sick version:

Code: (Select All)

Version v64.0a r8.3a:
  Fixes multiple filename on command line when in quotes.
  Adds BootUsageError to display filename error on command line.
  Adds /R command line switch to disable quitbox when quiting.
  Adds /U command line switch to disable menu5.doc display file.
  Adds /W command line switch to disable startbox when starting.
  Adds StartMenuIgnore, StartBoxIgnore, and QuitBoxIgnore
    to config file and ToggleMenu and Environment.
  Adds Beep [<n>] number of beeps.
  Adds functions Delay, Limit, and Slice.

  New feature!
    The Keymap function allows mapping of ascii/extended keys.

Code: (Select All)

Version v64.0a r8.4a:

  Fixes ?= when calling Assignment.
  Adds color constants to parser.

  New feature!
    Adds multichar variables into assignment and arrays.
    Extends arrays to 1024 elements for multichar variables.
    Extends arrays in debug commands for multichar break variables.
     Variables extended to multichar such as: (also in Sub InputExpression)
      A0-Z0 to A9-Z9, A0(n)-A9(n) to Z0(n)-Z9(n), A0$-A9$ to Z0$-Z9$.

Code: (Select All)

Version v64.0a r8.5a:
   Fixes bad input variable in Sub InputExpression.
   Fixes parameter type mismatch in Function CreateDirectoryA.
   Adds Reboot and Shutdown command to shell to Shutdown.exe in Windows.

Code: (Select All)

Version v64.0a r8.6a:
   Fixes .key filename in Keymapper.
   Adds custom Inkeyz$ function for Keymapper.
   Traps Ctrl-C during Ctrl-Break in Keymapper.
   Fixes PutRecord for binary file writes.
   Now verifies the validity of Field in OpenField.
   Adds line number to end of $Include: statement.
   New drive features:
     Extends [FLOPPY] DriveType to [FLOPPY A] and [FLOPPY B].
     Adds Sub UsedSpace to extend TotalSpace and FreeSpace.
     Adds UDRV(<exp$>) function to call UsedSpace.

Code: (Select All)

Version v64.0a r8.7a:
   New constant features:
     Adds optional parameter to SLICE constant.
     Adds LimitValue constant to all _Limit function calls.
     Adds DelayValue constant to all _Delay function calls.
     Adds TrapValue constant to _Exit trap function.

Version v64.0a r8.8a:
   New features!
     Adds recent filelist for loading and storing a list of files.
     Adds constant variable assignments and retrieval.

Version v64.0a r8.9a:
   Adds constants to SwapData subroutine.
   Adds underscore to parsed token list.

LOC: 35,424