/***************************************** /* C64Net WiFi Firmware Software * /* for the Commodore 64, 128, and VIC-20 * /***************************************** ////////////////////////////////////////// This disk includes applications written to work with the C64Net WiFi modem running firmware version 2.0 or better. If this is your first time using the modem, you should start with the configure program to get your modem connected to the internet. You can then use the FTP, TELNET, IRC, WGET, and other programs whenever you wish to communicate with the internet. The disk includes numerous machine language binaries (pml64.bin, pml128.bin, pmlvic.bin, x-xfer64.bin, x-xfer128.bin, rds64.bin, and up9600.bin) which are required for some the several programs provided. You can also use any Commodore compatible terminal programs with the C64Net WiFi modem, such as Novaterm or CCGMS for the C64, Desterm for the C128 in 128 mode, or Mighty Term for the VIC-20. When using one of these programs, you should consult the manual on the C64Net WiFi Firmware command mode for instructions on how to use the Hayes-like commands to connect your modem to the internet. The disk includes the source assembly code for the pml64, pml128, pmlvic, up9600, rds64, and the demo SwiftLink Kernal Wedge driver binary. These source files are in LADS format. The disk also includes the LADS assembler for the C64 to re-assemble the binaries from the source files. To use the LADS assembler, you should use a C64 or C128 in C64 mode, and load the LADS assembler using LOAD"LADS",8,1. Once the assembler is loaded, clear the screen and type the name of the source file to assemble in the upper left-hand corner of the screen. Once that is done, use SYS11000 to begin the assembly, which will create the .bin files. The disk lastly includes the program "emutil", which is a C64, C128, or VIC-20 program to creating and dissolving .D64 images, such as those downloaded by the d64wget program discussed below. Below you will find information on the application programs included on this disk, as well as instructions on using the PML64, PML128, PMLVIC, and UP9600 machine language libraries from BASIC or machine language. BUT I DON'T HAVE THE DISK?! ************************************* Bootstrap software downloader for Commodore 64 with c64wifi modem with firmware rev 2.4 and better. Before you type in and run this program, you should make sure your modem is connected to a wifi hotspot. You can use any C64/C128/VIC-20 terminal program, set to 1200 baud, in ASCII mode. From inside the terminal mode of your program, you can type ATW to get a list of local wifi hotspots. You can then use ATW"," to connect. You should then enter ATZ&W to save the new settings. If you don't have access to a terminal program, you can type this little program in, save, and run it, and then enter ATW to get a list of local wifi hotspots, and then use ATW",", and if the connection is successful, enter ATZ&WE1&P1 to save the settings. 10 open5,2,0,chr$(8):poke665,73-(peek(678)*30) 15 print#5,"at&p1e1":print#5,"at&p1e1":printchr$(14); 20 get#5,a$:ifa$<>""thenprinta$; 30 geta$:ifa$<>""thenprint#5,a$; 40 goto20 Once your modem is connected to wifi, switch your C64 to lowercase mode by pressing shift-C= and then type in the following program and save it to a disk: 10 open5,2,0,chr$(8):pa=peek(678)*30:poke665,73-pa 15 a3$=chr$(3):print#5,a3$; 20 input"enter filename";f$:iff$=""thenstop 30 input"enter drive";dv:ifdv<8thenstop 35 print#5,a3$; 40 get#5,a$:ifa$<>""then40 50 dl$=mid$(str$(99+pa),2):print#5,"atze0r0&p1f1s45=2s44="+dl$ 60 input#5,a$:ifa$<>"OK"anda$<>"ok"then60 70 print#5,"at&g";chr$(34);"www.zimmers.net:80/otherprojs/";f$;chr$(34) 75 print#5,chr$(19); 80 input#5,b$:ifb$="["then100 90 printb$:print"reset computer and check wifi":close5:stop 100 input#5,ch,ln,c8,b$:ifb$<>"]"thenprint#5,a3$:goto90 110 n8=0:open8,dv,8,"@0:"+f$+",p,w":print"reading..."; 120 m=49152:ni=i+(ln/20):print#5,chr$(17);:fori=1toln 130 input#5,a:n8=n8+a:ifn8>255thenn8=n8-256 140 pokem,a:m=m+1:ifm>53240thengosub200:m=49152 145 ifi>nithenni=i+(ln/20):printint(i/ln*100);"%", 150 next:print#5,a3$;"atz":ifn8<>c8thenprint"checksum fail. try again." 160 print"100 %",:gosub200:close8:close5:print"done":poke49152,0:poke51200,0 199 end 200 print#5,chr$(19);:print:print"writing...":ti$="000000":tt=ti+200 205 ifti